local doJewl=true
local doBank=true
local doTrain=true
local green,red=Color3.fromRGB(0,240,0),Color3.fromRGB(240,0,0)
local maxSpeed = 375 --max studs/s by anti exploit
local vaultMaxSecs = 999
local jewlAllowCrims = false
--interface
local gui = Instance.new("ScreenGui")
gui.ResetOnSpawn=false
gui.Name = "AutoRob"

local main = Instance.new("Frame",gui)
main.BackgroundTransparency=0.02
main.BackgroundColor3=Color3.fromRGB(0,50,100)
main.Active=true
main.Draggable=true
main.Position=UDim2.new(0.2,0,0.2,0)
main.Size=UDim2.new(0,350,0,234)
main.ZIndex=3
local indent = Instance.new("Frame",main)
indent.BackgroundTransparency=1
indent.Position=UDim2.new(0,25,0,25)
indent.Size=UDim2.new(1,-50,1,-50)
local CloseBtn = Instance.new("TextButton",main)
CloseBtn.BackgroundTransparency=1
CloseBtn.Position=UDim2.new(1,-20,0,0)
CloseBtn.Size=UDim2.new(0,20,0,20)
CloseBtn.Font=Enum.Font.SourceSansBold
CloseBtn.Text="X"
CloseBtn.TextScaled=true
CloseBtn.TextColor3=Color3.new(1,1,1)
CloseBtn.TextStrokeTransparency=0.7
local CogBtn = Instance.new("ImageButton",main)
CogBtn.BackgroundTransparency=1
CogBtn.Position=UDim2.new(0,0,0,0)
CogBtn.Size=UDim2.new(0,20,0,20)
CogBtn.Image="rbxassetid://135740223"
local AbortBtn = Instance.new("TextButton",indent)
AbortBtn.Style=Enum.ButtonStyle.RobloxRoundButton
AbortBtn.AutoButtonColor=false
AbortBtn.Position=UDim2.new(0.25,0,0.6,-5)
AbortBtn.Size=UDim2.new(0.5,0,0.185,0)
AbortBtn.Font=Enum.Font.SourceSans
AbortBtn.Text="ABORT"
AbortBtn.TextScaled=false
AbortBtn.TextSize=25
local JewlBtn = Instance.new("TextButton",indent)
JewlBtn.BackgroundColor3=doJewl and green or red
JewlBtn.Position=UDim2.new(0.8)
JewlBtn.Size=UDim2.new(0.2,0,0.185,-5)
JewlBtn.Font=Enum.Font.SourceSansSemibold
JewlBtn.Text=doJewl and "YES" or "NO"
JewlBtn.TextScaled=true
local BankBtn =  Instance.new("TextButton",indent)
BankBtn.BackgroundColor3=doBank and green or red
BankBtn.Position=UDim2.new(0.8,0,0.2,0)
BankBtn.Size=UDim2.new(0.2,0,0.185,-5)
BankBtn.Font=Enum.Font.SourceSansSemibold
BankBtn.Text=doBank and "YES" or "NO"
BankBtn.TextScaled=true
local TrainBtn =  Instance.new("TextButton",indent)
TrainBtn.BackgroundColor3=doTrain and green or red
TrainBtn.Position=UDim2.new(0.8,0,0.4,0)
TrainBtn.Size=UDim2.new(0.2,0,0.185,-5)
TrainBtn.Font=Enum.Font.SourceSansSemibold
TrainBtn.Text=doTrain and "YES" or "NO"
TrainBtn.TextScaled=true
local lbl1 = Instance.new("TextLabel",indent)
lbl1.BackgroundTransparency=1
lbl1.Position=UDim2.new(0,0,0,-5)
lbl1.Size=UDim2.new(0.8,0,0.185,0)
lbl1.Font=Enum.Font.SourceSans
lbl1.Text="Auto Rob Jewelry:"
lbl1.TextScaled=true
lbl1.TextColor3=Color3.new(1,1,1)
lbl1.TextStrokeTransparency=0.8
local lbl2 = Instance.new("TextLabel",indent)
lbl2.BackgroundTransparency=1
lbl2.Position=UDim2.new(0,0,0.2,-7)
lbl2.Size=UDim2.new(0.8,0,0.185,0)
lbl2.Font=Enum.Font.SourceSans
lbl2.Text="Auto Rob Bank:"
lbl2.TextScaled=true
lbl2.TextColor3=Color3.new(1,1,1)
lbl2.TextStrokeTransparency=0.8
local lbl3 = Instance.new("TextLabel",indent)
lbl3.BackgroundTransparency=1
lbl3.Position=UDim2.new(0,0,0.4,-7)
lbl3.Size=UDim2.new(0.8,0,0.185,0)
lbl3.Font=Enum.Font.SourceSans
lbl3.Text="Auto Rob Train:"
lbl3.TextScaled=true
lbl3.TextColor3=Color3.new(1,1,1)
lbl3.TextStrokeTransparency=0.8
local Status = Instance.new("TextLabel",indent)
Status.BackgroundTransparency=0.25
Status.BackgroundColor3=Color3.new(1,1,1)
Status.Position=UDim2.new(0,0,0.8,0)
Status.Size=UDim2.new(1,0,0.185,0)
Status.Font=Enum.Font.Code
Status.Text="Status:"
Status.TextScaled=false
Status.TextSize=15
Status.TextXAlignment=Enum.TextXAlignment.Left
local setsframe = Instance.new("Frame",main)
setsframe.BackgroundTransparency=0.02
setsframe.BackgroundColor3=Color3.new(.88,.88,.88)
setsframe.BorderColor3=main.BackgroundColor3
setsframe.BorderSizePixel=5
setsframe.Position=UDim2.new(0,50,1,-70)
setsframe.Size=UDim2.new(0,240,0,65)
local setsoption1 = Instance.new("Frame",setsframe)
setsoption1.BackgroundTransparency=1
setsoption1.Size=UDim2.new(1,0,0.5,0)
local indent1 = Instance.new("Frame",setsoption1)
indent1.BackgroundTransparency=1
indent1.Position=UDim2.new(0,5,0,5)
indent1.Size=UDim2.new(1,-10,1,-10)
local lbl4 = Instance.new("TextLabel",indent1)
lbl4.BackgroundTransparency=1
lbl4.Size=UDim2.new(0.8,0,1,0)
lbl4.Font=Enum.Font.SourceSans
lbl4.Text="Max Secs Inside Vaults"
lbl4.TextScaled=true
local MaxSecsBox = Instance.new("TextBox",indent1)
MaxSecsBox.BackgroundColor3=Color3.new(.95,.95,.95)
MaxSecsBox.Position=UDim2.new(0.83,0,0.2,0)
MaxSecsBox.Size=UDim2.new(0,30,0,15)
MaxSecsBox.Font=Enum.Font.Code
MaxSecsBox.Text=tostring(vaultMaxSecs)
MaxSecsBox.TextScaled=true
local setsoption2 = Instance.new("Frame",setsframe)
setsoption2.BackgroundTransparency=0.95
setsoption2.BackgroundColor3=Color3.new()
setsoption2.Position=UDim2.new(0,0,0.5,0)
setsoption2.Size=UDim2.new(1,0,0.5,0)
local indent2 = Instance.new("Frame",setsoption2)
indent2.BackgroundTransparency=1
indent2.Position=UDim2.new(0,5,0,5)
indent2.Size=UDim2.new(1,-10,1,-10)
local lbl5 = Instance.new("TextLabel",indent2)
lbl5.BackgroundTransparency=1
lbl5.Size=UDim2.new(0.8,0,1,0)
lbl5.Font=Enum.Font.SourceSans
lbl5.Text="Let Crims Enter Jewelry"
lbl5.TextScaled=true
local JewlSetBtn = Instance.new("TextButton",indent2)
JewlSetBtn.BackgroundColor3=Color3.new(.95,.95,.95)
JewlSetBtn.Position=UDim2.new(0.85,0,0.2,0)
JewlSetBtn.Size=UDim2.new(0,20,0,15)
JewlSetBtn.Font=Enum.Font.SourceSansSemibold
JewlSetBtn.Text=jewlAllowCrims and "X" or ""
JewlSetBtn.TextScaled=false
JewlSetBtn.TextSize=20

