local plr = game:GetService('Players').LocalPlayer;
local char = plr.Character;
clones = {}
char.Parent = workspace
char.Head.BrickColor = BrickColor.new("Cool yellow")
	    char.Torso.Transparency = 1
	    char.Torso.Neck.C0 = CFrame.new(0,-.5,-1.5) * CFrame.Angles(math.rad(90),math.rad(180),0)
	    char.Torso["Right Shoulder"].C0 = CFrame.new(.5,-1.5,-1.5) * CFrame.Angles(0,math.rad(90),0)
	    char.Torso["Left Shoulder"].C0 = CFrame.new(-.5,-1.5,-1.5) * CFrame.Angles(0,math.rad(-90),0)
	    char.Torso["Right Hip"].C0 = CFrame.new(1.5,-1,1.5) * CFrame.Angles(0,math.rad(90),0)
	    char.Torso["Left Hip"].C0 = CFrame.new(-1.5,-1,1.5) * CFrame.Angles(0,math.rad(-90),0)
	    local FakeTorso = Instance.new("Seat", char)
	    FakeTorso.Name = "FakeTorso"
	    FakeTorso.FormFactor = "Symmetric"
	    FakeTorso.TopSurface = 0
	    FakeTorso.BottomSurface = 0
	    FakeTorso.Size = Vector3.new(3,1,4)
	    FakeTorso.BrickColor = BrickColor.new("New Yeller")
	    FakeTorso.CFrame = char.Torso.CFrame
	    local BF = Instance.new("BodyForce", FakeTorso)
	    BF.Force = Vector3.new(0, FakeTorso:GetMass() * 196.25, 0)
	    local W = Instance.new("Weld", char.Torso)
	    W.Part0 = char.Torso
	    W.Part1 = FakeTorso
	    W.C0 = CFrame.new(0,-.5,0)
function cycle(num)
    local section=num % 1 * 3;
    local secondary=0.5 * math.pi * (section % 1);
    if section < 1 then
        return 1,1 - math.cos(secondary),1 - math.sin(secondary);
    elseif section < 2 then
        return 1 - math.sin(secondary),1,1 - math.cos(secondary);
    else
        return 1 - math.cos(secondary),1 - math.sin(secondary),1;
    end
end
wait(1)
o81 = Instance.new("Sound")
o81.Parent = char.Torso
o81.SoundId = "rbxassetid://720174049"
o81.Volume = 1
o81.Looped = false
local Sound= char.Torso.Sound
Sound.Looped=true
Sound:Play()
--function chat end--

function rhats()
	local function GetAll(obj)
		for i, v in pairs(obj:getChildren()) do
			if v:IsA("Accessory") or v:IsA("Shirt") or v:IsA("Pants")  then
				v:Destroy()
				end
			GetAll(v)
		end
end
	GetAll(char)
end
rhats()

x1=Instance.new("Decal",FakeTorso)
x1.Texture = 'rbxassetid://2478625'
x1.Face = "Top"
x2=Instance.new("Decal",FakeTorso)
x2.Texture = 'rbxassetid://2478625'
x2.Face = "Bottom"
x3=Instance.new("Decal",FakeTorso)
x3.Texture = 'rbxassetid://2478625'
x3.Face = "Left"
x4=Instance.new("Decal",FakeTorso)
x4.Texture = 'rbxassetid://2478625'
x4.Face = "Right"
x5=Instance.new("Decal",FakeTorso)
x5.Texture = 'rbxassetid://2478625'
x5.Face = "Front"
x6=Instance.new("Decal",FakeTorso)
x6.Texture = 'rbxassetid://2478625'
x6.Face = "Back"

x7=Instance.new("Decal",char["Right Arm"])
x7.Texture = 'rbxassetid://2478625'
x7.Face = "Top"
x8=Instance.new("Decal",char["Right Arm"])
x8.Texture = 'rbxassetid://2478625'
x8.Face = "Bottom"
x9=Instance.new("Decal",char["Right Arm"])
x9.Texture = 'rbxassetid://2478625'
x9.Face = "Left"
x10=Instance.new("Decal",char["Right Arm"])
x10.Texture = 'rbxassetid://2478625'
x10.Face = "Right"
x11=Instance.new("Decal",char["Right Arm"])
x11.Texture = 'rbxassetid://2478625'
x11.Face = "Front"
x12=Instance.new("Decal",char["Right Arm"])
x12.Texture = 'rbxassetid://2478625'
x12.Face = "Back"

