Advertisement
Guest User

VSG

a guest
Dec 16th, 2018
105
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 8.62 KB | None | 0 0
  1. local find = game.CoreGui:FindFirstChild("VSGUI")
  2. if find then
  3.     game.CoreGui.VSGUI:Destroy()
  4. local VSGUI = Instance.new("ScreenGui")
  5. local VSGF = Instance.new("Frame")
  6. local VSGBAR = Instance.new("Frame")
  7. local Divider = Instance.new("Frame")
  8. local LOGO = Instance.new("TextLabel")
  9. local Speed = Instance.new("TextButton")
  10. local Divider2 = Instance.new("Frame")
  11. local JumpPower = Instance.new("TextButton")
  12. local Divider3 = Instance.new("Frame")
  13. local Settings = Instance.new("TextButton")
  14. local Divider4 = Instance.new("Frame")
  15. local SettingsFrame = Instance.new("Frame")
  16. local ReturnToStart = Instance.new("TextButton")
  17. local SpeedFrame = Instance.new("Frame")
  18. local SpeedNote = Instance.new("TextLabel")
  19. local GSS = Instance.new("TextButton")
  20. local JumpPowerFrame = Instance.new("Frame")
  21. local ComingSoon = Instance.new("TextLabel")
  22. local Start = Instance.new("Frame")
  23. local Welcome = Instance.new("TextLabel")
  24. local open = true
  25. --Properties:
  26. VSGUI.Name = "VSGUI"
  27. VSGUI.Parent = game.CoreGui
  28.  
  29. VSGF.Name = "VSGF"
  30. VSGF.Parent = VSGUI
  31. VSGF.BackgroundColor3 = Color3.new(0.203922, 0.203922, 0.203922)
  32. VSGF.Position = UDim2.new(0.466789663, -146, 0.450199217, -116)
  33. VSGF.Size = UDim2.new(0, 402, 0, 273)
  34.  
  35. VSGBAR.Name = "VSGBAR"
  36. VSGBAR.Parent = VSGF
  37. VSGBAR.BackgroundColor3 = Color3.new(0, 0, 0)
  38. VSGBAR.BorderSizePixel = 0
  39. VSGBAR.Size = UDim2.new(0, 59, 0, 273)
  40.  
  41. Divider.Name = "Divider"
  42. Divider.Parent = VSGBAR
  43. Divider.BackgroundColor3 = Color3.new(0.203922, 0.203922, 0.203922)
  44. Divider.BorderSizePixel = 0
  45. Divider.Position = UDim2.new(0, 0, 0.142857149, 0)
  46. Divider.Size = UDim2.new(0, 65, 0, 2)
  47.  
  48. LOGO.Name = "LOGO"
  49. LOGO.Parent = VSGBAR
  50. LOGO.BackgroundColor3 = Color3.new(1, 1, 1)
  51. LOGO.BackgroundTransparency = 1
  52. LOGO.Size = UDim2.new(0, 59, 0, 41)
  53. LOGO.Font = Enum.Font.SourceSans
  54. LOGO.Text = "VSG"
  55. LOGO.TextColor3 = Color3.new(1, 1, 1)
  56. LOGO.TextScaled = true
  57. LOGO.TextSize = 14
  58. LOGO.TextWrapped = true
  59.  
  60. Speed.Name = "Speed"
  61. Speed.Parent = VSGBAR
  62. Speed.BackgroundColor3 = Color3.new(1, 1, 1)
  63. Speed.BackgroundTransparency = 1
  64. Speed.Position = UDim2.new(0, 0, 0.150183156, 0)
  65. Speed.Size = UDim2.new(0, 59, 0, 50)
  66. Speed.Font = Enum.Font.SourceSans
  67. Speed.Text = "Speed"
  68. Speed.TextColor3 = Color3.new(1, 1, 1)
  69. Speed.TextScaled = true
  70. Speed.TextSize = 14
  71. Speed.TextWrapped = true
  72.  
  73. Divider2.Name = "Divider2"
  74. Divider2.Parent = VSGBAR
  75. Divider2.BackgroundColor3 = Color3.new(0.203922, 0.203922, 0.203922)
  76. Divider2.BorderSizePixel = 0
  77. Divider2.Position = UDim2.new(0, 0, 0.333333343, 0)
  78. Divider2.Size = UDim2.new(0, 65, 0, 2)
  79.  
  80. JumpPower.Name = "JumpPower"
  81. JumpPower.Parent = VSGBAR
  82. JumpPower.BackgroundColor3 = Color3.new(1, 1, 1)
  83. JumpPower.BackgroundTransparency = 1
  84. JumpPower.Position = UDim2.new(0, 0, 0.34065935, 0)
  85. JumpPower.Size = UDim2.new(0, 59, 0, 50)
  86. JumpPower.Font = Enum.Font.SourceSans
  87. JumpPower.Text = "Jump Power"
  88. JumpPower.TextColor3 = Color3.new(1, 1, 1)
  89. JumpPower.TextScaled = true
  90. JumpPower.TextSize = 14
  91. JumpPower.TextWrapped = true
  92.  
  93. Divider3.Name = "Divider3"
  94. Divider3.Parent = VSGBAR
  95. Divider3.BackgroundColor3 = Color3.new(0.203922, 0.203922, 0.203922)
  96. Divider3.BorderSizePixel = 0
  97. Divider3.Position = UDim2.new(-0.0508474559, 0, 0.516483545, 0)
  98. Divider3.Size = UDim2.new(0, 65, 0, 2)
  99.  
  100. Settings.Name = "Settings"
  101. Settings.Parent = VSGBAR
  102. Settings.BackgroundColor3 = Color3.new(1, 1, 1)
  103. Settings.BackgroundTransparency = 1
  104. Settings.Position = UDim2.new(0, 0, 0.523809552, 0)
  105. Settings.Size = UDim2.new(0, 59, 0, 50)
  106. Settings.Font = Enum.Font.SourceSans
  107. Settings.Text = "Settings"
  108. Settings.TextColor3 = Color3.new(1, 1, 1)
  109. Settings.TextScaled = true
  110. Settings.TextSize = 14
  111. Settings.TextWrapped = true
  112.  
  113. Divider4.Name = "Divider4"
  114. Divider4.Parent = VSGBAR
  115. Divider4.BackgroundColor3 = Color3.new(0.203922, 0.203922, 0.203922)
  116. Divider4.BorderSizePixel = 0
  117. Divider4.Position = UDim2.new(-0.0508474559, 0, 0.695970714, 0)
  118. Divider4.Size = UDim2.new(0, 65, 0, 2)
  119.  
  120. SettingsFrame.Name = "SettingsFrame"
  121. SettingsFrame.Parent = VSGF
  122. SettingsFrame.BackgroundColor3 = Color3.new(0.203922, 0.203922, 0.203922)
  123. SettingsFrame.Position = UDim2.new(0.154228851, 0, 0, 0)
  124. SettingsFrame.Size = UDim2.new(0, 346, 0, 273)
  125. SettingsFrame.Visible = false
  126.  
  127. ReturnToStart.Name = "ReturnToStart"
  128. ReturnToStart.Parent = SettingsFrame
  129. ReturnToStart.BackgroundColor3 = Color3.new(0.243137, 0.243137, 0.247059)
  130. ReturnToStart.Position = UDim2.new(0.210982665, 0, 0.142857149, 0)
  131. ReturnToStart.Size = UDim2.new(0, 200, 0, 50)
  132. ReturnToStart.Font = Enum.Font.SourceSans
  133. ReturnToStart.Text = "Return To Start"
  134. ReturnToStart.TextColor3 = Color3.new(1, 1, 1)
  135. ReturnToStart.TextScaled = true
  136. ReturnToStart.TextSize = 14
  137. ReturnToStart.TextWrapped = true
  138.  
  139. SpeedFrame.Name = "SpeedFrame"
  140. SpeedFrame.Parent = VSGF
  141. SpeedFrame.BackgroundColor3 = Color3.new(0.203922, 0.203922, 0.203922)
  142. SpeedFrame.Position = UDim2.new(0.154228851, 0, 0, 0)
  143. SpeedFrame.Size = UDim2.new(0, 346, 0, 273)
  144. SpeedFrame.Visible = false
  145.  
  146. SpeedNote.Name = "SpeedNote"
  147. SpeedNote.Parent = SpeedFrame
  148. SpeedNote.BackgroundColor3 = Color3.new(1, 1, 1)
  149. SpeedNote.BackgroundTransparency = 1
  150. SpeedNote.Position = UDim2.new(0.00867052004, 0, 0, 0)
  151. SpeedNote.Size = UDim2.new(0, 343, 0, 105)
  152. SpeedNote.Font = Enum.Font.SourceSans
  153. SpeedNote.Text = "Click \"Give Supper Speed\" to gain super speed. You must be sitting inside the driver seat of the car to gain super speed."
  154. SpeedNote.TextColor3 = Color3.new(1, 1, 1)
  155. SpeedNote.TextScaled = true
  156. SpeedNote.TextSize = 14
  157. SpeedNote.TextWrapped = true
  158.  
  159. GSS.Name = "GSS"
  160. GSS.Parent = SpeedFrame
  161. GSS.BackgroundColor3 = Color3.new(0.247059, 0.247059, 0.247059)
  162. GSS.Position = UDim2.new(0.213872835, 0, 0.608058631, 0)
  163. GSS.Size = UDim2.new(0, 200, 0, 50)
  164. GSS.Font = Enum.Font.SourceSans
  165. GSS.Text = "Give Super Speed"
  166. GSS.TextColor3 = Color3.new(1, 1, 1)
  167. GSS.TextSize = 14
  168.  
  169. JumpPowerFrame.Name = "JumpPowerFrame"
  170. JumpPowerFrame.Parent = VSGF
  171. JumpPowerFrame.BackgroundColor3 = Color3.new(0.203922, 0.203922, 0.203922)
  172. JumpPowerFrame.Position = UDim2.new(0.154228851, 0, 0, 0)
  173. JumpPowerFrame.Size = UDim2.new(0, 346, 0, 273)
  174. JumpPowerFrame.Visible = false
  175.  
  176. ComingSoon.Name = "ComingSoon"
  177. ComingSoon.Parent = JumpPowerFrame
  178. ComingSoon.BackgroundColor3 = Color3.new(1, 1, 1)
  179. ComingSoon.BackgroundTransparency = 1
  180. ComingSoon.Size = UDim2.new(0, 346, 0, 273)
  181. ComingSoon.Font = Enum.Font.SourceSans
  182. ComingSoon.Text = "Coming Soon..."
  183. ComingSoon.TextColor3 = Color3.new(1, 1, 1)
  184. ComingSoon.TextScaled = true
  185. ComingSoon.TextSize = 14
  186. ComingSoon.TextWrapped = true
  187.  
  188. Start.Name = "Start"
  189. Start.Parent = VSGF
  190. Start.BackgroundColor3 = Color3.new(0.203922, 0.203922, 0.203922)
  191. Start.Position = UDim2.new(0.154228851, 0, 0, 0)
  192. Start.Size = UDim2.new(0, 346, 0, 273)
  193.  
  194. Welcome.Name = "Welcome"
  195. Welcome.Parent = Start
  196. Welcome.BackgroundColor3 = Color3.new(1, 1, 1)
  197. Welcome.BackgroundTransparency = 1
  198. Welcome.Size = UDim2.new(0, 346, 0, 273)
  199. Welcome.Font = Enum.Font.SourceSans
  200. Welcome.Text = "Welcome to VSG, Vehicle Simulator Gui, we hope you enjoy using our script\n\nPress \"P\" to open and close the gui\n\nSome things are coming soon\n\nVersion 0.0.1\n\nScript and Gui by CrypticCoder"
  201. Welcome.TextColor3 = Color3.new(1, 1, 1)
  202. Welcome.TextScaled = true
  203. Welcome.TextSize = 14
  204. Welcome.TextWrapped = true
  205.  
  206. Speed.MouseButton1Click:Connect(function()
  207.     JumpPowerFrame.Visible = false
  208.     SettingsFrame.Visible = false
  209.     Start.Visible = false
  210.     SpeedFrame.Visible = true
  211. end)
  212.  
  213. JumpPower.MouseButton1Click:Connect(function()
  214.     JumpPowerFrame.Visible = true
  215.     SettingsFrame.Visible = false
  216.     Start.Visible = false
  217.     SpeedFrame.Visible = false
  218. end)
  219.  
  220. Settings.MouseButton1Click:Connect(function()
  221.     JumpPowerFrame.Visible = false
  222.     SettingsFrame.Visible = true
  223.     Start.Visible = false
  224.     SpeedFrame.Visible = false
  225. end)
  226. ReturnToStart.MouseButton1Click:Connect(function()
  227.     JumpPowerFrame.Visible = false
  228.     SettingsFrame.Visible = false
  229.     Start.Visible = true
  230.     SpeedFrame.Visible = false
  231. end)
  232.  
  233. GSS.MouseButton1Click:Connect(function()
  234.     veh = nil
  235. for i,v in pairs(game.Workspace.Vehicles:GetChildren()) do
  236. if v:IsA("Model") then
  237. if v.owner.Value == game.Players.LocalPlayer.Name then
  238. veh = v
  239. end
  240. end
  241. end
  242.  
  243. if veh then
  244. han = veh.Handling
  245. han.MaxSpeed.Value = 3000
  246. han.Torque.Value = 80000
  247. han.SteeringRadiusConstant.Value = 3000
  248. han.FrictionRoad.Value = 200
  249. han.Gears.Value = 7
  250. han.Nitro.NitroSpeed.Value = 99999
  251. han.Nitro.NitroForce.Value = 99999
  252. end
  253. end)
  254.  
  255. function onKeyPress(inputObject, gameProcessedEvent)
  256. if inputObject.KeyCode == Enum.KeyCode.P then
  257. if open == true then
  258.             VSGUI.Enabled = false
  259.             open = false
  260. else
  261.     VSGUI.Enabled = true
  262.     open = true
  263. end
  264. end
  265. end
  266.  
  267. game:GetService("UserInputService").InputBegan:connect(onKeyPress)
  268. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement