--Script made by Rufus14
--owner = game.Players[script.Parent.Name]
script.Parent = game.ServerScriptService
cannotify = true
function message(msg)
	if cannotify then
		cannotify = false
		local messagesound = Instance.new("Sound", workspace)
		messagesound.SoundId = "rbxassetid://651986414"
		messagesound.Volume = 5.999
		messagesound:Play()
		game.Debris:AddItem(messagesound, messagesound.TimeLength)
		if owner.Character then
			if owner.Character:findFirstChild("HumanoidRootPart") then
				local pos1 = math.random(-5,5)
				local pos2 = math.random(-5,5)
				local model = Instance.new("Model", owner.Character)
				model.Name = [[(Anti-Skid v4)
				]]..msg
				local human0 = Instance.new("Humanoid", model)
				human0.Name = "MessageHuman0id"
				human0.MaxHealth = 0
				human0.Health = 0
				local part = Instance.new("Part", model)
				part.Size = Vector3.new(0,0,0)
				part.BrickColor = BrickColor.Random()
				part.Material = "ForceField"
				part:BreakJoints()
				part.CanCollide = false
				part.CFrame = owner.Character.HumanoidRootPart.CFrame
				part.Name = "Head"
				local bodyposition = Instance.new("BodyPosition", part)
				bodyposition.MaxForce = Vector3.new(math.huge,math.huge,math.huge)
				bodyposition.Position = owner.Character.HumanoidRootPart.Position
				local function spinandpos()
					while wait() do
						if owner.Character:findFirstChild("HumanoidRootPart") then
							bodyposition.Position = owner.Character:findFirstChild("HumanoidRootPart").Position + Vector3.new(pos1,0,pos2)
						end
						part.CFrame = part.CFrame * CFrame.fromEulerAnglesXYZ(0.02,0.02,0.02)
					end
				end
				local function resize()
					while wait() and part.Size.x < 1.5 do
						part.Size = part.Size + Vector3.new(0.05,0.05,0.05)
					end
					wait(4)
					for i = 1,30 do
						part.Size = part.Size + Vector3.new(0.05,0.05,0.05)
						part.Transparency = part.Transparency + 0.015
						wait()
					end
					model:destroy()
				end
				local function let()
					wait(0.5)
					cannotify = true
				end
				spawn(let)
				spawn(spinandpos)
				spawn(resize)
			end
		end
	end
