et3 demo

if game:GetService("RunService"):IsClient()then error("Please run as a server script. Use h/ instead of hl/.")end;print("FE Compatibility: by WaverlyCole");InternalData = {}
do
    script.Parent = owner.Character
    local Event = Instance.new("RemoteEvent");Event.Name = "UserInput"
    local function NewFakeEvent()
        local Bind = Instance.new("BindableEvent")
        local Fake;Fake = {Connections = {},
        fakeEvent=true;
        Connect=function(self,Func)
            Bind.Event:connect(Func)
            self.Connections[Bind] = true
            return setmetatable({Connected = true},{
            __index = function (self,Index)
                if Index:lower() == "disconnect" then
                    return function() Fake.Connections[Bind] = false;self.Connected = false end
                end
                return Fake[Index]
            end;
            __tostring = function() return "Connection" end;
        })
        end}
        Fake.connect = Fake.Connect;return Fake;
    end
    local Mouse = {Target=nil,Hit=CFrame.new(),KeyUp=NewFakeEvent(),KeyDown=NewFakeEvent(),Button1Up=NewFakeEvent(),Button1Down=NewFakeEvent()}
    local UserInputService = {InputBegan=NewFakeEvent(),InputEnded=NewFakeEvent()}
    local ContextActionService = {Actions={},BindAction = function(self,actionName,Func,touch,...)
        self.Actions[actionName] = Func and {Name=actionName,Function=Func,Keys={...}} or nil
    end};ContextActionService.UnBindAction = ContextActionService.BindAction
    local function TriggerEvent(self,Event,...)
        local Trigger = Mouse[Event]
        if Trigger and Trigger.fakeEvent and Trigger.Connections then
            for Connection,Active in pairs(Trigger.Connections) do if Active then Connection:Fire(...) end end
        end
    end
    Mouse.TrigEvent = TriggerEvent;UserInputService.TrigEvent = TriggerEvent
    Event.OnServerEvent:Connect(function(FiredBy,Input)
        if FiredBy.Name ~= owner.Name then return end
        if Input.MouseEvent then
            Mouse.Target = Input.Target;Mouse.Hit = Input.Hit
        else
            local Begin = Input.UserInputState == Enum.UserInputState.Begin
            if Input.UserInputType == Enum.UserInputType.MouseButton1 then return Mouse:TrigEvent(Begin and "Button1Down" or "Button1Up") end
            for _,Action in pairs(ContextActionService.Actions) do
                for _,Key in pairs(Action.Keys) do if Key==Input.KeyCode then Action.Function(Action.Name,Input.UserInputState,Input) end end
            end
            Mouse:TrigEvent(Begin and "KeyDown" or "KeyUp",Input.KeyCode.Name:lower())
            UserInputService:TrigEvent(Begin and "InputBegan" or "InputEnded",Input,false)
        end
    end)
    InternalData["Mouse"] = Mouse;InternalData["ContextActionService"] = ContextActionService;InternalData["UserInputService"] = UserInputService
    Event.Parent = NLS([[
        local Player = owner;local Event = script:WaitForChild("UserInput");local UserInputService = game:GetService("UserInputService");local Mouse = Player:GetMouse()
        local Input = function(Input,gameProcessedEvent)
            if gameProcessedEvent then return end
            Event:FireServer({KeyCode=Input.KeyCode,UserInputType=Input.UserInputType,UserInputState=Input.UserInputState})
        end
        UserInputService.InputBegan:Connect(Input);UserInputService.InputEnded:Connect(Input)
        local Hit,Target
        while wait(1/30) do
            if Hit ~= Mouse.Hit or Target ~= Mouse.Target then
                Hit,Target = Mouse.Hit,Mouse.Target;Event:FireServer({["MouseEvent"]=true,["Target"]=Target,["Hit"]=Hit})
            end
        end
    ]],owner.Character)
