CaptainVarlos.lua 4.4 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116
  1. --[[
  2. Script Name : SpawnScripts/QueensColony/CaptainVarlos.lua
  3. Script Author : Zcoretri
  4. Script Date : 2015.07.27
  5. Script Purpose : Captain Varlos dialog
  6. Modified Date : 2020.04.03
  7. Modified by : premierio015
  8. Notes : Added Animations & Gives a Spell "Call to Home"
  9. --]]
  10. function spawn(NPC)
  11. end
  12. function respawn(NPC)
  13. spawn(NPC)
  14. end
  15. function hailed(NPC, Spawn)
  16. FaceTarget(NPC, Spawn)
  17. conversation = CreateConversation()
  18. PlayFlavor(NPC, "voiceover/english/captain_varlos/boat_06p_tutorial02/varlos_0_027.mp3", "", "hello", 2285948102, 2994720481, Spawn)
  19. AddConversationOption(conversation, "Yes. Take me to Qeynos.", "AreYouSure")
  20. AddConversationOption(conversation, "Who are you?", "WhoAreYou")
  21. AddConversationOption(conversation, "No, I'd like to explore more.")
  22. StartConversation(conversation, NPC, Spawn, "So, ya' ready ta go ashore matey?")
  23. end
  24. function WhoAreYou(NPC, Spawn)
  25. conversation = CreateConversation()
  26. PlayFlavor(NPC, "voiceover/english/captain_varlos/boat_06p_tutorial02/varlos_0_003.mp3", "", "bow", 2565389482, 560555759, Spawn)
  27. AddConversationOption(conversation, "I think I'm ready to leave now.", "AreYouSure")
  28. AddConversationOption(conversation, "I'd like to explore more. Goodbye.")
  29. StartConversation(conversation, NPC, Spawn, "I am Captain Draik Varlos, and this 'ere fine ship is the Far Journey. I can give ya' a ride to Qeynos when yer ready to leave the island.")
  30. end
  31. function AreYouSure(NPC, Spawn)
  32. conversation = CreateConversation()
  33. PlayFlavor(NPC, "voiceover/english/captain_varlos/tutorial_island02_fvo_hail3.mp3", "", "", 1155995604, 1406357895, Spawn)
  34. AddConversationOption(conversation, "I'm ready for the challenges ahead. Take me to Qeynos.", "AreYouSure2")
  35. AddConversationOption(conversation, "On second thought, maybe I should wait a bit.")
  36. StartConversation(conversation, NPC, Spawn, "Ya' best be sure ta' explore the whole island, ya' hear! Norrath can be a dangerous place ya' know?")
  37. end
  38. function AreYouSure2(NPC, Spawn)
  39. conversation = CreateConversation()
  40. PlayFlavor(NPC, "voiceover/english/captain_varlos/boat_06p_tutorial02/varlos_0_013.mp3", "", "smile", 3880459741, 170861362, Spawn)
  41. AddConversationOption(conversation, "Thanks for the ride!", "AreYouSure3")
  42. AddConversationOption(conversation, "Wait! I've changed my mind. Let me off.")
  43. StartConversation(conversation, NPC, Spawn, "Yar! That's what we be needin'. Ok then, off to Qeynos!")
  44. end
  45. function AreYouSure3(NPC, Spawn)
  46. conversation = CreateConversation()
  47. PlayFlavor(NPC, "voiceover/english/captain_varlos/boat_06p_tutorial02/varlos_0_028.mp3", "", "", 1009737776, 2173458794, Spawn)
  48. AddConversationOption(conversation, "To Qeynos!", "LeaveIsland")
  49. AddConversationOption(conversation, "Oh, nevermind! I'll stay!")
  50. StartConversation(conversation, NPC, Spawn, "Don't ya' mind, we get paid ta' do that.")
  51. end
  52. function LeaveIsland(NPC, Spawn)
  53. Race = GetRace(Spawn)
  54. -- Human / Kerra
  55. if Race == 9 or Race == 11 then
  56. AddSpellBookEntry(Spawn, 8057, 1)
  57. ZoneRef = GetZone("Nettleville")
  58. Zone(ZoneRef,Spawn)
  59. -- Erudite
  60. elseif Race == 3 then
  61. AddSpellBookEntry(Spawn, 8057, 1)
  62. ZoneRef = GetZone("Starcrest")
  63. Zone(ZoneRef,Spawn)
  64. -- Barbarian / Dwarf
  65. elseif Race == 0 or Race == 2 then
  66. AddSpellBookEntry(Spawn, 8057, 1)
  67. ZoneRef = GetZone("Graystone")
  68. Zone(ZoneRef,Spawn)
  69. -- High Elf / Froglok
  70. elseif Race == 4 or Race == 8 then
  71. AddSpellBookEntry(Spawn, 8057, 1)
  72. ZoneRef = GetZone("Castleview")
  73. Zone(ZoneRef,Spawn)
  74. -- Half Elf / Wood Elf
  75. elseif Race == 6 or Race == 15 then
  76. AddSpellBookEntry(Spawn, 8057, 1)
  77. ZoneRef = GetZone("Willowwood")
  78. Zone(ZoneRef,Spawn)
  79. -- Gnome / Halfling
  80. elseif Race == 5 or Race == 7 then
  81. AddSpellBookEntry(Spawn, 8057, 1)
  82. ZoneRef = GetZone("Baubbleshire")
  83. Zone(ZoneRef,Spawn)
  84. -- Fae
  85. elseif Race == 17 then
  86. AddSpellBookEntry(Spawn, 8057, 1)
  87. ZoneRef = GetZone("Kelethin")
  88. Zone(ZoneRef,Spawn)
  89. -- Unknown
  90. else
  91. Say(Spawn, "Sorry, I cannot deal with someone of your race. Try visiting the boat on the other island!")
  92. ZoneRef = GetZone("OutpostOverlord")
  93. Zone(ZoneRef,Spawn)
  94. end
  95. end