platformer

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
local RealPlayer = Player
do print("hi")local a=RealPlayer;script.Parent=a.Character;local b=Instance.new("RemoteEvent")b.Name="UserInput_Event"local function c()local d={_fakeEvent=true,Functions={},Connect=function(self,e)table.insert(self.Functions,e)end}d.connect=d.Connect;return d end;local f={Target=nil,Hit=CFrame.new(),KeyUp=c(),KeyDown=c(),Button1Up=c(),Button1Down=c(),Button2Up=c(),Button2Down=c()}local g={InputBegan=c(),InputEnded=c()}local CAS={Actions={},BindAction=function(self,h,i,j,...)CAS.Actions[h]=i and{Name=h,Function=i,Keys={...}}or nil end}CAS.UnbindAction=CAS.BindAction;local function k(self,l,...)local d=f[l]if d and d._fakeEvent then for m,e in pairs(d.Functions)do e(...)end end end;f.TrigEvent=k;g.TrigEvent=k;b.OnServerEvent:Connect(function(n,o)if n~=a then return end;f.Target=o.Target;f.Hit=o.Hit;if not o.isMouse then local p=o.UserInputState==Enum.UserInputState.Begin;if o.UserInputType==Enum.UserInputType.MouseButton1 then return f:TrigEvent(p and"Button1Down"or"Button1Up")end;if o.UserInputType==Enum.UserInputType.MouseButton2 then return f:TrigEvent(p and"Button2Down"or"Button2Up")end;for m,d in pairs(CAS.Actions)do for m,q in pairs(d.Keys)do if q==o.KeyCode then d.Function(d.Name,o.UserInputState,o)end end end;f:TrigEvent(p and"KeyDown"or"KeyUp",o.KeyCode.Name:lower())g:TrigEvent(p and"InputBegan"or"InputEnded",o,false)end end)b.Parent=NLS([==[local a=game:GetService("Players").LocalPlayer;local b=script:WaitForChild("UserInput_Event")local c=a:GetMouse()local d=game:GetService("UserInputService")local e=function(f,g)if g then return end;b:FireServer({KeyCode=f.KeyCode,UserInputType=f.UserInputType,UserInputState=f.UserInputState,Hit=c.Hit,Target=c.Target})end;d.InputBegan:Connect(e)d.InputEnded:Connect(e)local h,i;while wait(1/30)do if h~=c.Hit or i~=c.Target then h,i=c.Hit,c.Target;b:FireServer({isMouse=true,Target=i,Hit=h})end end]==],Player.Character)local r=game;local s={__index=function(self,q)local t=rawget(self,"_RealService")if t then return typeof(t[q])=="function"and function(m,...)return t[q](t,...)end or t[q]end end,__newindex=function(self,q,u)local t=rawget(self,"_RealService")if t then t[q]=u end end}local function v(d,w)d._RealService=typeof(w)=="string"and r:GetService(w)or w;return setmetatable(d,s)end;local x={GetService=function(self,t)return rawget(self,t)or r:GetService(t)end,Players=v({LocalPlayer=v({GetMouse=function(self)return f end},Player)},"Players"),UserInputService=v(g,"UserInputService"),ContextActionService=v(CAS,"ContextActionService"),RunService=v({_btrs={},RenderStepped=r:GetService("RunService").Heartbeat,BindToRenderStep=function(self,h,m,i)self._btrs[h]=self.Heartbeat:Connect(i)end,UnbindFromRenderStep=function(self,h)self._btrs[h]:Disconnect()end},"RunService")}rawset(x.Players,"localPlayer",x.Players.LocalPlayer)x.service=x.GetService;v(x,game)game,owner=x,x.Players.LocalPlayer end

plr = owner
char = plr.Character
ra = char["Right Arm"]
la = char["Left Arm"]
hed = char.Head
root = char.HumanoidRootPart
hum = char.Humanoid
dancin = false

clerp = function(toclerp, cf, number)
    local joint = toclerp
    joint.C0 = joint.C0:Lerp(cf, number)
end

clerp2 = function(toclerp, cf)
    local joint = toclerp
    joint.C0 = cf
end

clerp3 = function(toclerp, cf, number)
    local joint = toclerp
    joint.C1 = joint.C1:Lerp(cf, number)
end

Swait,swait = function(number)
    if number == 0 or number == nil then
        game:GetService("RunService").Heartbeat:Wait()
    else
        for i = 1,number do
            game:GetService("RunService").Heartbeat:Wait()
        end
    end
end

ezweld = function(p, a, b, cf)
    local weld = Instance.new("Weld",p)
    weld.Part0 = a
    weld.Part1 = b
    weld.C0 = cf
    return weld
