_G.ToggleOn = true
_G.ToggleStealKeyBind = "z"
_G.FreeCamBind = 'b'
_G.FullBright = true

local Player = game.Players.LocalPlayer
local Mouse = Player:GetMouse()

local oldFunc
oldFunc = hookfunction(Instance.new("Player").Kick, function(self, ...)
    return wait(9e99)
end)

--metamethod stuff:
local mt = getrawmetatable(game)
local old = mt.__namecall

setreadonly(mt, false)

mt.__namecall = newcclosure(function(self, ...)
    local method = getnamecallmethod()
    local args = {...}
    if method:lower() == "kick" then
        return wait(9e99)
    end
    return old(self, unpack(args))
end)

--[FreeCam]--
local UIS = game:GetService('UserInputService')
local Camera = game.Workspace.Camera

local cam1 = 0
local cam2 = 0
local cam3 = 0
local LockSystem = false
local key1 = false
local key2 = false
local key3 = false
local key4 = false
local key5 = false
local key6 = false
local FreeCamSpeed = 3
local Target = nil

function MoveCamera()
	local FcPart = Player.Character:FindFirstChild("FcPart")
	if LockSystem == false then
		repeat
			if Player.Character:FindFirstChild("FcPart") then
				local FcPartPos = FcPart.Position
				FcPart.CFrame = CFrame.new(Vector3.new(FcPartPos.X, FcPartPos.Y + cam3, FcPartPos.Z), Camera.CFrame.p) * CFrame.new(cam2, 0, cam1)
				LockSystem = true
				Player.Character.HumanoidRootPart.Anchored = true
			end
			game:GetService('RunService').RenderStepped:Wait()
		until not Player.Character:FindFirstChild("FcPart")
		LockSystem = false
	end
end

UIS.InputBegan:connect(function(input)
	if Player.Character and Player.Character:FindFirstChild("FcPart") then
		if input.KeyCode == Enum.KeyCode.W or input.KeyCode == Enum.KeyCode.Up then
			key1 = true
			cam1 = FreeCamSpeed
		end
		if input.KeyCode == Enum.KeyCode.S or input.KeyCode == Enum.KeyCode.Down then
			key2 = true
			cam1 = (FreeCamSpeed * -1)
		end
		if input.KeyCode == Enum.KeyCode.A or input.KeyCode == Enum.KeyCode.Left then
			key3 = true
			cam2 = FreeCamSpeed
		end
		if input.KeyCode == Enum.KeyCode.D or input.KeyCode == Enum.KeyCode.Right then
			key4 = true
			cam2 = (FreeCamSpeed * -1)
		end
		if input.KeyCode == Enum.KeyCode.E then
			key5 = true
			cam3 = FreeCamSpeed
		end
		if input.KeyCode == Enum.KeyCode.Q then
			key6 = true
			cam3 = (FreeCamSpeed * -1)
		end
	end
end)

UIS.InputEnded:connect(function(input)
	if Player.Character and Player.Character:FindFirstChild("FcPart") then
		if input.KeyCode == Enum.KeyCode.W or input.KeyCode == Enum.KeyCode.Up then
			key1 = false
			if key2 == false then
				cam1 = 0
			end
		end
		if input.KeyCode == Enum.KeyCode.S or input.KeyCode == Enum.KeyCode.Down then
			key2 = false
			if key1 == false then
				cam1 = 0
			end
		end
		if input.KeyCode == Enum.KeyCode.A or input.KeyCode == Enum.KeyCode.Left then
			key3 = false
			if key4 == false then
				cam2 = 0
			end
		end
		if input.KeyCode == Enum.KeyCode.D or input.KeyCode == Enum.KeyCode.Right then
			key4 = false
			if key3 == false then
				cam2 = 0
			end
		end
		if input.KeyCode == Enum.KeyCode.E then
			key5 = false
			if key6 == false then
				cam3 = 0
			end
		end
		if input.KeyCode == Enum.KeyCode.Q then
			key6 = false
			if key5 == false then
				cam3 = 0
			end
		end
	end
end)

