$AD61/44385: Check Valid Loop
AD61: BD 0F 01 LDA $010F,X ; 6510 Hardware Stack Area
AD64: 85 39 STA $39 ; Current BASIC Line number
AD66: BD 10 01 LDA $0110,X ; 6510 Hardware Stack Area
AD69: 85 3A STA $3A ; Current BASIC Line number
AD6B: BD 12 01 LDA $0112,X ; 6510 Hardware Stack Area
AD6E: 85 7A STA $7A ; Pointer: Current Byte of BASIC Text
AD70: BD 11 01 LDA $0111,X ; 6510 Hardware Stack Area
AD73: 85 7B STA $7B ; Pointer: Current Byte of BASIC Text
Jump from $AD82:
AD75: 4C AE A7 JMP $A7AE ; BASIC Warm Start
Jump from $AD5F:
AD78: 8A TXA
AD79: 69 11 ADC #$11
AD7B: AA TAX
AD7C: 9A TXS
AD7D: 20 79 00 JSR $0079 ; CHRGOT: Get same Byte again
AD80: C9 2C CMP #$2C
AD82: D0 F1 BNE $AD75
AD84: 20 73 00 JSR $0073 ; CHRGET: Get next Byte of BASIC Text
AD87: 20 24 AD JSR $AD24 ; Perform [next]
Previous Page / Next Page