Sherlock: Routine at 9A80

9A80: Action: Print Opening Text

Prints the token at 68E9+2C or 68E9+37 according to the current character. Run by CA64 after the display record at 9A7E. A non-zero return means the script step succeeded.
ActionPrintOpeningText	9A80	LD A,($A036)	Compare the current character with 00 and take 01.
	9A83	CP $00
	9A85	LD A,$01
	9A87	LD HL,$6915	Take the message at 68E9+2C.
	9A8A	JR Z,ActionPrintOpeningText_Next	Jump ahead to ActionPrintOpeningText_Next if the current character is 00.
	9A8C	XOR A	Clear A and take the message at 68E9+37.
	9A8D	LD HL,$6920	Clear A and take the message at 68E9+37.
ActionPrintOpeningText_Next	9A90	LD ($A027),A	Store it in the print mode, then call PrintTextAndHandleControlCharacters to print the message.
	9A93	CALL PrintTextAndHandleControlCharacters
	9A96	OR %00000001	Reset the zero flag.
	9A98	RET	Return.
Attribute pair.
	9A99	DEFB $04,$00	Display record read by ProcessDisplayRecord: flags 04 value 00.
Run by CA64 after the display record at 9A99.
ActionPrintOpeningText_MatchAttribute	9A9B	CALL ReadRoomDisplayParameter	Return zero through ParseInputNumber_ReturnZero if ReadRoomDisplayParameter finds no display parameter.
	9A9E	JP Z,ParseInputNumber_ReturnZero
	9AA1	JR ReadRoomDisplayParameter_0	Jump ahead to ReadRoomDisplayParameter_0 to adjust attribute match.