Warlord: Routine at 61693

61693: Process: Give Acorns To The Raven


The player wants to give the acorns to the raven, check if the player is carrying the acorns.
Process_GiveAcornsToRaven	61693	LD A,27	Call IsPlayerCarryingItem with item 27: "Some acorns".
	61695	CALL IsPlayerCarryingItem	Call IsPlayerCarryingItem with item 27: "Some acorns".
The player is carrying the acorns, so destroy the item.
	61698	LD A,E	Call Handler_DestroyItemEvent with the item ID originally passed to the routine.
	61699	CALL Handler_DestroyItemEvent
The raven has eaten an item so handle the inventory count.
	61702	LD HL,42896	Decrease *Count_InventoryItems by one.
	61705	DEC (HL)	Decrease *Count_InventoryItems by one.
Handle destroying the raven, and spawning the torc at this location.
	61706	LD A,29	Call Handler_DestroyItemEvent with item 29: "A raven,perched on the root of a large tree".
	61708	CALL Handler_DestroyItemEvent
	61711	LD A,105	Call Handler_UpdateItemEventCurrentRoom with item 105: "A torc".
	61713	CALL Handler_UpdateItemEventCurrentRoom
Print "The raven takes the acorns. The air starts to shimmer...".
	61716	LD HL,54183	HL=Messaging_RavenTakesAcorns.
	61719	CALL PrintStringAndNewline	Call PrintStringAndNewline.
Print "The goddess Danu stands before you.She smiles and says:- "My cleaver Warlord,hero of our people.Take this torc so that it may aid you in your quest." She leaves the torc on the ground,then vanishes...".
	61722	LD HL,54240	HL=Messaging_GoddessDanuStandsBeforeYou.
	61725	CALL PausePrintStringAndScroll	Call PausePrintStringAndScroll.
Print "From above,you hear the beating of velvet wings receding into the distance.".
	61728	LD HL,54441	HL=Messaging_FromAboveYouHear.
	61731	JP PausePrintStringAndScroll_Duplicate	Jump to PausePrintStringAndScroll_Duplicate.