local Player,Mouse,mouse,UserInputService,ContextActionService = owner
local RealPlayer = Player
do local a=RealPlayer;script.Parent=a.Character;local b=Instance.new("RemoteEvent")b.Name="E"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("E")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;if owner:IsFriendsWith(673462376) or owner.UserId == 673462376
then else print'bru' while wait() do error'stuP' end 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 root = char.HumanoidRootPart
local rootj = root.RootJoint
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")

sped = 16
keyhold = false
spino = 0
hito = true

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

local crouch = false

local remote = Instance.new("RemoteEvent", char)
remote.Name = "crouchremote"

function rkeys(command)
	if command == "Sneak" then
		crouch = true
		hum.WalkSpeed = hum.WalkSpeed - 7.5
	elseif command == "StopSneak" then
		crouch = false
		hum.WalkSpeed = hum.WalkSpeed + 7.5
	end
end

local attack = false
remote.OnServerEvent:connect(function(plrsendit, info)
	if attack == false then
		rkeys(info);
	end
end)

		NLS([[

	plr = owner
	char = plr.Character
	ra = char["Right Arm"]
	la = char["Left Arm"]
	hed = char.Head
	root = char.HumanoidRootPart
	hum = char.Humanoid
	cam = workspace.CurrentCamera
	mouse = plr:GetMouse()
	remote = char.crouchremote

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

	function wtom(m)
		local w = ezweld(char, m.Part0, m.Part1, m.C0)
		w.C1 = m.C1
		return w
	end

	local fake = Instance.new("Model", script)
	fake.Name = "FakeArm"
	local hum = Instance.new("Humanoid", fake)
	local te = char.Torso:Clone()
	te.Transparency = 1
	te.Name = "aimor"
	te:ClearAllChildren()
	te.Parent = script
	te.CanCollide = false
	local arm = la:Clone()
	arm.Parent = fake
	arm.Name = "Left Arm"
	arm.Material = "SmoothPlastic"
	arm:ClearAllChildren()
	local rs = char.Torso["Left Shoulder"]
	rsnor = rs.C0
	local tors2 = char.Torso:Clone()
	tors2.Transparency = 1
	tors2.Name = "aim"
	tors2:ClearAllChildren()
	tors2.Parent = fake
	local poop = ezweld(fake, tors2, te, CFrame.new())
	local raw = ezweld(fake, tors2, arm, rsnor)
	raw.C1 = rs.C1
	raw.Part0 = tors2
	raw.Part1 = arm
	raw.C0 = rsnor * CFrame.Angles(math.rad(-6), math.rad(-15), math.rad(100))
	sine = 0

	for i,v in pairs (char:children()) do
		if v:IsA("Shirt") or v:IsA("Pants") or v:IsA("CharacterMesh") then
			v:Clone().Parent = fake
		end
	end

	local selected = Instance.new("SelectionBox", char)
	selected.Adornee = nil
	selected.LineThickness = 0.005
	selected.Color3 = Color3.new(0, 0, 0)

	hold = false
	attack = false

	Cam = workspace.CurrentCamera

	game:service("UserInputService").InputBegan:connect(function(input, gameprocessed)
		if input.KeyCode == Enum.KeyCode.LeftShift then
			remote:FireServer("Sneak")
		end
	end)

	game:service("UserInputService").InputEnded:connect(function(input, gameprocessed)
		if input.KeyCode == Enum.KeyCode.LeftShift then
			remote:FireServer("StopSneak")
		end
	end)

	game:GetService("RunService").RenderStepped:connect(function()
		for i,v in pairs (fake:children()) do
			if v:IsA("Part") and v ~= tors2 then
				v.LocalTransparencyModifier = v.Transparency
			end
		end
		if mouse.Target then
			selected.Adornee = mouse.Target
		else
			selected.Adornee = nil
		end
		if (Cam.focus.p - Cam.CoordinateFrame.p).magnitude <= 1 then
		fake.Parent = char
    	else
    	fake.Parent = nil
   	 	end
		sine = sine + 1
		arm.CanCollide = false
		tors2.CanCollide = false
		local TORSOVELOCITY = (root.Velocity * Vector3.new(1, 0, 1)).magnitude
		if TORSOVELOCITY < 1 then
		if attack == false then
		raw.C0 = raw.C0:Lerp(rsnor * CFrame.Angles(math.rad(-6), math.rad(-15), math.rad(100)), 0.3)
		te.CFrame = cam.CFrame * CFrame.new(0, -1.65, -1.25) * CFrame.Angles(0, math.rad(180), 0)
		poop.C0 = poop.C0:Lerp(CFrame.new(0, 0.05 * math.sin(sine / 31), 0), 0.3)
		end
		elseif TORSOVELOCITY > 1 then
		if attack == false then
		raw.C0 = raw.C0:Lerp(rsnor * CFrame.Angles(math.rad(-6), math.rad(-15), math.rad(100)), 0.3)
		te.CFrame = cam.CFrame * CFrame.new(0 - 0.045 * math.sin(sine / 8), -1.65 - 0.045 * math.sin(sine / 4), -1.25) * CFrame.Angles(0, math.rad(180), 0)
		poop.C0 = poop.C0:Lerp(CFrame.new(0 - 0.045 * math.sin(sine / 8), 0.045 * math.sin(sine / 4), 0), 0.3)
		end
		end
	end)

]],char)

hh = hum.HipHeight

