Vehicle Simulator [TYPICAL_RBLX]

-- Gui made by Typical_RBLX!!
-- $1 to create some gui ;)
--WHITELIST USER & PASS

--Whitelist User "hawkTHEgreat"
--Whitelist Pass "hawkeye"


local VSGUI = Instance.new("ScreenGui")
local logingui = Instance.new("Frame")
local line = Instance.new("Frame")
local x1 = Instance.new("TextButton")
local TextLabel = Instance.new("TextLabel")
local user = Instance.new("TextBox")
local pass = Instance.new("TextBox")
local submit = Instance.new("TextButton")
local maingui = Instance.new("Frame")
local vs = Instance.new("TextButton")
local bar = Instance.new("Frame")
local x2 = Instance.new("TextButton")
local Title = Instance.new("TextLabel")
local CREDITS = Instance.new("TextButton")
local creditsgui = Instance.new("Frame")
local bar_2 = Instance.new("Frame")
local x3 = Instance.new("TextButton")
local Title_2 = Instance.new("TextLabel")
local creditstitle = Instance.new("TextLabel")
local opengui = Instance.new("Frame")
local open = Instance.new("TextButton")

--Properties:
VSGUI.Name = "VSGUI"
VSGUI.Parent = game.CoreGui

logingui.Name = "logingui"
logingui.Parent = VSGUI
logingui.BackgroundColor3 = Color3.new(0.188235, 0.188235, 0.188235)
logingui.Position = UDim2.new(0.303771704, 0, 0.292929262, 0)
logingui.Size = UDim2.new(0, 407, 0, 188)
logingui.Visible = false
logingui.Active = true
logingui.Draggable = true

line.Name = "line"
line.Parent = logingui
line.BackgroundColor3 = Color3.new(0, 0, 0)
line.Position = UDim2.new(0, 0, 0.122340418, 0)
line.Size = UDim2.new(0, 407, 0, 2)

x1.Name = "x1"
x1.Parent = logingui
x1.BackgroundColor3 = Color3.new(1, 1, 1)
x1.BackgroundTransparency = 1
x1.Position = UDim2.new(0.928746939, 0, 0, 0)
x1.Size = UDim2.new(0, 29, 0, 23)
x1.Font = Enum.Font.SourceSans
x1.Text = "X"
x1.TextColor3 = Color3.new(1, 1, 1)
x1.TextScaled = true
x1.TextSize = 14
x1.TextWrapped = true
x1.MouseButton1Down:connect(function()
logingui.Visible = false
opengui.Visible = true
end)


TextLabel.Parent = logingui
TextLabel.BackgroundColor3 = Color3.new(1, 1, 1)
TextLabel.BackgroundTransparency = 1
TextLabel.Position = UDim2.new(-0.0221130252, 0, 0, 0)
TextLabel.Size = UDim2.new(0, 201, 0, 23)
TextLabel.Font = Enum.Font.Arial
TextLabel.Text = "Universal Gui v1.0"
TextLabel.TextColor3 = Color3.new(1, 1, 1)
TextLabel.TextScaled = true
TextLabel.TextSize = 14
TextLabel.TextWrapped = true

user.Name = "user"
user.Parent = logingui
user.BackgroundColor3 = Color3.new(0, 0, 0)
user.BorderColor3 = Color3.new(1, 1, 1)
user.BorderSizePixel = 2
user.Position = UDim2.new(0.257985264, 0, 0.308510631, 0)
user.Size = UDim2.new(0, 196, 0, 22)
user.Font = Enum.Font.SourceSans
user.PlaceholderColor3 = Color3.new(1, 1, 1)
user.PlaceholderText = "Whitelist user"
user.Text = ""
user.TextColor3 = Color3.new(1, 1, 1)
user.TextScaled = true
user.TextSize = 14
user.TextWrapped = true

pass.Name = "pass"
pass.Parent = logingui
pass.BackgroundColor3 = Color3.new(0, 0, 0)
pass.BorderColor3 = Color3.new(1, 1, 1)
pass.BorderSizePixel = 2
pass.Position = UDim2.new(0.257985264, 0, 0.526595712, 0)
pass.Size = UDim2.new(0, 196, 0, 22)
pass.Font = Enum.Font.SourceSans
pass.PlaceholderColor3 = Color3.new(1, 1, 1)
pass.PlaceholderText = "Whitelist pass"
pass.Text = ""
pass.TextColor3 = Color3.new(1, 1, 1)
pass.TextScaled = true
pass.TextSize = 14
pass.TextWrapped = true

submit.Name = "submit"
submit.Parent = logingui
submit.BackgroundColor3 = Color3.new(0, 0, 0)
submit.BorderColor3 = Color3.new(1, 1, 1)
submit.BorderSizePixel = 2
submit.Position = UDim2.new(0.3857494, 0, 0.739361703, 0)
submit.Size = UDim2.new(0, 92, 0, 23)
submit.Font = Enum.Font.SourceSans
submit.Text = "SUBMIT"
submit.TextColor3 = Color3.new(1, 1, 1)
submit.TextScaled = true
submit.TextSize = 14
submit.TextWrapped = true
submit.MouseButton1Down:connect(function()
if user.Text == "hawkTHEgreat" and pass.Text == "hawkeye" then
    logingui.Visible = false
     maingui.Visible = true
end
end)

