9
3

the_starwisp_sword.lua 4.3 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485
  1. --[[
  2. Script Name : Quests/Antonica/the_starwisp_sword.lua
  3. Script Author : Dorbin
  4. Script Date : 2023.05.15 07:05:31
  5. Script Purpose :
  6. Zone : Antonica
  7. Quest Giver:
  8. Preceded by: None
  9. Followed by:
  10. --]]
  11. --
  12. function Init(Quest)
  13. AddQuestStep(Quest, 1, "I need to find some freshly milled flour somewhere here in Antonica.", 1, 100, "If I'm going to restore this sword back to its original condition, I'm going to need to give a little extra effort.", 11)
  14. AddQuestStepCompleteAction(Quest, 1, "Step1Complete")
  15. end
  16. function Accepted(Quest, QuestGiver, Player)
  17. -- Add dialog here for when the quest is accepted
  18. end
  19. function Declined(Quest, QuestGiver, Player)
  20. -- Add dialog here for when the quest is declined
  21. end
  22. function Deleted(Quest, QuestGiver, Player)
  23. -- Remove any quest specific items here when the quest is deleted
  24. end
  25. function Step1Complete(Quest, QuestGiver, Player)
  26. UpdateQuestStepDescription(Quest, 1, "I've grabbed a handful of milled flour from the Millers' house.")
  27. AddQuestStep(Quest, 2, "I should mix the flour into a paste and apply it to the sword.", 1, 100, "If I'm going to restore this sword back to its original condition, I'm going to need to give a little extra effort.", 2155)
  28. AddQuestStepCompleteAction(Quest, 2, "Step2Complete")
  29. end
  30. --Now I should use the etching tool on the newly cleaned sword.
  31. function Step2Complete(Quest, QuestGiver, Player)
  32. UpdateQuestStepDescription(Quest, 2, "I've managed to scrub away nearly all the rust on the blade.")
  33. AddQuestStepKill(Quest, 3, "I now need to find an etching tool from the coldwind crewman that lurk about Antonica.", 1, 50, "If I'm going to restore this sword back to its original condition, I'm going to need to give a little extra effort.", 25, 120672)
  34. AddQuestStepCompleteAction(Quest, 3, "Step3Complete")
  35. end
  36. function Step3Complete(Quest, QuestGiver, Player)
  37. UpdateQuestStepDescription(Quest, 3, "I've been able to find an etching tool.")
  38. AddQuestStep(Quest, 4, "I need to use the etching tool on the blade to repair the star pattern.", 1, 100, "If I'm going to restore this sword back to its original condition, I'm going to need to give a little extra effort.",2155)
  39. AddQuestStepCompleteAction(Quest, 4, "Step4Complete")
  40. end
  41. function Step4Complete(Quest, QuestGiver, Player)
  42. UpdateQuestStepDescription(Quest, 4, "I've etched the stars back into the blade.")
  43. AddQuestStepKill(Quest, 5, "For some reason, all I can think about is killing klicniks in Antonica.", 15, 100, "If I'm going to restore this sword back to its original condition, I'm going to need to give a little extra effort.", 611, 120372,120211,120253,120367, 120371, 120453,120452)
  44. AddQuestStepCompleteAction(Quest, 5, "Step5Complete")
  45. end
  46. function Step5Complete(Quest, QuestGiver, Player)
  47. UpdateQuestStepDescription(Quest, 5, "I've killed enough kliknics and can feel the power in the blade!")
  48. AddQuestStep(Quest, 6, "I need to examine the blade one last time to see if it is satisfied.", 1, 100, "If I'm going to restore this sword back to its original condition, I'm going to need to give a little extra effort.", 2155)
  49. AddQuestStepCompleteAction(Quest, 6, "QuestComplete")
  50. end
  51. function QuestComplete(Quest, QuestGiver, Player)
  52. -- The following UpdateQuestStepDescription and UpdateTaskGroupDescription are not needed, parser adds them for completion in case stuff needs to be moved around
  53. UpdateQuestStepDescription(Quest, 6, "I've killed quite a number of klicniks in Antonica. I have a feeling my desire to do so came from the sword.")
  54. UpdateQuestTaskGroupDescription(Quest, 1, "I've been able to restore Starwisp to its original condition.")
  55. UpdateQuestDescription(Quest, "I've been able to not only clean the sword but restore it back to its original condition. For some reason I believe the name of the sword is Starwisp.")
  56. GiveQuestReward(Quest, Player)
  57. end
  58. function Reload(Quest, QuestGiver, Player, Step)
  59. if Step == 1 then
  60. Step1Complete(Quest, QuestGiver, Player)
  61. elseif Step == 2 then
  62. Step2Complete(Quest, QuestGiver, Player)
  63. elseif Step == 3 then
  64. Step3Complete(Quest, QuestGiver, Player)
  65. elseif Step == 4 then
  66. Step4Complete(Quest, QuestGiver, Player)
  67. elseif Step == 5 then
  68. Step5Complete(Quest, QuestGiver, Player)
  69. elseif Step == 6 then
  70. QuestComplete(Quest, QuestGiver, Player)
  71. end
  72. end