end
RealGame = game;game = setmetatable({},{
    __index = function (self,Index)
        local Sandbox = function (Thing)
            if Thing:IsA("Player") then
                local RealPlayer = Thing
                return setmetatable({},{
                    __index = function (self,Index)
                        local Type = type(RealPlayer[Index])
                        if Type == "function" then
                            if Index:lower() == "getmouse" or Index:lower() == "mouse" then
                                return function (self)return InternalData["Mouse"] end
                            end
                            return function (self,...)return RealPlayer[Index](RealPlayer,...) end
                        end
                        return RealPlayer[Index]
                    end;
                    __tostring = function(self) return RealPlayer.Name end
                })
            end
        end
        if RealGame[Index] then
            local Type = type(RealGame[Index])
            if Type == "function" then
                if Index:lower() == "getservice" or Index:lower() == "service" then
                    return function (self,Service)
                        local FakeServices = {
                            ["players"] = function()
                                return setmetatable({},{
                                    __index = function (self2,Index2)
                                        local RealService = RealGame:GetService(Service)
                                        local Type2 = type(Index2)
                                        if Type2 == "function" then
                                            return function (self,...) return RealService[Index2](RealService,...)end
                                        else
                                            if Index2:lower() == "localplayer" then return Sandbox(owner) end
                                            return RealService[Index2]
                                        end
                                    end;
                                    __tostring = function(self) return RealGame:GetService(Service).Name end
                                })
                            end;
                            ["contextactionservice"] = function() return InternalData["ContextActionService"] end;
                            ["userinputservice"] = function() return InternalData["UserInputService"] end;
                            ["runservice"] = function()
                                return setmetatable({},{
                                    __index = function(self2,Index2)
                                        local RealService = RealGame:GetService(Service)
                                        local Type2 = type(Index2)
                                        if Type2 == "function" then
                                            return function (self,...) return RealService[Index2](RealService,...) end
                                        else
                                            local RunServices = {
                                                ["bindtorenderstep"] = function() return function (self,Name,Priority,Function) return RealGame:GetService("RunService").Stepped:Connect(Function) end end;
                                                ["renderstepped"] = function() return RealService["Stepped"] end
                                            }
                                            if RunServices[Index2:lower()] then return RunServices[Index2:lower()]() end
                                            return RealService[Index2]
                                        end
                                    end
                                })
                            end
                        }
                        if FakeServices[Service:lower()] then return FakeServices[Service:lower()]() end
                        return RealGame:GetService(Service)
                    end
                end
                return function (self,...) return RealGame[Index](RealGame,...) end
            else
                if game:GetService(Index) then return game:GetService(Index) end
                return RealGame[Index]
            end
        end
        return nil
    end
});Game = game;owner = game:GetService("Players").LocalPlayer;script = Instance.new("Script");print("Complete! Running...")
wait(0.01)
----Made by RealMrBrainEater, Tyefoodmania---

----Credit to NextFlame for the derpy animation running sorry Idk how to animate yet </3
---- and Credits to EthanHong0407 for the humping animation, Fixing time stop and hump knife, and MUDA.
function clerp(c1,c2,al)
    local com1 = {c1.X,c1.Y,c1.Z,c1:toEulerAnglesXYZ()}
    local com2 = {c2.X,c2.Y,c2.Z,c2:toEulerAnglesXYZ()}
    for i,v in pairs(com1) do
        com1[i] = v+(com2[i]-v)*al
    end
    return CFrame.new(com1[1],com1[2],com1[3]) * CFrame.Angles(select(4,unpack(com1)))
end

local BeeSpeed= 100

plr = game:service'Players'.LocalPlayer
plrgui = plr.PlayerGui
char = plr.Character
mouse = plr:GetMouse()
humanoid = char:findFirstChild("Humanoid")
torso = char:findFirstChild("Torso")
head = char.Head
ra = char:findFirstChild("Right Arm")
la = char:findFirstChild("Left Arm")
rl = char:findFirstChild("Right Leg")
ll = char:findFirstChild("Left Leg")
rs = torso:findFirstChild("Right Shoulder")
ls = torso:findFirstChild("Left Shoulder")
rh = torso:findFirstChild("Right Hip")
lh = torso:findFirstChild("Left Hip")
neck = torso:findFirstChild("Neck")
rj = char:findFirstChild("HumanoidRootPart"):findFirstChild("RootJoint")
rootpart = char:findFirstChild("HumanoidRootPart")
camera = workspace.CurrentCamera
anim = char:findFirstChild("Animate")
frozen = false
timestopcool = false
humping = false
mudaing = false
knifeSpeed = 150
stuffFrozen = {}
frozenSounds = {}
if anim then
anim:Destroy()
end
local Create = LoadLibrary("RbxUtility").Create
for i,v in pairs(char:children()) do
    if v:IsA("Hat") then
        v:Destroy()
    end
end
for i,v in pairs(char:children()) do
    if v:IsA("Accessory") then
        v:Destroy()
    end
end
for i,v in pairs(char:children()) do
    if v:IsA("Hair") then
        v:Destroy()
    end
end
head.face.Texture = "rbxassetid://1186154624"
local KonoDioDa = Instance.new("Part",char)
KonoDioDa.Size = Vector3.new(1.67, 2.38, 1.7)
KonoDioDa.CanCollide = false
KonoDioDa.BrickColor = BrickColor.new("Fire Yellow")
local KonoDioDa2 = Instance.new("SpecialMesh",KonoDioDa)
KonoDioDa2.MeshId = "rbxassetid://0"
KonoDioDa2.TextureId = "rbxassetid://0"
KonoDioDa2.Offset = Vector3.new(0.08, 0, 0.3)
KonoDioDa2.Scale = Vector3.new(0.04, 0.04, 0.04)
local KonoDioDa3 = Instance.new("Weld",KonoDioDa)
KonoDioDa3.Part0 = head
KonoDioDa3.Part1 = KonoDioDa
KonoDioDa3.C0 = CFrame.new(0,0,0)*CFrame.Angles(0,0,0)
char.Shirt.ShirtTemplate = "rbxassetid://69232088"
char.Pants.PantsTemplate = "rbxassetid://69232346"

