-- CoreGui.RobloxGui.CurrentLoadout.CoreScripts/BackpackScript
print "[Mercury]: Loaded corescript 53878057"

local CoreGui = game:GetService "CoreGui"
local GuiService = game:GetService "GuiService"
local Players = game:GetService "Players"
local RunService = game:GetService "RunService"
local StarterGui = game:GetService "StarterGui"
local UserInputService = game:GetService "UserInputService"

-- A couple of necessary functions
local function waitForChild(instance, name)
	while not instance:FindFirstChild(name) do
		instance.ChildAdded:wait()
	end
	return instance:FindFirstChild(name)
end
local function waitForProperty(instance, property)
	while not instance[property] do
		instance.Changed:wait()
	end
end

local currentLoadout = script.Parent
local StaticTabName = "gear"
local backpackEnabled = true

local MercuryGui = CoreGui:FindFirstChild "RobloxGui"
assert(MercuryGui)

local controlFrame = waitForChild(MercuryGui, "ControlFrame")
local backpackButton = waitForChild(controlFrame, "BackpackButton")
local backpack = waitForChild(MercuryGui, "Backpack")
waitForChild(MercuryGui, "CurrentLoadout")
waitForChild(MercuryGui.CurrentLoadout, "TempSlot")
waitForChild(MercuryGui.CurrentLoadout.TempSlot, "SlotNumber")

waitForChild(currentLoadout, "Background")
local clBackground = currentLoadout.Background

local function IsTouchDevice()
	local touchEnabled = false
	pcall(function()
		touchEnabled = UserInputService.TouchEnabled
	end)
	return touchEnabled
end

local function moveHealthBar(pGui)
	waitForChild(pGui, "HealthGUI")
	waitForChild(pGui.HealthGUI, "tray")
	local tray = pGui.HealthGUI.tray
	tray.Position = UDim2.new(0.5, -85, 1, -26)
end

local function setHealthBarVisible(pGui, visible)
	waitForChild(pGui, "HealthGUI")
	waitForChild(pGui.HealthGUI, "tray")
	local tray = pGui.HealthGUI.tray
	tray.Visible = visible
end

--- Begin Locals
waitForProperty(Players, "LocalPlayer")
local player = Players.LocalPlayer

waitForChild(player, "PlayerGui")
Spawn(function()
	moveHealthBar(player.PlayerGui)
end)

while player.Character == nil do
	wait(0.03)
end
local humanoid = waitForChild(player.Character, "Humanoid")
humanoid.Died:connect(function()
	backpackButton.Visible = false
end)

waitForChild(game, "LocalBackpack")
game.LocalBackpack:SetOldSchoolBackpack(false)

waitForChild(currentLoadout.Parent, "Backpack")
local guiBackpack = currentLoadout.Parent.Backpack

local backpackManager =
	waitForChild(guiBackpack, "CoreScripts/BackpackScripts/BackpackManager")
local backpackOpenEvent = waitForChild(backpackManager, "BackpackOpenEvent")
local backpackCloseEvent = waitForChild(backpackManager, "BackpackCloseEvent")
local tabClickedEvent = waitForChild(backpackManager, "TabClickedEvent")
-- local resizeEvent = waitForChild(backpackManager, "ResizeEvent")

local inGearTab = true

local maxNumLoadoutItems = 10

local characterChildAddedCon, backpackChildCon

local debounce = false

local enlargeFactor = 1.18
local buttonSizeEnlarge = UDim2.new(1 * enlargeFactor, 0, 1 * enlargeFactor, 0)
local buttonSizeNormal = UDim2.new(1, 0, 1, 0)
local enlargeOverride = true
local guiTweenSpeed = 0.5

local firstInstanceOfLoadout = false

local inventory = {}

local gearSlots = {}
for i = 1, maxNumLoadoutItems do
	gearSlots[i] = "empty"
end

local dragBeginPos
--- End Locals

-- Begin Functions
local function backpackIsOpen()
	if guiBackpack then
		return guiBackpack.Visible
	end
	return false
end

local reorganizeLoadout

local function kill(prop, con, gear)
	if con then
		con:disconnect()
	end
	if prop == true and gear then
		reorganizeLoadout(gear, false)
	end
end

local function registerNumberKeys()
	for i = 0, 9 do
		GuiService:AddKey(tostring(i))
	end
end

local function unregisterNumberKeys()
	pcall(function()
		for i = 0, 9 do
			GuiService:RemoveKey(tostring(i))
		end
	end)
