Advertisement
noyonnm987741

Untitled

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