Daten vom seriellem Bus holen ($ea2e; bei der 1571: $8342) Einsprung von $AED6: AEB8: 78 SEI AEB9: 20 42 90 JSR $9042 Schreibkanal holen AEBC: B0 06 BCS $AEC4 Kanal ist kein kein Schreibkanal, ==> AEBE: BD 34 02 LDA $0234,X Kanalstatus holen AEC1: 6A ROR AEC2: B0 0B BCS $AECF Schreibkanal, (O.k.)==> Einsprung von $AEBC: AEC4: A5 53 LDA $53 SA vom Computer holen AEC6: 29 F0 AND #$F0 Kommando-Bits isolieren AEC8: C9 F0 CMP #$F0 = OPEN ? AECA: F0 03 BEQ $AECF ja, ==> AECC: 4C DF AE JMP $AEDF Fehler: Busbetrieb beenden ==> Einsprung von $AEC2, $AECA: AECF: 20 42 AE JSR $AE42 Daten vom seriellen Bus holen AED2: 58 CLI AED3: 20 78 8E JSR $8E78 und in den aktuellen Puffer schreiben AED6: 4C B8 AE JMP $AEB8 Previous Page / Next Page |