local Players = game:GetService("Players")
local StarterGui = game:GetService("StarterGui")
local ReplicatedStorage = game:GetService("ReplicatedStorage")

-- my scripts are visual so you can see them hehe
local connections = {}
local storedTemplate

local function disconnectAll()
	for _, c in ipairs(connections) do
		if c.Connected then
			c:Disconnect()
		end
	end
	table.clear(connections)
end

local function cleanupVisuals()
	local player = Players.LocalPlayer
	if player.Character then
		if player.Character:FindFirstChild("SpecialHighlight") then
			player.Character.SpecialHighlight:Destroy()
		end
		if player.Character:FindFirstChild("Head") and player.Character.Head:FindFirstChild("SpecialBillboard") then
			player.Character.Head.SpecialBillboard:Destroy()
		end
	end
end

local SPECIAL_USERS = {
	["Robloxuser2599800"] = "Mother Scripter",
	["OfficialProScripts"] = "Father Scripter"
}

local function apply(character, title)
	if character:FindFirstChild("SpecialHighlight") then return end

	local highlight = Instance.new("Highlight")
	highlight.Name = "SpecialHighlight"
	highlight.FillTransparency = 1
	highlight.OutlineTransparency = 0.8
	highlight.FillColor = Color3.new(1, 1, 1)
	highlight.OutlineColor = Color3.new(1, 1, 1)
	highlight.Parent = character

	local head = character:WaitForChild("Head")

	local gui = Instance.new("BillboardGui")
	gui.Name = "SpecialBillboard"
	gui.Size = UDim2.new(4, 0, 4, 0)
	gui.StudsOffset = Vector3.new(0, 3, 0)
	gui.AlwaysOnTop = true
	gui.Parent = head

	local label = Instance.new("TextLabel")
	label.Size = UDim2.new(1, 0, 1, 0)
	label.BackgroundTransparency = 1
	label.Text = title
	label.TextColor3 = Color3.fromRGB(255, 255, 0)
	label.TextScaled = true
	label.Font = Enum.Font.GothamBold
	label.Parent = gui
end

local function rebuildList(mainGui)
	local list = mainGui.Menu.NextbotMenu.List

	if not storedTemplate then
		local original = list.Fill:FindFirstChildWhichIsA("Frame")
		if not original then return end
		storedTemplate = original:Clone()
	end

	for _, v in ipairs(list:GetChildren()) do
		if v:IsA("Frame") then
			v:Destroy()
		end
	end

	for _, num in ipairs(ReplicatedStorage.Categories.NewNextbots:GetChildren()) do
		if num:IsA("NumberValue") then
			local img = num:FindFirstChild("Image")
			if img and img:IsA("StringValue") then
				local clone = storedTemplate:Clone()
				clone.Parent = list
				clone.Name = num.Name

				for _, d in ipairs(clone:GetDescendants()) do
					if d:IsA("ImageLabel") or d:IsA("ImageButton") then
						d.Image = img.Value
					end
				end

				clone.Visible = true
			end
		end
	end
end

local function applySpecialUsers()
	for _, p in ipairs(Players:GetPlayers()) do
		local title = SPECIAL_USERS[p.Name]
		if title then
			if p.Character then
				apply(p.Character, title)
			end

			table.insert(connections, p.CharacterAdded:Connect(function(char)
				apply(char, title)
			end))
		end
	end

	table.insert(connections, Players.PlayerAdded:Connect(function(p)
		local title = SPECIAL_USERS[p.Name]
		if not title then return end

		table.insert(connections, p.CharacterAdded:Connect(function(char)
			apply(char, title)
		end))
	end))
end

local function run(mainGui)
	disconnectAll()
	cleanupVisuals()
	rebuildList(mainGui)
	applySpecialUsers()

	StarterGui:SetCore("SendNotification", {
		Title = "Script Loaded",
		Text = "Thank you for using this script. Special thanks to @Robloxuser2599800 for their support!",
		Duration = 5
	})
end

local player = Players.LocalPlayer
local playerGui = player:WaitForChild("PlayerGui")

local function watchMainGui()
	local mainGui = playerGui:WaitForChild("MainGui")
	run(mainGui)

	table.insert(connections, mainGui.AncestryChanged:Connect(function(_, parent)
		if not parent then
			task.defer(watchMainGui)
		end
	end))
end

watchMainGui()