| C64 ROM | Routines |
| Prev: A8C0 | Up: Map | Next: A8E8 |
|
|
||||
| A8D2 | D0 FD | BNE $A8D1 | exit if following token to allow syntax error | |
| A8D4 | A9 FF | LDA #$FF | set byte so no match possible | |
| A8D6 | 85 4A | STA $4A | save FOR/NEXT variable pointer high byte | |
| A8D8 | 20 8A A3 | JSR $A38A | search the stack for FOR or GOSUB activity, get token off stack | |
| A8DB | 9A | TXS | correct the stack | |
| A8DC | C9 8D | CMP #$8D | compare with GOSUB token | |
| A8DE | F0 0B | BEQ $A8EB | if matching GOSUB go continue RETURN | |
| A8E0 | A2 0C | LDX #$0C | else error code $04, return without gosub error | |
| A8E2 | .BYTE $2C | makes next line BIT $11A2 | ||
|
This entry point is used by the routine at A8C0.
|
||||
| A8E3 | A2 11 | LDX #$11 | error code $11, undefined statement error | |
| A8E5 | 4C 37 A4 | JMP $A437 | do error #X then warm start | |
| Prev: A8C0 | Up: Map | Next: A8E8 |