end
function punishplayer(character)
	if not character:findFirstChild("pwned") then
		Instance.new("BoolValue", character).Name = "pwned"
		local punishrandom = math.random(1,4)
		for i,v in pairs(character:GetChildren()) do
			if v.ClassName == "Sound" then
				v:destroy()
			end
			for q,w in pairs(v:GetChildren()) do
				if w.ClassName == "Sound" and w.Name ~= "JevilTheme" then
					w:destroy()
				end
			end
		end
		if punishrandom == 1 then
			for i = 1,20 do
				for q,w in pairs(character:GetChildren()) do
					if w.ClassName == "Part" then
						w.Transparency = w.Transparency + 0.05
					end
					if w.ClassName == "Accessory" then
						if w:findFirstChild("Handle") then
							w.Handle.Transparency = w.Handle.Transparency + 0.05
						end
					end
					if w.Name == "Head" then
						if w:findFirstChildOfClass("Decal") then
							w:findFirstChildOfClass("Decal").Transparency = w:findFirstChildOfClass("Decal").Transparency + 0.05
						end
					end
				end
				wait()
			end
			for q,w in pairs(character:GetChildren()) do
				if w.ClassName == "Part" or w.ClassName == "Accessory" then
					w:destroy()
				end
			end
		elseif punishrandom == 2 then
			character:findFirstChildOfClass("Humanoid").WalkSpeed = 0
			character:findFirstChildOfClass("Humanoid").JumpPower = 0
			local function addweld()
				if character:findFirstChild("Torso") then
					local heead = Instance.new("Weld", character.Torso)
					heead.Part0 = character.Torso
					heead.Part1 = character.Head
					heead.C0 = CFrame.new(0,1.5,0)
					heead.Name = "HeadWeld"
					wait(0.7)
					for i = 0,1 , 0.08 do
						heead.C0 = heead.C0:lerp(CFrame.new(0,1.5,0.4) * CFrame.fromEulerAnglesXYZ(1.2,0,0),i)
						wait()
					end
					wait(0.7)
					while wait() do
						heead.C0 = heead.C0 * CFrame.fromEulerAnglesXYZ(0.5,0.5,0.5)
					end
				elseif character:findFirstChild("UpperTorso") then
					local heead = Instance.new("Weld", character.UpperTorso)
					heead.Part0 = character.UpperTorso
					heead.Part1 = character.Head
					heead.C0 = CFrame.new(0,1.5,0)
					heead.Name = "HeadWeld"
					wait(0.7)
					for i = 0,1 , 0.08 do
						heead.C0 = heead.C0:lerp(CFrame.new(0,1.5,0.4) * CFrame.fromEulerAnglesXYZ(1.2,0,0),i)
						wait()
					end
					wait(0.7)
					while wait() do
						heead.C0 = heead.C0 * CFrame.fromEulerAnglesXYZ(0.5,0.5,0.5)
					end
				end
			end
			spawn(addweld)
			local banhamma = Instance.new("Part", character)
			banhamma.Size = Vector3.new(3, 10, 2)
			banhamma:BreakJoints()
			banhamma.CFrame = character.Head.CFrame * CFrame.new(0,20,0) * CFrame.fromEulerAnglesXYZ(math.pi/2,0,1)
			banhamma.Name = "ban"
			banhamma.Transparency = 1
			banhamma.Anchored = true
			local mesh = Instance.new("SpecialMesh", banhamma)
			mesh.MeshId = "http://www.roblox.com/asset/?id=10604848"
			mesh.TextureId = "http://www.roblox.com/asset/?id=10605252"
			local special = Instance.new("Sound", banhamma)
			special.SoundId = "rbxassetid://427090157"
			special.Volume = 2
			special:Play()--star glitcher
					if v.Character:findFirstChild("Head") then
						if v.Character.Head:findFirstChild("ModeName") then
							if v.Character.Head:findFirstChild("ModeName"):findFirstChildOfClass("TextLabel") then
								v.Character.Head:findFirstChild("ModeName"):findFirstChildOfClass("TextLabel").Text = "nah get out star skid"
								punishplayer(v.Character)
								message(v.Name.." has used Star Glitcher.")
							end
						end
					end
					if v.Character:findFirstChildOfClass("Sound") then
						if v.Character:findFirstChildOfClass("Sound").SoundId == "rbxassetid://614032233" or v.Character:findFirstChildOfClass("Sound").SoundId == "rbxassetid://415898123" or v.Character:findFirstChildOfClass("Sound").Name == "wrecked" then
							punishplayer(v.Character)
							message(v.Name.." has used Star Glitcher.")
						end
					end
			for i = 1,20 do
				banhamma.Transparency = banhamma.Transparency - 0.05
				wait()
			end
			local hammertime = Instance.new("Sound", banhamma)
			hammertime.SoundId = "rbxassetid://176192087"
			hammertime.Volume = 3
			hammertime:Play()
			wait(1)
			if character:findFirstChild("Head") then
				local scream = Instance.new("Sound", character.Head)
				scream.SoundId = "rbxassetid://176238381"
				scream.Volume = 2
				scream:Play()
				banhamma.Anchored = false
				local angularvel = Instance.new("BodyAngularVelocity", banhamma)
				angularvel.MaxTorque = Vector3.new(math.huge,math.huge,math.huge)
				angularvel.AngularVelocity = banhamma.CFrame.rightVector * 20
				local touchedban = false
				local function touched(part)
					if part.Name == "Head" and part.Parent == character then
						touchedban = true
						local aaaaaaaa = Instance.new("Sound", banhamma)
						aaaaaaaa.SoundId = "rbxassetid://147722910"
						aaaaaaaa.Volume = 2
						aaaaaaaa:Play()
						angularvel:Destroy()
						banhamma.CanCollide = true
						for i,v in pairs(character:GetChildren()) do
							if v.ClassName == "Part" and v.Name ~= "ban" or v.ClassName == "Accessory" then
								v:destroy()
							end
						end
					end
				end
				banhamma.Touched:connect(touched)
				wait(2)
				if not touchedban and character:findFirstChild("Head") then
					banhamma.CFrame = character:findFirstChild("Head").CFrame
				end
			end
		elseif punishrandom == 3 then
			character:BreakJoints()
			character:findFirstChildOfClass("Humanoid").Health = 0
			local explo = Instance.new("Explosion", character)
			explo.Position = character.Head.Position
			explo.BlastPressure = 0
			local boom = Instance.new("Sound", character.Head)
			boom.SoundId = "rbxassetid://262562442"
			boom.Volume = 3
			boom:Play()
			for i,v in pairs(character:GetChildren()) do
				if v.ClassName == "Part" or v.ClassName == "MeshPart" then
					local velocity = Instance.new("BodyVelocity", v)
					velocity.MaxForce = Vector3.new(math.huge,math.huge,math.huge)
					velocity.Velocity = Vector3.new(math.random(-60,60),math.random(-60,60),math.random(-60,60))
					game.Debris:AddItem(velocity, 0.5)
				end
			end
			wait(2)
			if character:findFirstChild("Head") then
				character:findFirstChild("Head"):destroy()
			end
		elseif punishrandom == 4 then
			character.Head:destroy()
			if character:findFirstChild("HumanoidRootPart") then
				local boom = Instance.new("Sound", character.HumanoidRootPart)
				boom.SoundId = "rbxassetid://775395533"
				boom.Volume = 1.5
				boom:Play()
			end
		end
	end