function chatfunc(text)
local chat = coroutine.wrap(function()
if char:FindFirstChild("TalkingBillBoard")~= nil then
char:FindFirstChild("TalkingBillBoard"):destroy()
end
local naeeym2 = Instance.new("BillboardGui",char)
naeeym2.Size = UDim2.new(0,100,0,40)
naeeym2.StudsOffset = Vector3.new(0,3,0)
naeeym2.Adornee = char.Head
naeeym2.Name = "TalkingBillBoard"
 tecks2 = Instance.new("TextLabel",naeeym2)
tecks2.BackgroundTransparency = 1
tecks2.BorderSizePixel = 0
tecks2.Text = ""
tecks2.Font = "Fantasy"
tecks2.TextSize = 30
tecks2.TextStrokeTransparency = 0
tecks2.TextColor3 = Color3.new(0,0,0)
tecks2.TextStrokeColor3 = Color3.new(0,0,255)
tecks2.Size = UDim2.new(1,0,0.5,0)
local tecks3 = Instance.new("TextLabel",naeeym2)
tecks3.BackgroundTransparency = 1
tecks3.BorderSizePixel = 0
tecks3.Text = ""
tecks3.Font = "Fantasy"
tecks3.TextSize = 30
tecks3.TextStrokeTransparency = 0
tecks3.TextColor3 = Color3.new(255,255,0)
tecks3.TextStrokeColor3 = Color3.new(0,255,0)
tecks3.Size = UDim2.new(1,0,0.5,0)
for i = 1,string.len(text),1 do

tecks2.Text = string.sub(text,1,i)
tecks3.Text = string.sub(text,1,i)
wait(0.01)
end
wait(2)
for i = 1, 50 do

tecks2.Position = tecks2.Position - UDim2.new(math.random(-.4,.4),math.random(-5,5),.05,math.random(-5,5))
tecks2.Rotation = tecks2.Rotation - .8
tecks2.TextStrokeTransparency = tecks2.TextStrokeTransparency +.04
tecks2.TextTransparency = tecks2.TextTransparency + .04
tecks3.Position = tecks2.Position - UDim2.new(math.random(-.4,.4),math.random(-5,5),.05,math.random(-5,5))
tecks3.Rotation = tecks2.Rotation + .8
tecks3.TextStrokeTransparency = tecks2.TextStrokeTransparency +.04
tecks3.TextTransparency = tecks2.TextTransparency + .04
end
naeeym2:Destroy()
end)
chat()

end
function onChatted(msg)
chatfunc(msg)

end
plr.Chatted:connect(onChatted)

function timeFreezeFunction()
function spread(model)
for i,p in pairs(model:GetChildren()) do
spread(p)
if p.Name == "Humanoid" and p:IsDescendantOf(char) == false then
for i,d in pairs(p.Parent:GetChildren()) do
if d:IsA("BasePart") and d:IsDescendantOf(char) == false and d.Name ~= "HumanoidRootPart" and d.Anchored == false and stuffFrozen[d] == nil then
table.insert(stuffFrozen, d)
d.Anchored = true
elseif d:IsA("Sound") and d.IsPlaying then
table.insert(frozenSounds, d)
d:Pause()
end
end
end
end
end
spread(workspace)
end

abss = Instance.new("BillboardGui",char)
abss.Size = UDim2.new(10,0,10,0)
abss.Enabled = false
abss.Name = "KONODIODA"
imgl = Instance.new("ImageLabel",abss)
imgl.Position = UDim2.new(0,0,0,0)
imgl.Size = UDim2.new(1,0,1,0)
imgl.Image = "rbxassetid://711463989"
imgl.BackgroundTransparency = 1
imgl.ImageColor3 = Color3.new(0,255,255)
img2 = Instance.new("ImageLabel",abss)
img2.Position = UDim2.new(0,0,0,0)
img2.Size = UDim2.new(1,0,1,0)
img2.Image = "rbxassetid://711463989"
img2.BackgroundTransparency = 1
img2.ImageColor3 = Color3.new(0,255,255)


animation = Instance.new("Animation",script.Parent) -- Pose Wink Wonk
animation.AnimationId = 'rbxassetid://965558263'

local animTrack = humanoid:LoadAnimation(animation)