end

local function characterInWorkspace()
	local localPlayer = Players.LocalPlayer
	return localPlayer
		and localPlayer.Character
		and localPlayer.Character ~= nil
		and localPlayer.Character.Parent ~= nil
end

local function removeGear(gear)
	local emptySlot
	for i = 1, #gearSlots do
		if gearSlots[i] == gear and gear.Parent ~= nil then
			emptySlot = i
			break
		end
	end
	if emptySlot then
		if gearSlots[emptySlot].GearReference.Value then
			if
				gearSlots[emptySlot].GearReference.Value.Parent
				== Players.LocalPlayer.Character
			then -- if we currently have this equipped, unequip it
				gearSlots[emptySlot].GearReference.Value.Parent =
					Players.LocalPlayer.Backpack
			end

			if
				gearSlots[emptySlot].GearReference.Value:IsA "HopperBin"
				and gearSlots[emptySlot].GearReference.Value.Active
			then -- this is an active hopperbin
				gearSlots[emptySlot].GearReference.Value:Disable()
				gearSlots[emptySlot].GearReference.Value.Active = false
			end
		end

		gearSlots[emptySlot] = "empty"

		-- local centerizeX = gear.Size.X.Scale / 2
		-- local centerizeY = gear.Size.Y.Scale / 2
		--[[gear:TweenSizeAndPosition(UDim2.new(0,0,0,0),
			UDim2.new(gear.Position.X.Scale + centerizeX,gear.Position.X.Offset,gear.Position.Y.Scale + centerizeY,gear.Position.Y.Offset),
			Enum.EasingDirection.Out, Enum.EasingStyle.Quad,guiTweenSpeed/4,true)]]
		delay(0, function()
			gear:remove()
		end)

		Spawn(function()
			while backpackIsOpen() do
				wait(0.03)
			end
			waitForChild(player, "Backpack")
			local allEmpty = true
			for i = 1, #gearSlots do
				if gearSlots[i] ~= "empty" then
					allEmpty = false
				end
			end

			if allEmpty then
				if #player.Backpack:GetChildren() < 1 then
					backpackButton.Visible = false
				else
					backpackButton.Position = UDim2.new(0.5, -60, 1, -44)
				end
				clBackground.Visible = false
			end
		end)
	end
end

local function insertGear(gear, addToSlot)
	local pos
	if not addToSlot then
		for i = 1, #gearSlots do
			if gearSlots[i] == "empty" then
				pos = i
				break
			end
		end

		if pos == 1 and gearSlots[1] ~= "empty" then
			gear:remove()
			return
		end -- we are currently full, can't add in
	else
		pos = addToSlot
		-- push all gear down one slot
		local start = 1
		for i = 1, #gearSlots do
			if gearSlots[i] == "empty" then
				start = i
				break
			end
		end
		for i = start, pos + 1, -1 do
			gearSlots[i] = gearSlots[i - 1]
			if i == 10 then
				gearSlots[i].SlotNumber.Text = "0"
				gearSlots[i].SlotNumberDownShadow.Text = "0"
				gearSlots[i].SlotNumberUpShadow.Text = "0"
			else
				gearSlots[i].SlotNumber.Text = i
				gearSlots[i].SlotNumberDownShadow.Text = i
				gearSlots[i].SlotNumberUpShadow.Text = i
			end
		end
	end

	gearSlots[pos] = gear
	if pos ~= maxNumLoadoutItems then
		if type(tostring(pos)) == "string" then
			local posString = tostring(pos)
			gear.SlotNumber.Text = posString
			gear.SlotNumberDownShadow.Text = posString
			gear.SlotNumberUpShadow.Text = posString
		end
	else -- tenth gear doesn't follow mathematical pattern :(
		gear.SlotNumber.Text = "0"
		gear.SlotNumberDownShadow.Text = "0"
		gear.SlotNumberUpShadow.Text = "0"
	end
	gear.Visible = true

	local con
	con = gear.Kill.Changed:connect(function(prop)
		kill(prop, con, gear)
	end)
end

function reorganizeLoadout(gear, inserting, _, addToSlot)
	if inserting then -- add in gear
		insertGear(gear, addToSlot)
	else
		removeGear(gear)
	end
	if gear ~= "empty" then
		gear.ZIndex = 1
	end
end

