space tycoon theoretically fastest autofarm (put on auto execute)

if game.PlaceId == 7535149098 then
    if not game:IsLoaded() then game.Loaded:Wait() end
    game:GetService("ReplicatedStorage").Events.R2:FireServer()
    repeat task.wait() until game.Players.LocalPlayer.Character
    repeat task.wait() until game.Players.LocalPlayer.Character:FindFirstChild("HumanoidRootPart")
    --firetouchinterest(game:GetService("Workspace").Center.JupiterObby.Finish, game.Players.LocalPlayer.Character.HumanoidRootPart, 0)
    --firetouchinterest(game:GetService("Workspace").Center.JupiterObby.Finish, game.Players.LocalPlayer.Character.HumanoidRootPart, 1)
    for i, v in pairs(workspace:GetDescendants()) do
    if v:FindFirstChild("TouchInterest") then
        firetouchinterest(v, game.Players.LocalPlayer.Character.HumanoidRootPart, 0)
        firetouchinterest(v, game.Players.LocalPlayer.Character.HumanoidRootPart, 1)
    end
end
local PlaceID = game.PlaceId
    local AllIDs = {}
    local foundAnything = ""
    local actualHour = os.date("!*t").hour
    local Deleted = false
    local File = pcall(function()
        AllIDs = game:GetService('HttpService'):JSONDecode(readfile("NotSameServers.json"))
    end)
    if not File then
        table.insert(AllIDs, actualHour)
        writefile("NotSameServers.json", game:GetService('HttpService'):JSONEncode(AllIDs))
    end
    function TPReturner()
        local Site;
        if foundAnything == "" then
            Site = game.HttpService:JSONDecode(game:HttpGet('https://games.roblox.com/v1/games/' .. PlaceID .. '/servers/Public?sortOrder=Asc&limit=100'))
        else
            Site = game.HttpService:JSONDecode(game:HttpGet('https://games.roblox.com/v1/games/' .. PlaceID .. '/servers/Public?sortOrder=Asc&limit=100&cursor=' .. foundAnything))
        end
        local ID = ""
        if Site.nextPageCursor and Site.nextPageCursor ~= "null" and Site.nextPageCursor ~= nil then
            foundAnything = Site.nextPageCursor
        end
        local num = 0;
        for i,v in pairs(Site.data) do
            local Possible = true
            ID = tostring(v.id)