Roblox Meme script

--Made by Ahtoh13131423144235

local p=game.Players.LocalPlayer
local c=p.Character
local t=c.Torso
local rs=t["Right Shoulder"]
local ls=t["Left Shoulder"]
local m=p:GetMouse()
local rsC0=rs.C0
local rsC1=rs.C1
local lsC0=ls.C0
local lsC1=ls.C1
local orig=nil
local deb=false
--
function die()
c.Archivable=true
local nc=c:Clone()
nc.Parent=workspace
nc.Name=""
nc:MoveTo(t.Position)
local nt=nc.Torso
for i,v in pairs(nc.Torso:GetChildren())do
if(v.ClassName=="Motor")or(v.ClassName=="Motor6D")then
v:destroy()
end
end
local hum=nc:FindFirstChildOfClass("Humanoid")
if(hum~=nil)then
hum.Name="haha"
hum.MaxHealth=0
hum.Health=0
hum.WalkSpeed=0
hum.JumpPower=0
hum.PlatformStand=true
end
local j1=Instance.new("Glue")
j1.Parent=nt
j1.Part0=nt
j1.Part1=nc["Right Arm"]
j1.C0=CFrame.new(1.5,.5,0)
j1.C1=CFrame.new(0,.5,0)
local b=Instance.new("Part")
b.Parent=j1.Part1
b.Name="Bone"
b.Transparency=1
b.Size=Vector3.new(1,1.5,1)
b.Position=Vector3.new(0,9999,0)
local bw=Instance.new("Weld")
bw.Parent=j1.Part1
bw.Part0=j1.Part1
bw.Part1=b
bw.C0=CFrame.new(0,-.3,0)
local j2=Instance.new("Glue")
j2.Parent=nt
j2.Part0=nt
j2.Part1=nc["Left Arm"]
j2.C0=CFrame.new(-1.5,.5,0)
j2.C1=CFrame.new(0,.5,0)
local b=Instance.new("Part")
b.Parent=j2.Part1
b.Name="Bone"
b.Transparency=1
b.Size=Vector3.new(1,1.5,1)
b.Position=Vector3.new(0,9999,0)
local bw=Instance.new("Weld")
bw.Parent=j2.Part1
bw.Part0=j2.Part1
bw.Part1=b
bw.C0=CFrame.new(0,-.3,0)
local j3=Instance.new("Glue")
j3.Parent=nt
j3.Part0=nt
j3.Part1=nc["Right Leg"]
j3.C0=CFrame.new(.5,-1,0)
j3.C1=CFrame.new(0,1,0)
local b=Instance.new("Part")
b.Parent=j3.Part1
b.Name="Bone"
b.Transparency=1
b.Size=Vector3.new(1,1.5,1)
b.Position=Vector3.new(0,9999,0)
local bw=Instance.new("Weld")
bw.Parent=j3.Part1
bw.Part0=j3.Part1
bw.Part1=b
bw.C0=CFrame.new(0,-.3,0)
local j4=Instance.new("Glue")
j4.Parent=nt
j4.Part0=nt
j4.Part1=nc["Left Leg"]
j4.C0=CFrame.new(-.5,-1,0)
j4.C1=CFrame.new(0,1,0)
local b=Instance.new("Part")
b.Parent=j4.Part1
b.Name="Bone"
b.Transparency=1
b.Size=Vector3.new(1,1.5,1)
b.Position=Vector3.new(0,9999,0)
local bw=Instance.new("Weld")
bw.Parent=j4.Part1
bw.Part0=j4.Part1
bw.Part1=b
bw.C0=CFrame.new(0,-.3,0)
local j5=Instance.new("Weld")
j5.Parent=nt
j5.Part0=nt
j5.Part1=nc.Head
j5.C0=CFrame.new(0,1.5,0)
wait()
c:destroy()
end
--
function meme(k)
k=string.lower(k)
if(k=="q")and(deb==false)then
deb=true
rs:destroy()
ls:destroy()
rs=Instance.new("Weld")
rs.Parent=t
rs.Part0=t
rs.Part1=c["Right Arm"]
rs.C0=rsC0
ls=Instance.new("Weld")
ls.Parent=t
ls.Part0=t
ls.Part1=c["Left Arm"]
ls.C0=lsC0
rs.C1=CFrame.new(0,0,0)
ls.C1=CFrame.new(0,0,0)
for i=0,1,0.05 do
rs.C0=rs.C0:lerp(CFrame.new(1.5,1,0,0,-1,0,1,0,0,0,0,1),i)
ls.C0=ls.C0:lerp(CFrame.new(-1.49999976,1,0,0,1,0,-1,0,0,0,0,1),i)
wait()
end
local uspinme=Instance.new("Sound")
uspinme.Parent=c
uspinme.Looped=true
uspinme.SoundId="rbxassetid://145799973"
uspinme.Volume=2
uspinme:Play()
local origxd=c.HumanoidRootPart.RootJoint.C0
for i=1,500 do
c.HumanoidRootPart.RootJoint.C0=c.HumanoidRootPart.RootJoint.C0*CFrame.fromEulerAnglesXYZ(0,0,.5)
wait()
end
uspinme:Stop()
uspinme:destroy()
c.HumanoidRootPart.RootJoint.C0=origxd
for i=0,1,0.05 do
rs.C0=rs.C0:lerp(rsC0,i)
ls.C0=ls.C0:lerp(lsC0,i)
wait()
end
rs:destroy()
ls:destroy()
rs=Instance.new("Motor")
rs.Parent=t
rs.Part0=t
rs.Part1=c["Right Arm"]
rs.C0=rsC0
rs.C1=rsC1
ls=Instance.new("Motor")
ls.Parent=t
ls.Part0=t
ls.Part1=c["Left Arm"]
ls.C0=lsC0
ls.C1=lsC1
deb=false
elseif(k=="e")and(deb==false)then
deb=true
local wakemeup=Instance.new("Sound")
wakemeup.Parent=c
wakemeup.SoundId="rbxassetid://340656185"
wakemeup:Play()
wait(6)
wakemeup:Stop()
wakemeup:destroy()
deb=false
elseif(k=="r")and(deb==false)then
deb=true
local origxd=t.Neck.C0
local cancer=Instance.new("Sound")
cancer.Parent=c
cancer.SoundId="rbxassetid://482886779"
cancer.Volume=5
cancer:Play()
for i=1,1500 do
t.Neck.C0=t.Neck.C0*CFrame.fromEulerAnglesXYZ(math.random(-30,30),math.random(-30,30),math.random(-30,30))
wait()
end
cancer:Stop()
cancer:destroy()
local epicexplosion=Instance.new("Sound")
epicexplosion.Parent=c
epicexplosion.SoundId="rbxassetid://165969964"
epicexplosion.Volume=1
epicexplosion:Play()
print("rip head 2018-2018")
local haha=Instance.new("Explosion")
haha.Parent=c
haha.Position=t.Position
haha.BlastPressure=0
c.Head.Transparency=1
t.Neck.C0=origxd
wait(3)
epicexplosion:Stop()
epicexplosion:destroy()
for i=1,0,-0.1 do
c.Head.Transparency=i
wait()
end
deb=false
elseif(k=="t")and(deb==false)then
deb=true
rs:destroy()
rs=Instance.new("Weld")
rs.Parent=t
rs.Part0=t
rs.Part1=c["Right Arm"]
rs.C0=rsC0
rs.C1=rsC1
local origxd=t.Neck.C0
local pickaxe=Instance.new("Part")
pickaxe.Parent=c
pickaxe.Name="Pickaxe"
pickaxe.Size=Vector3.new(1,.8,4)
pickaxe.Position=Vector3.new(0,9999,0)
local mesh=Instance.new("FileMesh")
mesh.Parent=pickaxe
mesh.MeshId="http://www.roblox.com/asset/?id=22147051"
mesh.TextureId="http://www.roblox.com/asset/?id=22147026"
mesh.Scale=Vector3.new(1.5,1.5,1.5)
local weld=Instance.new("Weld")
weld.Parent=c["Right Arm"]
weld.Part0=c["Right Arm"]
weld.Part1=pickaxe
weld.C0=CFrame.new(0,-1,0)*CFrame.fromEulerAnglesXYZ(3.14,0,1.57)
local minediamonds=Instance.new("Sound")
minediamonds.Parent=c
minediamonds.SoundId="rbxassetid://897221959"
minediamonds:Play()
wait(1)
repeat
rs.C0=rs.C0*CFrame.fromEulerAnglesXYZ(0,0,.4)
t.Neck.C0=t.Neck.C0*CFrame.fromEulerAnglesXYZ(0,0,.4)
wait()
until minediamonds.TimePosition==0
t.Neck.C0=origxd
minediamonds:Stop()
minediamonds:destroy()
pickaxe:destroy()
rs:destroy()
rs=Instance.new("Motor")
rs.Parent=t
rs.Part0=t
rs.Part1=c["Right Arm"]
rs.C0=rsC0
rs.C1=rsC1
deb=false
end
end
--
m.KeyDown:connect(meme)
c.Humanoid.Died:connect(die)