Byte aus Directory holen und zur Ausgabe bereitstellen ($ed67)

Einsprung von $936A:

B245: 20 71 90  JSR $9071        Byte aus aktuellen Puffer holen
B248: F0 01     BEQ $B24B        Puffer-Ende, ==>
B24A: 60        RTS

Einsprung von $B248:

B24B: 85 54     STA $54          Byte merken
B24D: A4 50     LDY $50
B24F: B9 42 02  LDA $0242,Y      Puffergroesse holen
B252: F0 08     BEQ $B25C        =0 (noch nicht letzter Block), ==>
B254: A9 80     LDA #$80         b3=0: EOI-Flag im Kanalstatus setzen
B256: 99 34 02  STA $0234,Y
B259: A5 54     LDA $54          Byte zurueckholen
B25B: 60        RTS

Einsprung von $B252:

B25C: 48        PHA              Byte aus dem Directory merken
B25D: 20 C8 B1  JSR $B1C8        Ausgabepuffer neu fuellen
B260: 68        PLA              Byte zurueckholen
B261: 60        RTS

    Previous Page / Next Page