The Hobbit: Routine at 30776

30776: Inglish: Copy Ten Grammar Bytes

Used by the routines at Inglish_FollowTheGrammarFlag and Command_FollowTheGrammarFlag. Clears bit 7 of the grammar flag and copies ten bytes from 14 into the clause, then reports no match.
Inglish_CopyTenGrammarBytes	30776	RES 7,E	Clear the flags so bit 7 is off.
	30778	PUSH DE	The ten grammar bytes start 14 bytes into the record.
	30779	LD DE,14	The ten grammar bytes start 14 bytes into the record.
This entry point is used by the routine at Inglish_CopyFourGrammarBytes.
Inglish_CopyTenGrammarBytes_PointAtTheClause	30782	PUSH BC	Save BC and point HL at the clause plus the offset in DE.
	30783	PUSH IY
	30785	POP HL
	30786	ADD HL,DE
	30787	EX DE,HL	Point DE at those bytes.
	30788	LD HL,30075	Copy the prepared bytes.
	30791	LD BC,10
	30794	LDIR
	30796	POP BC	Restore the saved registers from the stack and clear A.
	30797	POP DE
	30798	XOR A
	30799	RET	Return.