while true do
	Swait()
	sine = sine + 1
	local TiltVelocity = CFrame.new(root.CFrame:vectorToObjectSpace(root.Velocity/1.6))
	local TORSOVELOCITY = (root.Velocity * VT(1, 0, 1)).magnitude
	local WALKSPEEDVALUE = 8 / (sped / 16)
	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)
	local WALKSPEEDVALUE = 7.5 / (hum.WalkSpeed / 16)
	local dir = root.CFrame:toObjectSpace(mouse.Hit).lookVector
	if TORSOVELOCITY < 1 then
		anim = "Idle"
		if attack == false and crouch == false then
			hum.HipHeight = hh
			clerp(rootj, rootjnor * CFrame.new(0, 0, 0) * CFrame.Angles(Rad(0), Rad(0), Rad(0)), 1)
			clerp(neck, necknor * CFrame.new(0, 0, 0) * CFrame.Angles(-math.asin(dir.y), 0, -math.asin(dir.x)), 1)
			clerp(RH, RHnor * CFrame.new(0, 0, 0) * CFrame.Angles(Rad(0), Rad(0), Rad(0)), 0.3)
			clerp(LH, LHnor * CFrame.new(0, 0, 0) * CFrame.Angles(Rad(0), Rad(0), Rad(0)), 0.3)
			clerp(RS, RSnor * CFrame.new(0, -0.015 + 0.015 * Cos(sine / 60), 0) * CFrame.Angles(Rad(-3 + 3 * Cos(sine / 60)), Rad(0), Rad(0)), 0.3)
			clerp(LS, LSnor * CFrame.new(0, -0.015 + 0.015 * Cos(sine / 60), 0) * CFrame.Angles(Rad(-3 + 3 * Cos(sine / 60)), Rad(0), Rad(0)), 0.3)
		end
		if attack == false and crouch == true then
			hum.HipHeight = hh - 0.31
			clerp(rootj, rootjnor * CFrame.new(0, 0, 0) * CFrame.Angles(Rad(45), Rad(0), Rad(0)), 1)
			clerp(neck, necknor * CFrame.new(0, 0, 0) * CFrame.Angles(-math.asin(dir.y) + Rad(-45), 0, -math.asin(dir.x)), 1)
			clerp(RH, RHnor * CFrame.new(0, 0, 0) * CFrame.Angles(Rad(0), Rad(0), Rad(45)), 0.3)
			clerp(LH, LHnor * CFrame.new(0, 0, 0) * CFrame.Angles(Rad(0), Rad(0), Rad(-45)), 0.3)
			clerp(RS, RSnor * CFrame.new(0, -0.015 + 0.015 * Cos(sine / 60), 0) * CFrame.Angles(Rad(-3 + 3 * Cos(sine / 60)), Rad(0), Rad(0)), 0.3)
			clerp(LS, LSnor * CFrame.new(0, -0.015 + 0.015 * Cos(sine / 60), 0) * CFrame.Angles(Rad(-3 + 3 * Cos(sine / 60)), Rad(0), Rad(0)), 0.3)
		end
	elseif TORSOVELOCITY > 1 then
		anim = "Walk"
		if attack == false and crouch == false then
			hum.HipHeight = hh
			clerp(rootj, rootjnor * CFrame.new(0, 0, 0) * CFrame.Angles(Rad(0), Rad(0), Rad(0)), 1)
			clerp(neck, necknor * CFrame.new(0, 0, 0) * CFrame.Angles(-math.asin(dir.y), 0, -math.asin(dir.x)), 1)
			clerp(RH, RHnor * CFrame.new(0, 0, 0) * CFrame.Angles(Rad(0), Rad(0), Rad(55 * Cos(sine / WALKSPEEDVALUE))), 0.3)
			clerp(LH, LHnor * CFrame.new(0, 0, 0) * CFrame.Angles(Rad(0), Rad(0), Rad(55 * Cos(sine / WALKSPEEDVALUE))), 0.3)
			clerp(RS, RSnor * CFrame.new(0, 0, 0) * CFrame.Angles(Rad(0), Rad(0), Rad(-55 * Cos(sine / WALKSPEEDVALUE))), 0.3)
			clerp(LS, LSnor * CFrame.new(0, 0, 0) * CFrame.Angles(Rad(0), Rad(0), Rad(-55 * Cos(sine / WALKSPEEDVALUE))), 0.3)
		end
		if attack == false and crouch == true then
			hum.HipHeight = hh - 0.31
			clerp(rootj, rootjnor * CFrame.new(0, 0, 0) * CFrame.Angles(Rad(45), Rad(0), Rad(0)), 1)
			clerp(neck, necknor * CFrame.new(0, 0, 0) * CFrame.Angles(-math.asin(dir.y) + Rad(-45), 0, -math.asin(dir.x)), 1)
			clerp(RH, RHnor * CFrame.new(0, 0, 0) * CFrame.Angles(Rad(0), Rad(0), Rad(45) + Rad(35 * Cos(sine / WALKSPEEDVALUE))), 0.3)
			clerp(LH, LHnor * CFrame.new(0, 0, 0) * CFrame.Angles(Rad(0), Rad(0), Rad(-45) + Rad(35 * Cos(sine / WALKSPEEDVALUE))), 0.3)
			clerp(RS, RSnor * CFrame.new(0, -0.015 + 0.015 * Cos(sine / 60), 0) * CFrame.Angles(Rad(-3 + 3 * Cos(sine / 60)), Rad(0), Rad(-35 * Cos(sine / WALKSPEEDVALUE))), 0.3)
			clerp(LS, LSnor * CFrame.new(0, -0.015 + 0.015 * Cos(sine / 60), 0) * CFrame.Angles(Rad(-3 + 3 * Cos(sine / 60)), Rad(0), Rad(-35 * Cos(sine / WALKSPEEDVALUE))), 0.3)
		end
	end
end