Warlord: Routine at 62099

62099: Process: Free Roman

Used by the routine at Process_FreeRope.
The player wants to free the captive Roman, check which version of the Roman is in the current room.
Process_FreeRoman	62099	LD HL,58177	Call CheckItemGroupPresent with Data_ItemGroup_Roman.
	62102	CALL CheckItemGroupPresent	Call CheckItemGroupPresent with Data_ItemGroup_Roman.
Check if he's alive...
	62105	CP 11	Jump to FreeRoman if the item present is "The captured Roman".
	62107	JR Z,FreeRoman
If he's dead and untied, print "He isn't tied.".
	62109	CP 85	Jump to Response_HeIsntTied if the item present is not "The body of the Roman".
	62111	JP NZ,Response_HeIsntTied
He's dead and tied, so allow him to be untied. Change the dead Roman state!
	62114	LD BC,21772	Call TransformItem to transform item 85 ("The body of the Roman") into item 12 ("The body of the Roman").
	62117	CALL TransformItem
	62120	LD A,81	Call Handler_UpdateItemEventCurrentRoom with item 81: "A piece of rope".
	62122	CALL Handler_UpdateItemEventCurrentRoom
	62125	JP Response_OK_Duplicate	Jump to Response_OK_Duplicate.
Untie the very much alive Roman who is understandably a bit annoyed about being captured in the first place. Bad luck!
FreeRoman	62128	LD HL,59826	Switch GameOver onto the stack so the next return actions a "game over".
	62131	EX (SP),HL
	62132	LD HL,55222	HL=Messaging_YouReleaseHim.
	62135	JP PrintStringAndNewline_Duplicate	Jump to PrintStringAndNewline_Duplicate.