ChaosityYT

Vehicle Tycoon Horn Spam Script

Jun 5th, 2019
1,103
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.98 KB | None | 0 0
  1. -- Farewell Infortality.
  2. -- Version: 2.82
  3. -- Instances:
  4. local ScreenGui = Instance.new("ScreenGui")
  5. local Frame = Instance.new("Frame")
  6. local toggleButton = Instance.new("TextButton")
  7. local title = Instance.new("TextLabel")
  8. --Properties:
  9. ScreenGui.Parent = game.Players.LocalPlayer:WaitForChild("PlayerGui")
  10.  
  11. Frame.Parent = ScreenGui
  12. Frame.BackgroundColor3 = Color3.new(1, 1, 1)
  13. Frame.Position = UDim2.new(0.166666672, 0, 0.25, 0)
  14. Frame.Size = UDim2.new(0, 213, 0, 66)
  15. Frame.BorderSizePixel = 0
  16. Frame.Active = true
  17. Frame.Draggable = true
  18.  
  19. toggleButton.Name = "toggleButton"
  20. toggleButton.Parent = Frame
  21. toggleButton.BackgroundColor3 = Color3.new(1, 0.666667, 0)
  22. toggleButton.BackgroundTransparency = 0
  23. toggleButton.Position = UDim2.new(0, 0, 0.484848499, 0)
  24. toggleButton.Size = UDim2.new(0, 213, 0, 34)
  25. toggleButton.Font = Enum.Font.SourceSans
  26. toggleButton.Text = "Toggle: OFF"
  27. toggleButton.TextColor3 = Color3.new(0, 0, 0)
  28. toggleButton.TextSize = 17
  29.  
  30. title.Name = "title"
  31. title.Parent = Frame
  32. title.BackgroundColor3 = Color3.new(0, 0, 0)
  33. title.Size = UDim2.new(0, 213, 0, 32)
  34. title.Font = Enum.Font.SourceSans
  35. title.Text = "Vehicle Tycoon Horn Spammer!"
  36. title.TextColor3 = Color3.new(0.333333, 1, 1)
  37. title.TextSize = 14
  38.  
  39. function Car_Spammer()
  40. local script = Instance.new('LocalScript')
  41. script.Parent = toggleButton
  42. local Spam = false
  43.  
  44. script.Parent.MouseButton1Click:Connect(function()
  45. if Spam == false then
  46. Spam = true
  47. script.Parent.Text = "Toggle: ON"
  48. script.Parent.TextColor3 = Color3.fromRGB(38, 255, 0)
  49. --
  50. while Spam == true do
  51. for i,v in pairs(game.Workspace.Vehicles:GetChildren()) do
  52. local Event = game:GetService("Workspace").Vehicles[v.Name].Network.Horn
  53. Event:FireServer()
  54. end
  55. wait(3)
  56. end
  57.  
  58. --
  59. else
  60. Spam = false
  61. script.Parent.Text = "Toggle: OFF"
  62. script.Parent.TextColor3 = Color3.fromRGB(255, 0, 4)
  63. end
  64. end)
  65.  
  66. end
  67. coroutine.resume(coroutine.create(Car_Spammer))
Add Comment
Please, Sign In to add comment