$A480/42112: Input & Identify BASIC Line
Jump from $A48E, $A4F6, $A530:
A480: 6C 02 03 JMP ($0302) ; Vector: BASIC Input Line and Decode
A483: 20 60 A5 JSR $A560 ; Input Line Into Buffer
A486: 86 7A STX $7A ; Pointer: Current Byte of BASIC Text
A488: 84 7B STY $7B ; Pointer: Current Byte of BASIC Text
A48A: 20 73 00 JSR $0073 ; CHRGET: Get next Byte of BASIC Text
A48D: AA TAX
A48E: F0 F0 BEQ $A480
A490: A2 FF LDX #$FF
A492: 86 3A STX $3A ; Current BASIC Line number
A494: 90 06 BCC $A49C ; Get Line Number & Tokenise Text
A496: 20 79 A5 JSR $A579 ; Tokenise Input Buffer
A499: 4C E1 A7 JMP $A7E1 ; Prepare to execute statement
Previous Page / Next Page