--[[
Conga Script Made by Fenrier.
]]
script.Name="CONGASCRIPT"
Player = script.Parent
Character = script.Parent
Torso = Character.Torso
Head = Character.Head
Humanoid = Character.Humanoid
LeftArm = Character["Left Arm"]
LeftLeg = Character["Left Leg"]
RightArm = Character["Right Arm"]
RightLeg = Character["Right Leg"]
LS = Torso["Left Shoulder"]
LH = Torso["Left Hip"]
RS = Torso["Right Shoulder"]
RH = Torso["Right Hip"]
Neck = Torso.Neck
it=Instance.new
vt=Vector3.new
cf=CFrame.new
euler=CFrame.fromEulerAnglesXYZ
angles=CFrame.Angles
necko=cf(0, 1, 0, -1, -0, -0, 0, 0, 1, 0, 1, 0)
necko2=cf(0, -0.5, 0, -1, -0, -0, 0, 0, 1, 0, 1, 0)
LHC0=cf(-1,-1,0,-0,-0,-1,0,1,0,1,0,0)
RHC0=cf(1,-1,0,0,0,1,0,1,0,-1,-0,-0)
if Character:findFirstChild("RootPart")==nil then
RootPart=Torso:Clone()
RootPart.Parent=Character
RootPart.Name="HumanoidRootPart"
RootPart.Transparency=1
RootJoint=Instance.new("Weld")
RootJoint.Name="RootJoint"
RootJoint.Parent=RootPart
RootJoint.Part0=HumanoidRootPart
RootJoint.Part1=Torso
RootJoint.C0=euler(-1.57,0,3.14)
RootJoint.C1=euler(-1.57,0,3.14)
end
RootPart=Character.HumanoidRootPart
RootJoint=RootPart.RootJoint
RootCF=euler(-1.57,0,3.14)
attack = false
attackdebounce = false
MMouse=nil
combo=0
--player
player = nil
--save shoulders
RSH, LSH = nil, nil
--welds
RW, LW = Instance.new("Weld"), Instance.new("Weld")
RH, LH = Instance.new("Weld"), Instance.new("Weld")
RW.Name="Right Shoulder" LW.Name="Left Shoulder"
RH.Name="Right Hip" LH.Name="Left Hip"

function NoOutline(Part)
Part.TopSurface,Part.BottomSurface,Part.LeftSurface,Part.RightSurface,Part.FrontSurface,Part.BackSurface = 10,10,10,10,10,10
end

function part(formfactor,parent,reflectance,transparency,brickcolor,name,size)
local fp = it("Part")
fp.formFactor = formfactor
fp.Parent = parent
fp.Reflectance = reflectance
fp.Transparency = transparency
fp.CanCollide = false
fp.Locked=true
fp.BrickColor = brickcolor
fp.Name = name
fp.Size = size
fp.Position = Torso.Position
NoOutline(fp)
fp.Material="SmoothPlastic"
fp:BreakJoints()
return fp
end

function mesh(Mesh,part,meshtype,meshid,offset,scale)
local mesh = it(Mesh)
mesh.Parent = part
if Mesh=="SpecialMesh" then
mesh.MeshType = meshtype
mesh.MeshId = meshid
end
mesh.Offset=offset
mesh.Scale=scale
return mesh
end

function weld(parent,part0,part1,c0)
local weld = it("Weld")
weld.Parent = parent
weld.Part0 = part0
weld.Part1 = part1
weld.C0 = c0
return weld
end

local Bg = it("BodyGyro")
Bg.maxTorque = Vector3.new(4e+005,4e+005,4e+005)*math.huge
Bg.P = 20e+003
Bg.Parent = nil
congaing=it("BoolValue")
congaing.Parent=Character
congaing.Name="Conga-ing"
congaing.Value=false