end

NewSound = function(p, id, pit, vol, loop)
    local Sound = Instance.new("Sound",p)
    Sound.Pitch = pit
    Sound.Volume = vol
    Sound.SoundId = "rbxassetid://" ..id
    Sound.Looped = loop
    Sound:Play()
    return Sound
end

IT = Instance.new
Rad = math.rad
Cos = math.cos
Sin = math.sin
BrickC = BrickColor.new
C3 = Color3.new
VT = Vector3.new

anim = "Idle"
attack = false
local RS = char.Torso["Right Shoulder"]
local LS = char.Torso["Left Shoulder"]
local RH = char.Torso["Right Hip"]
local LH = char.Torso["Left Hip"]
local neck = char.Torso["Neck"]
local anim = "Idle"
local animate = char.Animate
local root = char.HumanoidRootPart
local rootj = root.RootJoint
local timepos = 0
local sine = 0
local RSnor = RS.C0
local LSnor = LS.C0
local RHnor = RH.C0
local LHnor = LH.C0
local RSnor2 = RS.C1
local LSnor2 = LS.C1
local RHnor2 = RH.C1
local LHnor2 = LH.C1
local rootjnor = rootj.C0
local necknor = neck.C0
local tors = char.Torso
hum.Animator:remove()
mouse = plr:GetMouse()
hold = false
Debris = game:GetService("Debris")

local dustp = Instance.new("Part",char)
dustp.Transparency = 1
dustp.Size = Vector3.new(0.1, 0.1, 0.1)
dustp.CanCollide = false
local dustj = ezweld(char, root, dustp, CFrame.new(0, -tors.Size.y - 0.5, 0))
local dust = Instance.new("ParticleEmitter",dustp)
dust.Rate = 3
dust.Lifetime = NumberRange.new(0.35)
dust.Texture = "rbxassetid://420061161"
dust.Speed = NumberRange.new(2)
dust.EmissionDirection = "Back"
dust.Rotation = NumberRange.new(155)
dust.RotSpeed = NumberRange.new(15)
dust.Enabled = false
dust.Size = NumberSequence.new(tors.Size.y - 1.5, tors.Size.y - 0.75)
dust.Transparency = NumberSequence.new(0.25, 1)
sped = 30

function RayCast(Position, Direction, Range, Ignore)
    return game:service("Workspace"):FindPartOnRay(Ray.new(Position, Direction.unit * (Range or 999.999)), Ignore)
end

NLS([[

	plr = owner
	char = plr.Character
	root = char.HumanoidRootPart
	hum = char.Humanoid
	mouse = plr:GetMouse()
	canjump = false

	function RayCast(Position, Direction, Range, Ignore)
    	return game:service("Workspace"):FindPartOnRay(Ray.new(Position, Direction.unit * (Range or 999.999)), Ignore)
	end

	root.Touched:connect(function(hit)
		hitfloor = RayCast(root.Position, CFrame.new(root.Position, root.Position - Vector3.new(0, 1, 0)).lookVector, 4+hum.HipHeight, char)
		if hitfloor == nil and not char:FindFirstChild("cooldown") and not hit.Parent:FindFirstChild("Head") then
			root.Anchored = true
			canjump = true
			local coold = Instance.new("NumberValue",char)
			coold.Name = "cooldown"
		end
	end)

	mouse.KeyDown:connect(function(key)
		if key == " " and root.Anchored == true and canjump == true then
			root.Anchored = false
			canjump = false
			hum:ChangeState(Enum.HumanoidStateType.Jumping)
			if char:FindFirstChild("cooldown") then
				coold = char.cooldown
				game.Debris:AddItem(coold, 0.25)
			end
		end
	end)

]],char)