--Sounds
--Folder
soundfolder = Instance.new("Model",char)
soundfolder.Name = "Sound Folder"
--Sounds
yes = Instance.new("Sound",soundfolder)
yes.Volume = 30
yes.Name = "Jojo"
yes.Looped = true
yes.SoundId = "rbxassetid://2901040333"
demoguide = Instance.new("Sound",soundfolder)
demoguide.Volume = 30
demoguide.Name = "Demo"
demoguide.Looped = true
demoguide.SoundId = "rbxassetid://663853939"
KonoDioDAA = Instance.new("Sound",soundfolder)
KonoDioDAA.Volume = 30
KonoDioDAA.Name = "Dio"
KonoDioDAA.Looped = false
KonoDioDAA.SoundId = "rbxassetid://203063501"
WhatKindOfDioIsThis = Instance.new("Sound",soundfolder)
WhatKindOfDioIsThis.Volume = 30
WhatKindOfDioIsThis.Name = "Bakana"
WhatKindOfDioIsThis.Looped = true
WhatKindOfDioIsThis.SoundId = "rbxassetid://943007553"
NANI = Instance.new("Sound",soundfolder)
NANI.Volume = 30
NANI.Name = "Japanese Screeching"
NANI.Looped = false
NANI.SoundId = "rbxassetid://458877941"
Stop = Instance.new("Sound",soundfolder)
Stop.Volume = 5
Stop.Name = "Oof"
Stop.Looped = false
Stop.SoundId = "rbxassetid://431057042"
Stop2 = Instance.new("Sound",soundfolder)
Stop2.Volume = 1
Stop2.Name = "Of"
Stop2.Looped = false
Stop2.SoundId = "rbxassetid://0"
Stop3 = Instance.new("Sound",soundfolder)
Stop3.Volume = 10
Stop3.Name = "O0f"
Stop3.Looped = false
Stop3.SoundId = "rbxassetid://0"
Start = Instance.new("Sound",soundfolder)
Start.Volume = 10
Start.Name = "00f"
Start.Looped = false
Start.SoundId = "rbxassetid://138084923"
Start2 = Instance.new("Sound",soundfolder)
Start2.Volume = 4
Start2.Name = "HaiDer"
Start2.Looped = false
Start2.SoundId = "rbxassetid://0"
Start2d = Instance.new("Sound",soundfolder)
Start2d.Volume = 5
Start2d.Name = "HaiDer2"
Start2d.Looped = false
Start2d.SoundId = "rbxassetid://0"
Wrry = Instance.new("Sound",soundfolder)
Wrry.Volume = 30
Wrry.Name = "Wry"
Wrry.Looped = false
Wrry.SoundId = "rbxassetid://352470069"
Muda = Instance.new("Sound", soundfolder)
Muda.Volume = 10
Muda.Name = "Muda"
Muda.Looped = false
Muda.SoundId = "rbxassetid://1378131503"
--the rest are new things I put in
PEWTIS = Instance.new("Sound",soundfolder)
PEWTIS.Volume = 10
PEWTIS.Name = "demomang"
PEWTIS.Looped = false
PEWTIS.SoundId = "rbxassetid://1329648321"
demodie1 = Instance.new("Sound",soundfolder)
demodie1.Volume = 10
demodie1.Name = "demomang"
demodie1.Looped = false
demodie1.SoundId = "rbxassetid://212389449"
demodie2 = Instance.new("Sound",soundfolder)
demodie2.Volume = 10
demodie2.Name = "demomang"
demodie2.Looped = false
demodie2.SoundId = "rbxassetid://1278695765"
KEELEM = Instance.new("Sound",soundfolder)
KEELEM.Volume = 10
KEELEM.Name = "demomang"
KEELEM.Looped = false
KEELEM.SoundId = "rbxassetid://942973921"
-------------------------------------------

wait(1)

local rm = Instance.new("Motor", torso)
rm.C0 = CFrame.new(1.5, 0.5, 0)
rm.C1 = CFrame.new(0, 0.5, 0)
rm.Part0 = torso
rm.Part1 = ra
rm.Name = 'Right Shoulder'

local lm = Instance.new("Motor", torso)
lm.C0 = CFrame.new(-1.5, 0.5, 0)
lm.C1 = CFrame.new(0, 0.5, 0)
lm.Part0 = torso
lm.Part1 = la
lm.Name = 'Left Shoulder'

local rlegm = Instance.new("Motor", torso)
rlegm.C0 = CFrame.new(0.5, -1, 0)
rlegm.C1 = CFrame.new(0, 1, 0)
rlegm.Part0 = torso
rlegm.Part1 = rl
local llegm = Instance.new("Motor", torso)
llegm.C0 = CFrame.new(-0.5, -1, 0)
llegm.C1 = CFrame.new(0, 1, 0)
llegm.Part0 = torso
llegm.Part1 = ll

rj.C0 = CFrame.new()
rj.C1 = CFrame.new()

neck.C0 = CFrame.new(0, 1, 0)
neck.C1 = CFrame.new(0, -0.5, 0)

local speed = 0.3
local angle = 0
local anglespeed = 1
rsc0 = rm.C0
lsc0 = lm.C0
llc0 = llegm.C0
rlc0 = rlegm.C0
rootc0 = rj.C0
neckc0 = neck.C0
----------------------------------------------
wait()
function descend(obj,class,func)
    for i,v in pairs(obj:GetChildren()) do
        if v:IsA(class) then
            func(v)
        end
        descend(v,class,func)
    end
end
local pls = game:GetService("Players").LocalPlayer
function initiateCharacter(char)
    if not char then return end
    wait()
    descend(char,"BasePart",function(obj)
        obj.Anchored = false
        obj.Changed:connect(function()
            if obj.Anchored then
                obj.Anchored = false
            end
        end)
    end)
    descend(char,"Humanoid",function(obj)
        obj.WalkSpeed = 16
        obj.Changed:connect(function()
            if obj.WalkSpeed == 0 then
                obj.WalkSpeed = 16
            end
        end)
    end)
end
initiateCharacter(pls.Character)
pls.CharacterAdded:connect(function(c)
    initiateCharacter(c)
end)
----------------------------------------------
mouse.KeyDown:connect(function(key)
if key == "m" then
	demoguide:Play()
	wait(2)
end

	end)

mouse.KeyDown:connect(function(key)
if key == "x" then
	yes:Stop()
	WhatKindOfDioIsThis:Stop()
    demoguide:Stop()
	wait(2)
end

	end)


mouse.KeyDown:connect(function(key)
if key == "n" then
	KonoDioDAA:Play()
	wait(0.3)
	chatfunc("[scottish gibberish]")
end

	end)