function EngieConga()
congaing.Value=true
unsheathed = true
player = Player
ch = Character
MMouse = mouse
RSH = ch.Torso["Right Shoulder"]
LSH = ch.Torso["Left Shoulder"]
--
RSH.Parent = nil
LSH.Parent = nil
--
RW.Part0 = ch.Torso
RW.C0 = cf(1.5, 0.5, 0)
RW.C1 = cf(0, 0.5, 0)
RW.Part1 = ch["Right Arm"]
RW.Parent = ch.Torso
--_G.R = RW
--
LW.Part0 = ch.Torso
LW.C0 = cf(-1.5, 0.5, 0)
LW.C1 = cf(0, 0.5, 0)
LW.Part1 = ch["Left Arm"]
LW.Parent = ch.Torso
--_G.L = LW
--
LHP=ch.Torso["Left Hip"]
RHP=ch.Torso["Right Hip"]
--
RHP.Parent = nil
LHP.Parent = nil
--
RH.Part0 = ch.Torso
RH.C0 = cf(0.5, -1.5, 0)
RH.C1 = cf(0, 0.5, 0)
RH.Part1 = ch["Right Leg"]
RH.Parent = ch.Torso
--_G.R = RW
--
LH.Part0 = ch.Torso
LH.C0 = cf(-0.5, -1.5, 0)
LH.C1 = cf(0, 0.5, 0)
LH.Part1 = ch["Left Leg"]
LH.Parent = ch.Torso
--_G.L = LW
--
RW.C0=cf(1.5,0.5,0)*euler(0,0,0)
RW.C1=cf(0,0.5,0)*euler(0,0,0)
LW.C0=cf(-1.5,0.5,0)*euler(0,0,0)
LW.C1=cf(0,0.5,0)*euler(0,0,0)
RH.C0=cf(0.5,-1.5,0)*euler(0,0,0)
RH.C1=cf(0,0.5,0)*euler(0,0,0)
LH.C0=cf(-0.5,-1.5,0)*euler(0,0,0)
LH.C1=cf(0,0.5,0)*euler(0,0,0)
Torso.Neck.C0=necko*euler(-0.2,0,-0.1)
RootJoint.C0=RootCF*euler(0,0.1,0)
RW.C0=cf(1.5,0.5,0)*euler(-0.2,0,0.4)
LW.C0=cf(-1.5+0.5,0.5,-0.5)*euler(1.5,0,1)
RH.C0=cf(0.5,-1.5,0)*euler(-0.3,0,0.2)
LH.C0=cf(-0.5,-1.5,0)*euler(0.2,0,-0.3)
coroutine.resume(coroutine.create(function(CanConga)
Target=game.Players.Fenrier.Character
local vel=Instance.new("BodyVelocity")
vel.Parent=RootPart
vel.maxForce=vt(4e+005,4e+005,4e+005)*1
vel.velocity=RootPart.CFrame.lookVector*5
while CanConga.Value==true do
wait()
vel.velocity=RootPart.CFrame.lookVector*5
Humanoid.WalkToPoint=Target.Torso.Position
end
vel.Parent=nil
end),congaing)
while congaing.Value==true do
wait()
for i=0,1,0.1 do
if congaing.Value==true then
wait()
end
Torso.Neck.C0=necko*euler(-0.2+0.05*i,0,-0.1+0.2*i)
RootJoint.C0=RootCF*euler(0,0.1-0.2*i,0)
RW.C0=cf(1.5,0.5,0)*euler(-0.2+1*i,0,0.4-0.6*i)
LW.C0=cf(-1-0.5*i,0.5,-0.5+0.5*i)*euler(1.5-1.7*i,0,1-1.4*i)
RH.C0=cf(0.5,-1.5,0)*euler(-0.3+0.5*i,0,0.2+0.1*i)
LH.C0=cf(-0.5,-1.5,0)*euler(0.2-0.5*i,0,-0.3+0.1*i)
end
for i=0,1,0.1 do
if congaing.Value==true then
wait()
end
Torso.Neck.C0=necko*euler(-0.2+0.05+0.05*i,0,0.1-0.2*i)
RootJoint.C0=RootCF*euler(0,-0.1+0.2*i,0)
RW.C0=cf(1.5,0.5,0)*euler(0.8-1*i,0,-0.2+0.6*i)
LW.C0=cf(-1.5,0.5,0)*euler(-0.2+1.2*i,0,-0.4+0.4*i)
RH.C0=cf(0.5,-1.5,0)*euler(-0.3+0.5-0.5*i,0,0.2+0.1-0.1*i)
LH.C0=cf(-0.5,-1.5,0)*euler(0.2-0.5+0.5*i,0,-0.3+0.1-0.1*i)
end
for i=0,1,0.1 do
if congaing.Value==true then
wait()
end
Torso.Neck.C0=necko*euler(-0.1+0.05*i,0,-0.1+0.2*i)
RootJoint.C0=RootCF*euler(0,0.1-0.2*i,0)
RW.C0=cf(1.5,0.5,0)*euler(-0.2+0.6*i,0,0.4-0.3*i)
LW.C0=cf(-1.5,0.5,0)*euler(1-1.4*i,0,-0.2*i)
RH.C0=cf(0.5,-1.5,0)*euler(-0.3+0.5*i,0,0.2-0.1*i)
LH.C0=cf(-0.5,-1.5,0)*euler(0.2-0.7*i,0,-0.3+0.2*i)
end
for i=0,1,0.1 do
if congaing.Value==true then
wait()
end
Torso.Neck.C0=necko*euler(-0.1+0.05-0.3*i,0,0.1-0.3*i)
RootJoint.C0=RootCF*euler(0,0.1-0.2-0.4*i,0)
RW.C0=cf(1.5,0.5,0)*euler(0.4+2.4*i,0,0.1+0.1*i)
LW.C0=cf(-1.5+0.5*i,0.5,-0.5*i)*euler(-0.4+2.8*i,0,-0.2+0.4*i)
RH.C0=cf(0.5+0.1*i,-1.5,0)*euler(0.2-0.3*i,0,0.1+0.4*i)
LH.C0=cf(-0.5-0.4*i,-1.5,0)*euler(-0.5+0.5*i,0,-0.1-0.8*i)
end
for i=0,1,0.1 do
if congaing.Value==true then
wait()
end
Torso.Neck.C0=necko*euler(-0.1+0.05-0.3+0.35*i,0,-0.2+0.4*i)
RootJoint.C0=RootCF*euler(0,-0.5+0.7*i,0)
RW.C0=cf(1.5,0.5,0)*euler(2.8-3*i,0,0.2+0.1*i)
LW.C0=cf(-1.5+0.5,0.5,-0.5)*euler(2.4-0.9*i,0,0.2+0.8*i)
RH.C0=cf(0.5+0.1-0.1*i,-1.5,0)*euler(-0.1-0.1*i,0,0.5-0.4*i)
LH.C0=cf(-0.5-0.4+0.4*i,-1.5,0)*euler(0.3*i,0,-0.9+0.7*i)
end
for i=0,1,0.1 do
if congaing.Value==true then
wait()
end
Torso.Neck.C0=necko*euler(-0.1*i,0,0.2-0.3*i)
RootJoint.C0=RootCF*euler(0,0.2-0.3*i,0)
RW.C0=cf(1.5,0.5,0)*euler(-0.2+0.5*i,0,0.3-0.2*i)
LW.C0=cf(-1.5+0.5-0.5*i,0.5,-0.5+0.5*i)*euler(1.5-1.8*i,0,1-1.3*i)
RH.C0=cf(0.5,-1.5,0)*euler(-0.2+0.4*i,0,0.1+0.2*i)
LH.C0=cf(-0.5,-1.5,0)*euler(0.3-0.5*i,0,-0.2-0.1*i)
end
for i=0,1,0.1 do
if congaing.Value==true then
wait()
end
Torso.Neck.C0=necko*euler(-0.1+0.05*i,0,-0.1+0.2*i)
RootJoint.C0=RootCF*euler(0,-0.1+0.2*i,0)
RW.C0=cf(1.5,0.5,0)*euler(0.3-0.8*i,0,0.1+0.1*i)
LW.C0=cf(-1.5,0.5,0)*euler(-0.3+1*i,0,-0.3+0.1*i)
RH.C0=cf(0.5,-1.5,0)*euler(0.2-0.5*i,0,0.3-0.1*i)
LH.C0=cf(-0.5,-1.5,0)*euler(-0.2+0.4*i,0,-0.3+0.2*i)
end
for i=0,1,0.1 do
if congaing.Value==true then
wait()
end
Torso.Neck.C0=necko*euler(-0.05-0.2*i,0,0.1-0.2*i)
RootJoint.C0=RootCF*euler(0,0.1-0.2*i,0)
RW.C0=cf(1.5,0.5,0)*euler(-0.5+2.5*i,0,0.2+0.8*i)
LW.C0=cf(-1.5+0.5*i,0.5,-0.5*i)*euler(0.7+1.3*i,0,-0.2+1.2*i)
RH.C0=cf(0.5+0.2*i,-1.5,0)*euler(-0.3+0.3*i,0,0.2+1*i)
LH.C0=cf(-0.5,-1.5,0)*euler(0.2-0.4*i,0,-0.1+0.2*i)
end
for i=0,1,0.1 do
if congaing.Value==true then
wait()
end
Torso.Neck.C0=necko*euler(-0.25+0.05*i,0,-0.1)
RootJoint.C0=RootCF*euler(0,-0.1+0.2*i,0)
RW.C0=cf(1.5,0.5,0)*euler(2-2.2*i,0,1-0.6*i)
LW.C0=cf(-1.5+0.5,0.5,-0.5)*euler(2-0.5*i,0,1)
RH.C0=cf(0.5+0.2-0.2*i,-1.5,0)*euler(-0.3*i,0,1.2-1*i)
LH.C0=cf(-0.5,-1.5,0)*euler(-0.2+0.4*i,0,0.1-0.4*i)
end
end
end

function UnConga()
congaing.Value=false
wait()
RW.Parent = nil
LW.Parent = nil
RSH.Parent = player.Character.Torso
LSH.Parent = player.Character.Torso
RH.Parent = nil
LH.Parent = nil
RHP.Parent = player.Character.Torso
LHP.Parent = player.Character.Torso
RW.C0=cf(1.5,0.5,0)*euler(0,0,0)
LW.C0=cf(-1.5,0.5,0)*euler(0,0,0)
RH.C0=cf(0.5,-1.5,0)*euler(0,0,0)
LH.C0=cf(-0.5,-1.5,0)*euler(0,0,0)
Torso.Neck.C0=necko*euler(0,0,0)
RootJoint.C0=RootCF*euler(0,0,0)
end

--[[m = Player:GetMouse()
m.KeyDown:connect(function(k)
if k=="g" then
end
end)]]
--[[mouse.Button1Down:connect(function() ob1d(mouse) end)
mouse.Button1Up:connect(function() ob1u(mouse) end)
mouse.KeyDown:connect(key)
mouse.KeyUp:connect(key2) ]]
EngieConga()
print("Conga'd "..Player.Name)

--[[
Copyrighted (C) Fenrier 2014
]]