9
3

SuspiciousActivity.lua 3.0 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576
  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. SetQuestFeatherColor(Quest, 3)
  15. 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)
  16. 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)
  17. 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)
  18. AddQuestStepCompleteAction(Quest, 1, "Step1Complete")
  19. AddQuestStepCompleteAction(Quest, 2, "Step2Complete")
  20. AddQuestStepCompleteAction(Quest, 3, "Step3Complete")
  21. end
  22. function Step1Complete(Quest, QuestGiver, Player)
  23. UpdateQuestStepDescription(Quest, 1, "I've killed five Sabertooth runts.")
  24. CompleteStage1Check(Quest, Player)
  25. --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)
  26. --AddQuestStepCompleteAction(Quest, 2, "Step2Complete")
  27. end
  28. function Step2Complete(Quest, QuestGiver, Player)
  29. UpdateQuestStepDescription(Quest, 2, "I've killed two Sabertooth neophytes.")
  30. CompleteStage1Check(Quest, Player)
  31. end
  32. function Step3Complete(Quest, QuestGiver, Player)
  33. UpdateQuestStepDescription(Quest, 3, "I have inspected the boat and found it mostly empty.")
  34. CompleteStage1Check(Quest, Player)
  35. end
  36. function CompleteStage1Check(Quest, Player)
  37. if QuestStepIsComplete(Player, QuestID, 1) and QuestStepIsComplete(Player, QuestID, 2) and QuestStepIsComplete(Player, QuestID, 3) then
  38. UpdateQuestTaskGroupDescription(Quest, 1, "I have done what Tyllia asked of me.")
  39. AddQuestStep(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)
  40. AddQuestStepCompleteAction(Quest, 4, "Step4Complete")
  41. end
  42. end
  43. function Step4Complete(Quest, QuestGiver, Player)
  44. UpdateQuestStepDescription(Quest, 4, "I have spoken with Tyllia.")
  45. UpdateQuestDescription(Quest, "I did as Tyllia asked and slew the gnolls. Unfortunately there was nothing in the boat.")
  46. GiveQuestReward(Quest, Player)
  47. end
  48. function Reload(Quest, QuestGiver, Player, Step)
  49. if Step == 1 then
  50. Step1Complete(Quest, QuestGiver, Player)
  51. elseif Step == 2 then
  52. Step2Complete(Quest, QuestGiver, Player)
  53. elseif Step == 3 then
  54. Step3Complete(Quest, QuestGiver, Player)
  55. elseif Step == 4 then
  56. QuestComplete(Quest, QuestGiver, Player)
  57. end
  58. end
  59. function Accepted(Quest, QuestGiver, Player)
  60. -- Add dialog here for when the quest is accepted
  61. end
  62. function Declined(Quest, QuestGiver, Player)
  63. -- Add dialog here for when the quest is declined
  64. end