    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