$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