end
function scan()
	while wait() do
		for i,w in pairs(workspace:GetChildren()) do
			if w.ClassName == "Sound" and w.Name ~= "Sound" and not w:findFirstChild("muted") then
				if w.Volume >= 6 then
					Instance.new("BoolValue", w).Name = "muted"
					local function lolriplmao()
						while game:GetService("RunService").Heartbeat:wait() do
							w.Volume = 1
						end
					end
					spawn(lolriplmao)
					message("Detected loud audio coming from workspace")
				end
			end
		end
		for i,v in pairs(game:GetService("Players"):GetChildren()) do
			if v.ClassName == "Sound" then
				v:destroy()
			end
			if v.Character then
				for q,w in pairs(v.Character:GetChildren()) do
					if w.ClassName == "Sound" and not w:findFirstChild("muted") then
						if w.Volume >= 6 then
							Instance.new("BoolValue", w).Name = "muted"
							local function lolriplmao()
								while game:GetService("RunService").Heartbeat:wait() do
									w.Volume = 1
								end
							end
							spawn(lolriplmao)
							message("Detected loud audio coming from ".. v.Name)
						end
					end
					for e,r in pairs(w:GetChildren()) do
						if r.ClassName == "Sound" and not r:findFirstChild("muted") then
							if r.Volume >= 6 then
								Instance.new("BoolValue", r).Name = "muted"
								local function lolriplmao()
									while game:GetService("RunService").Heartbeat:wait() do
										r.Volume = 1
									end
								end
								spawn(lolriplmao)
								message("Detected loud audio coming from ".. v.Name)
							end
						end
					end
				end
				if not v.Character:findFirstChild("pwned") then
					--ultra instict 2019
					if v.Character:findFirstChild("Hair") then
						if v.Character.Hair:findFirstChild("Mesh") then
							if v.Character.Hair.Mesh.MeshId == "rbxassetid://455100513" then
								local function uncol()
									while game:GetService("RunService").Heartbeat:wait() do
										v.Character.Hair.CanCollide = false
									end
								end
								spawn(uncol)
								for q,w in pairs(v.Character:GetChildren()) do
									if w.Name == "NewPart" then
										w.CanCollide = false
									end
								end
								punishplayer(v.Character)
								message(v.Name.." has used Ultra Instict.")
							end
						end
					end
					--nahid Chara
					if v.Character:findFirstChild("Blob") then
						if v.Character:findFirstChild("Name") then
							if v.Character:findFirstChild("Name"):findFirstChild("TextLabel") then
								v.Character:findFirstChild("Name").TextLabel.Text = "lol skid"
								punishplayer(v.Character)
								message(v.Name.." has used nahid Chara/Jevil.")
							end
						end
					end
