![]() |
Routines |
| Prev: 7864 | Up: Map | Next: 788C |
|
Used by the routines at InglishPrepareTheClause, InglishSaveTheMatch, InglishRestoreTheMatch, InglishWalkTheGrammar and InglishStepOverAGroup.
Reads the next grammar byte from the token pointer, splits it into nibbles, and stores the token pointer, the unknown word and the class.
|
||||
| Inglish_ReadTheNextGrammarByte | 7873 | LD HL,($B6DC) | Read *B6DC. | |
| 7876 | LD ($B6DA),HL | Update *B6DA. | ||
| 7879 | LD A,D | Take the class into A. | ||
| 787A | LD ($B6DE),A | Update *B6DE. | ||
| 787D | LD A,(HL) | Read the token. | ||
| 787E | AND $0F | Keep the low nibble of the token. | ||
| 7880 | LD B,A | |||
| 7881 | LD A,(HL) | Read the token. | ||
| 7882 | AND $F0 | Keep the high nibble of the token. | ||
| 7884 | LD D,A | |||
| 7885 | INC HL | Step to the next byte of the token pointer. | ||
| 7886 | LD C,(HL) | Read a byte from the pointer into C. | ||
| 7887 | INC HL | Step to the next byte of the token pointer. | ||
| 7888 | LD ($B6DC),HL | Update *B6DC. | ||
| 788B | RET | Return. | ||
|
View the equivalent code in;
|
||||
| Prev: 7864 | Up: Map | Next: 788C |