![]() |
Routines |
| Prev: 31779 | Up: Map | Next: 31945 |
|
Used by the routine at Inglish_SaveTheClauseWindow.
Copies one id-and-location pair from the object into the second match buffer, and stops when 6 or the clause bits say so.
|
||||
| Inglish_CopyOneClausePair | 31916 | XOR A | Return when the count in B is zero. | |
| 31917 | CP B | |||
| 31918 | RET Z | |||
| 31919 | LD D,0 | The clause offset's high byte is zero. | ||
| 31921 | PUSH IY | Add the second copy window onto the parser workspace. | ||
| 31923 | ADD IY,DE | |||
| 31925 | LD A,(IY+0) | Read the clause byte at this offset. | ||
| 31928 | LD (HL),A | Store it in the second match buffer and step on. | ||
| 31929 | INC HL | |||
| 31930 | LD A,(IY+1) | Read the next clause byte. | ||
| 31933 | LD (HL),A | Store it in the second match buffer. | ||
| 31934 | DEC HL | Step back one byte through the second match buffer. | ||
| 31935 | OR (IY+0) | OR it with the clause byte just read. | ||
| 31938 | POP IY | Return if both clause bytes are zero. | ||
| 31940 | RET Z | |||
| 31941 | DEC B | Drop one from the character count. | ||
| 31942 | INC HL | Step on through the second match buffer. | ||
| 31943 | INC HL | |||
| 31944 | RET | Return. | ||
|
View the equivalent code in;
|
||||
| Prev: 31779 | Up: Map | Next: 31945 |