9
3

ArmsdealerSilentblade.lua 5.1 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114
  1. --[[
  2. Script Name : SpawnScripts/BeggarsCourt/ArmsdealerSilentblade.lua
  3. Script Purpose : Armsdealer Silentblade
  4. Script Author : torsten\\Dorbin -- Dialogs added
  5. Script Date : 2022.07.15
  6. Script Notes :
  7. --]]
  8. require "SpawnScripts/Generic/DialogModule"
  9. local FreeWaresforSilentblade = 5654
  10. local GetRichQuick = 5655
  11. function spawn(NPC)
  12. ProvidesQuest(NPC, FreeWaresforSilentblade)
  13. ProvidesQuest(NPC, GetRichQuick)
  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. Dialog1(NPC,Spawn)
  24. end
  25. end
  26. function Dialog1(NPC, Spawn)
  27. FaceTarget(NPC, Spawn)
  28. Dialog.New(NPC, Spawn)
  29. Dialog.AddDialog("You need adventuring gear? Look no further. I got everything you could possibly want.")
  30. Dialog.AddVoiceover("voiceover/english/armsdealer_silentblade/fprt_hood04/mer_arms_dealer_silentblade.mp3", 679994876, 2333783393)
  31. PlayFlavor(NPC,"","","hello",0,0,Spawn)
  32. if CanReceiveQuest(Spawn, FreeWaresforSilentblade) then
  33. Dialog.AddOption("Hey, have any tips on making coin?","Dialog1_Quest1")
  34. end
  35. if GetQuestStep(Spawn, FreeWaresforSilentblade) == 2 then
  36. Dialog.AddOption("Here are the maces from the battlepriests.","Dialog3_Quest1")
  37. end
  38. if CanReceiveQuest(Spawn, GetRichQuick)then
  39. Dialog.AddOption("Have any other tricks to make quick coin?","Dialog1_Quest2")
  40. end
  41. if GetQuestStep(Spawn, GetRichQuick) == 2 then
  42. Dialog.AddOption("Blort said he'll soon make a profit.","Dialog2_Quest2")
  43. end
  44. Dialog.AddOption("I'll take a look.")
  45. Dialog.Start()
  46. end
  47. function Dialog1_Quest1(NPC,Spawn)
  48. FaceTarget(NPC, Spawn)
  49. Dialog.New(NPC, Spawn)
  50. Dialog.AddDialog("Hmph...like I'd give you my trade secret, punk. Now go away, you're bothering me.")
  51. Dialog.AddVoiceover("voiceover/english/arms_dealer_silentblade/fprt_hood04/quests/armsdealersilentblade/silentblade_x1_initial.mp3", 1423744061, 732792019)
  52. PlayFlavor(NPC, "", "", "glare", 0, 0, Spawn)
  53. Dialog.AddOption("You just seemed to know your stuff. I was just curious.","Dialog2_Quest1")
  54. Dialog.AddOption("Fine! I didn't want to do buisness anyway.")
  55. Dialog.Start()
  56. end
  57. function Dialog2_Quest1(NPC,Spawn)
  58. FaceTarget(NPC, Spawn)
  59. Dialog.New(NPC, Spawn)
  60. Dialog.AddDialog("Well at least you know a winner when you see one...fine. You can work for me. I'll tell you my trade secret as long as you finish a job for me, understand?")
  61. Dialog.AddVoiceover("voiceover/english/arms_dealer_silentblade/fprt_hood04/quests/armsdealersilentblade/silentblade_x1_initial2.mp3", 1974340371, 3987326918)
  62. Dialog.AddOption("Okay. What do you need?","Offer1")
  63. Dialog.AddOption("Nope. I wanted answers, not work.")
  64. Dialog.Start()
  65. end
  66. function Offer1(NPC,Spawn)
  67. OfferQuest(NPC, Spawn, FreeWaresforSilentblade)
  68. end
  69. function Dialog3_Quest1(NPC,Spawn)
  70. FaceTarget(NPC, Spawn)
  71. Dialog.New(NPC, Spawn)
  72. SetStepComplete(Spawn, FreeWaresforSilentblade, 2)
  73. Dialog.AddDialog("Good job, kid. Now, here's my secret: Take the maces and soak them in acid for about an hour. The acid will burn off the gunk. After that, apply some paint to the dented spots ... TADA!!! Good as new. Then mark up the price and you're a rich man! Make sure you don't accidentally use the mace on yourself -- those things can kill you. Here's some coin for your time.")
  74. Dialog.AddVoiceover("voiceover/english/arms_dealer_silentblade/fprt_hood04/quests/armsdealersilentblade/silentblade_x1_finish.mp3", 2995073623, 2307732444)
  75. PlayFlavor(NPC, "", "", "orate", 0, 0, Spawn)
  76. Dialog.AddOption("Well, I suppose that's something...","Continue")
  77. Dialog.Start()
  78. end
  79. function Dialog1_Quest2(NPC,Spawn)
  80. FaceTarget(NPC, Spawn)
  81. Dialog.New(NPC, Spawn)
  82. Dialog.AddDialog("Didn't I tell you enough secrets? I don't want you stealing my business! But, I do need some help. Since you're here, I'll teach you another valuable trade secret -- if you'll put in some effort. So, are you willing to work, kid?")
  83. Dialog.AddVoiceover("voiceover/english/arms_dealer_silentblade/fprt_hood04/quests/armsdealersilentblade/silentblade_x2_initial.mp3", 0, 0) --NO KEYS
  84. Dialog.AddOption("If it helps me make money, sure.","Offer2")
  85. Dialog.AddOption("More work? Nope.")
  86. Dialog.Start()
  87. end
  88. function Offer2(NPC,Spawn)
  89. OfferQuest(NPC, Spawn, GetRichQuick)
  90. end
  91. function Dialog2_Quest2(NPC,Spawn)
  92. FaceTarget(NPC, Spawn)
  93. Dialog.New(NPC, Spawn)
  94. SetStepComplete(Spawn, GetRichQuick, 2)
  95. Dialog.AddDialog("Sure he'll make some cash! Okay, kid, here's your payment. Now, the true secret of a good arms dealer is to not sell weapons to customers, but to sell them to other arms dealers. If you get enough arms dealers under you, you'll be rich. Now, I must get more weapons from my sponsor, so run along, okay? Good luck with your career...")
  96. Dialog.AddVoiceover("voiceover/english/arms_dealer_silentblade/fprt_hood04/quests/armsdealersilentblade/silentblade_x2_finish.mp3", 0, 0) --NO KEYS
  97. PlayFlavor(NPC, "", "", "agree", 0, 0, Spawn)
  98. Dialog.AddOption("Thanks for the tip.")
  99. Dialog.Start()
  100. end