Cheating Light

About this script

= = HOTEL ONLY!!! = = fan made architec i made (cheating light / green light) basically like moon light but actually useful • it highlights the correct doors green (so no dupes) • highlights keys, chests, books, switches, fuses (for the end), snares, figure btw no it isn't like the other cheats that create 500 lines on your screen (those sucks) plus this isn't ment to be a "over powered cheat" just something to help you out there are alot of overpowered cheats already no UI btw just go play the game normally and ill run in the background you would notice it + open source also

local Player = game:GetService("Players").LocalPlayer
local Rooms = workspace:WaitForChild("CurrentRooms")

--// feel free to add your own stuff to the item list just: ClassName#Name (and remember to separate vai "," to separate each item)
local ItemList = "Model#KeyObtain, Model#LiveHintBook, Model#LeverForGate, Model#ChestBox, Model#LiveBreakerPolePickup, Model#FigureRig, Model#Snare"
local CheatingLightColor = Color3.new(0, 255, 0)
local LightDirection = Enum.NormalId.Back

local RbxCreate, tinsert, tclear, tostr = Instance.new, table.insert, table.clear, tostring
local ActiveHints = {}

local function CreateHint(Parent, HintType)
	if HintType == "Hint" then
		local Highlight = RbxCreate("Highlight", Parent)
		Highlight.FillTransparency = 1
		Highlight.OutlineColor = CheatingLightColor
		
		tinsert(ActiveHints, Highlight)
		
	elseif HintType == "Light" then
		local Bulb = RbxCreate("SpotLight", Parent)
		Bulb.Color = CheatingLightColor
		Bulb.Face = LightDirection
		Bulb.Brightness = 5
		
		tinsert(ActiveHints, Bulb)
	end
end

Player:GetAttributeChangedSignal("CurrentRoom"):Connect(function()
	local RoomID = Player:GetAttribute("CurrentRoom")
	
	for _, hint in ActiveHints do
		if hint and hint.Parent then
			hint:Destroy()
		end
	end
	
	tclear(ActiveHints)
	
	local CurrentRoom = Rooms:FindFirstChild(tostr(RoomID))
	if not CurrentRoom then return end
	
	local Door = CurrentRoom:FindFirstChild("Door")
	if Door then
		CreateHint(Door.Door, "Light")
	end
	
	for _, Object in CurrentRoom:QueryDescendants(ItemList) do
		CreateHint(Object, "Hint")
	end
end)