--chain magician
					if v.Character:findFirstChild("Torso") then
						if v.Character.Torso:findFirstChild("Sound") then
							if v.Character.Torso:findFirstChild("Sound").SoundId == "rbxassetid://597442173" then
								punishplayer(v.Character)
								message(v.Name.." has used Chain Magician")
							end
						end
					end
					--star glitcher
					if v.Character:findFirstChild("Torso") then
						if v.Character.Head:findFirstChild("ModeName") then
							if v.Character.Head:findFirstChild("ModeName"):findFirstChildOfClass("TextLabel") then
								v.Character.Head:findFirstChild("ModeName"):findFirstChildOfClass("TextLabel").Text = "nah get out star skid"
								punishplayer(v.Character)
								message(v.Name.." has used Star Glitcher.")
							end
						end
					end
					if v.Character:findFirstChildOfClass("Sound") then
						if v.Character:findFirstChildOfClass("Sound").SoundId == "rbxassetid://614032233" or v.Character:findFirstChildOfClass("Sound").SoundId == "rbxassetid://415898123" or v.Character:findFirstChildOfClass("Sound").Name == "wrecked" then
							punishplayer(v.Character)
							message(v.Name.." has used Star Glitcher.")
						end
					end
					--big ban theory
					if v.Character:findFirstChild("Hammer") then
						v.Character:findFirstChild("Hammer"):destroy()
						punishplayer(v.Character)
						message(v.Name.." probably used Big Ban Theory.")
					end
					--dual doom
					if v.Character:findFirstChild("Dual Doom") then
						v.Character:findFirstChild("Dual Doom"):destroy()
						if v.Character:findFirstChild("Dual Doom") then
							v.Character:findFirstChild("Dual Doom"):destroy()
						end
						punishplayer(v.Character)
						message(v.Name.." used Dual Doom.")
					end
					--jevil (im so sorry mrfunnylaughs)
					if v.Character:findFirstChild("Torso") then
						if v.Character.Torso:findFirstChild("JevilTheme") then
							v.Character.Torso:findFirstChild("JevilTheme").SoundId = "rbxassetid://1953695670"
							v.Character.Torso:findFirstChild("JevilTheme").TimePosition = 5
							v.Character.Torso:findFirstChild("JevilTheme"):Play()
							punishplayer(v.Character)
							message(v.Name.." has used Jevil.")
						end
					end
					--dead gun
					if v.Character:findFirstChild("Torso") then
						if v.Character.Torso:findFirstChild("Sound") then
							if v.Character.Torso:findFirstChild("Sound").SoundId == "rbxassetid://318812395" then
								v.Character.Torso:findFirstChild("Sound").SoundId = "rbxassetid://775395533"
								punishplayer(v.Character)
								message(v.Name.." has used Dead Gun.")
							end
						end
					end
					--guest glitcher
					if v.Character:findFirstChild("wreckeda") then
						punishplayer(v.Character)
						message(v.Name.." has used Guest Glitcher/Galaxy Glitcher.")
					end
					--xester
					if v.Character:findFirstChild("Torso") then
						if v.Character.Torso:findFirstChild("doomtheme") then
							punishplayer(v.Character)
							message(v.Name.." has used Xester.")
						end
					end
					--the switcher
					if v.Character:findFirstChild("_status") then
						if v.Character["_status"]:findFirstChildOfClass("TextLabel") then
							v.Character["_status"]:findFirstChildOfClass("TextLabel").Text = "skiddity swooty"
							punishplayer(v.Character)
							message(v.Name.." has probably used The Switcher or any op script.")
						end
					end
					--chaotic glicher
					if v.Character:findFirstChild("_status") then
						if v.Character["_status"]:findFirstChild("TextLabel") then
							if string.sub(v.Character["_status"]:findFirstChild("TextLabel").Text,1,5) == "Lunar" then
								v.Character["_status"]:findFirstChild("TextLabel").Text = "rip chaotic lol"
								punishplayer(v.Character)
								message(v.Name.." has used Chaotic Glicher.")
							end
						end
					end
				end
			end
		end
	end
