C64 ROM | Routines |
Prev: A93B | Up: Map | Next: A96B |
|
||||
A94B | 20 9E B7 | JSR $B79E | get byte parameter | |
A94E | 48 | PHA | push next character | |
A94F | C9 8D | CMP #$8D | compare with GOSUB token | |
A951 | F0 04 | BEQ $A957 | if GOSUB go see if it should be executed | |
This entry point is used by the routine at A96B.
|
||||
A953 | C9 89 | CMP #$89 | compare with GOTO token | |
A955 | D0 91 | BNE $A8E8 | if not GOTO do syntax error then warm start | |
next character was GOTO or GOSUB, see if it should be executed
|
||||
A957 | C6 65 | DEC $65 | decrement the byte value | |
A959 | D0 04 | BNE $A95F | if not zero go see if another line number exists | |
A95B | 68 | PLA | pull keyword token | |
A95C | 4C EF A7 | JMP $A7EF | go execute it | |
A95F | 20 73 00 | JSR $0073 | increment and scan memory | |
A962 | 20 6B A9 | JSR $A96B | get fixed-point number into temporary integer | |
skip this n
|
||||
A965 | C9 2C | CMP #"," | compare next character with "," | |
A967 | F0 EE | BEQ $A957 | loop if "," | |
A969 | 68 | PLA | else pull keyword token, ran out of options | |
This entry point is used by the routine at A96B.
|
||||
A96A | 60 | RTS |
Prev: A93B | Up: Map | Next: A96B |