function FreeCam()
	if not Player.Character:FindFirstChild("FcPart") then
		local FcPart = Instance.new("Part", Player.Character)
		FcPart.CanCollide = false
		FcPart.Anchored = true
		FcPart.Transparency = 1
		FcPart.Size = Vector3.new(1, 1, 1)
		FcPart.Name = "FcPart"
		FcPart.CFrame = Player.Character.Head.CFrame
		Camera.CameraSubject = FcPart
		Camera.CameraType = "Custom"
		MoveCamera()
	end
end

function UnFreeCam()
	if Player.Character:FindFirstChild("FcPart") then
		Player.Character.FcPart:Destroy()
		Camera.CameraSubject = Player.Character.Humanoid
		Camera.CameraType = "Custom"
		Player.Character.HumanoidRootPart.Anchored = false
	end
end

local FcToggle = false
Mouse.KeyDown:connect(function(key)
    if key == _G.FreeCamBind then
        if FcToggle == false then
            FcToggle = true
            FreeCam()
        else
            FcToggle = false
            UnFreeCam()
        end
    end
end)

local TcChosen
local LargeBoxChosen
local MiliCrateChosen
local ShitCrateChosen
local BoxCrateChosen
local FoodCrateChosen
local MedCrateChosen

local TpLoop = false

function StealTc()
	if TpLoop then
        Player.Character.HumanoidRootPart.CFrame = TcChosen.CFrame + Vector3.new(1, 2, 1)
		wait(.2)
		for i = 1,3 do
			game.ReplicatedStorage.RemoteEvents.ToolCupboard:FireServer(TcChosen, 1)
			wait()
		end
		wait(.3)
		repeat game:GetService("RunService").RenderStepped:Wait()
			Player.Character.Humanoid:ChangeState(11)
			Player.Character.HumanoidRootPart.CFrame = TcChosen.CFrame + Vector3.new(1, 2, 1)
			game.ReplicatedStorage.StartLooting:FireServer("ToolCupboard", TcChosen.Parent)
			Player.Character.Humanoid:ChangeState(18)
		until game.Players.LocalPlayer.PlayerGui.MainGui.Fullscreen.Inventory.Visible == true
		TpLoop = false
    end
end

function StealLargeBox()
	if TpLoop then
        Player.Character.HumanoidRootPart.CFrame = LargeBoxChosen.CFrame + Vector3.new(1, 2, 1)
		wait()
		repeat game:GetService("RunService").RenderStepped:Wait()
			Player.Character.Humanoid:ChangeState(11)
			Player.Character.HumanoidRootPart.CFrame = LargeBoxChosen.CFrame + Vector3.new(0, 4, 0)
			game.ReplicatedStorage.StartLooting:FireServer("LargeStorageBox", LargeBoxChosen.Parent)
			Player.Character.Humanoid:ChangeState(18)
		until game.Players.LocalPlayer.PlayerGui.MainGui.Fullscreen.Inventory.Visible == true
		TpLoop = false
		for i,v in pairs(game.ReplicatedStorage.ContainerInventories:GetChildren()) do
			if v.Name == "LargeStorageBox" then
				for a,b in pairs(v:GetChildren()) do
					for c,d in pairs(b:GetChildren()) do
						game.ReplicatedStorage.RemoteEvents.InventoryQuickEvent3:FireServer(d, b, "", LargeBoxChosen)
					end
				end
			end
		end
    end
end
function StealMiliCrate()
	if TpLoop then
        Player.Character.HumanoidRootPart.CFrame = MiliCrateChosen.CFrame + Vector3.new(1, 2, 1)
		wait()
		repeat game:GetService("RunService").RenderStepped:Wait()
			Player.Character.Humanoid:ChangeState(11)
			Player.Character.HumanoidRootPart.CFrame = MiliCrateChosen.CFrame + Vector3.new(0, 4, 0)
			game.ReplicatedStorage.StartLooting:FireServer("Container", MiliCrateChosen.Parent)
			Player.Character.Humanoid:ChangeState(18)
		until game.Players.LocalPlayer.PlayerGui.MainGui.Fullscreen.Inventory.Visible == true
		TpLoop = false
		for i,v in pairs(game.ReplicatedStorage.ContainerInventories:GetChildren()) do
			if v.Name == "MilitaryCrate" then
				for a,b in pairs(v:GetChildren()) do
					for c,d in pairs(b:GetChildren()) do
						game.ReplicatedStorage.RemoteEvents.InventoryQuickEvent3:FireServer(d, b, "", MiliCrateChosen)
					end
				end
			end
		end
    end
