Prueft, ob alle Dateien gefunden worden sind ($c617)
A: x: Nummer eines Dateinamens, der noch fehlt

Einsprung von $8330, $83CE:

83D7: A9 FF     LDA #$FF         Flag: 'Alle Dateien der Kommandozeile im
83D9: 8D A5 02  STA $02A5        Directory gefunden'
83DC: AD 2F 02  LDA $022F        Anzahl Dateinamen in Zaehler laden
83DF: 8D 30 02  STA $0230        alle Dateinamen testen

Einsprung von $83F2, $8336:

83E2: CE 30 02  DEC $0230        <-- (naechsten Dateinamen pruefen)
83E5: 10 01     BPL $83E8        gibt es noch Dateien, nach denen gesucht
83E7: 60        RTS              werden muss? nein, ==>

Einsprung von $83E5:

83E8: AE 30 02  LDX $0230        Nummer des zu pruefenden Namens
83EB: B5 F4     LDA $F4,X        Flags fuer Joker im Parameter
83ED: 30 05     BMI $83F4        b7=1: Joker vorhanden ? ja, (Dateiname
                                kann mehrfach gefunden werden) ==>
83EF: BD 97 02  LDA $0297,X      wurde Datei schon gefunden
83F2: D0 EE     BNE $83E2        Ja, (Datei hat keinen Joker, also kann nur
                                 ein passender Eintrag existieren) ==>

Einsprung von $83ED:

83F4: A9 00     LDA #$00         Flag: 'Noch nicht alle Dateien gefunden'
83F6: 8D A5 02  STA $02A5        merken
83F9: 60        RTS

    Previous Page / Next Page