    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