end
function StealShitCrate()
	if TpLoop then
        Player.Character.HumanoidRootPart.CFrame = ShitCrateChosen.CFrame + Vector3.new(1, 2, 1)
		wait()
		repeat game:GetService("RunService").RenderStepped:Wait()
			Player.Character.Humanoid:ChangeState(11)
			Player.Character.HumanoidRootPart.CFrame = ShitCrateChosen.CFrame + Vector3.new(0, 4, 0)
			game.ReplicatedStorage.StartLooting:FireServer("Container", ShitCrateChosen.Parent)
			Player.Character.Humanoid:ChangeState(18)
		until game.Players.LocalPlayer.PlayerGui.MainGui.Fullscreen.Inventory.Visible == true
		TpLoop = false
		for i,v in pairs(game.ReplicatedStorage.ContainerInventories:GetChildren()) do
			if v.Name == "MilitaryCrate" then
				for a,b in pairs(v:GetChildren()) do
					for c,d in pairs(b:GetChildren()) do
						game.ReplicatedStorage.RemoteEvents.InventoryQuickEvent3:FireServer(d, b, "", ShitCrateChosen)
					end
				end
			end
		end
    end
end
function StealFoodCrate()
	if TpLoop then
        Player.Character.HumanoidRootPart.CFrame = FoodCrateChosen.CFrame + Vector3.new(1, 2, 1)
		wait()
		repeat game:GetService("RunService").RenderStepped:Wait()
			Player.Character.Humanoid:ChangeState(11)
			Player.Character.HumanoidRootPart.CFrame = FoodCrateChosen.CFrame + Vector3.new(0, 4, 0)
			game.ReplicatedStorage.StartLooting:FireServer("Container", FoodCrateChosen.Parent)
			Player.Character.Humanoid:ChangeState(18)
		until game.Players.LocalPlayer.PlayerGui.MainGui.Fullscreen.Inventory.Visible == true
		TpLoop = false
		for i,v in pairs(game.ReplicatedStorage.ContainerInventories:GetChildren()) do
			if v.Name == "MilitaryCrate" then
				for a,b in pairs(v:GetChildren()) do
					for c,d in pairs(b:GetChildren()) do
						game.ReplicatedStorage.RemoteEvents.InventoryQuickEvent3:FireServer(d, b, "", FoodCrateChosen)
					end
				end
			end
		end
    end
end
function StealBoxCrate()
	if TpLoop then
        Player.Character.HumanoidRootPart.CFrame = BoxCrateChosen.CFrame + Vector3.new(1, 2, 1)
		wait()
		repeat game:GetService("RunService").RenderStepped:Wait()
			Player.Character.Humanoid:ChangeState(11)
			Player.Character.HumanoidRootPart.CFrame = BoxCrateChosen.CFrame + Vector3.new(0, 4, 0)
			game.ReplicatedStorage.StartLooting:FireServer("Container", BoxCrateChosen.Parent)
			Player.Character.Humanoid:ChangeState(18)
		until game.Players.LocalPlayer.PlayerGui.MainGui.Fullscreen.Inventory.Visible == true
		TpLoop = false
		for i,v in pairs(game.ReplicatedStorage.ContainerInventories:GetChildren()) do
			if v.Name == "MilitaryCrate" then
				for a,b in pairs(v:GetChildren()) do
					for c,d in pairs(b:GetChildren()) do
						game.ReplicatedStorage.RemoteEvents.InventoryQuickEvent3:FireServer(d, b, "", BoxCrateChosen)
					end
				end
			end
		end
    end
