9
3

gerbards_coins.lua 2.0 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849
  1. --[[
  2. Script Name : Quests/SunkenCity/gerbards_necklace.lua
  3. Script Purpose : Handles the quest, "Gerbard's Necklace
  4. Script Author : Scatman
  5. Script Date : 2009.08.01
  6. Zone : Sunken City
  7. Quest Giver: Gerbard the Snitch
  8. Preceded by: None
  9. Followed by: None
  10. --]]
  11. function Init(Quest)
  12. AddQuestStepKill(Quest, 1, "I need to find five pirate coins.", 5, 50, "I need to find five pirate coins.", 1763, 1240133, 1240058, 1240109, 1240045, 1240107, 1240040, 1240132, 1240038, 1240063, 1240144, 1240050, 1240061, 1240051, 1240146, 1240052, 1240057, 1240062, 1240108)
  13. AddQuestStepCompleteAction(Quest, 1, "Step1_Complete_FoundCoins")
  14. end
  15. function Accepted(Quest, QuestGiver, Player)
  16. FaceTarget(QuestGiver, Player)
  17. conversation = CreateConversation()
  18. PlayFlavor(QuestGiver, "voiceover/english/gerbard_the_snitch/fprt_adv01_sunken/gerbard_the_snitch002.mp3", "", "", 4172245160, 2238267271, Player)
  19. AddConversationOption(conversation, "Thanks, I'll search out some pirate coins.")
  20. StartConversation(conversation, QuestGiver, Player, "Where do you think they come from? They're pirate coins! Those undead buggers roam around where it's wet. I'd go get them myself, but I gambled my sword away in a sure bet.")
  21. end
  22. function Declined(Quest, QuestGiver, Player)
  23. end
  24. function Step1_Complete_FoundCoins(Quest, QuestGiver, Player)
  25. UpdateQuestStepDescription(Quest, 1, "I found five pirate coins.")
  26. UpdateQuestTaskGroupDescription(Quest, 1, "I found five pirate coins.")
  27. AddQuestStepChat(Quest, 2, "I need to return to Gerbard.", 1, "I need to return to Gerbard.", 0, 1240020)
  28. AddQuestStepCompleteAction(Quest, 2, "Quest_Complete")
  29. end
  30. function Quest_Complete(Quest, QuestGiver, Player)
  31. UpdateQuestStepDescription(Quest, 2, "I returned to Gerbard.")
  32. UpdateQuestTaskGroupDescription(Quest, 2, "I returned to Gerbard.")
  33. GiveQuestReward(Quest, Player)
  34. UpdateQuestDescription(Quest, "I found the five pirate coins that Gerbard the Snitch needed.")
  35. end
  36. function Reload(Quest, QuestGiver, Player, Step)
  37. if Step == 1 then
  38. Step1_Complete_FoundCoins(Quest, QuestGiver, Player)
  39. end
  40. end