$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