local function checkToolAncestry(child, parent)
	if
		child:FindFirstChild "RobloxBuildTool" -- don't show mercury build tools
		or not (child:IsA "Tool" or child:IsA "HopperBin")
	then
		return
	end

	for i = 1, #gearSlots do
		if
			gearSlots[i] ~= "empty"
			and gearSlots[i].GearReference.Value == child
		then
			if parent == nil then
				gearSlots[i].Kill.Value = true
				return false
			elseif child.Parent == player.Character then
				gearSlots[i].Selected = true
				return true
			elseif child.Parent == player.Backpack then
				if child:IsA "Tool" or child:IsA "HopperBin" then
					gearSlots[i].Selected = false
				end
				return true
			end

			gearSlots[i].Kill.Value = true
			return false
		end
	end
	return
end

local function removeAllEquippedGear(physGear)
	local stuff = player.Character:GetChildren()
	for i = 1, #stuff do
		if
			(stuff[i]:IsA "Tool" or stuff[i]:IsA "HopperBin")
			and stuff[i] ~= physGear
		then
			if stuff[i]:IsA "Tool" then
				stuff[i].Parent = player.Backpack
			end
			if stuff[i]:IsA "HopperBin" then
				stuff[i]:Disable()
			end
		end
	end
end

local function normaliseButton(button, speed)
	if
		not button
		or button.Size.Y.Scale <= 1
		or button.Selected
		or not button.Parent
	then
		return
	end

	local moveSpeed = speed
	if moveSpeed == nil or type(moveSpeed) ~= "number" then
		moveSpeed = guiTweenSpeed / 5
	end

	if button:FindFirstChild "Highlight" then
		button.Highlight.Visible = false
	end

	if button:IsA "ImageButton" or button:IsA "TextButton" then
		button.ZIndex = 1
		local centerizeX = -(buttonSizeNormal.X.Scale - button.Size.X.Scale) / 2
		local centerizeY = -(buttonSizeNormal.Y.Scale - button.Size.Y.Scale) / 2
		button:TweenSizeAndPosition(
			buttonSizeNormal,
			UDim2.new(
				button.Position.X.Scale + centerizeX,
				button.Position.X.Offset,
				button.Position.Y.Scale + centerizeY,
				button.Position.Y.Offset
			),
			Enum.EasingDirection.Out,
			Enum.EasingStyle.Quad,
			moveSpeed,
			enlargeOverride
		)
	end
end

local function enlargeButton(button)
	if button.Size.Y.Scale > 1 or not button.Parent or not button.Selected then
		return
	end

	for i = 1, #gearSlots do
		if gearSlots[i] == "empty" then
			break
		elseif gearSlots[i] ~= button then
			normaliseButton(gearSlots[i])
		end
	end

	if not enlargeOverride then
		return
	elseif button:FindFirstChild "Highlight" then
		button.Highlight.Visible = true
	end

	if button:IsA "ImageButton" or button:IsA "TextButton" then
		button.ZIndex = 5
		local centerizeX = -(
				buttonSizeEnlarge.X.Scale - button.Size.X.Scale
			) / 2
		local centerizeY = -(
				buttonSizeEnlarge.Y.Scale - button.Size.Y.Scale
			) / 2
		button:TweenSizeAndPosition(
			buttonSizeEnlarge,
			UDim2.new(
				button.Position.X.Scale + centerizeX,
				button.Position.X.Offset,
				button.Position.Y.Scale + centerizeY,
				button.Position.Y.Offset
			),
			Enum.EasingDirection.Out,
			Enum.EasingStyle.Quad,
			guiTweenSpeed / 5,
			enlargeOverride
		)
	end
end

local function hopperBinSwitcher(numKey, physGear)
	if not physGear then
		return
	end

	physGear:ToggleSelect()

	if gearSlots[numKey] == "empty" then
		return
	end

	if not physGear.Active then
		gearSlots[numKey].Selected = false
		normaliseButton(gearSlots[numKey])
	else
		gearSlots[numKey].Selected = true
		enlargeButton(gearSlots[numKey])
	end
end

