SHARE
TWEET

IMVU CREDITScxzczx

Magzz Feb 17th, 2020 98 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. --made by 6magz
  2. local Plr = game:GetService("Players").LocalPlayer
  3. local Mouse = Plr:GetMouse()
  4. local Block = ""
  5. local iBlock = nil
  6. local ED = true
  7. local CON = Color3.new(0.0588235, 0.203922, 0.0509804)
  8. local COFF = Color3.new(0.203922, 0.0588235, 0.0588235)
  9. local BuildABoatForTreasure = Instance.new("ScreenGui")
  10. local BTN = Instance.new("TextButton")
  11.  
  12. local function RV()
  13. local res = ""
  14. for i = 1, 20 do
  15. res = res .. string.char(math.random(97, 122))
  16. end
  17. return res
  18. end
  19.  
  20. BuildABoatForTreasure.Name = RV()
  21. BuildABoatForTreasure.Parent = game.CoreGui
  22. BuildABoatForTreasure.ResetOnSpawn = false
  23.  
  24. BTN.Name = RV()
  25. BTN.Parent = BuildABoatForTreasure
  26. BTN.BackgroundColor3 = CON
  27. BTN.BackgroundTransparency = 0.30000001192093
  28. BTN.BorderColor3 = Color3.new(0.113725, 0.113725, 0.113725)
  29. BTN.BorderSizePixel = 2
  30. BTN.Position = UDim2.new(0, 0, 0.819734335, 0)
  31. BTN.Size = UDim2.new(0, 73, 0, 19)
  32. BTN.Font = Enum.Font.Code
  33. BTN.Text = " ENABLED"
  34. BTN.TextColor3 = Color3.new(1, 1, 1)
  35. BTN.TextSize = 16
  36. BTN.TextXAlignment = Enum.TextXAlignment.Left
  37.  
  38. BTN.MouseButton1Down:Connect(function()
  39. if ED then
  40. ED = false
  41. BTN.BackgroundColor3 = COFF
  42.     BTN.Text = " DISABLED"
  43. BTN.Size = UDim2.new(0, 80, 0, 19)
  44. else
  45. ED = true
  46. BTN.BackgroundColor3 = CON
  47.     BTN.Text = " ENABLED"
  48. BTN.Size = UDim2.new(0, 73, 0, 19)
  49. end
  50. end)
  51.  
  52. local function refresh()
  53. while wait(2)do
  54. if ED then
  55. for i,v in pairs(game.Workspace:GetChildren())do
  56. if v:FindFirstChild("Tag") then
  57. if v:FindFirstChild("Tag").Value == "" then
  58. iBlock = v
  59. end
  60. end
  61. end
  62. for i,b in pairs(game.Players.LocalPlayer.PlayerGui.BuildGui.ScrollingFrame.BlocksFrame:GetChildren())do
  63. if b.Name == "Selected" or b.Name == "UIGridLayout" or b.Name == "GamePadSelectLocalScript" then else
  64. b.Visible = true
  65. end
  66. end
  67. end
  68. end
  69. end
  70.  
  71. local function GetNum()
  72. return game.Players.LocalPlayer.PlayerGui.BuildGui.ScrollingFrame.BlocksFrame[Block].Amount.Value
  73. end
  74.  
  75. local this = Instance.new("Model", game.Workspace)
  76. this.Name = RV()
  77. local this2 = Instance.new("Part", this)
  78. this2.Name = "PPart"
  79.  
  80. Mouse.Button1Down:connect(function()
  81. if game.Workspace[Plr.Name]:FindFirstChild("BuildingTool")and ED then
  82. Block = game.Players.LocalPlayer.PlayerGui.BuildGui.ScrollingFrame.BlocksFrame.Selected.Value
  83. game.Workspace[Plr.Name]:FindFirstChild("BuildingTool").RF:InvokeServer(unpack({Block, GetNum(), this.PPart, CFrame.new(0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1), 3, true, 17, iBlock.PPart.CFrame}))
  84. end
  85. end)
  86.  
  87. Plr:GetMouse().KeyDown:connect(function(key)
  88. if key == 'q' and ED then
  89. if Mouse.Target then
  90. Plr.Character.HumanoidRootPart.CFrame = CFrame.new(Mouse.Hit.x, Mouse.Hit.y + 5, Mouse.Hit.z)
  91. end
  92. end
  93. end)
  94. refresh()
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
Top