take a chance morph

plr = owner
char = plr.Character
hed = char.Head
root = char.HumanoidRootPart
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

for i,v in pairs (char:GetChildren()) do
	if v:IsA("Hat") or v:IsA("Accessory") or v:IsA("ShirtGraphic") or v:IsA("Shirt") or v:IsA("Pants") then
		v:remove()
	end
	if v:IsA("Part") then
		v.Color = Color3.new(1, 1, 1)
	end
end

function addpart(p, size, trans, collide, anchor, color, bc, mat)
	local part = Instance.new("Part", p)
	part.Size = size
	part.Transparency = trans
	part.CanCollide = collide
	part.Anchored = anchor
	part.Material = mat
	if bc then
		part.BrickColor = BrickColor.new(color)
	else
		part.Color = color
	end
	return part
end

function addmesh(p, scale, t, msh, txt)
	local mesh = Instance.new("SpecialMesh", p)
	mesh.Scale = scale
	mesh.MeshType = t
	if t == "FileMesh" then
		mesh.MeshId = "rbxassetid://" ..msh
		mesh.TextureId = "rbxassetid://" ..txt
	end
end

local accessory = addpart(char, Vector3.new(2, 1.6, 2), 0, false, false, "Grey", true, "Plastic")
local mesh = addmesh(accessory, Vector3.new(1, 1, 1), "FileMesh", 11144636, 11144632)
local weld = ezweld(char, accessory, hed, CFrame.new(0, -0.9775, 0))
local hat2 = addpart(char, Vector3.new(2, 1.6, 2), 1, false, false, "Grey", true, "Plastic")
local mesh = addmesh(hat2, Vector3.new(1, 1, 1), "FileMesh", 11144636, 11144632)
local weld2 = ezweld(char, hat2, ra, CFrame.new(0, 1.65, 0))
local shirt = Instance.new("Shirt", char)
shirt.ShirtTemplate = "http://www.roblox.com/asset/?id=11192464"
local pants = Instance.new("Pants", char)
pants.PantsTemplate = "http://www.roblox.com/asset/?id=11192327"