Freien Kanal suchen ($d37f)

Einsprung von $9161:

92DB: A0 00     LDY #$00         Byte ($70) nach einem gesetzten Bit
92DD: A9 01     LDA #$01         durchsuchen

Einsprung von $92E5:

92DF: 24 70     BIT $70          (der entsprechende Kanal ist frei)
92E1: D0 09     BNE $92EC        Kanal gefunden, ==>
92E3: C8        INY              Kanalnummer +1
92E4: 0A        ASL              naechstes Bit probieren
92E5: D0 F8     BNE $92DF        noch ein Bit zu ueberpruefen, ==>
92E7: A9 70     LDA #$70         70, NO CHANNEL
92E9: 4C 7C 80  JMP $807C

Einsprung von $92E1:

92EC: 49 FF     EOR #$FF         entsprechendes Bit loeschen
92EE: 25 70     AND $70          und dadurch den Kanal belegen
92F0: 85 70     STA $70
92F2: 98        TYA              Kanalnummer nach A
92F3: 60        RTS

    Previous Page / Next Page