gui.Parent = game.CoreGui
for _,v in ipairs(main:GetChildren()) do
	if v~=setsframe then v.ZIndex = 4 end
end
for _,v in ipairs(indent:GetChildren()) do
	v.ZIndex = 5
end

local player = game:GetService("Players").LocalPlayer
local root
local abort=false
--gui code
CloseBtn.MouseButton1Click:Connect(function() gui:Destroy() abort=true end)
CloseBtn.MouseEnter:Connect(function() CloseBtn.TextColor3=red end)
CloseBtn.MouseLeave:Connect(function() CloseBtn.TextColor3=Color3.new(1,1,1) end)

JewlBtn.MouseButton1Click:Connect(function()
	doJewl = not doJewl
	JewlBtn.BackgroundColor3=doJewl and green or red
	JewlBtn.Text=doJewl and "YES" or "NO"
end)
BankBtn.MouseButton1Click:Connect(function()
	doBank = not doBank
	BankBtn.BackgroundColor3=doBank and green or red
	BankBtn.Text=doBank and "YES" or "NO"
end)
TrainBtn.MouseButton1Click:Connect(function()
	doTrain = not doTrain
	TrainBtn.BackgroundColor3=doTrain and green or red
	TrainBtn.Text=doTrain and "YES" or "NO"
end)
local function toggleCanAbort(bool)
	AbortBtn.AutoButtonColor=bool
	AbortBtn.Style=bool and "RobloxRoundDefaultButton" or "RobloxRoundButton"
