@name Donation List
@inputs EGP:wirelink ## Niggerlink
@outputs
@persist Nigger:table [Name, Font]:string [FontSize, Spacing, DimLine]:number
@trigger
if(first())
{

    Name = "Donationariyne Lisniantore"
    Font = "Courier New"
    FontSize = 26
    Spacing = 28
    DimLine = 0

    #All code below this is disgusting please don't meme me!

    setName("Donation List
By Trixx
This is on auxera.net because 'DoktorDim' is not intelligent enough to make a 'Donation List' that is above Auxera's standards
#NoHomo #NoHate #TrixLivingInAGhetto")

    runOnChat(1)
    runOnFile(1)

    function string moneyFormat(M:number)
    {
        local Q = M < 1000000 # No need to do math?
        local P = Q ? "^(-?%d+)(%d%d%d)" : "^(-?%d+)(%d%d%d)(%d%d%d)"
        local N = Q ? "%1,%2" : "%1,%2,%3"

        return M:toString():replaceRE(P, N) #Regular Expressions // Yaay
    }

    function entity txfindply(Str:string){

        return Str:sub(0,7) == "steam_0" ? findPlayerBySteamID(Str) : findPlayerByName(Str)
    }

    function void drawMain()
    {
        EGP:egpClear()
        EGP:egpText(1, Name, vec2(256, 256))
        EGP:egpFont(1, Font, 36) # Disgusting
        EGP:egpAlign(1,1,1)

        if(DimLine)
        {
            EGP:egpBox(2,vec2(256,268),vec2(512,2))
            EGP:egpPos(1, vec2(256,252))
        }
    }

    function void table:drawGhettoList() # Cauz i live in a ghetto lol
    {
        drawMain()

        local T = This:clone() # Memes (Clone the table to avoid changing the main table)
        local NiggerID = 1

        for(I=1, This:count())
        {
            local Max = 0
            local ID = ""

            foreach(C, NN:number = T)
            {
                if(NN > Max)
                {
                    ID = C
                    Max = NN
                }
            }

            EGP:egpText(5+NiggerID, "#"+NiggerID+" "+ID + " - "+moneyFormat(Max)+" kr.", vec2(256, 284 + (Spacing*NiggerID) - Spacing))
            EGP:egpFont(5+NiggerID, Font, FontSize) # Disgusting
            EGP:egpAlign(5+NiggerID,1,1)

            NiggerID++
            T:remove(ID)

            if(NiggerID > 8) #P Anti Crash
            {
                break
            }
        }
    }

    Nigger:drawGhettoList()
}

if(chatClk(owner()))
{
    local LS = owner():lastSaid():lower():explode(" ")

    switch(LS[1,string])
    {
        case "!add",

            local Ply = txfindply(LS[2,string])
            local Arg = LS[3,string]:toNumber()
            if(!Ply:isPlayer()){print("u black?") break}
          #  if(Arg<1){print("u black?") break} - Yoyoyo you can

            Nigger[Ply:name(), number] = Nigger[Ply:name(), number] + Arg
            if(Nigger[Ply:name(), number] <= 0){Nigger:remove(Ply:name())} # Nigger mode lol
            Nigger:drawGhettoList()

        break,

        case "!save",

            local VCD = vonEncode(Nigger)
            if(!fileCanWrite()){print("Retarrd") break}
            fileWrite("TrixxHoboShit.txt", VCD)
            print("Saved")

        break,

        case "!load",
            local VCD = vonEncode(Nigger)
            if(!fileCanLoad()){print("Retarrd") break}
            fileLoad("TrixxHoboShit.txt")
        break,

        default,

        break,
    }


}
if(fileClk("TrixxHoboShit.txt"))
{
    local VDC = vonDecodeTable(fileRead())

    Nigger = VDC
    Nigger:drawGhettoList()
    print("Loaded")
}