Advertisement
Guest User

Untitled

a guest
Feb 19th, 2018
63
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 6.42 KB | None | 0 0
  1. -- Objects
  2.  
  3. local Thonk = Instance.new("ScreenGui")
  4. local Bar = Instance.new("Frame")
  5. local Main = Instance.new("Frame")
  6. local Speed = Instance.new("TextButton")
  7. local Mountains = Instance.new("TextButton")
  8. local JP = Instance.new("TextButton")
  9. local TextBox = Instance.new("TextBox")
  10. local Close = Instance.new("TextButton")
  11. local Mini = Instance.new("TextButton")
  12. local Name = Instance.new("TextLabel")
  13. local Open = Instance.new("Frame")
  14. local OpenBTN = Instance.new("TextButton")
  15.  
  16. -- Properties
  17.  
  18. Thonk.Name = "Thonk"
  19. Thonk.Parent = game.CoreGui
  20.  
  21. Bar.Name = "Bar"
  22. Bar.Parent = Thonk
  23. Bar.Active = true
  24. Bar.BackgroundColor3 = Color3.new(0.156863, 0.156863, 0.156863)
  25. Bar.BorderSizePixel = 0
  26. Bar.Draggable = true
  27. Bar.Position = UDim2.new(0.423520386, 0, 0.357366771, 0)
  28. Bar.Size = UDim2.new(0, 335, 0, 19)
  29.  
  30. Main.Name = "Main"
  31. Main.Parent = Bar
  32. Main.BackgroundColor3 = Color3.new(0.219608, 0.219608, 0.219608)
  33. Main.BorderSizePixel = 0
  34. Main.Draggable = true
  35. Main.Position = UDim2.new(0, 0, 1, 0)
  36. Main.Size = UDim2.new(0, 335, 0, 92)
  37.  
  38. Speed.Name = "Speed"
  39. Speed.Parent = Main
  40. Speed.BackgroundColor3 = Color3.new(0.258824, 0.258824, 0.258824)
  41. Speed.BorderSizePixel = 0
  42. Speed.Position = UDim2.new(0.041495353, 0, 0.073170729, 0)
  43. Speed.Size = UDim2.new(0, 82, 0, 38)
  44. Speed.Font = Enum.Font.Arial
  45. Speed.FontSize = Enum.FontSize.Size14
  46. Speed.Text = "Speed"
  47. Speed.TextColor3 = Color3.new(1, 1, 1)
  48. Speed.TextSize = 14
  49.  
  50. Mountains.Name = "Mountains"
  51. Mountains.Parent = Main
  52. Mountains.BackgroundColor3 = Color3.new(0.258824, 0.258824, 0.258824)
  53. Mountains.BorderSizePixel = 0
  54. Mountains.Position = UDim2.new(0.334465683, 0, 0.073170729, 0)
  55. Mountains.Size = UDim2.new(0, 111, 0, 38)
  56. Mountains.Font = Enum.Font.Arial
  57. Mountains.FontSize = Enum.FontSize.Size14
  58. Mountains.Text = "Climb mountains"
  59. Mountains.TextColor3 = Color3.new(1, 1, 1)
  60. Mountains.TextSize = 14
  61.  
  62. JP.Name = "JP"
  63. JP.Parent = Main
  64. JP.BackgroundColor3 = Color3.new(0.258824, 0.258824, 0.258824)
  65. JP.BorderSizePixel = 0
  66. JP.Position = UDim2.new(0.710855842, 0, 0.0729999989, 0)
  67. JP.Size = UDim2.new(0, 82, 0, 38)
  68. JP.Font = Enum.Font.Arial
  69. JP.FontSize = Enum.FontSize.Size14
  70. JP.Text = "Jump height"
  71. JP.TextColor3 = Color3.new(1, 1, 1)
  72. JP.TextSize = 14
  73.  
  74. TextBox.Parent = Main
  75. TextBox.BackgroundColor3 = Color3.new(0.184314, 0.184314, 0.184314)
  76. TextBox.BorderSizePixel = 0
  77. TextBox.Position = UDim2.new(0.711384058, 0, 0.575690925, 0)
  78. TextBox.Size = UDim2.new(0, 82, 0, 29)
  79. TextBox.Font = Enum.Font.SourceSans
  80. TextBox.FontSize = Enum.FontSize.Size14
  81. TextBox.Text = "0"
  82. TextBox.TextColor3 = Color3.new(1, 1, 1)
  83. TextBox.TextSize = 14
  84.  
  85. Close.Name = "Close"
  86. Close.Parent = Bar
  87. Close.BackgroundColor3 = Color3.new(1, 0, 0)
  88. Close.BackgroundTransparency = 1
  89. Close.BorderSizePixel = 0
  90. Close.Position = UDim2.new(0.925373137, 0, 0, 0)
  91. Close.Size = UDim2.new(0, 25, 0, 19)
  92. Close.ZIndex = 3
  93. Close.Font = Enum.Font.Arial
  94. Close.FontSize = Enum.FontSize.Size14
  95. Close.Text = "X"
  96. Close.TextColor3 = Color3.new(1, 1, 1)
  97. Close.TextSize = 14
  98.  
  99. Mini.Name = "Mini"
  100. Mini.Parent = Bar
  101. Mini.BackgroundColor3 = Color3.new(0, 0.333333, 1)
  102. Mini.BackgroundTransparency = 1
  103. Mini.BorderSizePixel = 0
  104. Mini.Position = UDim2.new(0.850732148, 0, 0, 0)
  105. Mini.Size = UDim2.new(0, 25, 0, 19)
  106. Mini.ZIndex = 3
  107. Mini.Font = Enum.Font.Arial
  108. Mini.FontSize = Enum.FontSize.Size14
  109. Mini.Text = "-"
  110. Mini.TextColor3 = Color3.new(1, 1, 1)
  111. Mini.TextSize = 14
  112.  
  113. Name.Name = "Name"
  114. Name.Parent = Bar
  115. Name.BackgroundColor3 = Color3.new(1, 1, 1)
  116. Name.BackgroundTransparency = 1
  117. Name.Position = UDim2.new(0.023584906, 0, 0, 0)
  118. Name.Size = UDim2.new(0, 218, 0, 19)
  119. Name.Font = Enum.Font.Arial
  120. Name.FontSize = Enum.FontSize.Size14
  121. Name.Text = "Vehicle Thonk Gui - Created by XYZ"
  122. Name.TextColor3 = Color3.new(1, 1, 1)
  123. Name.TextSize = 14
  124. Name.TextXAlignment = Enum.TextXAlignment.Left
  125.  
  126. Open.Name = "Open"
  127. Open.Parent = Thonk
  128. Open.BackgroundColor3 = Color3.new(0.227451, 0.227451, 0.227451)
  129. Open.BorderSizePixel = 0
  130. Open.Position = UDim2.new(0, 0, 1, 0)
  131. Open.Size = UDim2.new(0, 110, 0, 47)
  132.  
  133. OpenBTN.Name = "OpenBTN"
  134. OpenBTN.Parent = Open
  135. OpenBTN.BackgroundColor3 = Color3.new(0.258824, 0.258824, 0.258824)
  136. OpenBTN.BorderSizePixel = 0
  137. OpenBTN.Position = UDim2.new(0, 0, 0.255319148, 0)
  138. OpenBTN.Size = UDim2.new(0, 110, 0, 24)
  139. OpenBTN.Font = Enum.Font.Arial
  140. OpenBTN.FontSize = Enum.FontSize.Size14
  141. OpenBTN.Text = "Open"
  142. OpenBTN.TextColor3 = Color3.new(1, 1, 1)
  143. OpenBTN.TextSize = 14
  144.  
  145. --Send Chat Message
  146. game:GetService("StarterGui"):SetCore("ChatMakeSystemMessage",{
  147.  
  148. Text = "Vehicle Thonk gui has loaded correctly!";
  149.  
  150. Color = Color3.new(85, 255, 0);
  151.  
  152. Font = Enum.Font.SourceSansBold;
  153.  
  154. FontSize = Enum.FontSize.Size18;
  155.  
  156. })
  157. --Send Chat Message
  158. function getcar()
  159. local plr = game.Players.LocalPlayer
  160. for i,v in pairs(game.Workspace.Vehicles:GetChildren()) do
  161. if v:IsA("Model") then
  162. if v.owner.Value == plr.Name then
  163. return v
  164. end
  165. end
  166. end
  167. return nil
  168. end
  169.  
  170. Close.MouseEnter:connect(function()
  171. Close.BackgroundTransparency = 0
  172. end)
  173.  
  174. Close.MouseLeave:connect(function()
  175. Close.BackgroundTransparency = 1
  176. end)
  177.  
  178. Mini.MouseEnter:connect(function()
  179. Mini.BackgroundTransparency = 0
  180. end)
  181.  
  182. Mini.MouseLeave:connect(function()
  183. Mini.BackgroundTransparency = 1
  184. end)
  185.  
  186. Mini.MouseButton1Up:connect(function()
  187. if Main.Position == UDim2.new(0, 0, 1, 0) then
  188. Main.Position = UDim2.new(0, 0, 100, 0)
  189. Mini.Text = "+"
  190. else
  191. Main.Position = UDim2.new(0, 0, 1, 0)
  192. Mini.Text = "-"
  193. end
  194. end)
  195.  
  196. Close.MouseButton1Up:connect(function()
  197. Open:TweenPosition(UDim2.new(0, 0, 0.435, 0), 'In', 'Quint', .5)
  198. Bar.Position = UDim2.new(1.423520386, 0, 1.357366771, 0)
  199. end)
  200.  
  201. OpenBTN.MouseButton1Up:connect(function()
  202. Bar.Position = UDim2.new(0.423520386, 0, 0.357366771, 0)
  203. Open:TweenPosition(UDim2.new(0, 0, 1, 0), 'Out', 'Quint', .5)
  204. end)
  205.  
  206. Mountains.MouseButton1Click:connect(function()
  207. local car = getcar()
  208. car.Handling.StickyWheels.Value = 100
  209. end)
  210.  
  211. Speed.MouseButton1Click:connect(function()
  212. local car = getcar()
  213. car.Handling.RearWheelDrive.Force.Value = 3900
  214. car.Handling.FrontWheelDrive.Force.Value = 890
  215. car.Handling.StickyWheels.Value = 241
  216. car.Handling.FrictionOffroad.Value = 1724
  217. car.Handling.FrictionRoad.Value = 7114
  218. car.Handling.Torque.Value = 152045
  219. car.Handling.Nitro.NitroSpeed.Value = 1000000
  220. car.Handling.Nitro.NitroForce.Value = 52381
  221. end)
  222.  
  223. JP.MouseButton1Click:connect(function()
  224. local car = getcar()
  225. car.Handling.TurboJump.TurboJumpHeight.Value = TextBox.Text
  226. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement