    Kanal zum Schreiben holen und pruefen ($d107)
    E: $52   : Sekundaeradresse
    A: $50, x: Kanalnummer

    Einsprung von $88AB, $8E60, $99B7, $9B0A, $A82E, $AEB9:

    9042: A5 52     LDA $52          Sekundaeradresse holen
    9044: C9 13     CMP #$13         >18 ?
    9046: 90 02     BCC $904A
    9048: 29 0F     AND #$0F         ja, auf 15 begrenzen

    Einsprung von $9046:

    904A: AA        TAX              entsprechende Kanalnummer aus
    904B: B5 A8     LDA $A8,X        Sekundaeradressentabelle holen
    904D: A8        TAY
    904E: 0A        ASL
    904F: 90 0A     BCC $905B        b7=1: Schreibkanal ? nein, ==>
    9051: 30 0A     BMI $905D        b76=11: (ungueltig) ? ja, ==>

    Einsprung von $905B:

    9053: 98        TYA              Schreib- bzw. Schreib/Lesekanal
    9054: 29 0F     AND #$0F         Kanalnummer isolieren
    9056: 85 50     STA $50          und als aktuelle Kanalnummer merken
    9058: AA        TAX
    9059: 18        CLC              O.k. Flag
    905A: 60        RTS

    Einsprung von $904F:

    905B: 30 F6     BMI $9053        b76=01: Schreib/Lesekanal? ja,==>

    Einsprung von $9051:

    905D: 38        SEC              Fehlerflag setzen
    905E: 60        RTS

        Previous Page / Next Page