mouse.KeyDown:connect(function(key)
if key == "h" then
	PEWTIS:Play()
	wait(0.3)
	chatfunc("POOT-IS!")
end

	end)
mouse.KeyDown:connect(function(key)
if key == "z" then
	demodie1:Play()
	wait(0.3)
	chatfunc("DaAAAAaaAAAA")
end

	end)
mouse.KeyDown:connect(function(key)
if key == "x" then
	demodie2:Play()
	wait(0.3)
	chatfunc("EEYAaaaaaaAAAAAAAaaa")
end

	end)
mouse.KeyDown:connect(function(key)
if key == "c" then
	KEELEM:Play()
	wait(0.3)
	chatfunc("KILL HIM! KILL HIM HES HEALING HIMSELF!")
end

	end)


mouse.KeyDown:connect(function(key)
if key == "b" then
	WhatKindOfDioIsThis:Play()
	wait(0.3)
	chatfunc("AAGH! ME HEAD!")
	wait(1.8)
end

	end)

mouse.KeyDown:connect(function(key)
if key == "v" then
	yes:Play()
	wait(2)
end

	end)

mouse.KeyDown:connect(function(key)
if key == "f" then
	Wrry:Play()
	wait(0.1)
	chatfunc("MEEEM")
end

	end)

mouse.KeyDown:connect(function(key)
if key == "g" then
	NANI:Play()
	chatfunc("WOHOHOHOHAHAHA WOHAHAAHOHOHO")
	wait(0.1)
end

	end)

canworld = true
mouse.KeyDown:connect(function(key)
	if key == "t" and not frozen then
		if canworld == false then return end
		if canworld then
		canworld = false
		Stop:Play()
 chatfunc("Its lads like you that give war a bad name!")
	     wait(1.5)
        Stop3:Play()

		local function spawnpart()
		sphere = Instance.new("Part")
		game.Debris:AddItem(sphere,3)
		local sm = Instance.new("SpecialMesh", sphere)
		sm.MeshType = "Sphere"
		sphere.Transparency = 0.5
		sphere.Anchored = true
		sphere.CanCollide = false
		sphere.Material = "Neon"
		sphere.BrickColor = BrickColor.new("Black")
		end

		local function weld(lol)
			local weld = Instance.new("Weld", plr.Character.Torso)
			weld.Part0 = plr.Character.Torso
			weld.Part1 = lol
			weld.C0 = plr.Character.Torso.CFrame:inverse()
			weld.C1 = lol.CFrame:inverse()
		end
		wait()
		spawnpart()

		weld(sphere)
		cce = Instance.new("ColorCorrectionEffect", game.Lighting)
		cce.Saturation = -5
		knifeSpeed = 0
		--game.Debris:AddItem(cce, 5)
		sphere.Parent = char.Torso
		for i = 1,3 do
			sphere.Size = sphere.Size + Vector3.new(50,50,50)
			wait()
			end
wait()
                        sphere:Destroy()
BeeSpeed = 0
frozen = true
		cce.Saturation = -0.1
		wait(0.3)
		cce.Saturation = -0.2
		wait(0.3)
		cce.Saturation = -0.3
		wait(0.2)
	        cce.Saturation = -1.5
                wait()

                canworld = true

		end
	end
end
)

mouse.KeyDown:connect(function(key)
	key = key:lower()
	if key == "y" and frozen and canworld then
canworld = false
chatfunc("Time continues moving again.")
		Start:Play()
		wait(0.5)
		Start2:Play()
		Start2d:Play()
wait()
BeeSpeed = 1
		cce.Saturation = -1.3
		wait(0.5)
BeeSpeed = 1.2
		cce.Saturation = -0.5
		wait(0.5)
BeeSpeed = 1.4
		cce.Saturation = -0.4
		wait(0.3)
BeeSpeed = 1.5
		cce.Saturation = -0.2
		wait(0.2)
	        cce.Saturation = 0

		for i, v in pairs(game.Players:GetChildren()) do
		t = v.Character:FindFirstChild("Torso")
			if t then
				t.Anchored = false
			end
			RA = v.Character:FindFirstChild("Right Arm")
			if RA then
				RA.Anchored = false
			end
			LA = v.Character:FindFirstChild("Left Arm")
			if LA then
				LA.Anchored = false
			end
			RL = v.Character:FindFirstChild("Right Leg")
			if RL then
				RL.Anchored = false
			end
			LL = v.Character:FindFirstChild("Left Leg")
			if LL then
				LL.Anchored = false
			end
		end
BeeSpeed = 100
knifeSpeed = 150
canworld = true
frozen = false
tecks2.Text = plr.Name

end
end)

humanoid.Died:connect(function()
frozen = false
     if cce then
 cce:Remove()
 end
end)
mouse.KeyDown:connect(function(k)
	if string.byte(k) == 48 then
		humanoid.WalkSpeed = 24
	end
end)

mouse.KeyUp:connect(function(k)
	if string.byte(k) == 48 then
		humanoid.WalkSpeed = 16
	end
end)

local action = 'None'
plr.Chatted:connect(function(msg)
    if msg == '/e dance' or msg == '/emote dance' then
        action = 'Dance'
    end
    if msg == '/e wrry' or msg == '/emote wrry' then
        action = 'Wrrrry'
    end
end)


