Job ausfuehren und ggf. bei Fehlern mehrmals versuchen (bei der 1571: $864b)

Einsprung von $BAC5, $BB31, $BBD1, $BC21, $BCBF, $BCE3:

BFB0: 48        PHA
BFB1: A9 40     LDA #$40         T&S-Check ausschalten
BFB3: 8D A8 02  STA $02A8
BFB6: 68        PLA

Einsprung von $B954:

BFB7: 08        PHP              i-Flag merken
BFB8: 58        CLI              i-Flag loeschen
BFB9: 85 28     STA $28          Jobcode merken
BFBB: 20 9D 95  JSR $959D        Job aufrufen
BFBE: C9 02     CMP #$02         kein Fehler ?
BFC0: 90 03     BCC $BFC5        ja, ==>
BFC2: 20 CE BF  JSR $BFCE        Fehler behandeln

Einsprung von $BFC0:

BFC5: A9 00     LDA #$00         Fehlerpruefung wieder einschalten
BFC7: 8D A8 02  STA $02A8
BFCA: B5 02     LDA $02,X        Jobrueckmeldung holen
BFCC: 28        PLP              i-Flag zurueckholen
BFCD: 60        RTS

Einsprung von $BFC2:

BFCE: AD A8 02  LDA $02A8        DOS-Fehlerunterdrueckung einschalten
BFD1: 09 80     ORA #$80
BFD3: 8D A8 02  STA $02A8
BFD6: 86 6C     STX $6C
BFD8: A5 28     LDA $28
BFDA: 9D 72 02  STA $0272,X
BFDD: 20 9D 95  JSR $959D
BFE0: 4C ED 94  JMP $94ED        mehrere Leseversuche durchfuehren

    Previous Page / Next Page