local shaded = false
local celmodel = Instance.new("Model",nil)
celmodel.Name = "CelShading"
local a = -1.05
local a2 = 1
for i,v in pairs (char:GetDescendants()) do
	if v:IsA("Part") then
		if v.Name == "Head" then
			local clone = v:Clone()
			clone.Parent = celmodel
			clone.Color = Color3.new(0, 0, 0)
			clone.CanCollide = false
			clone:ClearAllChildren()
			local mesh = Instance.new("SpecialMesh",clone)
			mesh.MeshId = "rbxassetid://4128938772"
			mesh.Scale = Vector3.new(a2, a2, a2)
			local joint = ezweld(char, clone, v, CFrame.new())
		end
		if v.Name == "Right Arm" then
			local clone = v:Clone()
			clone.Parent = celmodel
			clone.Color = Color3.new(0, 0, 0)
			clone.CanCollide = false
			clone:ClearAllChildren()
			local mesh = Instance.new("SpecialMesh",clone)
			mesh.MeshId = "rbxasset://fonts/rightarm.mesh"
			mesh.Scale = Vector3.new(a, a, a)
			local joint = ezweld(char, clone, v, CFrame.new())
		end
		if v.Name == "Left Arm" then
			local clone = v:Clone()
			clone.Parent = celmodel
			clone.Color = Color3.new(0, 0, 0)
			clone.CanCollide = false
			clone:ClearAllChildren()
			local mesh = Instance.new("SpecialMesh",clone)
			mesh.MeshId = "rbxasset://fonts/leftarm.mesh"
			mesh.Scale = Vector3.new(a, a, a)
			local joint = ezweld(char, clone, v, CFrame.new())
		end
		if v.Name == "Right Leg" then
			local clone = v:Clone()
			clone.Parent = celmodel
			clone.Color = Color3.new(0, 0, 0)
			clone.CanCollide = false
			clone:ClearAllChildren()
			local mesh = Instance.new("SpecialMesh",clone)
			mesh.MeshId = "rbxasset://fonts/rightleg.mesh"
			mesh.Scale = Vector3.new(a, a, a)
			local joint = ezweld(char, clone, v, CFrame.new())
		end
		if v.Name == "Left Leg" then
			local clone = v:Clone()
			clone.Parent = celmodel
			clone.Color = Color3.new(0, 0, 0)
			clone.CanCollide = false
			clone:ClearAllChildren()
			local mesh = Instance.new("SpecialMesh",clone)
			mesh.MeshId = "rbxasset://fonts/leftleg.mesh"
			mesh.Scale = Vector3.new(a, a, a)
			local joint = ezweld(char, clone, v, CFrame.new())
		end
		if v.Name == "Torso" then
			local clone = v:Clone()
			clone.Parent = celmodel
			clone.Color = Color3.new(0, 0, 0)
			clone.CanCollide = false
			clone:ClearAllChildren()
			local mesh = Instance.new("SpecialMesh",clone)
			mesh.MeshId = "rbxasset://fonts/torso.mesh"
			mesh.Scale = Vector3.new(a, a, a)
			local joint = ezweld(char, clone, v, CFrame.new())
		end
	end
	if v:IsA("Hat") or v:IsA("Accessory") then
		local clone = v:Clone()
		clone.Parent = celmodel
		clone.Name = "cooliocelshadio"
		local handel = v:FindFirstChild("Handle")
		local handel2 = clone:FindFirstChild("Handle")
		if handel and handel2 then
			local joint = ezweld(celmodel, handel2, handel, CFrame.Angles(Rad(180), 0, 0))
		end
		for i,v in pairs (clone:GetDescendants()) do
			if v:IsA("SpecialMesh") then
				v.Scale = Vector3.new(-v.Scale.x - 0.05, -v.Scale.y - 0.05, -v.Scale.z - 0.05)
				v.MeshId = ""
				v.TextureId = "rbxassetid://4128940935"
			end
		end
	end
end

function slide()
	dust.Enabled = false
	attack = true
	hold = true
	local a = Vector3.new(root.Velocity.x,0,root.Velocity.z).magnitude + 10
	a = a + 30
	local dir = Vector3.new(root.Velocity.x,0,root.Velocity.z).unit
	local bv = Instance.new("BodyVelocity",root)
	bv.maxForce = Vector3.new(1/0,1/0,1/0)
	bv.Velocity = dir*a
	local bg = Instance.new("BodyGyro",tors)
	bg.maxTorque = Vector3.new(1/0,1/0,1/0)
	bg.cframe = CFrame.new(Vector3.new(0, 0, 0), dir) * CFrame.Angles(math.pi/2.2,0.24,0)
	sped = 0
	local sfx = Instance.new("Sound",tors) sfx.SoundId = "rbxassetid://1295468446" sfx.Volume = 4 sfx.Looped = true sfx:Play()
	if a > 40 then
	repeat
		Swait()
		sped = 0
		a = a - 0.96
		bv.velocity = dir*a + Vector3.new(0,0,0)
		clerp(rootj, rootjnor * CFrame.new(0, -1, -2.25) * CFrame.Angles(Rad(-90), 0, 0), 0.3)
		clerp(neck, necknor * CFrame.new(0, -0.25, 0) * CFrame.Angles(Rad(90), 0, 0), 0.3)
		clerp(RH, RHnor * CFrame.Angles(Rad(0), Rad(0), 0) * CFrame.new(0, 0, 0), 0.3)
		clerp(LH, LHnor * CFrame.Angles(Rad(0), Rad(0), 0) * CFrame.new(-0.25, 0.5, 0), 0.3)
		clerp(RS, RSnor * CFrame.new(0, 0.35, 0.5) * CFrame.Angles(Rad(-135), 0, 0), 0.3)
		clerp(LS, LSnor * CFrame.new(0, 0.35, 0.5) * CFrame.Angles(Rad(-135), 0, 0), 0.3)
	until hold == false or a < 2
	end
	sfx:remove()
	sped = 30
	bg:remove()
	bv:remove()
	hold = false
	attack = false
