9
3

the_call_of_qeynos.lua 4.9 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110
  1. --[[
  2. Script Name : Quests/Hallmark/the_call_of_qeynos.lua
  3. Script Author : Dorbin
  4. Script Date : 2023.03.16 06:03:41
  5. Script Purpose :
  6. Zone : Hallmark
  7. Quest Giver:
  8. Preceded by: None
  9. Followed by:
  10. --]]
  11. function Init(Quest,QuestGiver,Player)
  12. AddQuestStep(Quest, 1, "Queen Antonia is speaking to me...", 1,100, "Queen Antonia is speaking to me...", 11)
  13. AddQuestStepCompleteAction(Quest, 1, "Step1Complete")
  14. end
  15. function Step1Complete(Quest, QuestGiver, Player)
  16. UpdateQuestStepDescription(Quest, 1, "I have listened to Queen Antonia's message.")
  17. UpdateQuestTaskGroupDescription(Quest, 1, "I have listened to Queen Antonia's message.")
  18. Race = GetRace(Player)
  19. -- Human
  20. if Race == 9 then
  21. AddQuestStepChat(Quest, 2, "I must find the Steward", 1, "I have been instructed to seek out a Steward in Qeynos where I arrived.", 11, 2330170,2340166)
  22. UpdateQuestZone(Quest, "Multiple Zones")
  23. -- Kerra
  24. elseif Race == 11 then
  25. AddQuestStepChat(Quest, 2, "I must find the Steward in Nettleville Hovel", 1, "I must find the Steward in Nettleville Hovel", 11, 2330170)
  26. UpdateQuestZone(Quest, "Nettleville")
  27. -- Erudite
  28. elseif Race == 3 or Race == 20 then
  29. AddQuestStepChat(Quest, 2, "I must find the Steward in Starcrest Commune", 1, "I must find the Steward in Starcrest Commune", 11, 2340166)
  30. UpdateQuestZone(Quest, "Starcrest")
  31. -- Barbarian / Dwarf
  32. elseif Race == 0 or Race == 2 then
  33. AddQuestStepChat(Quest, 2, "I must find the Steward in Graystone Yard", 1, "I must find the Steward in Graystone Yard", 11, 2350184)
  34. UpdateQuestZone(Quest, "Graystone Yard")
  35. -- High Elf / Froglok
  36. elseif Race == 4 or Race == 8 then
  37. AddQuestStepChat(Quest, 2, "I must find the Steward Castleview Hamlet", 1, "I must find the Steward Castleview Hamlet", 11, 2360174)
  38. UpdateQuestZone(Quest, "Castleview")
  39. -- Half Elf / Wood Elf / Fae
  40. elseif Race == 6 or Race == 15 or Race == 16 then
  41. AddQuestStepChat(Quest, 2, "I must find the Steward in The Willow Wood", 1, "I must find the Steward in The Willow Wood", 11, 2370111)
  42. UpdateQuestZone(Quest, "Willow Wood")
  43. -- Gnome / Halfling
  44. elseif Race == 5 or Race == 7 then
  45. AddQuestStepChat(Quest, 2, "I must find the Steward in The Baubbleshire", 1, "I must find the Steward in The Baubbleshire", 11, 2380173)
  46. UpdateQuestZone(Quest, "Baubbleshire")
  47. else
  48. AddQuestStepChat(Quest, 2, "I must find the Steward in Nettleville Hovel", 1, "I must find the Steward in Nettleville Hovel", 11, 2330170)
  49. UpdateQuestZone(Quest, "Nettleville")
  50. end
  51. AddQuestStepCompleteAction(Quest, 2, "QuestComplete")
  52. end
  53. function Accepted(Quest, QuestGiver, Player)
  54. conversation = CreateConversation()
  55. PlayFlavor(Player, "voiceover/english/queen_antonia_bayle/qey_north/antonia_isle_speech_11.mp3", "", "", 3316158990, 3680571955, Player)
  56. AddConversationOption(conversation, "[I must speak with a Steward!]")
  57. StartDialogConversation(conversation, 1, QuestGiver, Player, "\"Your loyalty will be tested, for you must earn the right to be called citizen.\"")
  58. SetStepComplete(Player, 5792,1)
  59. end
  60. function Declined(Quest, QuestGiver, Player)
  61. conversation = CreateConversation()
  62. choice = MakeRandomInt(1,3)
  63. if choice == 1 then
  64. PlayFlavor(Player, "voiceover/english/queen_antonia_bayle/qey_north/antonia_isle_speech_3.mp3", "", "", 1841028977, 3133868486, Player)
  65. StartDialogConversation(conversation, 1, QuestGiver, Player, "\"If you are tired, cold or hungry, if you flee persecution, poverty or injustice, be comforted, there is a place at our hearth for you.\"")
  66. elseif choice ==2 then
  67. PlayFlavor(Player, "voiceover/english/queen_antonia_bayle/qey_north/antonia_isle_speech_15.mp3", "", "", 3873638463, 3215411094, Player)
  68. StartDialogConversation(conversation, 1, QuestGiver, Player, "\"I trust that you do not share in Lucan's deceit, and that the well-being of Qeynos and its people is in your heart.\"")
  69. elseif choice ==3 then
  70. PlayFlavor(Player, "voiceover/english/queen_antonia_bayle/qey_north/antonia_isle_speech_12.mp3", "", "", 2036336595, 3509341224, Player)
  71. StartDialogConversation(conversation, 1, QuestGiver, Player, "\"Qeynosians are generous to travelers, but harsh with traitors.\"")
  72. end
  73. OfferQuest(QuestGiver,Player, 5792)
  74. end
  75. function QuestComplete(Quest, QuestGiver, Player)
  76. UpdateQuestStepDescription(Quest, 2, "I found the Steward")
  77. UpdateQuestTaskGroupDescription(Quest, 2, "I have spoken with the Steward.")
  78. UpdateQuestDescription(Quest, "I have taken the first steps in declaring myself a true Qeynosian.")
  79. GiveQuestReward(Quest, Player)
  80. end
  81. function Reload(Quest, QuestGiver, Player, Step)
  82. if Step == 1 then
  83. Step1Complete(Quest, QuestGiver, Player)
  84. elseif Step == 2 then
  85. QuestComplete(Quest, QuestGiver, Player)
  86. end
  87. end