Advertisement
iiFlamez

Untitled

Nov 14th, 2017
134
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.28 KB | None | 0 0
  1. -- params : ...
  2.  
  3. Player = game.Players.LocalPlayer
  4. enabled = true
  5. T = {}
  6. script.Parent:WaitForChild("Sound")
  7. for u,c in pairs(script.Parent:GetChildren()) do
  8. if c.ClassName == "ImageLabel" then
  9. T[#T + 1] = c.Image
  10. end
  11. end
  12. local ContentProvider = game:GetService("ContentProvider")
  13. local LoadAssets = function(AssetList)
  14. for _,AssetId in pairs(AssetList) do
  15. ContentProvider:Preload(AssetId)
  16. end
  17. end
  18.  
  19. LoadAssets(T)
  20. onButtonClicked = function()
  21. if not enabled then
  22. return
  23. end
  24. enabled = false
  25. math.randomseed(tick())
  26. for i = 1, 10 do
  27. rnd = math.random(1, 4)
  28. end
  29. print(rnd)
  30. local texture = script.Dadao.Texture
  31. local Object = nil
  32. if rnd == 1 then
  33. Object = "Saber"
  34. script.Parent.Parent.Text.Text = "Common saber. Good weapon to start adventure!"
  35. else
  36. if rnd == 2 then
  37. Object = "Cutlass"
  38. script.Parent.Parent.Text.Text = "Common cutlass. Good weapon to start adventure!"
  39. else
  40. if rnd == 3 then
  41. Object = "Katana"
  42. script.Parent.Parent.Text.Text = "Common katana. Good weapon to start adventure!"
  43. else
  44. if rnd == 4 then
  45. Object = "Dadao"
  46. script.Parent.Parent.Text.Text = "Common dadao. Good weapon to start adventure!"
  47. end
  48. end
  49. end
  50. end
  51. script.Parent.Sound:Play()
  52. script.Parent.Parent.Text.Visible = true
  53. script.Parent:FindFirstChild(Object).Visible = true
  54. script.Parent.Parent.NameS.Visible = true
  55. script.Parent.Parent.NameS.Text = Object
  56. script.Parent.Parent.Accept.Visible = true
  57. game.ReplicatedStorage.RemoteEvents:FindFirstChild("ChangeValue"):FireServer(Player.TextureGui.TextureId.Weapon, Object, game.Workspace.RemoteEvents:FindFirstChild("Password"):InvokeServer(script, script:FindFirstChild("DDCorpPass")))
  58. game.ReplicatedStorage.RemoteEvents:FindFirstChild("GiveWeapon"):FireServer(Object, game.Workspace.RemoteEvents:FindFirstChild("Password"):InvokeServer(script, script:FindFirstChild("DDCorpPass")))
  59. script.Parent.ImageLabel.Visible = true
  60. for i = 1, 10 do
  61. wait()
  62. script.Parent.ImageLabel.Size = UDim2.new(1 + i / 10, 0, 1 + i / 10, 0)
  63. script.Parent.ImageLabel.Position = UDim2.new(0 - i / 20, 0, -i / 20, 0)
  64. script.Parent.ImageLabel.ImageTransparency = 0 + i / 10
  65. end
  66. script.Disabled = true
  67. enabled = true
  68. end
  69.  
  70. script.Parent.MouseButton1Click:connect(onButtonClicked)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement