Routines
Prev: A883 Up: Map Next: A8BC
A8A0: perform GOTO
Used by the routines at A7AE, A883 and A93B.
A8A0 20 6B A9 JSR $A96B get fixed-point number into temporary integer
A8A3 20 09 A9 JSR $A909 scan for next BASIC line
A8A6 38 SEC set carry for subtract
A8A7 A5 39 LDA $39 get current line number low byte
A8A9 E5 14 SBC $14 subtract temporary integer low byte
A8AB A5 3A LDA $3A get current line number high byte
A8AD E5 15 SBC $15 subtract temporary integer high byte
A8AF B0 0B BCS $A8BC if current line number >= temporary integer, go search from the start of memory
A8B1 98 TYA else copy line index to A
A8B2 38 SEC set carry (+1)
A8B3 65 7A ADC $7A add BASIC execute pointer low byte
A8B5 A6 7B LDX $7B get BASIC execute pointer high byte
A8B7 90 07 BCC $A8C0 branch if no overflow to high byte
A8B9 E8 INX increment high byte
A8BA B0 04 BCS $A8C0 branch always (can never be carry)
Prev: A883 Up: Map Next: A8BC