AlbertsHere

[RE-REL] VEHICLE SIMULATOR FREE MONEY SCRIPT

Feb 18th, 2019
156
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. --Vehicle Simulator AFK money / miles
  2. --edited by poey582, take no credit for making this script, just added a few lines
  3. --How to use
  4. --Load into the game then execute the script
  5. --Get in your car then type "/e racingmode" into chat
  6. --Then go as fast as you can,then once you're at a good speed
  7. --have this phrase copied "/e stop" and paste it into chat
  8. --scuffed but works enjoy
  9.  
  10. local plr = game.Players.LocalPlayer
  11. local inftoggle = false
  12. function getvehicle()
  13. for i,v in pairs(game.Workspace.Vehicles:GetChildren()) do
  14. if v:IsA("Model") then
  15. if v.owner.Value == plr.Name then
  16. return v
  17. end
  18. end
  19. end
  20. return nil
  21. end
  22. function hint(txt, t)
  23. if t then
  24. local h = Instance.new("Hint",plr.PlayerGui)
  25. h.Text = txt
  26. wait(t)
  27. h:remove()
  28. else
  29. local h = Instance.new("Hint",plr.PlayerGui)
  30. h.Text = txt
  31. wait(2)
  32. h:remove()
  33. end
  34. end
  35.  
  36. plr.Chatted:connect(function(msg)
  37. if msg:lower():sub(1,10) == "/e toggle:" then
  38. local ins = msg:lower():sub(11)
  39. local vehicle = getvehicle()
  40. if vehicle then
  41. if ins == "infnitro" then
  42. if inftoggle == true then
  43. inftoggle = false
  44. hint("(-)Disabled Infinite Nitro!(-)")
  45. else
  46. inftoggle = true
  47. hint("(+)Enabled Infinite Nitro!(+)")
  48. end
  49. end
  50. else
  51. hint("(-)You do not have a vehicle spawned!(-)")
  52. end
  53. elseif msg:lower():sub(1,14) == "/e nitrospeed:" then
  54. local num = msg:sub(15)
  55. local vehicle = getvehicle()
  56. if vehicle then
  57. vehicle.Handling.Nitro.NitroSpeed.Value = tonumber(num)
  58. else
  59. hint("(-)You do not have a vehicle spawned!(-)")
  60. end
  61. elseif msg:lower():sub(1,14) == "/e stop" then
  62. local num = msg:sub(1,15)
  63. local vehicle = getvehicle()
  64. if vehicle then
  65. vehicle.Chassis.VehicleSeat.Anchored = true
  66. else
  67. hint("(-)You do not have a vehicle spawned!(-)")
  68. end
  69. elseif msg:lower():sub(1,14) == "/e nitroforce:" then
  70. local num = msg:sub(1,15)
  71. local vehicle = getvehicle()
  72. if vehicle then
  73. vehicle.Handling.Nitro.NitroForce.Value = tonumber(num)
  74. else
  75. hint("(-)You do not have a vehicle spawned!(-)")
  76. end
  77. elseif msg:lower():sub(1,12) == "/e maxspeed:" then
  78. local num = msg:sub(13)
  79. local vehicle = getvehicle()
  80. if vehicle then
  81. vehicle.Handling.MaxSpeed.Value = tonumber(num)
  82. else
  83. hint("(-)You do not have a vehicle spawned!(-)")
  84. end
  85. elseif msg:lower():sub(1,10) == "/e torque:" then
  86. local num = msg:sub(11)
  87. local vehicle = getvehicle()
  88. if vehicle then
  89. vehicle.Handling.Torque.Value = tonumber(num)
  90. else
  91. hint("(-)You do not have a vehicle spawned!(-)")
  92. end
  93. elseif msg:lower():sub(1,12) == "/e friction:" then
  94. local num = msg:sub(13)
  95. local vehicle = getvehicle()
  96. if vehicle then
  97. vehicle.Handling.FrictionOffroad.Value = tonumber(num)
  98. vehicle.Handling.FrictionRoad.Value = tonumber(num)
  99. else
  100. hint("(-)You do not have a vehicle spawned!(-)")
  101. end
  102. elseif msg:lower():sub(1,13) == "/e racingmode" then
  103. local vehicle = getvehicle()
  104. if vehicle then
  105. han = vehicle.Handling
  106. han.MaxSpeed.Value = 10000
  107. han.Torque.Value = 30000
  108. han.SteeringRadiusConstant.Value = 12000
  109. han.FrictionOffroad.Value = 200
  110. han.FrictionRoad.Value = 200
  111. han.Nitro.NitroSpeed.Value = 300
  112. han.Nitro.NitroForce.Value = 8000
  113. han.TurboJump.TurboJumpHeight.Value = 300
  114. inftoggle = true
  115. else
  116. hint("(-)You do not have a vehicle spawned!(-)")
  117. end
  118. end
  119. end)
  120. wait(0.5)
  121. while inftoggle == true do
  122. wait(0.02)
  123. local vehicle = getvehicle()
  124. if vehicle then
  125. vehicle.Handling.Nitro.NitroAmount.Value = 250
  126. end
  127. end
RAW Paste Data Copied