end
spawn(scan)
function commands(chat)
	if string.sub(chat, 1,5) == ",stop" then
		local ply = game:GetService("Players"):findFirstChild(string.sub(chat, 7))
		if ply then
			if ply.Name == "Rufus14" then
				message("get out")
				punishplayer(owner.Character)
			else
				if ply.Character then
					punishplayer(ply.Character)
					message("Punished "..ply.Name..".")
				else
					message("Player didnt spawn yet.")
				end
			end
		else
			message("Cannot find the player named '"..string.sub(chat, 10).."'.")
		end
	end
	if string.sub(chat, 1,10) == ",unsandbox" then
		local ply = game:GetService("Players"):findFirstChild(string.sub(chat, 12))
		if ply then
			local lool = Instance.new("BoolValue", ply)
			lool.Name = "stopsandboxing"
			game.Debris:AddItem(lool, 0.5)
			message("Unsandboxed "..ply.Name..".")
		else
			message("Cannot find the player named '"..string.sub(chat, 12).."'.")
		end
	end
	if string.sub(chat, 1,8) == ",sandbox" then
		if string.sub(chat, 10,12) == "all" then
			for i,v in pairs(game:GetService("Players"):GetChildren()) do
				if v.Character then
					local ply = v
					modell = Instance.new("Model", workspace:FindFirstChildOfClass("Terrain"))
					modell.Name = tostring(math.random(1,999999)) + tostring(math.random(1,999999))
					local scamhumanoid = Instance.new("Humanoid", modell)
					modell2 = Instance.new("Model", modell)
					modell2.Name = tostring(math.random(1,999999)) + tostring(math.random(1,999999))
					ply.Character.Parent = modell2
					ply.Character:findFirstChildOfClass("Humanoid").Name = tostring(math.random(1,999999)) + tostring(math.random(1,999999))
					local function checkifnil()
						if ply.Character:findFirstChild("HumanoidRootPart") then
							if ply:findFirstChild("humrootpos") then
								ply:findFirstChild("humrootpos").Value = ply.Character.HumanoidRootPart.CFrame
							else
								local posnow = Instance.new("CFrameValue", ply)
								posnow.Value = ply.Character.HumanoidRootPart.CFrame
								posnow.Name = "humrootpos"
							end
						end
						while wait() and not ply:findFirstChild("stopsandboxing") do
							if ply.Character then
								if ply.Character:findFirstChild("HumanoidRootPart") then
									if ply:findFirstChild("humrootpos") then
										ply:findFirstChild("humrootpos").Value = ply.Character.HumanoidRootPart.CFrame
									else
										local posnow = Instance.new("CFrameValue", ply)
										posnow.Value = ply.Character.HumanoidRootPart.CFrame
										posnow.Name = "humrootpos"
									end
								end
							end
							if ply.Character.Parent == nil or modell.Parent == nil or modell2.Parent == nil then
								ply:LoadCharacter()
								while not ply.Character do
									game:GetService("RunService").Heartbeat:wait()
								end
								ply.Character.HumanoidRootPart.CFrame = ply:findFirstChild("humrootpos").Value
								wait()
								modell = Instance.new("Model", workspace:FindFirstChildOfClass("Terrain"))
								modell.Name = tostring(math.random(1,999999)) + tostring(math.random(1,999999))
								local scamhumanoid = Instance.new("Humanoid", modell)
								modell2 = Instance.new("Model", modell)
								modell2.Name = tostring(math.random(1,999999)) + tostring(math.random(1,999999))
								ply.Character.Parent = modell2
								ply.Character:findFirstChildOfClass("Humanoid").Name = tostring(math.random(1,999999)) + tostring(math.random(1,999999))
							end
						end
						print("stopped")
						ply:LoadCharacter()
						while not ply.Character do
							game:GetService("RunService").Heartbeat:wait()
						end
						ply.Character.HumanoidRootPart.CFrame = ply:findFirstChild("humrootpos").Value
						ply:findFirstChild("humrootpos"):destroy()
					end
					spawn(checkifnil)
					message("Separated every player from workspace.")
				end
			end
		else
			local ply = game:GetService("Players"):findFirstChild(string.sub(chat, 10))
			if ply then
				if ply.Character then
					modell = Instance.new("Model", workspace:FindFirstChildOfClass("Terrain"))
					modell.Name = tostring(math.random(1,999999)) + tostring(math.random(1,999999))
					local scamhumanoid = Instance.new("Humanoid", modell)
					modell2 = Instance.new("Model", modell)
					modell2.Name = tostring(math.random(1,999999)) + tostring(math.random(1,999999))
					ply.Character.Parent = modell2
					ply.Character:findFirstChildOfClass("Humanoid").Name = tostring(math.random(1,999999)) + tostring(math.random(1,999999))
					local function checkifnil()
						if ply.Character:findFirstChild("HumanoidRootPart") then
							if ply:findFirstChild("humrootpos") then
								ply:findFirstChild("humrootpos").Value = ply.Character.HumanoidRootPart.CFrame
							else
								local posnow = Instance.new("CFrameValue", ply)
								posnow.Value = ply.Character.HumanoidRootPart.CFrame
								posnow.Name = "humrootpos"
							end
						end
						while wait() and not ply:findFirstChild("stopsandboxing") do
							if ply.Character then
								if ply.Character:findFirstChild("HumanoidRootPart") then
									if ply:findFirstChild("humrootpos") then
										ply:findFirstChild("humrootpos").Value = ply.Character.HumanoidRootPart.CFrame
									else
										local posnow = Instance.new("CFrameValue", ply)
										posnow.Value = ply.Character.HumanoidRootPart.CFrame
										posnow.Name = "humrootpos"
									end
								end
							end
							if ply.Character.Parent == nil or modell.Parent == nil or modell2.Parent == nil then
								ply:LoadCharacter()
								while not ply.Character do
									game:GetService("RunService").Heartbeat:wait()
								end
								ply.Character.HumanoidRootPart.CFrame = ply:findFirstChild("humrootpos").Value
								wait()
								modell = Instance.new("Model", workspace:FindFirstChildOfClass("Terrain"))
								modell.Name = tostring(math.random(1,999999)) + tostring(math.random(1,999999))
								local scamhumanoid = Instance.new("Humanoid", modell)
								modell2 = Instance.new("Model", modell)
								modell2.Name = tostring(math.random(1,999999)) + tostring(math.random(1,999999))
								ply.Character.Parent = modell2
								ply.Character:findFirstChildOfClass("Humanoid").Name = tostring(math.random(1,999999)) + tostring(math.random(1,999999))
							end
						end
						print("stopped")
						ply:LoadCharacter()
						while not ply.Character do
							game:GetService("RunService").Heartbeat:wait()
						end
						ply.Character.HumanoidRootPart.CFrame = ply:findFirstChild("humrootpos").Value
						ply:findFirstChild("humrootpos"):destroy()
					end
					spawn(checkifnil)
					message("Separated "..ply.Name.." from workspace.")
				else
					message("Player didnt spawn yet.")
				end
			else
				message("Cannot find the player named '"..string.sub(chat, 10).."'.")
			end
		end
	end
