Warlord: Routine at 63289

63289: Process: Kill Bear


Process_KillBear	63289	LD A,69	Call ValidateItemPresent with item 69: "A dead bear".
	63291	CALL ValidateItemPresent	Call ValidateItemPresent with item 69: "A dead bear".
	63294	JP Z,Response_YouveDoneThatAlready	Jump to Response_YouveDoneThatAlready if "A dead bear" is in the current room.
Make sure the player is even carrying a sword.
	63297	CALL IsPlayerCarryingSword	Call IsPlayerCarryingSword.
	63300	LD A,86	Call CheckObjectInInventory with item 86: "A shield".
	63302	CALL CheckObjectInInventory	Call CheckObjectInInventory with item 86: "A shield".
Print "You attack boldly,but a mighty clawed paw rakes your unprotected side.".
	63305	LD HL,56919	HL=Messaging_AttackBoldly.
	63308	JP NZ,Response_IfSwordThenGameOver	Jump to Response_IfSwordThenGameOver if "A shield" is not in the players inventory.
Change the bear state!
	63311	LD BC,17477	Call TransformItem to transform item 68 ("A bear") into item 69 ("A dead bear").
	63314	CALL TransformItem
	63317	LD A,44	Write 44 to *59469.
	63319	LD (59469),A	Write 44 to *59469.
	63322	LD A,53	Write 53 to *59470.
	63324	LD (59470),A	Write 53 to *59470.
	63327	LD A,4	Call AddToScore to add 4 points to the score.
	63329	CALL AddToScore	Call AddToScore to add 4 points to the score.
This entry point is used by the routines at Process_KillPigWithSword and Process_KillOxWithSword. Print "Your blow strikes true. It is dead.".
Process_KillBear_0	63332	LD HL,56990	HL=Messaging_YourBlowStrikesTrue.
	63335	JP PrintStringAndNewline_Duplicate	Jump to PrintStringAndNewline_Duplicate.