end

AbortBtn.MouseButton1Click:Connect(function()
	if AbortBtn.AutoButtonColor==true then
		toggleCanAbort(false)
		local hit,p = workspace:FindPartOnRay(Ray.new(player.Character.Head.Position+Vector3.new(0,10,0),Vector3.new(0,20,0)))
		if hit then
			player.Character:MoveTo(p)
		else
			root.CFrame=root.CFrame+Vector3.new(-40,2,0)
		end
		abort=true
		AbortBtn.Text = "Aborted."
		wait(3)
		abort=false
		wait(7)
		AbortBtn.Text = "ABORT"
		
	end
end)
local function stprint(txt)
	Status.Text = "Status: "..txt
end
local function strToNum(str)
	return tonumber((tostring(str):gsub("[^%d]", "")))
end

local tweenCogOut = game:GetService("TweenService"):Create(CogBtn,TweenInfo.new(0.3),{Rotation=135})
local tweenCogIn = game:GetService("TweenService"):Create(CogBtn,TweenInfo.new(0.3),{Rotation=0})
local cogOut = false
CogBtn.MouseButton1Click:Connect(function()
	cogOut = not cogOut
	if cogOut then
		setsframe:TweenPosition(UDim2.new(0,50,1,0),nil,"Quart",0.3,true)
		tweenCogOut:Play()
	else
		setsframe:TweenPosition(UDim2.new(0,50,1,-70),nil,"Quart",0.3,true)
		tweenCogIn:Play()
	end
end)
MaxSecsBox:GetPropertyChangedSignal("Text"):Connect(function()
	local num = strToNum(MaxSecsBox.Text),1,999
	if num then
		num = math.clamp(num,1,999)
		vaultMaxSecs = num
		MaxSecsBox.Text = tostring(num)
	else
		MaxSecsBox.Text = ''
	end
end)
MaxSecsBox.FocusLost:Connect(function() MaxSecsBox.Text=tostring(vaultMaxSecs) end)
JewlSetBtn.MouseButton1Click:Connect(function()
	jewlAllowCrims = not jewlAllowCrims
	JewlSetBtn.Text = jewlAllowCrims and "X" or ""
end)