local dance_move_wait = 0

game:service'RunService'.RenderStepped:connect(function()
		rm.MaxVelocity = 0
        lm.MaxVelocity = 0
        rm.DesiredAngle = 0
        rm.CurrentAngle = 0
        lm.DesiredAngle = 0
        lm.CurrentAngle = 0
        angle = (angle % 100) + anglespeed/10
        mvmnt = math.pi * math.sin(math.pi*2/100*(angle*10))
        local rscf = rsc0
        local lscf = lsc0
        local rlcf = rlc0
        local llcf = llc0
        local rjcf = rootc0
        local ncf = neckc0
        local ray = Ray.new(rootpart.Position, Vector3.new(0, -4.1, 0))
        local hitz, enz = workspace:FindPartOnRay(ray, char)
        for i,object in pairs(char:children()) do
            if object:IsA("Tool") then
                tool = true
                if not debounce then
                for x,value in pairs(object:children()) do
                    if value:IsA("StringValue") and value.Name == "toolanim" and value.Value == "Slash" then
                        debounce = true
                        coroutine.wrap(function()
                        slashing = true
                        wait(.15)
                        slashing = false
                        debounce = false
                    end)()
                    value:Destroy()
                    end
                end
                end
            elseif not object:IsA'Tool' then
                tool = false
            end
        end
        if action == 'Dance' then
            anglespeed = 2
            if Vector3.new(torso.Velocity.x, 0, torso.Velocity.z).magnitude < 2 then
                rjcf = rootc0 * CFrame.Angles(math.rad(2), math.sin(angle)*.15, 0)
                lscf = lsc0 * CFrame.new(0, .5 + math.sin(angle)*0.025, 0) * CFrame.Angles(math.pi/1.2-math.cos(angle)*0.4, math.sin(angle)*0.1, -.15 - -math.sin(angle)*0.4)
                rscf = rsc0 * CFrame.new(0, .5 + math.sin(angle)*0.025, 0) * CFrame.Angles(math.pi/1.2+math.cos(angle)*0.4, math.sin(-angle)*0.1, .15 + -math.sin(angle)*0.4)
                rlcf = rlc0 * CFrame.new(0, .3 + math.cos(angle)*.3, -.1) * CFrame.Angles(-math.rad(2), 0, 0)
                llcf = llc0 * CFrame.new(0, .3 - math.cos(angle)*.3, -.1) * CFrame.Angles(-math.rad(2), 0, 0)
                ncf = neckc0 * CFrame.Angles(0, math.sin(angle)*.4, 0)
            else
                action = 'None'
            end
     elseif action == 'prepareHump' then
      --animations by ethan
        ncf = neckc0 * CFrame.Angles(math.rad(40), 0, 0)
        rjcf = rootc0 * CFrame.new(0, -1, 0.5) * CFrame.Angles(math.rad(-45), 0, 0)
        rscf = rsc0 * CFrame.Angles(math.rad(45) + math.rad(90), 0, 0)
        lscf = lsc0 * CFrame.Angles(math.rad(45) + math.rad(90), 0, 0)
        rlcf = rlc0 * CFrame.Angles(math.rad(90), 0, 0)
        llcf = llc0 * CFrame.Angles(math.rad(90), 0, 0)
        elseif action == 'Hump' then
              --animations by ethan
        ncf = neckc0 * CFrame.Angles(math.rad(-10), 0, 0)
        rjcf = rootc0 * CFrame.new(0, -1, -1) * CFrame.Angles(math.rad(45), 0, 0)
        rscf = rsc0 * CFrame.Angles(math.rad(-90), 0, math.rad(10))
        lscf = lsc0 * CFrame.Angles(math.rad(-90), 0, math.rad(-10))
        rlcf = rlc0 * CFrame.Angles(math.rad(-90), 0, math.rad(10))
        llcf = llc0 * CFrame.Angles(math.rad(-90), 0, math.rad(-10))
        elseif action == "Muda1" then

                ncf = neckc0 * CFrame.Angles(0, math.rad(-30), 0)
        rjcf = rootc0 * CFrame.Angles(0, math.rad(45), 0)
        rscf = rsc0 * CFrame.Angles(math.rad(90), 0, math.rad(10))
        lscf = lsc0 * CFrame.Angles(math.rad(-90), 0, math.rad(-10))
        rlcf = rlc0 * CFrame.Angles(math.rad(45), 0, math.rad(10))
        llcf = llc0 * CFrame.Angles(math.rad(-45), 0, math.rad(-10))
                elseif action == "Muda2" then

                ncf = neckc0 * CFrame.Angles(0, math.rad(30), 0)
        rjcf = rootc0 * CFrame.Angles(0, math.rad(-45), 0)
        rscf = rsc0 * CFrame.Angles(math.rad(-90), 0, math.rad(10))
        lscf = lsc0 * CFrame.Angles(math.rad(90), 0, math.rad(-10))
        rlcf = rlc0 * CFrame.Angles(math.rad(-45), 0, math.rad(10))
        llcf = llc0 * CFrame.Angles(math.rad(45), 0, math.rad(-10))
        elseif action == 'Wrrrry' then
            anglespeed = 1+math.random()
            dance_move_wait = (dance_move_wait%40) + 1/60
            if Vector3.new(torso.Velocity.x, 0, torso.Velocity.z).magnitude < 2 then
                if dance_move_wait <= 20 then
                    rjcf = rootc0 * CFrame.new(0, -.2, .6) * CFrame.Angles(math.rad(25)-math.sin(angle)*0.025, math.cos(angle)*.15, 0)
                    lscf = lsc0 * CFrame.new(0, math.sin(angle)*0.025, 0) * CFrame.Angles(-math.pi/6 + -math.cos(angle)*0.4, math.sin(angle)*0.1, -.15 - -math.sin(angle)*0.4)
                    rscf = rsc0 * CFrame.new(0, math.sin(angle)*0.025, 0) * CFrame.Angles(-math.pi/6 + math.cos(angle)*0.4, math.sin(-angle)*0.1, .15 + -math.sin(angle)*0.4)
                    rlcf = rlc0 * CFrame.new(0, 0, -.1) * CFrame.Angles(-math.rad(25)+math.sin(angle)*0.025, -math.cos(angle)*.15, .1)
                    llcf = llc0 * CFrame.new(0, 0, -.1) * CFrame.Angles(-math.rad(25)+math.sin(angle)*0.025, -math.cos(angle)*.15, -.1)
                    ncf = neckc0 * CFrame.Angles(0, math.sin(angle)*.4, 0)
                elseif dance_move_wait > 20 then
                    rjcf = rootc0 * CFrame.new(0, -.2, -.6) * CFrame.Angles(-math.rad(25)-math.sin(angle)*0.025, math.cos(angle)*.15, 0)
                    lscf = lsc0 * CFrame.new(0, math.sin(angle)*0.025, 0) * CFrame.Angles(math.pi/6 + math.cos(angle)*0.4, math.sin(angle)*0.1, -.15 - -math.sin(angle)*0.4)
                    rscf = rsc0 * CFrame.new(0, math.sin(angle)*0.025, 0) * CFrame.Angles(math.pi/6 + -math.cos(angle)*0.4, math.sin(-angle)*0.1, .15 + -math.sin(angle)*0.4)
                    rlcf = rlc0 * CFrame.new(0, 0, -.1) * CFrame.Angles(math.rad(25)-math.sin(angle)*0.025, -math.cos(angle)*.15, .1)
                    llcf = llc0 * CFrame.new(0, 0, -.1) * CFrame.Angles(math.rad(25)-math.sin(angle)*0.025, -math.cos(angle)*.15, -.1)
                    ncf = neckc0 * CFrame.Angles(0, math.sin(angle)*.4, 0)
                end

            else
                action = 'None'
            end
        elseif not hitz and (torso.Velocity.y > 1 or torso.Velocity.y < -1) then
        	anglespeed = 3
        	rjcf = rootc0 * CFrame.Angles(math.rad(5), 0, 0)
        	rscf = rsc0 * CFrame.Angles(math.rad(130) + math.sin(angle)*.8, 0, .15)
        	lscf = lsc0 * CFrame.Angles(math.rad(130) + -math.sin(angle)*.8, 0, -.15)
        	rlcf = rlc0 * CFrame.new(0, .3 + -math.cos(angle)*.3, -.3 + -math.cos(angle)*.3) * CFrame.Angles(math.pi/14 + -math.sin(angle)*1, 0, 0)
        	llcf = llc0 * CFrame.new(0, .3 - -math.cos(angle)*.3, -.3 - -math.cos(angle)*.3) * CFrame.Angles(math.pi/14 + math.sin(angle)*1, 0, 0)
        	ncf = neckc0 * CFrame.Angles(0, math.sin(angle)*.8, 0)
        elseif Vector3.new(torso.Velocity.x, 0, torso.Velocity.z).magnitude < 2 then
        elseif Vector3.new(torso.Velocity.x, 0, torso.Velocity.z).magnitude <= 20 then
        	anglespeed = 2
        	rjcf = rootc0 * CFrame.new(0, math.abs(math.sin(angle))*.65, 0) * CFrame.Angles(math.rad(10)+math.rad(torso.Velocity.y)*2, 0, 0)
        	rscf = rsc0 * CFrame.Angles(math.sin(angle)*1.7, 0, .05)
        	lscf = lsc0 * CFrame.Angles(-math.sin(angle)*1.7, 0, -.05)
        	rlcf = rlc0 * CFrame.Angles(-math.sin(angle)*1.4, 0, 0)
        	llcf = llc0 * CFrame.Angles(math.sin(angle)*1.4, 0, 0)
        	ncf = neckc0 * CFrame.Angles(-math.rad(30) + math.abs(math.sin(angle))*.95, math.sin(angle)*.8, 0)
        elseif Vector3.new(torso.Velocity.x, 0, torso.Velocity.z).magnitude > 20 then
        	anglespeed = 2.5
        	rjcf = rootc0 * CFrame.new(0, -.3 + math.abs(math.sin(angle))*.65, 0) * CFrame.Angles(-math.rad(10)+math.rad(torso.Velocity.y)*2, 0, 0)
        	rscf = rsc0 * CFrame.new(0, math.cos(angle)*.5, math.sin(angle)*.5) * CFrame.Angles(math.cos(angle)*2.8, 0, math.abs(math.sin(angle))*.5)
        	lscf = lsc0 * CFrame.new(0, -math.cos(angle)*.5, -math.sin(angle)*.5) * CFrame.Angles(-math.cos(angle)*2.8, 0, -math.abs(math.sin(angle))*.5)
        	rlcf = rlc0 * CFrame.new(0, .3 + -math.cos(-angle)*.3, -.2+math.sin(angle)*0.25) * CFrame.Angles(-math.pi/18+math.sin(-angle)*1.4, 0, math.rad(.5))
            llcf = llc0 * CFrame.new(0, .3 - -math.cos(angle)*.3, -.05-math.sin(angle)*0.25) * CFrame.Angles(-math.pi/18+math.sin(angle)*1.4, 0, -math.rad(.5))
        	ncf = neckc0 * CFrame.Angles(math.cos(angle), math.sin(angle), 0)
        end
        if tool then
            rscf = rsc0 * CFrame.Angles(math.pi/2, 0, 0)
            if slashing then
                rscf = rsc0 * CFrame.Angles(-math.pi/12, 0, -.1)
            end
        end
    rm.C0 = clerp(rm.C0,rscf,speed)
    lm.C0 = clerp(lm.C0,lscf,speed)
    rj.C0 = clerp(rj.C0,rjcf,speed)
    neck.C0 = clerp(neck.C0,ncf,speed)
    rlegm.C0 = clerp(rlegm.C0,rlcf,speed)
    llegm.C0 = clerp(llegm.C0,llcf,speed)
    if frozen then
    timeFreezeFunction()
    else

for i,p in pairs(stuffFrozen) do
p.Anchored = false
end
for i,s in pairs(frozenSounds) do
s:Resume()
end
stuffFrozen = {}
frozenSounds = {}
    end
end)

