local p=false local y={}function playSound(h)if not p then p=true y={}local X=h:GetChildren()for p=1,#X,1 do if X[p]:IsA("\083\111\117\110\100")then table.insert(y,X[p])end wait()end local K=y[math.random(1,#y)]:Clone()nameobj=K.Name K.Parent=head K.Name="\086\111\105\099\101"soundplaying=K K:Play()p=true return K end end function removeSound()for y,h in pairs(head:GetChildren())do if h:IsA("\083\111\117\110\100")then soundplaying=nil nameobj=nil p=false h:remove()end end end


local sdb = false
local decendents = {}
function playSound(v)
	if not sdb then
		sdb = true
		decendents = {}
		local children = v:GetChildren()
		for i = 1,#children, 1 do
			if children[i]:IsA'Sound' then
				table.insert(decendents, children[i])
			end
			wait()
		end
		local soundClone = decendents[math.random(1, #decendents)]:Clone()
		nameobj = soundClone.Name
		soundClone.Parent = head
		soundClone.Name = "Voice"
		soundplaying = soundClone
		soundClone:Play()
		sdb = true
		return soundClone
	end
end

function removeSound()
	for _, v in pairs(head:GetChildren())do
		if v:IsA'Sound' then
			soundplaying = nil
			nameobj = nil
			sdb = false
			v:remove()
		end
	end
end
