Guest User

Untitled

a guest
Jan 9th, 2018
56
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 6.42 KB | None | 0 0
  1. function changeValues(itemName, price)
  2. script.Parent.Value3Name.Value = itemName
  3. script.Parent.Value3Label.Text = itemName
  4. script.Parent.PriceValue.Value = price
  5. script.Parent.Craft.Text = "CRAFT - $"..price
  6. end
  7.  
  8. --[[
  9. Use changeValues() to list the item, the first being the string of the tool. The tool must be in ServerStorage.Tools
  10. The second is the price to craft the tool.
  11. If you change something, DO IT TO BOTH SIDES
  12. --]]
  13.  
  14. script.Parent.Value1Name.Changed:connect(function()
  15. if script.Parent.Value1Name.Value == "FlameDial" and script.Parent.Value2Name.Value == "Cutlass" then
  16. changeValues("FlameSword", 2000)
  17. elseif script.Parent.Value1Name.Value == "FlameDial" and script.Parent.Value2Name.Value == "Katana" then
  18. changeValues("FlameSword", 2000)
  19. elseif script.Parent.Value1Name.Value == "AxeDial" and script.Parent.Value2Name.Value == "Cutlass" then
  20. changeValues("Machete", 2000)
  21. elseif script.Parent.Value1Name.Value == "AxeDial" and script.Parent.Value2Name.Value == "Boxing Gloves" then
  22. changeValues("Claws", 2000)
  23. elseif script.Parent.Value1Name.Value == "FlashDial" and script.Parent.Value2Name.Value == "Cutlass" then
  24. changeValues("FlashSword", 2000)
  25. elseif script.Parent.Value1Name.Value == "JetDial" and script.Parent.Value2Name.Value == "Cutlass" then
  26. changeValues("DashKatana", 2000)
  27. elseif script.Parent.Value1Name.Value == "BreathDial" and script.Parent.Value2Name.Value == "Cutlass" then
  28. changeValues("DashKatana", 2000)
  29. elseif script.Parent.Value1Name.Value == "BreathDial" and script.Parent.Value2Name.Value == "Katana" then
  30. changeValues("DashKatana", 2000)
  31. elseif script.Parent.Value1Name.Value == "JetDial" and script.Parent.Value2Name.Value == "Katana" then
  32. changeValues("DashKatana", 2000)
  33. elseif script.Parent.Value1Name.Value == "MilkyDial" and script.Parent.Value2Name.Value == "Blundebuss" then
  34. changeValues("MilkyGun", 2000)
  35. elseif script.Parent.Value1Name.Value == "" and script.Parent.Value2Name.Value == "Flintlock" then
  36. changeValues("", 2000)
  37. elseif script.Parent.Value1Name.Value == "LampDial" and script.Parent.Value2Name.Value == "Katana" then
  38. changeValues("LightSword", 2000)
  39. elseif script.Parent.Value1Name.Value == "LampDial" and script.Parent.Value2Name.Value == "Cutlass" then
  40. changeValues("Lightsword", 2000)
  41. elseif script.Parent.Value1Name.Value == "AxeDial" and script.Parent.Value2Name.Value == "Flintlock" then
  42. changeValues("Shuriken", 2000)
  43. elseif script.Parent.Value1Name.Value == "FlashDial" and script.Parent.Value2Name.Value == "Saber" then
  44. changeValues("Lightsaber", 2000)
  45. elseif script.Parent.Value1Name.Value == "" and script.Parent.Value2Name.Value == "Cutlass" then
  46. changeValues("", 2000)
  47. elseif script.Parent.Value1Name.Value == "RejectDial" and script.Parent.Value2Name.Value == "Flintlock" then
  48. changeValues("Lob Bomb", 2000)
  49. elseif script.Parent.Value1Name.Value == "ImpactDial" and script.Parent.Value2Name.Value == "Flintlock" then
  50. changeValues("Lob Bomb", 2000)
  51. elseif script.Parent.Value1Name.Value == "RejectDial" and script.Parent.Value2Name.Value == "Cutlass" then
  52. changeValues("Boom Blade", 2000)
  53. elseif script.Parent.Value1Name.Value == "ImpactDial" and script.Parent.Value2Name.Value == "Katana" then
  54. changeValues("Boom Blade", 2000)
  55. else
  56. script.Parent.Value3Name.Value = ""
  57. script.Parent.Value3Label.Text = "N/A"
  58. script.Parent.PriceValue.Value = 0
  59. script.Parent.Craft.Text = "CRAFT"
  60. end
  61. end)
  62.  
  63. script.Parent.Value2Name.Changed:connect(function()
  64. if script.Parent.Value1Name.Value == "FlameDial" and script.Parent.Value2Name.Value == "Cutlass" then
  65. changeValues("FlameSword", 2000)
  66. elseif script.Parent.Value1Name.Value == "FlameDial" and script.Parent.Value2Name.Value == "Katana" then
  67. changeValues("FlameSword", 2000)
  68. elseif script.Parent.Value1Name.Value == "AxeDial" and script.Parent.Value2Name.Value == "Cutlass" then
  69. changeValues("Machete", 2000)
  70. elseif script.Parent.Value1Name.Value == "AxeDial" and script.Parent.Value2Name.Value == "Boxing Gloves" then
  71. changeValues("Claws", 2000)
  72. elseif script.Parent.Value1Name.Value == "FlashDial" and script.Parent.Value2Name.Value == "Cutlass" then
  73. changeValues("FlashSword", 2000)
  74. elseif script.Parent.Value1Name.Value == "JetDial" and script.Parent.Value2Name.Value == "Cutlass" then
  75. changeValues("DashKatana", 2000)
  76. elseif script.Parent.Value1Name.Value == "BeathDial" and script.Parent.Value2Name.Value == "Cutlass" then
  77. changeValues("DashKatana", 2000)
  78. elseif script.Parent.Value1Name.Value == "BreathDial" and script.Parent.Value2Name.Value == "Katana" then
  79. changeValues("DashKatana", 2000)
  80. elseif script.Parent.Value1Name.Value == "JetDial" and script.Parent.Value2Name.Value == "Katana" then
  81. changeValues("DashKatana", 2000)
  82. elseif script.Parent.Value1Name.Value == "MilkyDial" and script.Parent.Value2Name.Value == "Blunderbuss" then
  83. changeValues("MilkyGun", 2000)
  84. elseif script.Parent.Value1Name.Value == "" and script.Parent.Value2Name.Value == "Flintlock" then
  85. changeValues("", 2000)
  86. elseif script.Parent.Value1Name.Value == "LampDial" and script.Parent.Value2Name.Value == "Katana" then
  87. changeValues("LightSword", 2000)
  88. elseif script.Parent.Value1Name.Value == "LampDial" and script.Parent.Value2Name.Value == "Cutlass" then
  89. changeValues("LightSword", 2000)
  90. elseif script.Parent.Value1Name.Value == "Cog" and script.Parent.Value2Name.Value == "Saber" then
  91. changeValues("Gear 2 Saber", 2000)
  92. elseif script.Parent.Value1Name.Value == "AxeDial" and script.Parent.Value2Name.Value == "Flintlock" then
  93. changeValues("Shuriken", 2000)
  94. elseif script.Parent.Value1Name.Value == "Bloodbag" and script.Parent.Value2Name.Value == "Cutlass" then
  95. changeValues("Bloodlust", 2000)
  96. elseif script.Parent.Value1Name.Value == "RejectDial" and script.Parent.Value2Name.Value == "Flintlock" then
  97. changeValues("Lob Bomb", 2000)
  98. elseif script.Parent.Value1Name.Value == "ImpactDial" and script.Parent.Value2Name.Value == "Flintlock" then
  99. changeValues("Lob Bomb", 2000)
  100. elseif script.Parent.Value1Name.Value == "RejectDial" and script.Parent.Value2Name.Value == "Cutlass" then
  101. changeValues("Boom Blade", 2000)
  102. elseif script.Parent.Value1Name.Value == "ImpactDial" and script.Parent.Value2Name.Value == "Katana" then
  103. changeValues("Boom Blade", 2000)
  104. else
  105. script.Parent.Value3Name.Value = ""
  106. script.Parent.Value3Label.Text = "N/A"
  107. script.Parent.PriceValue.Value = 0
  108. script.Parent.Craft.Text = "CRAFT"
  109. end
  110. end)
Advertisement
Add Comment
Please, Sign In to add comment