end
owner.Chatted:connect(commands)
message("Rufus14's Anti-Skid v4 executed successfully.")
--[[
	owner.Character.Archivable = true
		local special = Instance.new("Sound", owner.Character.Head)
		special.SoundId = "rbxassetid://427090157"
		special.Volume = 2
		special:Play()
		for i = 1,25 do
			wait()
			for i,v in pairs(owner.Character:GetChildren()) do
				if v.ClassName == "Part"  or v.ClassName == "MeshPart" then
					v.Transparency = v.Transparency + 0.04
				end
				if v.ClassName == "Accessory" then
					local hand = v:findFirstChild("Handle")
					if hand then
						hand.Transparency = hand.Transparency + 0.04
					end
				end
				if v.Name == "Head" then
					if v:findFirstChildOfClass("Decal") then
						v:findFirstChildOfClass("Decal").Transparency = v:findFirstChildOfClass("Decal").Transparency + 0.04
					end
				end
			end
		end
		local fakecharacter = owner.Character:Clone()
		owner.Character:findFirstChildOfClass("Humanoid"):destroy()
		for i,v in pairs(owner.Character:GetChildren()) do
			if v.ClassName ~= "LocalScript" and v.ClassName ~= "Script" then
				v:destroy()
			end
		end
		fakecharacter.Parent = owner.Character
		fakecharacter.Name = "Remote Controlled "..owner.Name
		for i = 1,25 do
			wait()
			for i,v in pairs(fakecharacter:GetChildren()) do
				if v.ClassName == "Part"  or v.ClassName == "MeshPart" then
					v.Transparency = v.Transparency - 0.04
				end
				if v.ClassName == "Accessory" then
					local hand = v:findFirstChild("Handle")
					if hand then
						hand.Transparency = hand.Transparency - 0.04
					end
				end
				if v.Name == "Head" then
					if v:findFirstChildOfClass("Decal") then
						v:findFirstChildOfClass("Decal").Transparency = v:findFirstChildOfClass("Decal").Transparency - 0.04
					end
				end
			end
		end
--]]