local RS = game:GetService("RunService")
local plr = game:GetService("Players").LocalPlayer
local char = plr.Character or plr.CharacterAdded:wait()
local head = char.Head

-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- --

for _, v in pairs(head:GetChildren())do
	if v:IsA'Decal' then
		v.Texture = "http://www.roblox.com/asset/?id=1449607543"
	end
end

local offset = Vector3.new(0,0.15,(head.Size.Z/1.6))
local part = Instance.new("Part", head)
part.CanCollide = false
part.Color = Color3.fromRGB(0,0,0)
part.Position = Vector3.new(head.Position)
part.Size = Vector3.new(0.3,0.02,0.1)

local sound = Instance.new("Sound", part)
sound.SoundId = "rbxassetid://157518993"
sound.Looped = true
sound.Volume = 1

sound:Play()

local partw = Instance.new("Weld", part)
partw.Part0 = part
partw.Part1 = head
partw.C0 = part.CFrame + offset
partw.C1 = head.CFrame
local mesh = Instance.new("BlockMesh", part)

-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- --

while wait() do
	local effector = 500 -- lower numbers have higher effect
	local mouthwideness = 5 -- higher numbers have a higher effect
	mesh.Scale = Vector3.new(1+(sound.PlaybackLoudness/effector),0.5+((sound.PlaybackLoudness/effector)*mouthwideness),0)
end

--duruteru