PrimaryConzukZumHa.lua 8.1 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169
  1. --[[
  2. Script Name : SpawnScripts/TimorousDeep/PrimaryConzukZumHa.lua
  3. Script Purpose : Primary Conzuk Zum'Ha <Chrykori Island Primary>
  4. Script Author : John Adams
  5. Script Date : 2009.02.06
  6. Script Notes : Auto-Generated Conversation from PacketParser Data
  7. --]]
  8. local QUEST_3 = 107
  9. local QUEST_4 = 112
  10. local QUEST_5 = 113
  11. local QUEST_6 = 114
  12. function spawn(NPC)
  13. ProvidesQuest(NPC, QUEST_4)
  14. ProvidesQuest(NPC, QUEST_5)
  15. ProvidesQuest(NPC, QUEST_6)
  16. end
  17. function respawn(NPC)
  18. spawn(NPC)
  19. end
  20. function hailed(NPC, Spawn)
  21. FaceTarget(NPC, Spawn)
  22. conversation = CreateConversation()
  23. if HasCompletedQuest(Spawn, QUEST_3) then
  24. if HasCompletedQuest(Spawn, QUEST_4) then
  25. if HasCompletedQuest(Spawn, QUEST_5) then
  26. if HasCompletedQuest(Spawn, QUEST_6) then
  27. Say(NPC, "I am glad to have you working here.", Spawn)
  28. elseif HasQuest(Spawn, QUEST_6) then
  29. Say(NPC, "I am glad to have you working here.", Spawn)
  30. else
  31. HaveYouSucceeded(NPC, Spawn, conversation)
  32. end
  33. elseif HasQuest(Spawn, QUEST_5) then
  34. HaveYouSucceeded(NPC, Spawn, conversation)
  35. else
  36. WellWhatAreTheyUpTo(NPC, Spawn, conversation)
  37. end
  38. elseif HasQuest(Spawn, QUEST_4) then
  39. WellWhatAreTheyUpTo(NPC, Spawn, conversation)
  40. else
  41. IWelcomeYou(NPC, Spawn, conversation)
  42. end
  43. else
  44. IWelcomeYou(NPC, Spawn, conversation)
  45. end
  46. end
  47. ------------------------------------------------------------------------------------
  48. -- QUEST 3
  49. ------------------------------------------------------------------------------------
  50. function IWelcomeYou(NPC, Spawn, conversation)
  51. PlayFlavor(NPC, "voiceover/english/rok_questvo/primary_conzuk_zum_ha/_exp04/exp04_rgn_timorous_deep/chrykori_tie/zumha/zumha000.mp3", "", "", 147931511, 1161032950, Spawn)
  52. if (HasCompletedQuest(Spawn, QUEST_3) and not HasCompletedQuest(Spawn, QUEST_4)) or (HasQuest(Spawn, QUEST_3) and GetQuestStep(Spawn, QUEST_3) == 1) then
  53. AddConversationOption(conversation, "Tykor Gi'Lok thought you should see this; the Haoaerans were digging this ore up along the beach wall.", "dlg_10_1")
  54. if HasCompletedQuest(Spawn, QUEST_3) then
  55. AddConversationOption(conversation, "Nothing, thank you.")
  56. end
  57. else
  58. AddConversationOption(conversation, "Nothing, thank you.")
  59. end
  60. StartConversation(conversation, NPC, Spawn, "I welcome you to Chrykori Village, " .. GetName(Spawn) .. ". I am Conzuk Zum'Ha, the Primary of Chrykori Island. What can I do for you?")
  61. end
  62. function dlg_10_1(NPC, Spawn)
  63. if HasQuest(Spawn, QUEST_3) then
  64. SetStepComplete(Spawn, QUEST_3, 1)
  65. end
  66. FaceTarget(NPC, Spawn)
  67. conversation = CreateConversation()
  68. PlayFlavor(NPC, "voiceover/english/rok_questvo/primary_conzuk_zum_ha/_exp04/exp04_rgn_timorous_deep/chrykori_tie/zumha/zumha001.mp3", "", "", 3446548455, 1963577533, Spawn)
  69. AddConversationOption(conversation, "It's worthless. They can't mean to make anything from it.", "dlg_10_2")
  70. StartConversation(conversation, NPC, Spawn, "So Tykor Gi'Lok managed to do something worthwhile? Hmmm ... That'll come as a surprise to quite a few parties. I myself have thought he was given an unfair lot... Not everyone can master griffon riding, and it's not his fault he fell straight onto the head of Archlord Gor'sok. Hmmm ... Now, about this ore... ")
  71. end
  72. ------------------------------------------------------------------------------------
  73. -- QUEST 4
  74. ------------------------------------------------------------------------------------
  75. function dlg_10_2(NPC, Spawn)
  76. FaceTarget(NPC, Spawn)
  77. conversation = CreateConversation()
  78. PlayFlavor(NPC, "voiceover/english/rok_questvo/primary_conzuk_zum_ha/_exp04/exp04_rgn_timorous_deep/chrykori_tie/zumha/zumha001a.mp3", "", "", 3902061993, 4258824425, Spawn)
  79. AddConversationOption(conversation, "I am up to it.", "OfferQuest4")
  80. StartConversation(conversation, NPC, Spawn, "Hmmm... hmhmhm ... you're right. The Haoaerans should know this ore is worthless. Perhaps... hmhmhm ... yes, perhaps this is related to their excavation of the cave in the northwest. I've been meaning to send someone out there to take care of it. Are you up to it? I want their excavators dead, and I want evidence of what they're digging up. We must solve this puzzle.")
  81. end
  82. function OfferQuest4(NPC, Spawn)
  83. FaceTarget(NPC, Spawn)
  84. OfferQuest(NPC, Spawn, QUEST_4)
  85. end
  86. function WellWhatAreTheyUpTo(NPC, Spawn, conversation)
  87. PlayFlavor(NPC, "voiceover/english/rok_questvo/primary_conzuk_zum_ha/_exp04/exp04_rgn_timorous_deep/chrykori_tie/zumha/zumha003.mp3", "", "", 4127661595, 3391252035, Spawn)
  88. if (HasCompletedQuest(Spawn, QUEST_4) and not HasCompletedQuest(Spawn, QUEST_5)) or (HasQuest(Spawn, QUEST_4) and GetQuestStep(Spawn, QUEST_4) == 3) then
  89. AddConversationOption(conversation, "Yes, I found this pottery. It's curiously decorated.", "dlg_28_1")
  90. else
  91. AddConversationOption(conversation, "Not yet. I will continue looking.")
  92. end
  93. StartConversation(conversation, NPC, Spawn, "Well? What are they up to? Have you found anything worthwhile?")
  94. end
  95. function dlg_28_1(NPC, Spawn)
  96. if HasQuest(Spawn, QUEST_4) then
  97. SetStepComplete(Spawn, QUEST_4, 3)
  98. end
  99. FaceTarget(NPC, Spawn)
  100. conversation = CreateConversation()
  101. PlayFlavor(NPC, "voiceover/english/rok_questvo/primary_conzuk_zum_ha/_exp04/exp04_rgn_timorous_deep/chrykori_tie/zumha/zumha004.mp3", "", "", 1131517784, 3963290452, Spawn)
  102. AddConversationOption(conversation, "I can do that.", "OfferQuest5")
  103. StartConversation(conversation, NPC, Spawn, "Why, our Parsers have found pieces of this pottery before. They believe it is the remains of ceremonial jars, and that directions for the rite are inscribed in the inscriptions on its surface. If they have pieced this together... of course! This must be what they're up to! My scouts reported them gathering and preparing something southwest of here. Hmmmm ... With this evidence in hand, I believe they may be trying to invoke an ancient rite. I'll leave it to you, .. GetName(Spawn) .. . to interrupt them.")
  104. end
  105. ------------------------------------------------------------------------------------
  106. -- QUEST 5
  107. ------------------------------------------------------------------------------------
  108. function OfferQuest5(NPC, Spawn)
  109. FaceTarget(NPC, Spawn)
  110. OfferQuest(NPC, Spawn, QUEST_5)
  111. end
  112. function HaveYouSucceeded(NPC, Spawn, conversation)
  113. PlayFlavor(NPC, "voiceover/english/rok_questvo/primary_conzuk_zum_ha/_exp04/exp04_rgn_timorous_deep/chrykori_tie/zumha/zumha006.mp3", "", "", 1471399693, 1482281040, Spawn)
  114. if (HasCompletedQuest(Spawn, QUEST_5) and not HasCompletedQuest(Spawn, QUEST_6)) or (HasQuest(Spawn, QUEST_5) and GetQuestStep(Spawn, QUEST_5) == 2) then
  115. AddConversationOption(conversation, "Yes. The ritualists were infusing a giant Haoaeran with power.", "dlg_39_1")
  116. else
  117. AddConversationOption(conversation, "Not yet. They're eluding me.")
  118. end
  119. StartConversation(conversation, NPC, Spawn, "Well? Have you succeeded in putting an end to their ritual?")
  120. end
  121. function dlg_39_1(NPC, Spawn)
  122. if HasQuest(Spawn, QUEST_5) then
  123. SetStepComplete(Spawn, QUEST_5, 2)
  124. end
  125. FaceTarget(NPC, Spawn)
  126. conversation = CreateConversation()
  127. PlayFlavor(NPC, "voiceover/english/rok_questvo/primary_conzuk_zum_ha/_exp04/exp04_rgn_timorous_deep/chrykori_tie/zumha/zumha007.mp3", "", "", 1084426819, 682279159, Spawn)
  128. AddConversationOption(conversation, "I will seek him out.", "OfferQuest6")
  129. StartConversation(conversation, NPC, Spawn, "Well, I am glad we put a stop to their efforts. Though they may be nothing more than clumsy mimics playing with forces they don't understand, the thought of them tapping into such power does not sit well... .. GetName(Spawn) .. . I am impressed with your abilities. I would like you to continue aiding us. Report to Secondary Arozik Sky'Ki on Trythec Loft to the southwest; it's the grassy ledge above the sand.")
  130. end
  131. ------------------------------------------------------------------------------------
  132. -- QUEST 6
  133. ------------------------------------------------------------------------------------
  134. function OfferQuest6(NPC, Spawn)
  135. FaceTarget(NPC, Spawn)
  136. OfferQuest(NPC, Spawn, QUEST_6)
  137. end