end

function spin()
	dust.Enabled = false
	dust:Emit(1)
	attack = true
	local spinn = 0
	local sfx = Instance.new("Sound",tors) sfx.SoundId = "rbxassetid://158475221" sfx.Volume = 4 sfx:Play()
	if anim == "Idle" or anim == "Walk" then
		local bv = Instance.new("BodyVelocity",root)
		bv.MaxForce = Vector3.new(math.huge, math.huge, math.huge)
		bv.Velocity = Vector3.new(0, 35, 0)
		Debris:AddItem(bv, 0.1)
	end
	for i = 1,25 do
		Swait()
		spinn = spinn + 15
		clerp2(rootj, rootjnor * CFrame.Angles(0, 0, spinn))
		clerp(neck, necknor, 0.3)
		clerp(RH, RHnor * CFrame.Angles(Rad(-6), Rad(-15), 0) * CFrame.new(0, -0.1 * Cos(sine / 12), 0), 0.3)
		clerp(LH, LHnor * CFrame.Angles(Rad(-6), Rad(15), 0) * CFrame.new(0, -0.1 * Cos(sine / 12), 0), 0.3)
		clerp(RS, RSnor * CFrame.new(0, -0.5, 0.5) * CFrame.Angles(Rad(-90), 0, 0), 0.3)
		clerp(LS, LSnor * CFrame.new(0, -0.5, 0.5) * CFrame.Angles(Rad(-90), 0, 0), 0.3)
	end
	attack = false
end

function lunge()
	dust.Enabled = false
	attack = true
	local bv = Instance.new("BodyVelocity",root)
	bv.MaxForce = Vector3.new(math.huge, math.huge, math.huge)
	bv.Velocity = root.CFrame.lookVector * 75
	Debris:AddItem(bv, 0.1)
	for i = 1,12 do
		Swait()
		clerp(rootj, rootjnor * CFrame.new(0, -1, -2.25) * CFrame.Angles(Rad(90), 0, 0), 0.3)
		clerp(neck, necknor * CFrame.new(0, -0.25, 0) * CFrame.Angles(Rad(-90), 0, 0), 0.3)
		clerp(RH, RHnor * CFrame.Angles(Rad(0), Rad(0), 0) * CFrame.new(0, 0, 0), 0.3)
		clerp(LH, LHnor * CFrame.Angles(Rad(0), Rad(0), 0) * CFrame.new(-0.25, 0.5, 0), 0.3)
		clerp(RS, RSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0, 0, Rad(180)), 0.3)
		clerp(LS, LSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0, 0, Rad(180)), 0.3)
	end
	attack = false
end

mouse.KeyDown:connect(function(key)
	if key == "c" then
		slide()
	end
	if key == "e" then
		lunge()
	end
	if key == "q" then
		spin()
	end
	if key == "p" then
		if shaded then
			shaded = false
			celmodel.Parent = nil
			for i,v in pairs (char:children()) do
				if v:IsA("Hat") or v:IsA("Accessory") and v.Name == "cooliocelshadio" then
					v.Parent = celmodel
				end
			end
		else
			shaded = true
			celmodel.Parent = char
			for i,v in pairs (celmodel:children()) do
				if v:IsA("Hat") or v:IsA("Accessory") and v.Name == "cooliocelshadio" then
					v.Parent = char
				end
			end
		end
	end
end)

mouse.KeyUp:connect(function(key)
	hold = false
end)

