Prev: 31779 Up: Map Next: 31945
31916: 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 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