Prev: 7C23 Up: Map Next: 7CC9
7CAC: Inglish: Copy One Clause Pair
Used by the routine at Inglish_SaveTheClauseWindow.
Copies one id-and-location pair from the object into the second match buffer, and stops when 06 or the clause bits say so.
Inglish_CopyOneClausePair 7CAC XOR A Return when the count in B is zero.
7CAD CP B
7CAE RET Z
7CAF LD D,$00 The clause offset's high byte is zero.
7CB1 PUSH IY Add the second copy window onto the parser workspace.
7CB3 ADD IY,DE
7CB5 LD A,(IY+$00) Read the clause byte at this offset.
7CB8 LD (HL),A Store it in the second match buffer and step on.
7CB9 INC HL
7CBA LD A,(IY+$01) Read the next clause byte.
7CBD LD (HL),A Store it in the second match buffer.
7CBE DEC HL Step back one byte through the second match buffer.
7CBF OR (IY+$00) OR it with the clause byte just read.
7CC2 POP IY Return if both clause bytes are zero.
7CC4 RET Z
7CC5 DEC B Drop one from the character count.
7CC6 INC HL Step on through the second match buffer.
7CC7 INC HL
7CC8 RET Return.
View the equivalent code in;
Prev: 7C23 Up: Map Next: 7CC9