maingui.Name = "maingui"
maingui.Parent = VSGUI
maingui.BackgroundColor3 = Color3.new(0.188235, 0.188235, 0.188235)
maingui.BorderColor3 = Color3.new(1, 1, 1)
maingui.BorderSizePixel = 3
maingui.Position = UDim2.new(0.404689074, 0, 0.193939388, 0)
maingui.Size = UDim2.new(0, 187, 0, 303)
maingui.Visible = false
maingui.Active = true
maingui.Draggable = true

vs.Name = "vs"
vs.Parent = maingui
vs.BackgroundColor3 = Color3.new(0, 0, 0)
vs.BorderColor3 = Color3.new(1, 1, 1)
vs.BorderSizePixel = 2
vs.Position = UDim2.new(0.134412482, 0, 0.208008498, 0)
vs.Size = UDim2.new(0, 137, 0, 134)
vs.Font = Enum.Font.SourceSans
vs.Text = "ACTIVATE"
vs.TextColor3 = Color3.new(1, 1, 1)
vs.TextScaled = true
vs.TextSize = 14
vs.TextWrapped = true
vs.MouseButton1Down:connect(function()
--[[
Fully automatic money/miles farm
TODO:
Add auto respawn vehicle
]]
local waitTime = 3 --This will be the time it takes (seconds) until your car resets. See line 37
--Do not change anything below :)
local hint = Instance.new('Hint', Workspace) hint.Text = "Vehicle Simulator Autofarm loading..."
local found = false
local go = true

function findVehicle() --Finds your vehicle
   while not found do --Loops until your vehicle has been found
       local vehicles = Workspace.Vehicles:getChildren()
       for i=1,#vehicles do
           if vehicles[i]:findFirstChild'owner' then
               if vehicles[i].owner.Value == game:GetService'Players'.LocalPlayer.Name then -- Found your vehicle
                   found = true --Setting found to true so loop breaks
                   vehicle = vehicles[i] -- Declares vehicle variable to your vehicle
                   vehStats = vehicle.Handling -- Declares vehStats variable to vehicle stats folder
                   vehStats.MaxSpeed.Value = 800
                   vehStats.Torque.Value = 100000
                   vehStats.SteeringRadiusConstant.Value = 120000000
               elseif vehicles[i + 1] == nil and not found then
                   --Autorespawn would go here
                   hint.Text = "Please spawn and enter your vehicle!" --Your vehicle does not exist in the Workspace
               end
           end
       end
       wait(1) --Waiting before checking again so we don't crash
   end
   wait(2) --We've found the car. Waiting so the car can be properly placed on the highway
   vehicle.PrimaryPart = vehicle.Chassis.VehicleSeat
end

function farm() --This is where the magic happens :)
   hint.Text = "Finished loading! Autofarm initialized."
   while wait(waitTime) do --Waits x seconds before resetting car
       vehicle:SetPrimaryPartCFrame(CFrame.new(-2470,60,777)) --Teleports vehicle to highway
       game:GetService'VirtualUser':SetKeyUp("w") --Resets W key
       game:GetService'VirtualUser':SetKeyDown("w") --Presses W key to go forward
   end
end
findVehicle() --Calls the findVehicle function
while go do
   if not pcall(farm()) then --Calls farm function & checks for errors
       found = false  --If it errors, it sets found to false and continues looking for your vehicle.
       findVehicle()
   end
end
end)

bar.Name = "bar"
bar.Parent = maingui
bar.BackgroundColor3 = Color3.new(0.188235, 0.188235, 0.188235)
bar.BorderColor3 = Color3.new(1, 1, 1)
bar.BorderSizePixel = 3
bar.Position = UDim2.new(-0.00172805786, 0, -0.116291612, 0)
bar.Size = UDim2.new(0, 187, 0, 24)

x2.Name = "x2"
x2.Parent = maingui
x2.BackgroundColor3 = Color3.new(0, 0, 0)
x2.BorderColor3 = Color3.new(1, 1, 1)
x2.BorderSizePixel = 0
x2.Position = UDim2.new(-0.00462496281, 0, -0.110885866, 0)
x2.Size = UDim2.new(0, 26, 0, 22)
x2.Font = Enum.Font.SourceSans
x2.Text = "X"
x2.TextColor3 = Color3.new(1, 1, 1)
x2.TextScaled = true
x2.TextSize = 14
x2.TextWrapped = true
x2.MouseButton1Down:connect(function()
maingui.Visible = false
logingui.Visible = true
end)

Title.Name = "Title"
Title.Parent = maingui
Title.BackgroundColor3 = Color3.new(1, 1, 1)
Title.BackgroundTransparency = 1
Title.Position = UDim2.new(0.130708039, 0, -0.111559972, 0)
Title.Size = UDim2.new(0, 162, 0, 22)
Title.Font = Enum.Font.Arial
Title.Text = "Universal Gui"
Title.TextColor3 = Color3.new(1, 1, 1)
Title.TextScaled = true
Title.TextSize = 14
Title.TextWrapped = true

