u1 ($cd5f)

8B9A: 20 9F 8A  JSR $8A9F        Kanal oeffnen, Parameter holen
8B9D: 20 71 8B  JSR $8B71        Block einlesen

Einsprung von $8B97:

8BA0: B9 42 02  LDA $0242,Y      Anzahl zu uebertragender Bytes [dies ist ja
                                 das 1. Byte des gelesenen Blocks !]
8BA3: 99 3B 02  STA $023B,Y      in Ausgabepuffer (als Datenbyte) schreiben
8BA6: A9 FF     LDA #$FF         Blocklaenge setzen (ganzen Block ausgeben)
8BA8: 99 42 02  STA $0242,Y
8BAB: 4C 4C 80  JMP $804C

    Previous Page / Next Page