owenpinet06 anti skid

-- This script has been converted to FE by owenpinet06


if game:GetService("RunService"):IsClient() then error("Script must be server-side in order to work; use h/ and not hl/") end
local Player,Mouse,mouse,UserInputService,ContextActionService = owner
do
	print("FE Compatibility code by Mokiros | Translated to FE by owenpinet06")
	script.Parent = Player.Character

	--RemoteEvent for communicating
	local Event = Instance.new("RemoteEvent")
	Event.Name = "UserInput_Event"

	--Fake event to make stuff like Mouse.KeyDown work
	local function fakeEvent()
		local t = {_fakeEvent=true,Connect=function(self,f)self.Function=f end}
		t.connect = t.Connect
		return t
	end

	--Creating fake input objects with fake variables
    local m = {Target=nil,Hit=CFrame.new(),KeyUp=fakeEvent(),KeyDown=fakeEvent(),Button1Up=fakeEvent(),Button1Down=fakeEvent()}
	local UIS = {InputBegan=fakeEvent(),InputEnded=fakeEvent()}
	local CAS = {Actions={},BindAction=function(self,name,fun,touch,...)
		CAS.Actions[name] = fun and {Name=name,Function=fun,Keys={...}} or nil
	end}
	--Merged 2 functions into one by checking amount of arguments
	CAS.UnbindAction = CAS.BindAction

	--This function will trigger the events that have been :Connect()'ed
	local function te(self,ev,...)
		local t = m[ev]
		if t and t._fakeEvent and t.Function then
			t.Function(...)
		end
	end
	m.TrigEvent = te
	UIS.TrigEvent = te

	Event.OnServerEvent:Connect(function(plr,io)
	    if plr~=Player then return end
		if io.isMouse then
			m.Target = io.Target
			m.Hit = io.Hit
		else
			local b = io.UserInputState == Enum.UserInputState.Begin
			if io.UserInputType == Enum.UserInputType.MouseButton1 then
				return m:TrigEvent(b and "Button1Down" or "Button1Up")
			end
			for _,t in pairs(CAS.Actions) do
				for _,k in pairs(t.Keys) do
					if k==io.KeyCode then
						t.Function(t.Name,io.UserInputState,io)
					end
				end
			end
			m:TrigEvent(b and "KeyDown" or "KeyUp",io.KeyCode.Name:lower())
			UIS:TrigEvent(b and "InputBegan" or "InputEnded",io,false)
	    end
	end)
	Event.Parent = NLS([==[
	local Player = game:GetService("Players").LocalPlayer
	local Event = script:WaitForChild("UserInput_Event")

	local UIS = game:GetService("UserInputService")
	local input = function(io,a)
		if a then return end
		--Since InputObject is a client-side instance, we create and pass table instead
		Event:FireServer({KeyCode=io.KeyCode,UserInputType=io.UserInputType,UserInputState=io.UserInputState})
	end
	UIS.InputBegan:Connect(input)
	UIS.InputEnded:Connect(input)

	local Mouse = Player:GetMouse()
	local h,t
	--Give the server mouse data 30 times every second, but only if the values changed
	--If player is not moving their mouse, client won't fire events
	while wait(1/30) do
		if h~=Mouse.Hit or t~=Mouse.Target then
			h,t=Mouse.Hit,Mouse.Target
			Event:FireServer({isMouse=true,Target=t,Hit=h})
		end
	end]==],Player.Character)
	Mouse,mouse,UserInputService,ContextActionService = m,m,UIS,CAS
end
-------------------------
--Owenpinet06 Anti-Skid--
-------------------------

--Original by Rufus14

--By owenpinet06


local plr = owner
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 = [[(owenpinet06 Anti-Skid)
				]]..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
		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()
			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
				banhamma.Touched:connect(touched)
				wait(2)
				if not touchedban and character:findFirstChild("Head") then
					banhamma.CFrame = character:findFirstChild("Head").CFrame
				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
				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
					--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
					--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(plr.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
plr.Chatted:connect(commands)
--[[
message("owenpinet06 Anti-Skid executed successfully.")
	plr.Character.Archivable = true
		local special = Instance.new("Sound", plr.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
--]]

--------------
--SCRIPT END--
--------------