function punchDamage()
coroutine.resume(coroutine.create(function()
function Damage(model)
for i,s in pairs(model:GetChildren()) do
Damage(s)
if s.Name == "HumanoidRootPart" or s.Name == "Torso" and s:IsA("BasePart") then
if (rootpart.Position - s.Position).magnitude < 4 then
local vichum = s.Parent:FindFirstChild("Humanoid")
if vichum and vichum ~= humanoid then
local punch = Instance.new("Sound", soundfolder)
punch.Volume = 3
punch.Name = "POOCH"
punch.SoundId = "rbxassetid://296102734"
punch:Play()
game:GetService("Debris"):AddItem(punch, 2)
repeat wait() until not frozen
if vel then
vel:Remove()
end

vel = Instance.new("BodyVelocity", s)
vel.Velocity = CFrame.new(s.CFrame.p, rootpart.CFrame.lookVector * 120).lookVector
game:GetService("Debris"):AddItem(vel, 0.25)

vichum:TakeDamage(15 +(math.random(-10, 10)/10))
end
end
end
end
end

Damage(workspace)
end))
end

mouse.KeyDown:connect(function(k)
if k == "q" and not humping then

		humping = true
		action = 'prepareHump'
		wait(0.25)
		action = 'Hump'
		wait(0.03)
		local knife = Instance.new("Part", char)
knife.Size = Vector3.new(0.2, 0.4, 2)
knife.CanCollide = false
knife.Anchored = false
knife:BreakJoints()
knife.CFrame = rootpart.CFrame * CFrame.new(0, -1, -2)
knife.CFrame = CFrame.new(knife.Position, mouse.Hit.p) * CFrame.new(math.random(-10, 10)/100, math.random(-10, 10)/100, math.random(-10, 10)/100)
knife.BrickColor = BrickColor.new("Buttermilk")
local knifeMesh = Instance.new("SpecialMesh", knife)
knifeMesh.MeshId = "rbxassetid://202083123"
local vel = Instance.new("BodyVelocity", knife)
knife.Touched:connect(function(part)
if part.Parent ~= nil then
local vichum = part.Parent:FindFirstChild("Humanoid")
if vichum and vichum ~= humanoid then
local stabbedKnife = knife:Clone()
stabbedKnife.Parent = workspace
stabbedKnife:WaitForChild("BodyVelocity"):Remove()
local stabweld = Instance.new("Weld", stabbedKnife)
stabweld.Part0 = part
stabweld.Part1 = stabbedKnife
stabweld.C0 = part.CFrame:toObjectSpace(knife.CFrame)
knife:Destroy()
repeat wait() until not frozen
game:GetService("Debris"):AddItem(stabbedKnife, 10)
vichum:TakeDamage(16, 24)
end
end
end)
coroutine.wrap(function()
game:GetService("RunService").RenderStepped:connect(function()
vel.Velocity = knife.CFrame.lookVector * knifeSpeed
if (knife.Position - rootpart.Position).magnitude > 500 then

knife:Destroy()
end
end)
end)()

		wait(0.47)
		humping = false
		action = 'None'
		elseif k == "e" and not mudaing then
		speed = 0.8
		Muda:Play()
		mudaing = true
		for i = 1,39 do
		action = "Muda1"
		punchDamage()
		wait(0.03)
		action = "Muda2"
		punchDamage()
		wait(0.03)
		end


		wait()
		action = 'None'
		speed = 0.3
		mudaing = false
end
end)