     $ED23/60707:   ?

    Jump from $ECF5:

    ED23: AD 72 02  LDA $0272       ; block number lo
    ED26: 20 F1 CF  JSR $CFF1       ; write in buffer
    ED29: AD 73 02  LDA $0273       ; block number hi
    ED2C: 20 F1 CF  JSR $CFF1       ; in buffer
    ED2F: 20 59 ED  JSR $ED59       ; 'blocks free.' in buffer
    ED32: 20 93 DF  JSR $DF93       ; get buffer number
    ED35: 0A        ASL
    ED36: AA        TAX
    ED37: D6 99     DEC $99,X
    ED39: D6 99     DEC $99,X       ; buffer pointer minus 2
    ED3B: A9 00     LDA #$00
    ED3D: 20 F1 CF  JSR $CFF1
    ED40: 20 F1 CF  JSR $CFF1       ; three zeroes as program end
    ED43: 20 F1 CF  JSR $CFF1
    ED46: 20 93 DF  JSR $DF93       ; get buffer number
    ED49: 0A        ASL             ; times 2
    ED4A: A8        TAY
    ED4B: B9 99 00  LDA $99,Y       ; buffer pointer
    ED4E: A6 82     LDX $82
    ED50: 9D 44 02  STA $0244,X     ; as end marker
    ED53: DE 44 02  DEC $0244,X
    ED56: 4C 0D ED  JMP $ED0D

        Previous Page / Next Page