local chf = workspace:WaitForChild("ChestFolder")

local sg = Instance.new("ScreenGui")
sg.Parent = game.Players.LocalPlayer:WaitForChild("PlayerGui")
local tx = Instance.new("TextLabel")
tx.Size = UDim2.new(1, 0, 0, 50)
tx.Position = UDim2.new(0, 0, 0.45, 0)
tx.BackgroundTransparency = 1
tx.Text = "script By @DRR_R2, on TG & YT & DISCORD"
tx.TextScaled = true
tx.Font = Enum.Font.GothamBold
tx.Parent = sg

task.spawn(function()
	local t = 0
	while t < 5 do
		tx.TextColor3 = Color3.fromHSV((tick() % 5) / 5, 1, 1)
		task.wait(0.5)
		t = t + 0.5
	end
	sg:Destroy()
end)

local function ck()
	for _, c in pairs(chf:GetChildren()) do
		local st = c:FindFirstChild("Opened")
		local p = nil
		for _, d in pairs(c:GetDescendants()) do
			if d:IsA("BasePart") then
				p = d
				break
			end
		end
		if st and p then
			local g = p:FindFirstChild("BillboardGui")
			if not st.Value then
				p.Color = Color3.new(1,0,0)
				p.Material = Enum.Material.Neon
				p.CanCollide = false
				if not g then
					local b = Instance.new("BillboardGui")
					b.Size = UDim2.new(0,100,0,30)
					b.AlwaysOnTop = true
					b.Parent = p
					local t = Instance.new("TextLabel")
					t.Size = UDim2.new(1,0,1,0)
					t.BackgroundTransparency = 1
					t.TextColor3 = Color3.new(1,0,0)
					t.Text = "chest"
					t.TextScaled = true
					t.Font = Enum.Font.GothamBold
					t.Parent = b
					task.spawn(function()
						while t and t.Parent do
							t.TextColor3 = Color3.fromHSV((tick() % 5) / 5, 1, 1)
							task.wait(0.1)
						end
					end)
				end
			else
				if g then g:Destroy() end
				p.Color = Color3.new(1,1,1)
				p.Material = Enum.Material.SmoothPlastic
			end
		end
	end
end

task.spawn(function()
	while true do
		ck()
		task.wait(1)
	end
end)