GlumpMarrblade.lua 4.9 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116
  1. --[[
  2. Script Name : SpawnScripts/Castleview/GlumpMarrblade.lua
  3. Script Purpose : Glump Marrblade <Crafting Trainer>
  4. Script Author : Scatman//Dorbin
  5. Script Date : 2009.10.03
  6. Script Notes :
  7. --]]
  8. require "SpawnScripts/Generic/DialogModule"
  9. dofile("SpawnScripts/Generic/GenericVoiceOvers.lua")
  10. -- Item ID's
  11. local ARTISAN_ESSENTIALS_VOLUME_2 = 31373
  12. function spawn(NPC)
  13. end
  14. function respawn(NPC)
  15. spawn(NPC)
  16. end
  17. function hailed(NPC, Spawn)
  18. FaceTarget(NPC, Spawn)
  19. if HasQuest(Spawn,5765) and GetQuestStep(Spawn,5765) == 8 then
  20. Dialog1(NPC,Spawn)
  21. else
  22. conversation = CreateConversation()
  23. GenericHail(NPC, Spawn)
  24. if GetTradeskillLevel(Spawn) <2 then
  25. conversation = CreateConversation()
  26. --not HasItem(Spawn, ARTISAN_ESSENTIALS_VOLUME_2, 1) then
  27. AddConversationOption(conversation, "Yes, please teach me.", "dlg_39_1")
  28. AddConversationOption(conversation, "No, not at the moment.")
  29. StartConversation(conversation, NPC, Spawn, "You show interest in the crafting trade, good. We can always use talented artisans. I can help you get started, would you be interested?")
  30. else
  31. Say(NPC,"Good day! If you are looking for more crafting training, seek out the trainers in Qeynos Harbor. They can help you beyond the basics I provide.","Spawn")
  32. -- Say(NPC, "I have nothing else to teach you for the moment. Please return to me when you have earned enough experience to choose your profession.", Spawn)
  33. end
  34. end
  35. end
  36. function dlg_39_1(NPC, Spawn)
  37. FaceTarget(NPC, Spawn)
  38. conversation = CreateConversation()
  39. if GetTradeskillLevel(Spawn) <2 then
  40. Quest = GetQuest(Spawn,5749)
  41. SummonItem(Spawn,1030001,1)
  42. SetTradeskillLevel(Spawn,2)
  43. SetTradeskillClass(Spawn,1)
  44. SendMessage(Spawn, "You are now an Artisan!")
  45. SendPopUpMessage(Spawn, "You are now an Artisan!", 200, 200, 200)
  46. end
  47. --[[ Revamped
  48. -- artisan essentials volume 2
  49. SummonItem(Spawn, ARTISAN_ESSENTIALS_VOLUME_2, 1)
  50. ]]--
  51. AddConversationOption(conversation, "I will start on that now.")
  52. StartConversation(conversation, NPC, Spawn, "There, you now have knowledge required to begin crafting. Speak to the Tradeskill Tutor for more detailed guidance on learning to craft, if you are interested in more information. Return to me when you are ready to select a crafting specialty.")
  53. end
  54. function Dialog1(NPC,Spawn)
  55. SetStepComplete(Spawn,5765,8)
  56. FaceTarget(NPC, Spawn)
  57. Dialog.New(NPC, Spawn)
  58. PlayFlavor(NPC, "", "", "hello", 0, 0, Spawn)
  59. Dialog.AddDialog("Thou looks lost. If you were looking for work the Charter of the Truthbringer would allow thee to join our ranks. Doth thou have an interest in this?")
  60. Dialog.AddVoiceover("voiceover/english/glump_marrblade/qey_village04/100_trd_glump_marrblade_joining_eb16fa68.mp3", 4035919776, 1963466781)
  61. Dialog.AddOption("I'm just saying hello!")
  62. Dialog.AddOption("What can I do here?", "CanDo")
  63. if GetTradeskillLevel(Spawn)<2 then
  64. Dialog.AddOption("I'm rather new at crafting. Can you help me?", "HelpMe")
  65. end
  66. Dialog.Start()
  67. end
  68. function CanDo(NPC,Spawn)
  69. FaceTarget(NPC, Spawn)
  70. Dialog.New(NPC, Spawn)
  71. PlayFlavor(NPC, "", "", "orate", 0, 0, Spawn)
  72. Dialog.AddDialog("Many things can be done at a tradeskill society and there are many in the city... but ours is obviously the best! Each is equipped with quality crafting stations and fuels needed to become proficient at any tradeskill class you might desire.")
  73. Dialog.AddOption("Anything else I should know?", "CanDo2")
  74. if GetTradeskillLevel(Spawn)<2 then
  75. Dialog.AddOption("I'm rather new at crafting. Can you help me?", "HelpMe")
  76. end
  77. Dialog.Start()
  78. end
  79. function CanDo2(NPC,Spawn)
  80. FaceTarget(NPC, Spawn)
  81. Dialog.New(NPC, Spawn)
  82. PlayFlavor(NPC, "", "", "nod", 0, 0, Spawn)
  83. Dialog.AddDialog("Our society also has our very own Broker, who you can talk to in order to buy and sell items from other adventurers. A very handy connection, indeed!")
  84. Dialog.AddOption("Thank you for all the information!")
  85. if GetTradeskillLevel(Spawn)<2 then
  86. Dialog.AddOption("I'm rather new at crafting. Can you help me?", "HelpMe")
  87. end
  88. Dialog.Start()
  89. end
  90. function HelpMe(NPC,Spawn)
  91. FaceTarget(NPC, Spawn)
  92. Dialog.New(NPC, Spawn)
  93. PlayFlavor(NPC, "", "", "nod", 0, 0, Spawn)
  94. Dialog.AddDialog("Lets see... here are the basics to get you going on your path to becoming an Artisan. Scribe these recipies to learn the basics. If you are needing more information, step inside and there will be others that can help you.")
  95. Dialog.AddOption("What can I do here?", "CanDo")
  96. Dialog.AddOption("Thank you for all the information!")
  97. if GetTradeskillLevel(Spawn) <2 then
  98. SummonItem(Spawn,1030001,1)
  99. SetTradeskillLevel(Spawn,2)
  100. SetTradeskillClass(Spawn,1)
  101. SendMessage(Spawn, "You are now an Artisan!")
  102. SendPopUpMessage(Spawn, "You are now an Artisan!", 200, 200, 200)
  103. end
  104. Dialog.Start()
  105. end