$E6C7/59079:   Print error on current track to error buffer

Jump from $C1A7, $E63B, $E645, $EFCB:

E6C7: A0 00     LDY #$00        ; buffer pointer
E6C9: A2 D5     LDX #$D5
E6CB: 86 A5     STX $A5         ; pointer $A5/$A6 to $2D5
E6CD: A2 02     LDX #$02
E6CF: 86 A6     STX $A6
E6D1: 20 AB E6  JSR $E6AB       ; error number to ASCII and in buffer
E6D4: A9 2C     LDA #$2C        ; ',' comma
E6D6: 91 A5     STA ($A5),Y     ; write in buffer
E6D8: C8        INY             ; increment buffer pointer
E6D9: AD D5 02  LDA $02D5       ; first digit of the disk status
E6DC: 8D 43 02  STA $0243       ; in output register
E6DF: 8A        TXA             ; error number in accumulator
E6E0: 20 06 E7  JSR $E706       ; error message in buffer
E6E3: A9 2C     LDA #$2C        ; ',' comma
E6E5: 91 A5     STA ($A5),Y     ; write in buffer
E6E7: C8        INY             ; and increment buffer pointer
E6E8: A5 80     LDA $80         ; track number
E6EA: 20 9B E6  JSR $E69B       ; to ASCII and in buffer
E6ED: A9 2C     LDA #$2C        ; ',' comma
E6EF: 91 A5     STA ($A5),Y     ; write in buffer
E6F1: C8        INY             ; increment buffer pointer
E6F2: A5 81     LDA $81         ; sector
E6F4: 20 9B E6  JSR $E69B       ; convert to ASCII and in buffer
E6F7: 88        DEY
E6F8: 98        TYA
E6F9: 18        CLC
E6FA: 69 D5     ADC #$D5
E6FC: 8D 49 02  STA $0249       ; end pointer
E6FF: E6 A5     INC $A5
E701: A9 88     LDA #$88        ; set READ flag
E703: 85 F7     STA $F7
E705: 60        RTS

    Previous Page / Next Page