9
3

Dancer.lua 6.6 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158
  1. --[[
  2. Script Name : SpawnScripts/Antonica/Dancer.lua
  3. Script Purpose : Dancer
  4. Script Author : premierio015,Dorbin
  5. Script Date : 09.05.2022 - Updated using Dialog Module - Dorbin 05/12/2023
  6. Script Notes :
  7. --]]
  8. require "SpawnScripts/Generic/DialogModule"
  9. local AFrontiersladysTask = 5528
  10. local BattleWithTheTimberclaws = 5530
  11. function spawn(NPC)
  12. ProvidesQuest(NPC, BattleWithTheTimberclaws)
  13. ProvidesQuest(NPC, AFrontiersladysTask)
  14. end
  15. function respawn(NPC)
  16. spawn(NPC)
  17. end
  18. function hailed(NPC, Spawn)
  19. FaceTarget(NPC, Spawn)
  20. Dialog.New(NPC, Spawn)
  21. Dialog.AddDialog("You must be an adventurer who's new to these parts. Who else would brave the wilds so far from the watchful eye of the Qeynos Guard?")
  22. Dialog.AddVoiceover("voiceover/english/verona/antonica/verona000.mp3", 2049178803, 173582214)
  23. if not HasQuest(Spawn, AFrontiersladysTask) and not HasCompletedQuest(Spawn, AFrontiersladysTask) then
  24. Dialog.AddOption("I am a bit of an adventurer and a bit of an explorer.", "Option1")
  25. elseif GetQuestStep(Spawn, AFrontiersladysTask) == 2 then
  26. Dialog.AddOption("Sighard gave me this special arrow.", "Option2")
  27. elseif GetQuestStep(Spawn, AFrontiersladysTask) == 4 or HasCompletedQuest(Spawn, AFrontiersladysTask) and not HasQuest(Spawn, BattleWithTheTimberclaws) and not HasCompletedQuest(Spawn, BattleWithTheTimberclaws) then
  28. Dialog.AddOption("The arrow is in the training dummy.", "Option4")
  29. end
  30. if GetQuestStep(Spawn, BattleWithTheTimberclaws) == 2 then
  31. Dialog.AddOption("I tried my best, but their numbers are strong.", "Option7")
  32. end
  33. if HasQuest(Spawn, BattleWithTheTimberclaws) then
  34. Dialog.AddOption("You so quickly forget the world's greatest adventurer.", "Option6")
  35. end
  36. Dialog.AddOption("I cannot chat now. Farewell.")
  37. Dialog.Start()
  38. end
  39. function Option1(NPC, Spawn)
  40. FaceTarget(NPC, Spawn)
  41. Dialog.New(NPC, Spawn)
  42. Dialog.AddDialog("Adventurer ... explorer ... how would you like to be a courier too?")
  43. Dialog.AddVoiceover("voiceover/english/verona/antonica/verona001.mp3", 3474200771, 3431607508)
  44. PlayFlavor(NPC, "", "", "sniff", 0, 0, Spawn)
  45. if CanReceiveQuest(Spawn,AFrontiersladysTask) then
  46. Dialog.AddOption("I am always available to assist a frontiersman.", "offer")
  47. end
  48. Dialog.AddOption("I cannot assist. Farewell.")
  49. Dialog.Start()
  50. end
  51. function Option2(NPC, Spawn)
  52. SetStepComplete(Spawn, AFrontiersladysTask, 2)
  53. StartConversation(conversation, NPC, Spawn, "Now, can you take that arrow and apply it to a training dummy in Archer Woods? Search for the dummy with the symbol of a golden tree and green arrow.")
  54. FaceTarget(NPC, Spawn)
  55. Dialog.New(NPC, Spawn)
  56. Dialog.AddDialog("Now, can you take that arrow and apply it to a training dummy in Archer Woods? Search for the dummy with the symbol of a golden tree and green arrow.")
  57. Dialog.AddVoiceover("voiceover/english/verona/antonica/verona003.mp3", 1306460538, 3525298419)
  58. Dialog.AddOption("What is this arrow?", "Option3")
  59. Dialog.AddOption("I shall do as requested.")
  60. Dialog.Start()
  61. end
  62. function Option3(NPC, Spawn)
  63. FaceTarget(NPC, Spawn)
  64. Dialog.New(NPC, Spawn)
  65. Dialog.AddDialog("The arrow is a special marker for some friends of mine.")
  66. Dialog.AddVoiceover("voiceover/english/verona/antonica/verona004.mp3", 2295000938, 2111794040)
  67. Dialog.AddOption("I understand.")
  68. Dialog.Start()
  69. end
  70. function Option4(NPC, Spawn)
  71. if GetQuestStep(Spawn, AFrontiersladysTask) == 4 then
  72. SetStepComplete(Spawn, AFrontiersladysTask, 4)
  73. end
  74. FaceTarget(NPC, Spawn)
  75. Dialog.New(NPC, Spawn)
  76. Dialog.AddDialog("Thank you, courier. I trust you have done as I requested. If not, Trusaris will tell me. He sees all in Archer Woods, including your every step.")
  77. Dialog.AddVoiceover("voiceover/english/verona/antonica/verona005.mp3", 3454016717, 1472655172)
  78. PlayFlavor(NPC, "", "", "nod", 0, 0, Spawn)
  79. Dialog.AddOption("I did not see any Trusaris.", "Option5")
  80. Dialog.AddOption("Farewell.")
  81. Dialog.Start()
  82. end
  83. function Option5(NPC, Spawn)
  84. FaceTarget(NPC, Spawn)
  85. Dialog.New(NPC, Spawn)
  86. Dialog.AddDialog("Trusaris is the great oak of Archer Woods. He has lived in these hills for many ages. He has seen much grief in his lifetime. Now gnolls are taking over what is left of his home.")
  87. Dialog.AddVoiceover("voiceover/english/verona/antonica/verona006.mp3", 4166511705, 1130362343)
  88. if CanReceiveQuest(Spawn,BattleWithTheTimberclaws) then
  89. Dialog.AddOption("I will help clear his home.", "offer2")
  90. end
  91. Dialog.AddOption("Fascinating. Perhaps you will find someone to help. I must find adventure elsewhere.")
  92. Dialog.Start()
  93. end
  94. function Option6(NPC, Spawn)
  95. FaceTarget(NPC, Spawn)
  96. Dialog.New(NPC, Spawn)
  97. Dialog.AddDialog("Forget the world's greatest? I think not, but your name may have slipped my mind. Ha! Fear not, my brave courier. The gnolls of Archer Woods are the only ones near here that have yet to know your name.")
  98. Dialog.AddVoiceover("voiceover/english/verona/antonica/verona008.mp3", 3282299207, 1917374337)
  99. PlayFlavor(NPC, "", "", "no", 0, 0, Spawn)
  100. Dialog.AddOption("They will know me when I rid the woods of them!")
  101. Dialog.Start()
  102. end
  103. function Option7(NPC, Spawn)
  104. FaceTarget(NPC, Spawn)
  105. Dialog.New(NPC, Spawn)
  106. Dialog.AddDialog("Your best is all that we ask. I shall reward you for servicing what remains of Archer Woods. I shall mention your name among my friends.")
  107. Dialog.AddVoiceover("voiceover/english/verona/antonica/verona010.mp3", 3182250399, 3459878429)
  108. Dialog.AddOption("Thank you, Dancer.", "Option8")
  109. Dialog.Start()
  110. end
  111. function Option8(NPC, Spawn)
  112. SetStepComplete(Spawn, BattleWithTheTimberclaws, 2)
  113. FaceTarget(NPC, Spawn)
  114. Dialog.New(NPC, Spawn)
  115. Dialog.AddDialog("By the way, courier, Sighard asked me about you. He wishes to speak with you.")
  116. Dialog.AddVoiceover("voiceover/english/verona/antonica/verona011.mp3", 2906971481, 4178549824)
  117. Dialog.AddOption("Is your name really Dancer?", "Option9")
  118. Dialog.AddOption("Thank you, Dancer.")
  119. Dialog.Start()
  120. end
  121. function Option9(NPC, Spawn)
  122. FaceTarget(NPC, Spawn)
  123. Dialog.New(NPC, Spawn)
  124. Dialog.AddDialog("There was a dark time in my life when dancing was not a thing of joy, but a subjugated torment. It is a time I choose not to recall. But Dancer is my name among my new circle of friends, friends you may some day meet.")
  125. Dialog.AddVoiceover("voiceover/english/verona/antonica/verona007.mp3", 1777708143, 1227602978)
  126. PlayFlavor(NPC, "", "", "sniff", 0, 0, Spawn)
  127. Dialog.AddOption("Farewell, Dancer.")
  128. Dialog.Start()
  129. end
  130. function offer(NPC, Spawn)
  131. OfferQuest(NPC, Spawn, AFrontiersladysTask)
  132. end
  133. function offer2(NPC, Spawn)
  134. OfferQuest(NPC, Spawn, BattleWithTheTimberclaws)
  135. end