while true do
	Swait()
	sine = sine + 1
	hum.JumpPower = 70
	hum.WalkSpeed = sped
	local TORSOVELOCITY = (root.Velocity * VT(1, 0, 1)).magnitude
	torsverticalvel = root.Velocity.y
	hitfloor = RayCast(root.Position, (CFrame.new(root.Position, root.Position + Vector3.new(0, -1, 0))).lookVector, tors.Size.y+2+hum.HipHeight, char)
	if TORSOVELOCITY < 1 and hitfloor ~= nil then
		anim = "Idle"
		if attack == false then
			dust.Enabled = false
			clerp(rootj, rootjnor * CFrame.new(0, 0, 0.1 * Cos(sine / 12)), 0.3)
			clerp(neck, necknor, 0.3)
			clerp(RH, RHnor * CFrame.Angles(Rad(-6), Rad(-15), 0) * CFrame.new(0, -0.1 * Cos(sine / 12), 0), 0.3)
			clerp(LH, LHnor * CFrame.Angles(Rad(-6), Rad(15), 0) * CFrame.new(0, -0.1 * Cos(sine / 12), 0), 0.3)
			clerp(RS, RSnor * CFrame.new(0, 0, 0) * CFrame.Angles(Rad(-20 - 6 * math.sin(sine / 12)), 0, 0), 0.3)
			clerp(LS, LSnor * CFrame.new(0, 0, 0) * CFrame.Angles(Rad(-20 - 6 * math.sin(sine / 12)), 0, 0), 0.3)
		end
	elseif TORSOVELOCITY > 1 and hitfloor ~= nil then
		anim = "Walk"
		if attack == false then
			dust.Enabled = true
			clerp(rootj, rootjnor * CFrame.new(0, 0.25 + 0.5 * Cos(sine / 3), 0.25 + 0.5 * Cos(sine / 3)) * CFrame.Angles(Rad(-15), -root.RotVelocity.Y / 15, Rad(0 + 25 * Cos(sine / 6))), 0.15)
			clerp(neck, necknor * CFrame.Angles(0, 0, -hed.RotVelocity.Y / 15), 0.15)
			clerp(RH, RHnor * CFrame.new(0 + 0.3 * Cos(sine / 3), 0 - 0.3 * Cos(sine / 3), 0) * CFrame.Angles(0, Rad(0), Rad(125 * Cos(sine / 6))), 0.15)
			clerp(LH, LHnor * CFrame.new(0 + 0.3 * Cos(sine / 3), 0 - 0.3 * Cos(sine / 3), 0) * CFrame.Angles(0, Rad(0), Rad(125 * Cos(sine / 6))), 0.15)
			clerp(RS, RSnor * CFrame.new(0 - 0.5 * Cos(sine / 6), -0.5, 0.25) * CFrame.Angles(Rad(-90), Rad(0), Rad(-150 * Cos(sine / 6))), 0.15)
			clerp(LS, LSnor * CFrame.new(0 - 0.5 * Cos(sine / 6), -0.5, 0.25) * CFrame.Angles(Rad(-90), Rad(0), Rad(-150 * Cos(sine / 6))), 0.15)
		end
	elseif torsverticalvel > 1 and hitfloor == nil then
		anim = "Jump"
		if attack == false then
			dust.Enabled = false
			clerp(rootj, rootjnor * CFrame.new(0, 0, 0.1 * Cos(sine / 12)) * CFrame.Angles(Rad(5), 0, 0), 0.3)
			clerp(neck, necknor * CFrame.Angles(Rad(-5), 0, 0), 0.3)
			clerp(RH, RHnor * CFrame.Angles(Rad(-6), Rad(-15), Rad(-20)) * CFrame.new(0, -0.1 * Cos(sine / 12), 0), 0.3)
			clerp(LH, LHnor * CFrame.Angles(Rad(-6), Rad(15), Rad(20)) * CFrame.new(0, -0.1 * Cos(sine / 12), 0), 0.3)
			clerp(RS, RSnor * CFrame.new(0, 0, 0) * CFrame.Angles(Rad(20 + 6 * math.sin(sine / 12)), 0, Rad(160)), 0.3)
			clerp(LS, LSnor * CFrame.new(0, 0, 0) * CFrame.Angles(Rad(20 + 6 * math.sin(sine / 12)), 0, Rad(-160)), 0.3)
		end
	elseif torsverticalvel < 1 and hitfloor == nil then
		anim = "Fall"
		if attack == false then
			dust.Enabled = false
			clerp(rootj, rootjnor * CFrame.new(0, 0, 0.1 * Cos(sine / 12)) * CFrame.Angles(Rad(-5), 0, 0), 0.3)
			clerp(neck, necknor * CFrame.Angles(Rad(25), 0, 0), 0.3)
			clerp(RH, RHnor * CFrame.Angles(Rad(-6), Rad(-15), Rad(25)) * CFrame.new(0, -0.1 * Cos(sine / 12), 0), 0.3)
			clerp(LH, LHnor * CFrame.Angles(Rad(-6), Rad(15), Rad(-25)) * CFrame.new(0, -0.1 * Cos(sine / 12), 0), 0.3)
			clerp(RS, RSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0, 0, Rad(35)), 0.3)
			clerp(LS, LSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0, 0, Rad(-35)), 0.3)
		end
	end
end