--By Rufus14 lolo
for i ,v in pairs(game.Players.LocalPlayer.Character.Head:GetChildren()) do
    if v.ClassName == "None" then
        v:destroy()
    end
end
for i ,v in pairs(game.Players.LocalPlayer.Character:GetChildren()) do
    if v.ClassName == "Hat" then
        v:destroy()
    end
end
mouth = Instance.new("Part", game.Players.LocalPlayer.Character)
mouth.Size = Vector3.new(0.7, 0.2, 0.2)
mouth.BrickColor = BrickColor.new("Black")
weld = Instance.new("Weld", mouth)
weld.Part0 = mouth
weld.Part1 = game.Players.LocalPlayer.Character.Head
weld.C0 = weld.C0 * CFrame.new(0,0.3,0.5)
scr = Instance.new("ScreenGui", game.Players.LocalPlayer.PlayerGui)
txt = Instance.new("TextBox", scr)
txt.Text = "Music ID Here"
txt.Position = UDim2.new(0, 350 , 0, 150)
canuse = true
txt.Size = UDim2.new(0, 250 , 0, 50)
mouse = game.Players.LocalPlayer:GetMouse()
function kys(key)
    key = key:lower()
    if key:byte() == 13 and canuse then
         canuse = false
         local id = game.Players:findFirstChild(txt.Text)
         local moosic = Instance.new("Sound", mouth)
         moosic:Play()
         moosic.Volume = 10
         moosic.SoundId = "rbxassetid://"..txt.Text
         scr:destroy()
         moosic.Looped = true
         while true do
             mouth.Size = Vector3.new(0.7,moosic.PlaybackLoudness/400,0.2)
             weld = Instance.new("Weld", mouth)
             weld.Part0 = mouth
             weld.Part1 = game.Players.LocalPlayer.Character.Head
             weld.C0 = weld.C0 * CFrame.new(0,0.3,0.5)
             game:GetService("RunService").RenderStepped:wait()
         end
    end
end
mouse.KeyDown:connect(kys)