--main code

local windowFocused = false
game:GetService("UserInputService").WindowFocused:Connect(function() windowFocused=true end)
game:GetService("UserInputService").WindowFocusReleased:Connect(function() windowFocused=false end)

local punchEvent,punchCode,trainEvent,trainCode

local function keyclick(num)
	if windowFocused and keypress and keyrelease then
		keypress(num)
		wait()
		keyrelease(num)
	end
end
local function punch()
	if punchEvent then
		punchEvent:FireServer(unpack(punchCode))
	elseif windowFocused then
		keyclick(0x46)
	end
end
local function exitVehicle() keyclick(0x20) end

local function longTP(cf)
	local original = root.CFrame + Vector3.new(0,math.max(0,140-root.CFrame.y),0) --start high up
	local oldg = workspace.Gravity
	workspace.Gravity=0
	--consistent velocity along a theoretical array of points between
	for i=0,1,1/((original.p-cf.p).magnitude / (maxSpeed*0.25)) do
		if abort then break end
		root.CFrame = original:lerp(cf,i)
		root.Velocity=Vector3.new()
		wait(0.25)
	end
	
	workspace.Gravity=oldg
	for i=1,5 do
		if abort then break end
		root.CFrame = cf
		wait(0.1)
	end
	wait(0.1)
end

local function bigTP(cf)
	repeat
	for i=1,60 do
		if abort then return end
		root.CFrame=cf
		wait()
	end
	until wait(0.3) and (root.Position-cf.p).magnitude<9
end

local function isBagFull()
	if player.PlayerGui.MainGui.CollectMoney.Visible==false then
		return true
	end
	return strToNum(player.PlayerGui.MainGui.CollectMoney.Money.Text)+1 >= strToNum(player.PlayerGui.MainGui.CollectMoney.Maximum.Text)
end

