Warlord: Routine at F739

F739: Process: Kill Bear


Process_KillBear	F739	LD A,$45	Call ValidateItemPresent with item 45: "A dead bear".
	F73B	CALL ValidateItemPresent	Call ValidateItemPresent with item 45: "A dead bear".
	F73E	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.
	F741	CALL IsPlayerCarryingSword	Call IsPlayerCarryingSword.
	F744	LD A,$56	Call CheckObjectInInventory with item 56: "A shield".
	F746	CALL CheckObjectInInventory	Call CheckObjectInInventory with item 56: "A shield".
Print "You attack boldly,but a mighty clawed paw rakes your unprotected side.".
	F749	LD HL,$DE57	HL=Messaging_AttackBoldly.
	F74C	JP NZ,Response_IfSwordThenGameOver	Jump to Response_IfSwordThenGameOver if "A shield" is not in the players inventory.
Change the bear state!
	F74F	LD BC,$4445	Call TransformItem to transform item 44 ("A bear") into item 45 ("A dead bear").
	F752	CALL TransformItem
	F755	LD A,$2C	Write 2C to *E84D.
	F757	LD ($E84D),A	Write 2C to *E84D.
	F75A	LD A,$35	Write 35 to *E84E.
	F75C	LD ($E84E),A	Write 35 to *E84E.
	F75F	LD A,$04	Call AddToScore to add 04 points to the score.
	F761	CALL AddToScore	Call AddToScore to add 04 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	F764	LD HL,$DE9E	HL=Messaging_YourBlowStrikesTrue.
	F767	JP PrintStringAndNewline_Duplicate	Jump to PrintStringAndNewline_Duplicate.