Warlord: Routine at 61987

61987: Process: Give The Helmet To The Guard/ Druid


The player wants to give the helmet to either the guard or the druid.
Process_GiveHelmetToGuardOrDruid	61987	LD HL,58219	Call CheckItemGroupPresent with Data_ItemGroup_Helmet.
	61990	CALL CheckItemGroupPresent	Call CheckItemGroupPresent with Data_ItemGroup_Helmet.
If "A bronze helmet" is present either in the current room or in the players inventory, print "He doesn't want it. He's dropped it.".
	61993	CP 32	Jump to Response_HeDoesntWantIt if the item is not "A bronze helmet (worn)" (so is "A bronze helmet").
	61995	JP NZ,Response_HeDoesntWantIt
Else it's "A bronze helmet (worn)", so first have the player remove the helmet in order to give it to someone. Change the helmet state!
	61998	LD BC,8223	Call TransformItem to transform item 32 ("A bronze helmet (worn)") into item 31 ("A bronze helmet").
	62001	CALL TransformItem
Print "He doesn't want it. He's dropped it.".
	62004	LD A,31	Jump to Response_HeDoesntWantIt with item 31: "A bronze helmet".
	62006	JP Response_HeDoesntWantIt