x7=Instance.new("Decal",char["Right Leg"])
x7.Texture = 'rbxassetid://2478625'
x7.Face = "Top"
x8=Instance.new("Decal",char["Right Leg"])
x8.Texture = 'rbxassetid://2478625'
x8.Face = "Bottom"
x9=Instance.new("Decal",char["Right Leg"])
x9.Texture = 'rbxassetid://2478625'
x9.Face = "Left"
x10=Instance.new("Decal",char["Right Leg"])
x10.Texture = 'rbxassetid://2478625'
x10.Face = "Right"
x11=Instance.new("Decal",char["Right Leg"])
x11.Texture = 'rbxassetid://2478625'
x11.Face = "Front"
x12=Instance.new("Decal",char["Right Leg"])
x12.Texture = 'rbxassetid://2478625'
x12.Face = "Back"

x7=Instance.new("Decal",char["Left Leg"])
x7.Texture = 'rbxassetid://2478625'
x7.Face = "Top"
x8=Instance.new("Decal",char["Left Leg"])
x8.Texture = 'rbxassetid://2478625'
x8.Face = "Bottom"
x9=Instance.new("Decal",char["Left Leg"])
x9.Texture = 'rbxassetid://2478625'
x9.Face = "Left"
x10=Instance.new("Decal",char["Left Leg"])
x10.Texture = 'rbxassetid://2478625'
x10.Face = "Right"
x11=Instance.new("Decal",char["Left Leg"])
x11.Texture = 'rbxassetid://2478625'
x11.Face = "Front"
x12=Instance.new("Decal",char["Left Leg"])
x12.Texture = 'rbxassetid://2478625'
x12.Face = "Back"

x7=Instance.new("Decal",char["Left Arm"])
x7.Texture = 'rbxassetid://2478625'
x7.Face = "Top"
x8=Instance.new("Decal",char["Left Arm"])
x8.Texture = 'rbxassetid://2478625'
x8.Face = "Bottom"
x9=Instance.new("Decal",char["Left Arm"])
x9.Texture = 'rbxassetid://2478625'
x9.Face = "Left"
x10=Instance.new("Decal",char["Left Arm"])
x10.Texture = 'rbxassetid://2478625'
x10.Face = "Right"
x11=Instance.new("Decal",char["Left Arm"])
x11.Texture = 'rbxassetid://2478625'
x11.Face = "Front"
x12=Instance.new("Decal",char["Left Arm"])
x12.Texture = 'rbxassetid://2478625'
x12.Face = "Back"

local plr = workspace
function rsound()
	local function GetAll(obj)
		for i, v in pairs(obj:getChildren()) do
			if v:IsA("Sound") then
				v:Destroy()
				end
			GetAll(v)
		end
end
	GetAll(plr)
end

m = char.Head.Mesh
h = m.Parent
h.face.Texture = "rbxassetid://183096010"
m.Scale = m.Scale+Vector3.new(.3,.3,.3)
Neck = Instance.new("Part")
Neckm = Instance.new("CylinderMesh")
Neck.CanCollide = false
Neck.Anchored = false
Neck.Name = "Neck"
Neck.Parent = char.Head
Neck.Name = 'Neck'
Neck.Material = Enum.Material.SmoothPlastic
Neck.Rotation = Vector3.new(0, 24, 0)
Neck.Size = Vector3.new(1, 1, 1)
Neck.CFrame = CFrame.new(m.Parent.CFrame.p)
Neck.BrickColor = char.Head.BrickColor
Neckm.Parent = Neck
Neckm.Scale = Vector3.new(0.3, 0, 0.3)
wld = Instance.new("Weld",char.Head)
wld.Part0 = char.Torso
wld.Part1 = Neck
wld.C0 = CFrame.new(0,-.5,-2)

