9
3

ImnatDVren.lua 5.8 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138
  1. --[[
  2. Script Name : SpawnScripts/LongshadowAlley/ImnatDVren.lua
  3. Script Purpose : Imnat D`Vren
  4. Script Author : torsten
  5. Script Date : 2022.07.19
  6. Script Notes : Auto-Generated Conversation from PacketParser Data
  7. --]]
  8. require "SpawnScripts/Generic/DialogModule"
  9. local ADramaticPerformance = 5679
  10. local AShadyClearing = 5680
  11. local TheTruthisoutThere = 5684
  12. function spawn(NPC)
  13. ProvidesQuest(NPC, AShadyClearing)
  14. end
  15. function respawn(NPC)
  16. spawn(NPC)
  17. end
  18. function hailed(NPC, Spawn)
  19. if GetFactionAmount(Spawn,12) <0 then
  20. FaceTarget(NPC, Spawn)
  21. PlayFlavor(NPC, "","","shakefist",0,0, Spawn)
  22. else
  23. if GetQuestStep(Spawn,AShadyClearing) >= 1 then
  24. QuestCheck(NPC,Spawn)
  25. else
  26. Dialog1(NPC,Spawn)
  27. end
  28. end
  29. end
  30. function Dialog1(NPC,Spawn)
  31. FaceTarget(NPC, Spawn)
  32. Dialog.New(NPC, Spawn)
  33. Dialog.AddDialog("Bah! That Maliz keeps breaking everything. He's not allowed near what little furniture we have left! What do you want? Can't you see I'm busy!")
  34. PlayFlavor(NPC, "","","grumble",0,0, Spawn)
  35. Dialog.AddVoiceover("voiceover/english/imnat_d_vren/fprt_hood05/100_std_de_male_imnat_dvren_callout_c7828a4.mp3",3649396705, 3766219054)
  36. if GetQuestStep(Spawn, TheTruthisoutThere)==1 then
  37. Dialog.AddOption("I'm here to investigate information for the Militia.", "Dialog2")
  38. end
  39. if CanReceiveQuest(Spawn, AShadyClearing) then
  40. Dialog.AddOption("Maliz said that you might have some work for me?", "Dialog3")
  41. end
  42. Dialog.AddOption("I was just leaving.")
  43. Dialog.Start()
  44. end
  45. function QuestCheck(NPC,Spawn)
  46. FaceTarget(NPC, Spawn)
  47. Dialog.New(NPC, Spawn)
  48. Dialog.AddDialog("Is the way clear? The sewers must be rid of this vermin that would get in the way of our shipment!")
  49. PlayFlavor(NPC, "","","ponder",0,0, Spawn)
  50. if GetQuestStep(Spawn, AShadyClearing)==2 then
  51. Dialog.AddOption("The sewers should be clear enough for your delivery now.", "Dialog6")
  52. else
  53. Dialog.AddOption("They will be soon.")
  54. end
  55. Dialog.Start()
  56. end
  57. function Dialog2(NPC,Spawn)
  58. FaceTarget(NPC, Spawn)
  59. Dialog.New(NPC, Spawn)
  60. Dialog.AddDialog("I wondered if the Militia would ever confront this menace. It's about time! I grow weary of all this chatter about Thexians rebuilding Neriak. Neriak is gone forever! We must forget it! Freeport is our home now. Tell your dear Captain to arrest one Kirs G'Vis who nests with his fellow Thexian vermin right here in Longshadow. He's your liar. May he face the wrath of Lucan.")
  61. Dialog.AddVoiceover("voiceover/english/imnat_d_vren/fprt_hood05/quests/captainlnek/imnat_lnek_x1_initial.mp3",3046593267,1007171639)
  62. PlayFlavor(NPC, "","","sniff",0,0, Spawn)
  63. Dialog.AddOption("Your information is most welcome.")
  64. Dialog.Start()
  65. if GetQuestStep(Spawn, TheTruthisoutThere) == 1 then
  66. SetStepComplete(Spawn, TheTruthisoutThere, 1)
  67. end
  68. end
  69. function Dialog3(NPC,Spawn)
  70. FaceTarget(NPC, Spawn)
  71. Dialog.New(NPC, Spawn)
  72. Dialog.AddDialog("Perhaps... I do wonder why are you so interested in helping us? It seems odd that you would put yourself in such harms way to deal with our affairs.")
  73. PlayFlavor(NPC, "","","sniff",0,0, Spawn)
  74. Dialog.AddOption("I'm just looking for coin. Is that too much to ask?","Dialog4")
  75. Dialog.Start()
  76. end
  77. function Dialog4(NPC,Spawn)
  78. FaceTarget(NPC, Spawn)
  79. Dialog.New(NPC, Spawn)
  80. Dialog.AddDialog("I suppose not, and you have proved yourself so far. You have been privy to more than you know. We have been expecting a delivery of an important treasure, but you proved that the hired hands charged in protecting it could not stand up to a real challenge.")
  81. PlayFlavor(NPC, "","","shrug",0,0, Spawn)
  82. Dialog.AddOption("So you were using me?","Dialog5")
  83. Dialog.Start()
  84. end
  85. function Dialog5(NPC,Spawn)
  86. FaceTarget(NPC, Spawn)
  87. Dialog.New(NPC, Spawn)
  88. Dialog.AddDialog("You got paid, didn't you?! We had to see if the hired goons could protect this vital delivery... We are grateful for your assistance in identifying their failure. Now, we need to be certain the deilvery can happen without hindrance. Are you willing to assist with this?")
  89. PlayFlavor(NPC, "","","stare",0,0, Spawn)
  90. Dialog.AddOption("We've come this far. What must I do?","Offer")
  91. Dialog.AddOption("I've had enough of this! Get out of my face!")
  92. Dialog.Start()
  93. end
  94. function Offer(NPC,Spawn)
  95. OfferQuest(NPC,Spawn,AShadyClearing)
  96. end
  97. function Dialog6(NPC,Spawn)
  98. SetStepComplete(Spawn, AShadyClearing, 2)
  99. FaceTarget(NPC, Spawn)
  100. Dialog.New(NPC, Spawn)
  101. Dialog.AddDialog("I trust your skills, therefore I will send word to Pavo to begin the transport of the treasure. Unfortunately, I cannot tell you anymore about the mission, but I promise that when our treasure is here, the Teir'Dal will no longer grovel before Lucan D'Lere. I may need your services later, but for now we best not speak to one another. Until then, farewell...")
  102. PlayFlavor(NPC, "","","thanks",0,0, Spawn)
  103. Dialog.AddOption("Fair enough. I've had enough skulking about anyways.")
  104. Dialog.AddOption("Hah! Good luck with that!")
  105. Dialog.Start()
  106. end
  107. --[[ if HasCompletedQuest(Spawn, ADramaticPerformance) then
  108. if not HasQuest(Spawn, AShadyClearing) and not HasCompletedQuest(Spawn, AShadyClearing) then
  109. OfferQuest(NPC, Spawn, AShadyClearing)
  110. end
  111. end
  112. if GetQuestStep(Spawn, AShadyClearing) == 2 then
  113. SetStepComplete(Spawn, AShadyClearing, 2)
  114. end
  115. if GetQuestStep(Spawn, TheTruthisoutThere) == 1 then
  116. SetStepComplete(Spawn, TheTruthisoutThere, 1)
  117. end
  118. PlayFlavor(NPC, "voiceover/english/imnat_d_vren/fprt_hood05/100_std_de_male_imnat_dvren_callout_c7828a4.mp3", "Bah! That Maliz keeps breaking everything. He's not allowed near what little furniture we have left! What do you want? Can't you see I'm busy!", "", 3649396705, 3766219054, Spawn, 0)
  119. end
  120. end]]--