123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100 |
- --[[
- Script Name : Quests/Nettleville/crate_and_barrel.lua
- Script Purpose : Handles the quest, "Crate and Barrel"
- Script Author : Scatman
- Script Date : 2008.09.28
-
- Zone : Nettleville
- Quest Giver: Johfrit Gythell
- Preceded by: Looking for Work is Hard Work (looking_for_work_is_hard_work.lua)
- Followed by: A Budding Hunter (a_budding_hunter.lua)
- --]]
- -- Item ID's
- local WATERLOGGED_CRATE = 15346
- local WATERPROOF_BARREL = 15348
- function Init(Quest)
- AddQuestStepHarvest(Quest, 1, "Get the crate that fell into the waterways at the Mariner's Bell", 1, 100, "Johfrit has asked me to pick up some items that are underwater at the Mariner's Bell.", 655, WATERLOGGED_CRATE)
- AddQuestStepCompleteAction(Quest, 1, "Step1_complete_ObtainedCrate")
- end
- function Accepted(Quest, QuestGiver, Player)
- FaceTarget(QuestGiver, Player)
- conversation = CreateConversation()
- PlayFlavor(QuestGiver, "voiceover/english/tutorial_revamp/johfrit_gythell/qey_village01/johfritgythell016.mp3", "", "", 3784629349, 1480348336, Player)
- AddConversationOption(conversation, "I do need the work. I'll be back with them soon!")
- StartConversation(conversation, QuestGiver, Player, "It is the only task I have at hand. Retrieve both items and you will get paid for your work.")
- end
- function Declined(Quest, QuestGiver, Player)
- end
- function Step1_complete_ObtainedCrate(Quest, QuestGiver, Player)
- UpdateQuestStepDescription(Quest, 1, "I have obtained the crate.")
-
- AddQuestStepHarvest(Quest, 2, "Get the barrel that is also underwater at the Mariner's Bell.", 1, 100, "Johfrit has asked me to pick up some items that are underwater at the Mariner's Bell.", 2285, WATERPROOF_BARREL)
- AddQuestStepCompleteAction(Quest, 2, "Step2_Complete_ObtainedBarrel")
- end
- function Step2_Complete_ObtainedBarrel(Quest, QuestGiver, Player)
- UpdateQuestStepDescription(Quest, 2, "I have obtained the barrel.")
-
- AddQuestStepChat(Quest, 3, "Return to Johfrit Gythell near The Golden Scabbard armory.", 1, "Johfrit has asked me to pick up some items that are underwater at the Mariner's Bell.", 0, 2330033)
- AddQuestStepCompleteAction(Quest, 3, "Step3_Complete_TalkedToJohfrit")
- end
- function Step3_Complete_TalkedToJohfrit(Quest, QuestGiver, Player)
- UpdateQuestStepDescription(Quest, 3, "I returned to Johfrit with both items.")
- UpdateQuestTaskGroupDescription(Quest, 1, "I obtained the stinky crate and barrel for Johfrit.")
-
- AddQuestStepChat(Quest, 4, "I am to deliver the crate to Amazu Kharliko here, in town.", 1, "I am to deliver the barrel and crate for some coin.", 397, 2330015)
- AddQuestStepCompleteAction(Quest, 4, "Step4_Complete_TalkedToAmazu")
- end
- function Step4_Complete_TalkedToAmazu(Quest, QuestGiver, Player)
- UpdateQuestStepDescription(Quest, 4, "I delivered the fish-smelling crate to Amazu.")
-
- -- a waterlogged crate
- while HasItem(Player, WATERLOGGED_CRATE, 1) do
- RemoveItem(Player, WATERLOGGED_CRATE)
- end
-
- AddQuestStepChat(Quest, 5, "I should take Luadine Shardalow her barrel. She is in the bank.", 1, "I am to deliver the barrel and crate for some coin.", 397, 2330013)
- AddQuestStepCompleteAction(Quest, 5, "Step5_Complete_TalkedToLuadine")
- end
- function Step5_Complete_TalkedToLuadine(Quest, QuestGiver, Player)
- UpdateQuestStepDescription(Quest, 5, "I delivered the barrel to Laudine.")
-
- -- a waterproof barrel
- while HasItem(Player, WATERPROOF_BARREL, 1) do
- RemoveItem(Player, WATERPROOF_BARREL)
- end
-
- AddQuestStepChat(Quest, 6, "Return to Johfrit Gythell with the money from Amazu and Laudine.", 1, "I am to deliver the barrel and crate for some coin.", 0, 2330033)
- AddQuestStepCompleteAction(Quest, 6, "Quest_Complete")
- end
- function Quest_Complete(Quest, QuestGiver, Player)
- UpdateQuestDescription(Quest, "Johfrit paid me for the work that I was able to do for him.")
- GiveQuestReward(Quest, Player)
- end
- function Reload(Quest, QuestGiver, Player, Step)
- if Step == 1 then
- Step1_complete_ObtainedCrate(Quest, QuestGiver, Player)
- elseif Step == 2 then
- Step2_Complete_ObtainedBarrel(Quest, QuestGiver, Player)
- elseif Step == 3 then
- Step3_Complete_TalkedToJohfrit(Quest, QuestGiver, Player)
- elseif Step == 4 then
- Step4_Complete_TalkedToAmazu(Quest, QuestGiver, Player)
- elseif Step == 5 then
- Step5_Complete_TalkedToLuadine(Quest, QuestGiver, Player)
- end
- end
|