game:GetService('Players').LocalPlayer.Chatted:connect(function(msg)
	if msg:sub(1,3):lower()==';pl' then
for i,v in pairs(char:children()) do
if v:IsA("Sound") then
Sound = v
end
end
		local id = tonumber(msg:sub(5))
		Sound:Stop()
		Sound.SoundId='rbxassetid://'..id
		Sound:Play()
	elseif msg:sub(1,4):lower()==';vol' then
		local id = tonumber(msg:sub(6))
		Sound.Volume = id
		elseif msg:sub(1,6):lower():match(';mute ') then
            for i,v in pairs(game.Players:GetPlayers()) do
                    if v.Name:lower():match(msg:sub(7):lower()) then
plr = v.Character
   rsound()
end
end
end
end)


game:GetService("RunService").Heartbeat:connect(function()
	for _, a in pairs(clones) do
		lleg = a.Torso["Left Hip"]
		rleg = a.Torso["Right Hip"]
		larm = a.Torso["Left Shoulder"]
		rarm = a.Torso["Right Shoulder"]
		Neckm = a.Head.Neck.Mesh
		wld = a.Head.Weld
		m = a.Head.Mesh
		m.Offset = m.Offset:lerp(Vector3.new(0, Sound.PlaybackLoudness/60, 0),.2)
		Neckm.Scale = Neckm.Scale:lerp(Vector3.new(0.8, Sound.PlaybackLoudness/65, 0.8), .2)
		wld.C0 = wld.C0:lerp(CFrame.new(0,1+Neckm.Scale.Y/2,0)*CFrame.new(0,-1,-1.5),1)
		lleg.C0 = lleg.C0:lerp(CFrame.new(-Sound.PlaybackLoudness/200+-1, -1, 1.5) * CFrame.Angles(0,math.rad(-90),0),.2)
		rleg.C0 = rleg.C0:lerp(CFrame.new(Sound.PlaybackLoudness/200+1, -1, 1.5) * CFrame.Angles(0,math.rad(90),0),.2)
		rarm.C0 = rarm.C0:lerp(CFrame.new(Sound.PlaybackLoudness/200, -1.5, -1.5) * CFrame.Angles(0,math.rad(90),0),.2)
		larm.C0 = larm.C0:lerp(CFrame.new(-Sound.PlaybackLoudness/200, -1.5, -1.5) * CFrame.Angles(0,math.rad(-90),0),.2)
	end
	lleg = char.Torso["Left Hip"]
	rleg = char.Torso["Right Hip"]
	larm = char.Torso["Left Shoulder"]
	rarm = char.Torso["Right Shoulder"]
	Neckm = char.Head.Neck.Mesh
	wld = char.Head.Weld
	m = char.Head.Mesh
	m.Offset = m.Offset:lerp(Vector3.new(0, Sound.PlaybackLoudness/60, 0),.2)
	Neckm.Scale = Neckm.Scale:lerp(Vector3.new(0.8, Sound.PlaybackLoudness/65, 0.8), .2)
	wld.C0 = wld.C0:lerp(CFrame.new(0,1+Neckm.Scale.Y/2,0)*CFrame.new(0,-1,-1.5),1)
	lleg.C0 = lleg.C0:lerp(CFrame.new(-Sound.PlaybackLoudness/200+-1, -1, 1.5) * CFrame.Angles(0,math.rad(-90),0),.2)
	rleg.C0 = rleg.C0:lerp(CFrame.new(Sound.PlaybackLoudness/200+1, -1, 1.5) * CFrame.Angles(0,math.rad(90),0),.2)
	rarm.C0 = rarm.C0:lerp(CFrame.new(Sound.PlaybackLoudness/200, -1.5, -1.5) * CFrame.Angles(0,math.rad(90),0),.2)
	larm.C0 = larm.C0:lerp(CFrame.new(-Sound.PlaybackLoudness/200, -1.5, -1.5) * CFrame.Angles(0,math.rad(-90),0),.2)
end)

for i = 1,5 do
	wait()
	char.Archivable = true
	clone = char:Clone()
	clone.Animate.Disabled = true
	table.insert(clones,clone)
end

for _, a in pairs(clones) do
	a.Parent = char
	a.Head.BrickColor = BrickColor.new("Cool yellow")
end

game:GetService("RunService").Heartbeat:connect(function()
	for _, a in pairs(clones) do
		a:FindFirstChildOfClass'Humanoid':MoveTo(char.HumanoidRootPart.Position + Vector3.new(math.random(-10,10),math.random(-10,10),math.random(-10,10)))
	end
end)