local function toolSwitcher(numKey)
	if not gearSlots[numKey] then
		return
	end
	local physGear = gearSlots[numKey].GearReference.Value
	if physGear == nil then
		return
	end

	removeAllEquippedGear(physGear) -- we don't remove this gear, as then we get a double switcheroo

	local key = numKey
	if numKey == 0 then
		key = 10
	end

	for i = 1, #gearSlots do
		if gearSlots[i] and gearSlots[i] ~= "empty" and i ~= key then
			normaliseButton(gearSlots[i])
			gearSlots[i].Selected = false
			if
				gearSlots[i].GearReference
				and gearSlots[i].GearReference.Value
				and gearSlots[i].GearReference.Value:IsA "HopperBin"
				and gearSlots[i].GearReference.Value.Active
			then
				gearSlots[i].GearReference.Value:ToggleSelect()
			end
		end
	end

	if physGear:IsA "HopperBin" then
		hopperBinSwitcher(numKey, physGear)
	else
		if physGear.Parent == player.Character then
			physGear.Parent = player.Backpack

			if gearSlots[numKey] ~= "empty" then
				gearSlots[numKey].Selected = false
				normaliseButton(gearSlots[numKey])
			end
		else
			--player.Character.Humanoid:EquipTool(physGear)

			physGear.Parent = player.Character
			gearSlots[numKey].Selected = true

			enlargeButton(gearSlots[numKey])
		end
	end
end

local function activateGear(num)
	local numKey = num == "0" and 10 or tonumber(num)

	if numKey and gearSlots[numKey] ~= "empty" then
		toolSwitcher(numKey)
	end
end

local function pointInRectangle(point, rectTopLeft, rectSize)
	if
		point.x > rectTopLeft.x
		and point.x < (rectTopLeft.x + rectSize.x)
		and point.y > rectTopLeft.y
		and point.y < (rectTopLeft.y + rectSize.y)
	then
		return true
	end
	return false
end

local function swapGear(gearClone, toFrame)
	local toFrameChildren = toFrame:GetChildren()
	if #toFrameChildren == 1 then
		if toFrameChildren[1]:FindFirstChild "SlotNumber" then
			local toSlot = tonumber(toFrameChildren[1].SlotNumber.Text)
			local gearCloneSlot = tonumber(gearClone.SlotNumber.Text)
			if toSlot == 0 then
				toSlot = 10
			end
			if gearCloneSlot == 0 then
				gearCloneSlot = 10
			end

			gearSlots[toSlot] = gearClone
			gearSlots[gearCloneSlot] = toFrameChildren[1]

			toFrameChildren[1].SlotNumber.Text = gearClone.SlotNumber.Text
			toFrameChildren[1].SlotNumberDownShadow.Text =
				gearClone.SlotNumber.Text
			toFrameChildren[1].SlotNumberUpShadow.Text =
				gearClone.SlotNumber.Text

			local subString = string.sub(toFrame.Name, 5)
			gearClone.SlotNumber.Text = subString
			gearClone.SlotNumberDownShadow.Text = subString
			gearClone.SlotNumberUpShadow.Text = subString

			gearClone.Position = UDim2.new(
				gearClone.Position.X.Scale,
				0,
				gearClone.Position.Y.Scale,
				0
			)
			toFrameChildren[1].Position = UDim2.new(
				toFrameChildren[1].Position.X.Scale,
				0,
				toFrameChildren[1].Position.Y.Scale,
				0
			)

			toFrameChildren[1].Parent = gearClone.Parent
			gearClone.Parent = toFrame
		end
	else
		local slotNum = tonumber(gearClone.SlotNumber.Text)
		if slotNum == 0 then
			slotNum = 10
		end
		gearSlots[slotNum] = "empty" -- reset this gear slot

		local subString = string.sub(toFrame.Name, 5)
		gearClone.SlotNumber.Text = subString
		gearClone.SlotNumberDownShadow.Text = subString
		gearClone.SlotNumberUpShadow.Text = subString

		local toSlotNum = tonumber(gearClone.SlotNumber.Text)
		if toSlotNum == 0 then
			toSlotNum = 10
		end
		gearSlots[toSlotNum] = gearClone
		gearClone.Position = UDim2.new(
			gearClone.Position.X.Scale,
			0,
			gearClone.Position.Y.Scale,
			0
		)
		gearClone.Parent = toFrame
	end
end

