local _c=string.char
local function _s(t)local r="";for i=1,#t do r=r.._c(t[i])end;return r end
local _g=game
local _p=_g:GetService(_s{80,108,97,121,101,114,115})
local _lp=_p[_s{76,111,99,97,108,80,108,97,121,101,114}]
local _w=workspace

local function _x()
	if _lp[_s{67,104,97,114,97,99,116,101,114}] then
		local _pf=_w:FindFirstChild(_s{80,108,97,121,101,114,115})
		local _m=_pf and _pf:FindFirstChild(_lp[_s{78,97,109,101}])
		if _m then
			local _a=_m:GetAttribute(_s{83,116,97,116,101})
			if _a==_s{102,111,99,117,115} then
				_m:SetAttribute(_s{83,116,97,116,101},_s{112,117,110,99,104})
				_m:SetAttribute(_s{67,97,110,83,112,114,105,110,116},true)
			end
		end
	end
end

while true do
	_x()
	task.wait(1)
end