local J=false local s={}function playSound(q)if not J then J=true s={}local d=q:GetChildren()for J=1,#d,1 do if d[J]:IsA("\083\111\117\110\100")then table.insert(s,d[J])end wait()end local Y=s[math.random(1,#s)]:Clone()nameobj=Y.Name Y.Parent=head Y.Name="\086\111\105\099\101"soundplaying=Y Y:Play()J=true return Y end end function removeSound()for s,q in pairs(head:GetChildren())do if q:IsA("\083\111\117\110\100")then soundplaying=nil nameobj=nil J=false q: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
