9
3

SuspiciousActivity.lua 3.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475
  1. --[[
  2. Script Name : SuspiciousActivity.lua
  3. Script Purpose : Handles the quest, "Suspicious Activity"
  4. Script Author :
  5. Script Date :
  6. Script Notes :
  7. Zone : Antonica
  8. Quest Giver : Tyllia Navar
  9. Preceded by : None
  10. Followed by : None
  11. --]]
  12. local QuestID = 3000
  13. function Init(Quest)
  14. AddQuestStepKill(Quest, 1, "I need to kill five Sabertooth runts.", 5, 100, "I need to do what Tyllia has asked of me.", 1221, 121248,120092)
  15. AddQuestStepKill(Quest, 2, "I need to kill two Sabertooth neophytes.", 2, 100, "I need to do what Tyllia has asked of me.", 1220, 121269,120123)
  16. AddQuestStep(Quest, 3, "I need to inspect the boat on the south shore south west of where Tyllia is.", 1, 100, "I need to do what Tyllia has asked of me.", 830)
  17. AddQuestStepCompleteAction(Quest, 1, "Step1Complete")
  18. AddQuestStepCompleteAction(Quest, 2, "Step2Complete")
  19. AddQuestStepCompleteAction(Quest, 3, "Step3Complete")
  20. end
  21. function Step1Complete(Quest, QuestGiver, Player)
  22. UpdateQuestStepDescription(Quest, 1, "I've killed five Sabertooth runts.")
  23. CompleteStage1Check(Quest, Player)
  24. --AddQuestStepKill(Quest, 2, "I need to kill ten snakes.", 10, 100, "I need to head out into Antonica and kill the vermin that infest the land; rats, snakes and beetles. Knight-Lieutenant Alesso said I should kill about ten of each.", 1908, 120068, 121226, 121347)
  25. --AddQuestStepCompleteAction(Quest, 2, "Step2Complete")
  26. end
  27. function Step2Complete(Quest, QuestGiver, Player)
  28. UpdateQuestStepDescription(Quest, 2, "I've killed two Sabertooth neophytes.")
  29. CompleteStage1Check(Quest, Player)
  30. end
  31. function Step3Complete(Quest, QuestGiver, Player)
  32. UpdateQuestStepDescription(Quest, 3, "I have inspected the boat and found it mostly empty.")
  33. CompleteStage1Check(Quest, Player)
  34. end
  35. function CompleteStage1Check(Quest, Player)
  36. if QuestStepIsComplete(Player, QuestID, 1) and QuestStepIsComplete(Player, QuestID, 2) and QuestStepIsComplete(Player, QuestID, 3) then
  37. UpdateQuestTaskGroupDescription(Quest, 1, "I have done what Tyllia asked of me.")
  38. AddQuestStepChat(Quest, 4, "I need to return to Tyllia now that I have done all that she asked.", 1, 100, "I have done what Tyllia asked of me.", 11, 121435)
  39. AddQuestStepCompleteAction(Quest, 4, "Step4Complete")
  40. end
  41. end
  42. function Step4Complete(Quest, QuestGiver, Player)
  43. UpdateQuestStepDescription(Quest, 4, "I have spoken with Tyllia.")
  44. UpdateQuestDescription(Quest, "I did as Tyllia asked and slew the gnolls. Unfortunately there was nothing in the boat.")
  45. GiveQuestReward(Quest, Player)
  46. end
  47. function Reload(Quest, QuestGiver, Player, Step)
  48. if Step == 1 then
  49. Step1Complete(Quest, QuestGiver, Player)
  50. elseif Step == 2 then
  51. Step2Complete(Quest, QuestGiver, Player)
  52. elseif Step == 3 then
  53. Step3Complete(Quest, QuestGiver, Player)
  54. elseif Step == 4 then
  55. QuestComplete(Quest, QuestGiver, Player)
  56. end
  57. end
  58. function Accepted(Quest, QuestGiver, Player)
  59. -- Add dialog here for when the quest is accepted
  60. end
  61. function Declined(Quest, QuestGiver, Player)
  62. -- Add dialog here for when the quest is declined
  63. end