local z=script.Parent local p={}local K=nil for z,K in pairs(z:GetChildren())do if K:IsA("\083\111\117\110\100")then table.insert(p,K)end end while true do for z,M in pairs(p)do local b=p[math.random(1,#p)]repeat wait()b=p[math.random(1,#p)]until b~=K K=b b:Play()b.Ended:Wait()b:Stop()end wait()end

local songs = script.Parent
local tablee = {}
local lastsong = nil
 
for i,v in pairs(songs:GetChildren()) do
    if v:IsA("Sound") then
        table.insert(tablee,v)
    end
end
 
while true do
    for a,c in pairs(tablee) do
        local chosensong = tablee[math.random(1,#tablee)]
        repeat wait() chosensong = tablee[math.random(1,#tablee)] until chosensong ~= lastsong
        lastsong = chosensong
        chosensong:Play()
        chosensong.Ended:Wait()
        chosensong:Stop()
    end
    wait()
end
