     $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