owner = game.Players.TheOfficialSeb

Messages = 0
function NewMessage(msg)
    plr = game.Workspace:WaitForChild(owner.Name)
    plrH = plr:WaitForChild('HumanoidRootPart')

    Messages = Messages+1

    --New Folder
    local NewFolder = Instance.new("Folder")
    NewFolder.Parent = plrH
    local Num = Messages
    if plrH:FindFirstChild("Item" .. Num) then
        plrH:FindFirstChild("Item" .. Num):Remove()
    end
    NewFolder.Name = "Item" .. Num
    --New Model
    local NewModel = Instance.new("Model")
    NewModel.Parent = NewFolder
    NewModel.Name = msg
    --New Humanoid
    local NewHumanoid = Instance.new("Humanoid")
    NewHumanoid.Parent = NewModel
    --New Part
    local NewPart = Instance.new("Part")
    NewPart.Parent = NewModel
    NewPart.Material = "ForceField"
    NewPart.Position = plrH.Position
    NewPart.BrickColor = BrickColor.new("Bright blue")
    NewPart.Anchored = false
    NewPart.CanCollide = false
    NewPart.Size = Vector3.new(2, 2, 2)
    NewPart.Name = "Head"
    --BodyPos

    local LocPos = Vector3.new(1, 1, 1)
    local Part = NewPart
    local Body = Instance.new("BodyPosition")
    Body.Parent = Part
    Body. MaxForce = Vector3.new(math.huge,math.huge,math.huge)

    local Body2 = Instance.new("BodyAngularVelocity")
    Body2.Parent = Part
    Body2.AngularVelocity = Vector3.new(1, 1, 1)

    Amount = Messages
    DA = 360 / Amount
    local pFolder = Instance.new("Folder",game.Lighting)
    for i=1,Amount do
        local p = Instance.new('Part', pFolder)
        p.Size = Vector3.new(1, 1, 1)
        p.Anchored = true
        p.CFrame = CFrame.new(0, 0, 0) * CFrame.Angles(0, math.rad(DA * i), 0) * CFrame.new(Amount,0,0)
        wait()
    end

    local m = plrH:GetChildren()
    local m2 = pFolder:GetChildren()
    for ic=1,#m do
        print(m[ic]:FindFirstChildOfClass("Model").Head:FindFirstChildOfClass("BodyPosition").Position)
-- = plrH.Position + m2[ic].Position
        m2[ic]:Remove()
    end

    game.Debris:AddItem(NewFolder,5)
    wait(5)
    Messages = Messages-1
end

db = true
owner.Chatted:Connect(function(m)
    if db then
        NewMessage(m)
    end
end)
wait(10)
db = false
print("Ended")