9
3

TulliaDomna.lua 4.4 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104
  1. --[[
  2. Script Name : SpawnScripts/BeggarsCourt/TulliaDomna.lua
  3. Script Purpose : Tullia Domna
  4. Script Author : Dorbin
  5. Script Date : 11.17.2023
  6. Script Notes :
  7. --]]
  8. require "SpawnScripts/Generic/DialogModule"
  9. local AnErrandfortheQueen = 5650
  10. function spawn(NPC)
  11. ProvidesQuest(NPC, AnErrandfortheQueen)
  12. SetPlayerProximityFunction(NPC, 10, "InRange", "LeaveRange")
  13. SetTempVariable(NPC,"CalloutTimer","false")
  14. SetTempVariable(NPC, "CalloutTimer1", "false")
  15. end
  16. function respawn(NPC)
  17. spawn(NPC)
  18. end
  19. function InRange(NPC,Spawn)
  20. if GetFactionAmount(Spawn,12) <0 then
  21. FaceTarget(NPC, Spawn)
  22. PlayFlavor(NPC, "","","shakefist",0,0, Spawn)
  23. else
  24. if CanReceiveQuest(Spawn, AnErrandfortheQueen) then
  25. if GetTempVariable(NPC, "CalloutTimer")== "false"then
  26. SetTempVariable(NPC, "CalloutTimer", "true")
  27. AddTimer(NPC,30000,"ResetTimer",1,Spawn)
  28. FaceTarget(NPC, Spawn)
  29. if GetTempVariable(NPC, "CalloutTimer1")== "false"then
  30. PlayFlavor(NPC, "voiceover/english/tullia_domna/fprt_hood04/100_std_tullia_domna_hum_f_callout1_77869ddd.mp3", "Come hither ... how can I, Queen Antonia Bayle, serve you?", "royalwave", 3532309135, 780107631, Spawn, 0)
  31. SetTempVariable(NPC, "CalloutTimer1", "true")
  32. elseif GetTempVariable(NPC, "CalloutTimer1")== "true"then
  33. PlayFlavor(NPC, "voiceover/english/tullia_domna/fprt_hood04/100_std_tullia_domna_hum_f_multhail1_d22d25ec.mp3", "A person of my fine breeding doesn't do business with lowly half-breeds. Get out of my sight, peasant.", "sniff", 3463656577, 661872862, Spawn, 0)
  34. SetTempVariable(NPC, "CalloutTimer1", "false")
  35. end
  36. end
  37. else
  38. end
  39. end
  40. end
  41. function ResetCallout(NPC,Spawn)
  42. SetTempVariable(NPC,"CalloutTimer","false")
  43. end
  44. function hailed(NPC, Spawn)
  45. if GetFactionAmount(Spawn,12) <0 then
  46. FaceTarget(NPC, Spawn)
  47. PlayFlavor(NPC, "","","shakefist",0,0, Spawn)
  48. else
  49. Dialog1(NPC, Spawn)
  50. end
  51. end
  52. function Offer(NPC, Spawn)
  53. OfferQuest(NPC, Spawn, AnErrandfortheQueen)
  54. end
  55. function Dialog1(NPC, Spawn)
  56. FaceTarget(NPC, Spawn)
  57. Dialog.New(NPC, Spawn)
  58. Dialog.AddDialog("It's disgusting that a person of my fine breeding has to do business with lowly half-breeds.")
  59. Dialog.AddVoiceover("voiceover/english/tullia_domna/fprt_hood04/std_tullia_domna.mp3", 4000439764, 2378172444)
  60. PlayFlavor(NPC, "", "", "sniff", 0, 0, Spawn, 0)
  61. if CanReceiveQuest(Spawn,AnErrandfortheQueen) then
  62. Dialog.AddOption("I'm not sure what kind of breeding made you, but it certainly wasn't fine!", "Dialog2")
  63. elseif GetQuestStep(Spawn,AnErrandfortheQueen) ==2 then
  64. Dialog.AddOption("I've dealt with the Giantslayer bashers.", "Dialog3")
  65. elseif HasCompletedQuest(Spawn,AnErrandfortheQueen) then
  66. Dialog.AddOption("It IS truly digusting, my 'Queen'...")
  67. end
  68. Dialog.AddOption("With that, I'm out of here.")
  69. Dialog.Start()
  70. end
  71. function Dialog2(NPC, Spawn)
  72. FaceTarget(NPC, Spawn)
  73. Dialog.New(NPC, Spawn)
  74. Dialog.AddDialog("HOW DARE YOU ADDRESS ME LIKE THAT! I am Queen Antonia Bayle, lord and protector of the UNIVERSE! I'm on a top-secret mission, so do not spread word of my presence, understand? My mission is to eat all the cheese before my husband, Lucan, finds it. I need my public executioner, NOW! Is that you?")
  75. Dialog.AddVoiceover("voiceover/english/tullia_domna/fprt_hood04/quests/tulladomna/tulla_x1_initial.mp3", 309451026, 621524268)
  76. PlayFlavor(NPC, "", "", "boggle", 0, 0, Spawn, 0)
  77. Dialog.AddOption("Whoa, are you okay?", "Offer")
  78. Dialog.AddOption("Wow, talk about a basket case! I've heard enough.")
  79. Dialog.Start()
  80. end
  81. function Dialog3(NPC, Spawn)
  82. FaceTarget(NPC, Spawn)
  83. Dialog.New(NPC, Spawn)
  84. Dialog.AddDialog("Perfect timing! The Royal Cricket King informed me that the ogres planned to blow down these walls with their beastly breath! You just saved everyone's life! You, noble executioner, deserve a knighting for your valor. From here on, we shall call you Champion Knight Executioner Wall Saver Extraordinaire! Please, let me anoint you with your sword.")
  85. Dialog.AddVoiceover("voiceover/english/tullia_domna/fprt_hood04/quests/tulladomna/tulla_x1_finish.mp3", 2821413761, 1097570580)
  86. PlayFlavor(NPC, "", "", "happy", 0, 0, Spawn, 0)
  87. Dialog.AddOption("I thank you for the honor... No need to use anything sharp.")
  88. Dialog.Start()
  89. SetStepComplete(Spawn,AnErrandfortheQueen,2)
  90. end