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 getrecords(styleid,assetid)
    rc("GetHighscores",assetid,1,styleid)
    while getups(func).ListItems == listitems do rs:Wait() end
    listitems = getups(func).ListItems
	if listitems[1] then
    	_G.copy = _G.copy.."\n\t"..stylenames[styleid].." - Player: "..listitems[1].Children[3].Text.."; Time: "..listitems[1].Children[4].Text.."; Date: "..listitems[1].Children[5].Text
	else
		_G.copy = _G.copy.."\n\t"..stylenames[styleid].." - Player: N/A; Time: N/A; Date: N/A;"
	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)