CREDITS.Name = "CREDITS"
CREDITS.Parent = maingui
CREDITS.BackgroundColor3 = Color3.new(0, 0, 0)
CREDITS.BorderColor3 = Color3.new(1, 1, 1)
CREDITS.BorderSizePixel = 2
CREDITS.Position = UDim2.new(-0.00462496327, 0, 0.943982244, 0)
CREDITS.Size = UDim2.new(0, 58, 0, 16)
CREDITS.Font = Enum.Font.SourceSans
CREDITS.Text = "Credits"
CREDITS.TextColor3 = Color3.new(1, 1, 1)
CREDITS.TextScaled = true
CREDITS.TextSize = 14
CREDITS.TextWrapped = true
CREDITS.MouseButton1Down:connect(function()
creditsgui.Visible = true
end)

creditsgui.Name = "credits gui"
creditsgui.Parent = maingui
creditsgui.BackgroundColor3 = Color3.new(0.188235, 0.188235, 0.188235)
creditsgui.BorderColor3 = Color3.new(1, 1, 1)
creditsgui.BorderSizePixel = 3
creditsgui.Position = UDim2.new(-1.00707567, 0, 0.685688615, 0)
creditsgui.Size = UDim2.new(0, 163, 0, 95)
creditsgui.Visible = false

bar_2.Name = "bar"
bar_2.Parent = creditsgui
bar_2.BackgroundColor3 = Color3.new(0.188235, 0.188235, 0.188235)
bar_2.BorderColor3 = Color3.new(1, 1, 1)
bar_2.BorderSizePixel = 3
bar_2.Position = UDim2.new(-0.00172808126, 0, -0.116291568, 0)
bar_2.Size = UDim2.new(0, 163, 0, 24)

x3.Name = "x3"
x3.Parent = creditsgui
x3.BackgroundColor3 = Color3.new(0, 0, 0)
x3.BorderColor3 = Color3.new(1, 1, 1)
x3.BorderSizePixel = 0
x3.Position = UDim2.new(-0.00462496281, 0, -0.110885866, 0)
x3.Size = UDim2.new(0, 26, 0, 22)
x3.Font = Enum.Font.SourceSans
x3.Text = "X"
x3.TextColor3 = Color3.new(1, 1, 1)
x3.TextScaled = true
x3.TextSize = 14
x3.TextWrapped = true
x3.MouseButton1Down:connect(function()
creditsgui.Visible = false
end)

Title_2.Name = "Title"
Title_2.Parent = creditsgui
Title_2.BackgroundColor3 = Color3.new(1, 1, 1)
Title_2.BackgroundTransparency = 1
Title_2.Position = UDim2.new(0.113910511, 0, -0.111559898, 0)
Title_2.Size = UDim2.new(0, 141, 0, 22)
Title_2.Font = Enum.Font.Arial
Title_2.Text = "Universal Gui"
Title_2.TextColor3 = Color3.new(1, 1, 1)
Title_2.TextScaled = true
Title_2.TextSize = 14
Title_2.TextWrapped = true

creditstitle.Name = "creditstitle"
creditstitle.Parent = creditsgui
creditstitle.BackgroundColor3 = Color3.new(1, 1, 1)
creditstitle.BackgroundTransparency = 1
creditstitle.Position = UDim2.new(0.0648307577, 0, 0.309492558, 0)
creditstitle.Size = UDim2.new(0, 141, 0, 48)
creditstitle.Font = Enum.Font.Arial
creditstitle.Text = "Gui made by Typical_RBLX"
creditstitle.TextColor3 = Color3.new(0.333333, 1, 0)
creditstitle.TextScaled = true
creditstitle.TextSize = 14
creditstitle.TextWrapped = true

opengui.Name = "opengui"
opengui.Parent = VSGUI
opengui.BackgroundColor3 = Color3.new(0.188235, 0.188235, 0.188235)
opengui.BorderColor3 = Color3.new(1, 1, 1)
opengui.BorderSizePixel = 2
opengui.Position = UDim2.new(0, 0, 0.929292977, 0)
opengui.Size = UDim2.new(0, 95, 0, 23)

open.Name = "open"
open.Parent = opengui
open.BackgroundColor3 = Color3.new(0, 0, 0)
open.BackgroundTransparency = 1
open.BorderColor3 = Color3.new(1, 1, 1)
open.BorderSizePixel = 2
open.Size = UDim2.new(0, 95, 0, 23)
open.Font = Enum.Font.SourceSans
open.Text = "Open"
open.TextColor3 = Color3.new(1, 1, 1)
open.TextScaled = true
open.TextSize = 14
open.TextWrapped = true
open.MouseButton1Down:connect(function()
logingui.Visible = true
opengui.Visible = false
end)

--Created by Typical_RBLX
--Typical D Great(YT)#8977