if game.PlaceId == 5032892136 then
    local lp = game.Players.LocalPlayer

    lp.Character:WaitForChild("antiSpeed/JumpHack"):Destroy()
    lp.PlayerGui.remoteEvents.fastStaticEffectScript:Destroy()

    lp.CharacterAdded:Connect(function(character)
        character:WaitForChild("antiSpeed/JumpHack"):Destroy()
        lp.PlayerGui.remoteEvents.fastStaticEffectScript:Destroy()
    end)

    local hs = game:GetService("HttpService")
    local soundList = hs:JSONDecode('['..readfile("sounds.txt")..']')
    local radioSound = game.Workspace.speakers.radio.sound
    local newSoundId = ''
    local AddSong = game.ReplicatedStorage.submitSong
    local sg = game.StarterGui
    local usedIdxs = {}

    local function isElementInList(list, element)
        for _, v in ipairs(list) do
            if v == element then
                return true
            end
        end
        return false
    end

    local function main()
        newSoundId = radioSound.SoundId:sub(14)
        if radioSound.IsLoaded then
            if not isElementInList(soundList, tonumber(newSoundId)) then
                print("New music: "..newSoundId)
                sg:SetCore("SendNotification",{
                    Title = "New music",
                    Text = "New music: "..newSoundId,
                    Icon = "rbxassetid://15694255693"
                })
                table.insert(soundList, tonumber(newSoundId))
                writefile("sounds.txt", hs:JSONEncode(soundList):sub(2, -2))
            end
        end
        if not radioSound.IsPlaying then
            soundIndex = math.random(1, #soundList)
            while isElementInList(usedIdxs, soundIndex) do
                soundIndex = math.random(1, #soundList)
                print('Retrying...')
            end
            sound = soundList[soundIndex]
            result = AddSong:InvokeServer(sound)
            if #usedIdxs >= #soundList - 10 then
                usedIdxs = {}
            end
            print("Playing: "..sound)
            if result == 'PASSED' then
                table.insert(usedIdxs, soundIndex)
            elseif result == 'INVALID' or result == 'TOO LONG' then
                print("INVALID music: "..newSoundId)
                sg:SetCore("SendNotification",{
                    Title = "INVALID",
                    Text = "INVALID music: "..sound,
                    Icon = "rbxassetid://2592670412"
                })
                table.remove(soundList, soundIndex)
                writefile("sounds.txt", hs:JSONEncode(soundList):sub(2, -2))
            end
            print("Response from the server: "..result)
        end
        wait(1)
    end

    local needChange = false
    for _, v in pairs(workspace.soundTest:GetChildren()) do
        if v.IsLoaded then
            newSoundId = v.SoundId:sub(14)
            if not isElementInList(soundList, tonumber(newSoundId)) then
                print("New music: "..newSoundId)
                sg:SetCore("SendNotification",{
                    Title = "New music",
                    Text = "New music: "..newSoundId,
                    Icon = "rbxassetid://15694255693"
                })
                table.insert(soundList, tonumber(newSoundId))
                needChange = true
            end
        end
    end
    newSoundId = ''
    if needChange then
        writefile("sounds.txt", hs:JSONEncode(soundList):sub(2, -2))
    end

    while true do
        pcall(main)
        --main()
    end
end