cod_and_chips.lua 2.0 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950
  1. --[[
  2. Script Name : Quests/FrostfangSea/cod_and_chips.lua
  3. Script Purpose : the quest Cod and Chips
  4. Script Author : theFoof
  5. Script Date : 2013.5.20
  6. Zone : Frostfang Sea
  7. Quest Giver : Blorpisa Bogchild
  8. Preceded by : Bear Bottoms
  9. Followed by : Essential Ingredient
  10. --]]
  11. function Accepted(Quest, QuestGiver, Player)
  12. FaceTarget(QuestGiver, Player)
  13. conversation = CreateConversation()
  14. PlayFlavor(QuestGiver, "blorpisa_bogchild/halas/gwenevyns_cove/blorpisa_bogchild/blorpisa_bogchild_032.mp3", "", "", 911192006, 688179245, Player)
  15. AddConversationOption(conversation, "Then I shall return with the large Iceclad cod.")
  16. StartConversation(conversation, QuestGiver, Player, "You will find the large Iceclad cod in the Frostfang Sea, northwest of here. I will need them to be large Iceclad cod in order to feed everyone.")
  17. end
  18. function Declined(Quest, QuestGiver, Player)
  19. end
  20. function Deleted(Quest, QuestGiver, Player)
  21. end
  22. function Init(Quest)
  23. AddQuestRewardCoin(Quest, math.random(10,80), math.random(2,5), 0, 0)
  24. AddQuestStepKill(Quest, 1, "I must hunt large Iceclad cod.", 3, 100, "I must hunt large Iceclad cod. They can be found swimming in the Frostfang Sea northwest of Gwenevyn's Cove, on the western side of Erollis.", 2541, 4700031)
  25. AddQuestStepCompleteAction(Quest, 1, "KilledCod")
  26. end
  27. function KilledCod(Quest, QuestGiver, Player)
  28. UpdateQuestTaskGroupDescription(Quest, 1, "I have hunted the large Iceclad cod. I should return to Gwenevyn's Cove.")
  29. AddQuestStepChat(Quest, 2, "I must speak with Blorpisa Bogchild in Gwenevyn's Cove.", 1, "Blorpisa thanked me for bringing her the large Iceclad cod.", 0, 4700039)
  30. AddQuestStepCompleteAction(Quest, 2, "CompleteQuest")
  31. end
  32. function CompleteQuest(Quest, QuestGiver, Player)
  33. GiveQuestReward(Quest, Player)
  34. end
  35. function Reload(Quest, QuestGiver, Player, Step)
  36. if Step == 1 then
  37. KilledCod(Quest, QuestGiver, Player)
  38. elseif Step == 2 then
  39. CompleteQuest(Quest, QuestGiver, Player)
  40. end
  41. end