end
function StealMedCrate()
	if TpLoop then
        Player.Character.HumanoidRootPart.CFrame = MedCrateChosen.CFrame + Vector3.new(1, 2, 1)
		wait()
		repeat game:GetService("RunService").RenderStepped:Wait()
			Player.Character.Humanoid:ChangeState(11)
			Player.Character.HumanoidRootPart.CFrame = MedCrateChosen.CFrame + Vector3.new(0, 4, 0)
			game.ReplicatedStorage.StartLooting:FireServer("Container", MedCrateChosen.Parent)
			Player.Character.Humanoid:ChangeState(18)
		until game.Players.LocalPlayer.PlayerGui.MainGui.Fullscreen.Inventory.Visible == true
		TpLoop = false
		for i,v in pairs(game.ReplicatedStorage.ContainerInventories:GetChildren()) do
			if v.Name == "MilitaryCrate" then
				for a,b in pairs(v:GetChildren()) do
					for c,d in pairs(b:GetChildren()) do
						game.ReplicatedStorage.RemoteEvents.InventoryQuickEvent3:FireServer(d, b, "", MedCrateChosen)
					end
				end
			end
		end
    end
end
function StealLoot()
    repeat
    for i,v in pairs(game:GetService('Players').LocalPlayer:GetMouse().Target.Parent.Properties.Inventory:GetChildren()) do
        game:GetService('ReplicatedStorage').RemoteEvents.setConnectedFrame3:FireServer(v, v.ItemName.Value)
    end
    until game:GetService('Players').LocalPlayer.PlayerGui.MainGui.Inventory.Visible == false
end
Mouse.KeyDown:connect(function(key)
	if key:lower() == _G.ToggleStealKeyBind and _G.ToggleOn == true and Mouse.Target.Name == "ToolCupboard" then
        TpLoop = true
		TcChosen = Mouse.Target
		UnFreeCam()
		FcToggle = false
		StealTc()
		StealLoot()
	end
	if key:lower() == _G.ToggleStealKeyBind and _G.ToggleOn == true and Mouse.Target.Name == "LargeStorageBox" then
        TpLoop = true
		LargeBoxChosen = Mouse.Target
		UnFreeCam()
		FcToggle = false
		StealLargeBox()
		StealLoot()
	end
	if key:lower() == _G.ToggleStealKeyBind and _G.ToggleOn == true and Mouse.Target.Name == "SmallStorageBox" then
        TpLoop = true
		LargeBoxChosen = Mouse.Target
		UnFreeCam()
		FcToggle = false
		StealLargeBox()
		StealLoot()
	end
	if key:lower() == _G.ToggleStealKeyBind and _G.ToggleOn == true and Mouse.Target.Name == "ContainerHitBox" then
        TpLoop = true
		MiliCrateChosen = Mouse.Target
		UnFreeCam()
		FcToggle = false
		StealMiliCrate()
		StealLoot()
	end
	if key:lower() == _G.ToggleStealKeyBind and _G.ToggleOn == true and Mouse.Target.Name == "ContainerHitBox" then
        TpLoop = true
		ShitCrateChosen = Mouse.Target
		UnFreeCam()
		FcToggle = false
		StealShitCrate()
		StealLoot()
	end
	if key:lower() == _G.ToggleStealKeyBind and _G.ToggleOn == true and Mouse.Target.Name == "ContainerHitBox" then
        TpLoop = true
		FoodCrateChosen = Mouse.Target
		UnFreeCam()
		FcToggle = false
		StealFoodCrate()
		StealLoot()
	end
	if key:lower() == _G.ToggleStealKeyBind and _G.ToggleOn == true and Mouse.Target.Name == "ContainerHitBox" then
        TpLoop = true
		BoxCrateChosen = Mouse.Target
		UnFreeCam()
		FcToggle = false
		StealBoxCrate()
		StealLoot()
	end
	if key:lower() == _G.ToggleStealKeyBind and _G.ToggleOn == true and Mouse.Target.Name == "ContainerHitBox" then
        TpLoop = true
		MedCrateChosen = Mouse.Target
		UnFreeCam()
		FcToggle = false
		StealMedCrate()
		StealLoot()
	end
end)
--[FullBright]--
local runservice = game:GetService('RunService')
runservice.Stepped:connect(function()
    if _G.FullBright == true then
        game:GetService('Lighting').TimeOfDay = '12:00:00'
    	game.Lighting.FogEnd = 9999
    	game.Lighting.Brightness = 1
    	game.Lighting.ColorCorrection.Brightness = 0.1
    	game.Lighting.ColorCorrection.Saturation = 0.1
    	game.Lighting.Bloom.Intensity = 0.1
    end
end)