    aktuelles File oeffnen ($c9fa)

    Einsprung von $87C6, $8803:

    8841: AE 30 02  LDX $0230        Nummer des Files holen
    8844: AD 2B 02  LDA $022B        Directory-Track als aktuellen Track setzen
    8847: 85 4D     STA $4D
    8849: B5 E5     LDA $E5,X        Dir-Block mit Fileeintrag holen
    884B: 85 4E     STA $4E
    884D: 20 CF 93  JSR $93CF        SA 17 oeffnen und Dir-Block lesen
    8850: AE 30 02  LDX $0230
    8853: B5 EA     LDA $EA,X        Zeiger auf den Eintrag holen
    8855: 20 22 94  JSR $9422        Pufferzeiger setzen
    8858: AE 30 02  LDX $0230
    885B: B5 F4     LDA $F4,X        Dateityp holen und
    885D: 29 07     AND #$07
    885F: 8D 2D 02  STA $022D        als aktuellen Dateitypen merken
    8862: A9 00     LDA #$00
    8864: 8D 6F 02  STA $026F        Aktuelle Recordlaenge = 0
    8867: 20 4D 98  JSR $984D        File oeffnen und 1. Block lesen
    886A: A0 01     LDY #$01         Pufferzeiger =1
    886C: 20 5F 90  JSR $905F        Dateityp auf REL-Datei testen
    886F: F0 01     BEQ $8872        gleich, (Pufferzeiger =1) ==>
    8871: C8        INY              Zeiger =2

    Einsprung von $886F:

    8872: 98        TYA
    8873: 4C 22 94  JMP $9422        Pufferzeiger setzen
        Previous Page / Next Page