local boxcars = {}
for _,v in ipairs(workspace.Trains:GetChildren()) do
	if v.Name=="BoxCar" and v:FindFirstChild("Gold",true) then
		boxcars[#boxcars+1]=v
	end
end
workspace.Trains.ChildAdded:Connect(function(child)
	wait(10.5)
	if child.Name=="BoxCar" and child.Model.Rob:FindFirstChild("Gold") then
		boxcars[#boxcars+1]=child
	end
end)
workspace.Trains.ChildRemoved:Connect(function(child)
	for i,car in ipairs(boxcars) do
		if car==child then
			table.remove(boxcars,i)
			break
		end
	end
end)

--pcall(function()
local MT = getrawmetatable(game)
if setreadonly then setreadonly(MT,false) end
if make_writeable then make_writeable(MT) end
local oldNamecall = MT.__namecall
local oldIndex = MT.__index
local oldWTSP = workspace.CurrentCamera.WorldToScreenPoint
MT.__namecall = function(inst,...)
	local args = {...}
	local m = args[#args]
	if m == "WorldToScreenPoint" and inst.ClassName=="Camera" then
		local ret = oldWTSP(inst,...)
		return ret,true
	end
	return oldNamecall(inst,...)
end
MT.__index = function(inst,k)
	if k=="Velocity" and inst==root then
		return Vector3.new()
	end
	return oldIndex(inst,k)
end

if setreadonly then setreadonly(MT,true) end
--end)

local function isVaultOpenAndCopsTooClose()
	if (workspace.Banks:GetChildren()[1].Door.Closed.Position-Vector3.new(25.6,3.6,815.6)).magnitude > 1 then
		for _,p in ipairs(game:GetService("Teams").Police:GetPlayers()) do
			if p.Character and p.Character:FindFirstChild("HumanoidRootPart") then
				local diff = (p.Character.HumanoidRootPart.Position-root.Position)
				if diff.magnitude < 40 and (diff*Vector3.new(0,1,0)).magnitude < 10 then
					return true
				end
			end 
		end
	end
	return false
end

local function warnFlash()
	stprint("About to TP")
	local col0 = main.BackgroundColor3
	for i=1,2 do
		for a=0,1,1/(30*.25) do
			main.BackgroundColor3 = col0:lerp(red,a)
			wait()
		end
		for a=0,1,1/(30*.25) do
			main.BackgroundColor3 = red:lerp(col0,a)
			wait()
		end
	end
	main.BackgroundColor3 = col0
end

local function robJewelry()
	warnFlash()
	stprint("TPing to jewelry...")
	exitVehicle()
	toggleCanAbort(true)
	bigTP(CFrame.new(163.7, 106.6, 1341.6))
	if abort then return end
	root.CFrame = CFrame.new(142.169, 17.88, 1351.084)
	wait(0.5)
	stprint("Robbery started!")
	local notRinging = #workspace.Ringers.Jewelry:GetChildren()==0
	local broke = 0
	
	for _,box in ipairs(workspace.Jewelrys:GetChildren()[1].Boxes:GetChildren()) do
		if abort or (broke>2 and isBagFull()) then
			--duffel bag full
			break
		end
		
		local dir = ((box.Position.Z > 1338) and -1) or 1
		if box.Transparency < 0.9 then
			if box.Position.X < 115 and box.Position.Z > 1330 then
				root.CFrame = CFrame.new(box.Position+box.CFrame.lookVector*2.5+Vector3.new(0,0,-2.5),box.Position)
			elseif box.Position.Z > 1338 then
				root.CFrame = CFrame.new(box.Position+box.CFrame.lookVector*-2.5,box.Position)
			else
				root.CFrame = CFrame.new(box.Position+box.CFrame.lookVector*2.5,box.Position)
			end
			wait()
			for i=1,2 do
				if abort~=true and broke==0 and notRinging and jewlAllowCrims then wait(2.25) end
			end
			local hits = 0
			repeat
				punch()
				hits=hits+1
				if punchEvent==nil or (broke==0 and notRinging) then wait(0.5) end
			until abort or hits>7 or box.Transparency>0.9
			if punchEvent~=nil then wait(0.3) end
			broke=broke+1
		end
	end
	
	wait(0.5)
	stprint("Escaping...")
	bigTP(CFrame.new(-365.3, 35.52, 1578.5))
	toggleCanAbort(false)
	stprint("Jewel success! [10s cooldown]")
	wait(9)
end

local function robBank()
	warnFlash()
	stprint("TPing to bank...")
	exitVehicle()
	toggleCanAbort(true)
	bigTP(CFrame.new(119, 95, 840))
	if abort then return end
	root.CFrame = CFrame.new(23.6, 18.07, 853.5)
	wait(0.5)
	if #workspace.Ringers.Bank:GetChildren()==0 then wait(1.5) end
	--gets in vault
	stprint("Robbery started!")
	local elapsed = 0
	for i=1,5 do
		if abort then break end
    	root.CFrame = CFrame.new(15.29, 0.76, 825.36)
		elapsed=elapsed+wait(0.5)
	end
	--wait for bag to fill or player leaves
	repeat elapsed=elapsed+wait(0.5) until abort or isBagFull() or isVaultOpenAndCopsTooClose() or elapsed>vaultMaxSecs
	stprint("Escaping...")
	longTP(CFrame.new(119, 95, 840))
	toggleCanAbort(false)
	stprint("Bank success! [10s cooldown]")
	wait(9)
end

local function robTrain()
	local bcar,gold = boxcars[1],boxcars[1].Model.Rob.Gold
	local trainFront = workspace.Trains.LocomotiveFront.Model.Front
	warnFlash()
	stprint("TPing to train...")
	exitVehicle()
	toggleCanAbort(true)
	bigTP(gold.CFrame+gold.CFrame.rightVector*10)
	repeat longTP(gold.CFrame+gold.CFrame.rightVector*10)
	until (root.Position-gold.Position).magnitude < 97
	for i=1,5 do
		if abort then break end
		root.CFrame = gold.CFrame+(gold.CFrame.lookVector*3.5)+Vector3.new(0,1,0)
		wait(0.1)
	end
	stprint("Opening vault...")
	local holde=true
	keyclick(0x45)
	if keypress and keyrelease then
		--keypress doesn't seem to "hold" so this is necessary
		spawn(function()
			while wait(0.1) and windowFocused and holde do
				keypress(0x45)
			end
			keyrelease(0x45)
		end)
	end
	if trainEvent then
		trainEvent:FireServer(trainCode,bcar.Skeleton.Vault.Part)
	end

	local elapsed=0
	if not abort then
	repeat
		root.CFrame = gold.CFrame+(gold.CFrame.lookVector*4.5)+Vector3.new(0,1,0)
		elapsed=elapsed+wait(0.25)
	until abort or elapsed>9 or bcar.Skeleton.Vault.Part.Open.Value
	end
	holde,elapsed=false,0
	stprint("Robbery started!")
	if not abort then
	repeat
		root.CFrame = gold.CFrame+gold.CFrame.lookVector+Vector3.new(0,1,0)
		elapsed=elapsed+wait(0.25)
	until abort or (elapsed>4 and isBagFull()) or (trainFront.Position-Vector3.new(-1679,25,268)).magnitude<100 or elapsed>vaultMaxSecs
	end
	stprint("Escaping...")
	bigTP(CFrame.new(-365.3, 35.52, 1578.5))
	toggleCanAbort(false)
	stprint("Train success! [10s cooldown]")
	wait(9)
end

local spyfunc = hookfunc or replaceclosure
if spyfunc then
	local punchWaiting=false
	local oldFS
	oldFS = spyfunc(Instance.new("RemoteEvent").FireServer,function(self,...)
		if punchWaiting then
			punchWaiting=false
			punchEvent = self
			punchCode = {...}
		elseif trainEvent==nil then
			local args = {...}
			if tostring(args[2])=="Part" and workspace.Trains:IsAncestorOf(args[2]) then
				trainEvent = self
				trainCode = args[1]
			end
		end
		return oldFS(self,...)
	end)
	spawn(function()
		repeat
			if windowFocused then punchWaiting=true punch() end
			punchWaiting=false
			wait(0.1)
		until punchEvent~=nil
	end)
	oldWTSP = spyfunc(oldWTSP,function(self,v3)
		local ret = oldWTSP(self,v3)
		return ret,true
	end)
end

local function newchar(char)
	if char then root = char:WaitForChild("HumanoidRootPart",4) end
end
newchar(player.Character)
player.CharacterAdded:Connect(newchar)

--main loop
local bankSign = workspace.Banks:GetChildren()[1].Extra.Sign.Decal
local jewlSign = workspace.Jewelrys:GetChildren()[1].Extra.Sign.Decal
local isBankOpen = bankSign.Transparency>0.01
local isJewlOpen = jewlSign.Transparency>0.01
bankSign:GetPropertyChangedSignal("Transparency"):Connect(function() wait() isBankOpen = bankSign.Transparency>0.01 end)
jewlSign:GetPropertyChangedSignal("Transparency"):Connect(function() wait() isJewlOpen = jewlSign.Transparency>0.01 end)
local waiti=0

print("Auto-robbery is running")
while wait(0.5) and gui.Parent do
	if doJewl and isJewlOpen then
		pcall(robJewelry)
		isJewlOpen=false
	elseif doBank and isBankOpen then
		pcall(robBank)
		isBankOpen=false
	elseif doTrain and #boxcars>0 then
		pcall(robTrain)
		table.remove(boxcars,1)
	else
		stprint("Wait for stores to open".. string.rep('.',waiti%3+1))
		waiti=waiti+1
	end
end

return nil