|
Routines |
| Up: Map | Next: 49198 |
|
Clears the parser workspace. A comma on the previous line reprints a space and jumps to ParseWord_Copy; otherwise it continues into PrintPrompt.
|
||||
|
Forget the previous noun, the scroll count and the three counters.
|
||||
| ReadCommand | 49152 | XOR A | Clear *Noun and HL. | |
| 49153 | LD L,A | |||
| 49154 | LD H,A | |||
| 49155 | LD (23424),A | |||
| 49158 | LD (25948),A | Clear *RowsScrolled. | ||
| 49161 | LD (23425),HL | Clear *Counter1, *Counter3 and *WordCount. | ||
| 49164 | LD (23427),A | |||
| 49167 | LD (23435),A | |||
| 49170 | INC A | Write 1 to *WordSlot. | ||
| 49171 | LD (23430),A | |||
|
A comma on the previous line left more words to read.
|
||||
| 49174 | LD A,(23429) | Jump to PrintPrompt when there is no leftover command. | ||
| 49177 | OR A | |||
| 49178 | JR Z,PrintPrompt | |||
| 49180 | LD A,27 | Call PrintSystemMessage to print message 27 (a space). | ||
| 49182 | CALL 25556 | |||
| ReadCommand_Wait | 49185 | LD A,(23556) | Wait until the key is not a space. | |
| 49188 | CP 32 | |||
| 49190 | JR Z,ReadCommand_Wait | |||
| 49192 | LD HL,(23436) | Fetch the leftover pointer from *InputPointer. | ||
| 49195 | JP ParseWord_Copy | Jump to ParseWord_Copy. | ||
| Up: Map | Next: 49198 |