|
Routines |
| Prev: 61084 | Up: Map | Next: 61159 |
|
Used by the routine at JumpTable.
Jump-table target JumpTable_SeedPrimaryBuffer (
USR JumpTable_SeedPrimaryBuffer): point ParserState_WorkPointer at PrimaryWorkBuffer and scan up to 45 entries. BASIC uses this for INVENTORY / LOOK object lists (see JumpTable).
|
||||
| SeedPrimaryWorkBuffer | 61113 | LD HL,64000 | Point ParserState_WorkPointer at PrimaryWorkBuffer with 45 entries. | |
| 61116 | LD (23458),HL | |||
| 61119 | LD A,45 | |||
|
This entry point is used by the routine at SeedSecondaryWorkBuffer.
|
||||
| SeedWorkBuffer_Common | 61121 | LD (23547),A | Remember the entry limit and clear the index. | |
| 61124 | SUB A | |||
| 61125 | LD (23461),A | |||
|
This entry point is used by the routine at JumpTable.
Jump-table target JumpTable_StepWorkBuffer: step ParserState_WorkPointer and compare *HL to InputLineState_Dirty.
|
||||
| StepWorkBuffer | 61128 | LD A,(23461) | Step the work-buffer pointer and compare to InputLineState_Dirty. | |
| 61131 | INC A | |||
| 61132 | LD (23461),A | |||
| 61135 | LD C,A | |||
| 61136 | LD HL,(23458) | |||
| 61139 | INC HL | |||
| 61140 | LD (23458),HL | |||
| 61143 | LD A,(23549) | Jump to MatchTokenInBasicList_Hit if this entry matches. | ||
| 61146 | CP (HL) | |||
| 61147 | JP Z,MatchTokenInBasicList_Hit | |||
| 61150 | LD A,(23547) | Keep scanning, or fall through to a miss. | ||
| 61153 | CP C | |||
| 61154 | JR NZ,StepWorkBuffer | |||
| 61156 | JP MatchTokenInBasicList_Miss | |||
| Prev: 61084 | Up: Map | Next: 61159 |