local function resolveDrag(gearClone, x, y)
	local mousePoint = Vector2.new(x, y)

	local frame = gearClone.Parent
	local frames = frame.Parent:GetChildren()

	for i = 1, #frames do
		if
			frames[i]:IsA "Frame"
			and pointInRectangle(
				mousePoint,
				frames[i].AbsolutePosition,
				frames[i].AbsoluteSize
			)
		then
			swapGear(gearClone, frames[i])
			return true
		end
	end

	if
		(
			x < frame.AbsolutePosition.x
			or x > (frame.AbsolutePosition.x + frame.AbsoluteSize.x)
		)
		or (
			y < frame.AbsolutePosition.y
			or y > (frame.AbsolutePosition.y + frame.AbsoluteSize.y)
		)
	then
		reorganizeLoadout(gearClone, false)
		return false
	end

	if dragBeginPos then
		gearClone.Position = dragBeginPos
	end
	return -1
end

local function unequipAllItems(dontEquipThis)
	for i = 1, #gearSlots do
		if gearSlots[i] == "empty" then
			break
		end
		if
			gearSlots[i].GearReference.Value
			and gearSlots[i].GearReference.Value ~= dontEquipThis
		then
			if gearSlots[i].GearReference.Value:IsA "HopperBin" then
				gearSlots[i].GearReference.Value:Disable()
			elseif gearSlots[i].GearReference.Value:IsA "Tool" then
				gearSlots[i].GearReference.Value.Parent =
					Players.LocalPlayer.Backpack
			end
			gearSlots[i].Selected = false
		end
	end
end

local function showToolTip(button, tip)
	if
		button
		and button:FindFirstChild "ToolTipLabel"
		and button.ToolTipLabel:IsA "TextLabel"
		and not IsTouchDevice()
	then
		button.ToolTipLabel.Text = tostring(tip)
		local xSize = button.ToolTipLabel.TextBounds.X + 6
		button.ToolTipLabel.Size = UDim2.new(0, xSize, 0, 20)
		button.ToolTipLabel.Position = UDim2.new(0.5, -xSize / 2, 0, -30)
		button.ToolTipLabel.Visible = true
	end
end

local function hideToolTip(button, _)
	if
		button
		and button:FindFirstChild "ToolTipLabel"
		and button.ToolTipLabel:IsA "TextLabel"
	then
		button.ToolTipLabel.Visible = false
	end
end

local function removeFromInventory(child)
	for i = 1, #inventory do
		if inventory[i] == child then
			table.remove(inventory, i)
			inventory[i] = nil
		end
	end
end

