local rs = game:GetService("RunService").RenderStepped
local getups = debug.getupvalues
local maps
local rc
local possiblefuncs = {}
local func
local listitems

_G.copy = ""
local stylenames = {
    [1] = "Autohop",
    [2] = "Scroll",
    [3] = "Sideways",
    [4] = "Half-Sideways",
    [5] = "W-Only",
    [6] = "A-Only",
    [7] = "Backwards"
}

for i,v in next, getgc() do
    if type(v)=='function' then
        local ups = getups(v)
        if ups.Maps and type(ups.Maps)=='table' then
            maps = ups.Maps
        elseif ups.RemoteCall and type(ups.RemoteCall)=='function' then
            rc = ups.RemoteCall
        elseif ups.ListItems and type(ups.ListItems)=='table' then
            table.insert(possiblefuncs,v)
        end
    end
end

local function Convert(time)
	local seconds = 0
	local period = time:match("%.")
	local times = 0
	for w in time:gmatch("-*%d+") do
		times = times + 1
		if period then
			if times == 1 then
				seconds = seconds + tonumber(w)*60
			elseif times == 2 then
				seconds = seconds + tonumber(w)
			else
				seconds = seconds + tonumber(w)*(1/1000)
			end
		else
			if times == 1 then
				seconds = seconds + tonumber(w)*3600
			elseif times == 2 then
				seconds = seconds + tonumber(w)*60
			else
				seconds = seconds+tonumber(w)
			end
		end
	end
	return seconds
end

local function getrecords(styleid,assetid)
    rc("GetHighscores",assetid,1,styleid)
    while getups(func).ListItems == listitems do rs:Wait() end
    listitems = getups(func).ListItems
	for i,v in next, listitems do
		if Convert(listitems[1].Children[4].Text) < 3 then
			print(listitems[1].Children[3].Text)
		end
	end
end

local function startup(assetid)
    rc("GetHighscores",assetid,1,1)
    while not func do
        for i,v in next, possiblefuncs do
            if #getups(v).ListItems~=0 then
                func = v
                break
            end
        end
        rs:Wait()
    end
    listitems = getups(func).ListItems
    local localtime = os.date("*t")
    _G.copy = "As of "..localtime.month.."/"..localtime.day.."/"..localtime.year.."\n"
end

local start = 1
for i,v in next, {select(start, unpack(maps))} do
    if i==1 then
        startup(v.AssetId)
    end
    print('Map Number: '..i.." - Map Name: "..v.DisplayName)
    _G.copy = _G.copy.."\n"..v.DisplayName
    for i=1,7 do
        getrecords(i,v.AssetId)
    end
end
warn'Done!'
syn.write_clipboard(_G.copy)