local function addingPlayerChild(
	child,
	equipped,
	addToSlot,
	inventoryGearButton
)
	while debounce do
		RunService.Heartbeat:wait()
	end
	debounce = true

	if child:FindFirstChild "RobloxBuildTool" then
		debounce = false
		return
	end -- don't show mercury build tools
	if not (child:IsA "Tool" or child:IsA "HopperBin") then
		debounce = false
		return -- we don't care about anything besides tools (sigh...)
	end

	if not addToSlot then
		for i = 1, #gearSlots do
			if
				gearSlots[i] ~= "empty"
				and gearSlots[i].GearReference.Value == child
			then -- we already have gear, do nothing
				debounce = false
				return
			end
		end
	end

	local gearClone = currentLoadout.TempSlot:Clone()
	gearClone.Name = child.Name
	gearClone.GearImage.Image = child.TextureId
	if gearClone.GearImage.Image == "" then
		gearClone.GearText.Text = child.Name
	end
	gearClone.GearReference.Value = child

	gearClone.MouseEnter:connect(function()
		if
			gearClone.GearReference
			and gearClone.GearReference.Value.ToolTip
			and gearClone.GearReference.Value.ToolTip ~= ""
		then
			showToolTip(gearClone, gearClone.GearReference.Value.ToolTip)
		end
	end)

	gearClone.MouseLeave:connect(function()
		if
			gearClone.GearReference
			and gearClone.GearReference.Value.ToolTip
			and gearClone.GearReference.Value.ToolTip ~= ""
		then
			hideToolTip(gearClone, gearClone.GearReference.Value.ToolTip)
		end
	end)

	gearClone.RobloxLocked = true

	local slotToMod = -1

	if not addToSlot then
		for i = 1, #gearSlots do
			if gearSlots[i] == "empty" then
				slotToMod = i
				break
			end
		end
	else
		slotToMod = addToSlot
	end

	if slotToMod == -1 then -- No available slot to add in!
		debounce = false
		return
	end

	local slotNum = slotToMod % 10
	local parent = currentLoadout:FindFirstChild("Slot" .. slotNum)
	gearClone.Parent = parent

	if inventoryGearButton then
		local absolutePositionFinal = inventoryGearButton.AbsolutePosition
		local currentAbsolutePosition = gearClone.AbsolutePosition
		local diff = absolutePositionFinal - currentAbsolutePosition
		gearClone.Position = UDim2.new(
			gearClone.Position.X.Scale,
			diff.x,
			gearClone.Position.Y.Scale,
			diff.y
		)
		gearClone.ZIndex = 4
	end

	if addToSlot then
		reorganizeLoadout(gearClone, true, equipped, addToSlot)
	else
		reorganizeLoadout(gearClone, true)
	end

	if gearClone.Parent == nil then
		debounce = false
		return -- couldn't fit in (hopper is full!)
	elseif equipped then
		gearClone.Selected = true
		unequipAllItems(child)
		delay(
			guiTweenSpeed + 0.01,
			function() -- if our gear is equipped, we will want to enlarge it when done moving
				if
					gearClone:FindFirstChild "GearReference"
					and (
						(
							gearClone.GearReference.Value:IsA "Tool"
							and gearClone.GearReference.Value.Parent
								== player.Character
						)
						or (
							gearClone.GearReference.Value:IsA "HopperBin"
							and gearClone.GearReference.Value.Active == true
						)
					)
				then
					enlargeButton(gearClone)
				end
			end
		)
	end

	local clickCon, buttonDeleteCon, mouseEnterCon, mouseLeaveCon, dragStop, dragBegin
	clickCon = gearClone.MouseButton1Click:connect(function()
		if characterInWorkspace() and not gearClone.Draggable then
			activateGear(gearClone.SlotNumber.Text)
		end
	end)
	mouseEnterCon = gearClone.MouseEnter:connect(function()
		if guiBackpack.Visible then
			gearClone.Draggable = true
		end
	end)
	dragBegin = gearClone.DragBegin:connect(function(pos)
		dragBeginPos = pos
		gearClone.ZIndex = 7
		local children = gearClone:GetChildren()
		for i = 1, #children do
			if children[i]:IsA "TextLabel" then
				children[i].ZIndex = string.find(children[i].Name, "Shadow")
						and 8
					or 9
			elseif children[i]:IsA "Frame" or children[i]:IsA "ImageLabel" then
				children[i].ZIndex = 7
			end
		end
	end)
	dragStop = gearClone.DragStopped:connect(function(x, y)
		gearClone.ZIndex = gearClone.Selected and 4 or 3

		local children = gearClone:GetChildren()
		for i = 1, #children do
			if children[i]:IsA "TextLabel" then
				children[i].ZIndex = string.find(children[i].Name, "Shadow")
						and 3
					or 4
			elseif children[i]:IsA "Frame" or children[i]:IsA "ImageLabel" then
				children[i].ZIndex = 2
			end
		end
		resolveDrag(gearClone, x, y)
	end)
	mouseLeaveCon = gearClone.MouseLeave:connect(function()
		gearClone.Draggable = false
	end)
	buttonDeleteCon = gearClone.AncestryChanged:connect(function()
		if gearClone.Parent and gearClone.Parent.Parent == currentLoadout then
			return
		elseif clickCon then
			clickCon:disconnect()
		end
		if buttonDeleteCon then
			buttonDeleteCon:disconnect()
		end
		if mouseEnterCon then
			mouseEnterCon:disconnect()
		end
		if mouseLeaveCon then
			mouseLeaveCon:disconnect()
		end
		if dragStop then
			dragStop:disconnect()
		end
		if dragBegin then
			dragBegin:disconnect()
		end
	end) -- this probably isn't necessary since objects are being deleted (probably), but this might still leak just in case

	local childCon
	local childChangeCon
	childCon = child.AncestryChanged:connect(function(newChild, newParent)
		if not checkToolAncestry(newChild, newParent) then
			if childCon then
				childCon:disconnect()
			end
			if childChangeCon then
				childChangeCon:disconnect()
			end
			removeFromInventory(child)
		elseif newParent == Players.LocalPlayer.Backpack then
			normaliseButton(gearClone)
		end
	end)

	childChangeCon = child.Changed:connect(function(prop)
		if prop == "Name" and gearClone and gearClone.GearImage.Image == "" then
			gearClone.GearText.Text = child.Name
		elseif prop == "Active" then
			if child and child:IsA "HopperBin" and not child.Active then
				gearClone.Selected = false
				normaliseButton(gearClone)
			end
		elseif prop == "TextureId" then
			gearClone.GearImage.Image = child.TextureId
		end
	end)

	debounce = false

	Spawn(function()
		while backpackIsOpen() do
			wait()
		end
		for i = 1, #gearSlots do
			if gearSlots[i] ~= "empty" then
				backpackButton.Position = UDim2.new(0.5, -60, 1, -108)
				if backpackEnabled then
					backpackButton.Visible = true
					clBackground.Visible = true
				end
			end
		end
	end)
end

local function addToInventory(child)
	if not child:IsA "Tool" or not child:IsA "HopperBin" then
		return
	end

	local slot
	for i = 1, #inventory do
		if inventory[i] and inventory[i] == child then
			return
		elseif not inventory[i] then
			slot = i
		end
	end

	if slot then
		inventory[slot] = child
	elseif #inventory < 1 then
		inventory[1] = child
	else
		inventory[#inventory + 1] = child
	end
end

local function spreadOutGear()
	local loadoutChildren = currentLoadout:GetChildren()

	for i = 1, #loadoutChildren do
		if loadoutChildren[i]:IsA "Frame" then
			loadoutChildren[i].BackgroundTransparency = 0.5
			local slot = tonumber(string.sub(loadoutChildren[i].Name, 5))
			if slot == 0 then
				slot = 10
			end
			loadoutChildren[i]:TweenPosition(
				UDim2.new((slot - 1) / 10, 0, 0, 0),
				Enum.EasingDirection.Out,
				Enum.EasingStyle.Quad,
				0.25,
				true
			)
		end
	end
end

local function centerGear()
	local loadoutChildren = currentLoadout:GetChildren()
	local gearButtons = {}
	local lastSlotAdd

	for i = 1, #loadoutChildren do
		if loadoutChildren[i]:IsA "Frame" then
			if #loadoutChildren[i]:GetChildren() > 0 then
				if loadoutChildren[i].Name == "Slot0" then
					lastSlotAdd = loadoutChildren[i]
				else
					table.insert(gearButtons, loadoutChildren[i])
				end
			end
			loadoutChildren[i].BackgroundTransparency = 1
		end
	end
	if lastSlotAdd then
		table.insert(gearButtons, lastSlotAdd)
	end

	local startPos = (1 - (#gearButtons * 0.1)) / 2
	for i = 1, #gearButtons do
		gearButtons[i]:TweenPosition(
			UDim2.new(startPos + ((i - 1) * 0.1), 0, 0, 0),
			Enum.EasingDirection.Out,
			Enum.EasingStyle.Quad,
			0.25,
			true
		)
	end
end

local function editLoadout()
	if inGearTab then
		spreadOutGear()
	end
end

local function readonlyLoadout()
	if not inGearTab then
		centerGear()
	end
end

local function setupBackpackListener()
	if backpackChildCon then
		backpackChildCon:disconnect()
		backpackChildCon = nil
	end
	backpackChildCon = player.Backpack.ChildAdded:connect(function(child)
		if not firstInstanceOfLoadout then
			firstInstanceOfLoadout = true
			if backpackEnabled then
				backpackButton.Visible = true
				clBackground.Visible = true
			end
		end
		addingPlayerChild(child)
		addToInventory(child)
	end)
end

local function playerCharacterChildAdded(child)
	addingPlayerChild(child, true)
	addToInventory(child)
end

local function activateLoadout()
	currentLoadout.Visible = true
end

local function deactivateLoadout()
	currentLoadout.Visible = false
end

local function tabHandler(inFocus)
	inGearTab = inFocus
	if inFocus then
		editLoadout()
	else
		readonlyLoadout()
	end
end

local function coreGuiChanged(coreGuiType, enabled)
	if
		coreGuiType == Enum.CoreGuiType.Backpack
		or coreGuiType == Enum.CoreGuiType.All
	then
		backpackButton.Visible = enabled
		clBackground.Visible = enabled
		backpackEnabled = enabled

		if enabled then
			registerNumberKeys()
		else
			unregisterNumberKeys()
		end
	end

	if
		coreGuiType == Enum.CoreGuiType.Health
		or coreGuiType == Enum.CoreGuiType.All
	then
		setHealthBarVisible(Players.LocalPlayer.PlayerGui, enabled)
	end
end
-- End Functions

-- Begin Script
registerNumberKeys()

pcall(function()
	coreGuiChanged(
		Enum.CoreGuiType.Backpack,
		StarterGui:GetCoreGuiEnabled(Enum.CoreGuiType.Backpack)
	)
	coreGuiChanged(
		Enum.CoreGuiType.Health,
		StarterGui:GetCoreGuiEnabled(Enum.CoreGuiType.Health)
	)
	StarterGui.CoreGuiChangedSignal:connect(coreGuiChanged)
end)

RunService.Heartbeat:wait() -- let stuff initialize incase this is first heartbeat...

waitForChild(player, "Backpack")
waitForProperty(player, "Character")

-- not sure why this had no delay but the player.CharacterAdded one had one... this type of error would be easier to avoid with function reusage
delay(1, function()
	local backpackChildren = player.Backpack:GetChildren()
	local size = math.min(10, #backpackChildren)
	for i = 1, size do
		if backpackEnabled then
			backpackButton.Visible = true
			clBackground.Visible = true
		end
		addingPlayerChild(backpackChildren[i], false)
	end
	setupBackpackListener()
end)

player.ChildAdded:connect(function(child)
	if child:IsA "PlayerGui" then
		moveHealthBar(child)
	end
end)

waitForProperty(player, "Character")
for _, v in ipairs(player.Character:GetChildren()) do
	playerCharacterChildAdded(v)
end
characterChildAddedCon = player.Character.ChildAdded:connect(function(child)
	playerCharacterChildAdded(child)
end)

waitForChild(player.Character, "Humanoid")
local humanoidDiedCon
humanoidDiedCon = player.Character.Humanoid.Died:connect(function()
	if humanoidDiedCon then
		humanoidDiedCon:disconnect()
		humanoidDiedCon = nil
	end
	deactivateLoadout()
	if backpackChildCon then
		backpackChildCon:disconnect()
		backpackChildCon = nil
	end
end)

player.CharacterRemoving:connect(function()
	for i = 1, #gearSlots do
		if gearSlots[i] ~= "empty" then
			gearSlots[i].Parent = nil
			gearSlots[i] = "empty"
		end
	end
end)

player.CharacterAdded:connect(function()
	waitForProperty(Players, "LocalPlayer")
	player = Players.LocalPlayer -- make sure we are still looking at the correct character
	waitForChild(player, "Backpack")

	delay(1, function()
		local backpackChildren = player.Backpack:GetChildren()
		local size = math.min(10, #backpackChildren)
		for i = 1, size do
			if backpackEnabled then
				backpackButton.Visible = true
				clBackground.Visible = true
			end
			addingPlayerChild(backpackChildren[i], false)
		end
		setupBackpackListener()
	end)

	activateLoadout()

	if characterChildAddedCon then
		characterChildAddedCon:disconnect()
		characterChildAddedCon = nil
	end

	characterChildAddedCon = player.Character.ChildAdded:connect(function(child)
		addingPlayerChild(child, true)
	end)

	waitForChild(player.Character, "Humanoid")
	if backpack.Visible then
		backpackOpenEvent:Fire()
	end
	humanoidDiedCon = player.Character.Humanoid.Died:connect(function()
		if backpackEnabled then
			backpackButton.Visible = false
			clBackground.Visible = false
		end
		firstInstanceOfLoadout = false
		deactivateLoadout()

		if humanoidDiedCon then
			humanoidDiedCon:disconnect()
			humanoidDiedCon = nil
		end
		if backpackChildCon then
			backpackChildCon:disconnect()
			backpackChildCon = nil
		end
	end)
	waitForChild(player, "PlayerGui")
	moveHealthBar(player.PlayerGui)
end)

waitForChild(guiBackpack, "SwapSlot")
guiBackpack.SwapSlot.Changed:connect(function()
	if guiBackpack.SwapSlot.Value then
		local swapSlot = guiBackpack.SwapSlot
		local pos = swapSlot.Slot.Value
		if pos == 0 then
			pos = 10
		end
		if gearSlots[pos] then
			reorganizeLoadout(gearSlots[pos], false)
		end
		if swapSlot.GearButton.Value then
			addingPlayerChild(
				swapSlot.GearButton.Value.GearReference.Value,
				false,
				pos
			)
		end
		guiBackpack.SwapSlot.Value = false
	end
end)

GuiService.KeyPressed:connect(function(key)
	if characterInWorkspace() then
		activateGear(key)
	end
end)

backpackOpenEvent.Event:connect(editLoadout)
backpackCloseEvent.Event:connect(centerGear)
tabClickedEvent.Event:connect(function(tabName)
	tabHandler(tabName == StaticTabName)
end)