curfrags = 0 // Make current round stats collecting alises on startup.
curdeaths = 0
curscore = 0
curflags = 0
ftkst = 0
htkst = 0
stkst = 0
ktkst = 0
gtkst = 0
tkst = 0
cursniper = 0
cursmg = 0
curar = 0
curshot = 0
curcarb = 0
curusp = 0
curaki = 0
curnade = 0
curknife = 0
curknifedmg = 0
cursniperdmg = 0
cursmgdmg = 0
curardmg = 0
curshotdmg = 0
curcarbdmg = 0
curuspdmg = 0
curakidmg = 0
curnadedmg = 0
cfst = 0
dfst = 0
hfst = 0
kfst = 0
lfst = 0
sfst = 0
gbst = 0
hsst = 0
knst = 0
spst = 0
suicides = 0
scoped = 0
chksst = 0
curscore = 0

addOnQuit [ // Keep saved.cfg as tidy as possible without clearing all-time stats holding alises.
    calc = ""
    clrst = ""
    clrats = ""
    stratvalues = ""
    stats = ""
    get_stats = ""
    rksmsg = ""
    rksmsgs = ""
    conextras = ""
    showcurstatsbind = ""
    showatstatsbind = ""
    statsmenu = ""
    modmenu = ""
    statshot = ""
    autostatshot = ""
    spst = ""
    gbst = ""
    chksst = ""
    hsst = ""
    fratio = ""
    curcarbdmg = ""
    cfst = ""
    curshot = ""
    curusp = ""
    dfst = ""
    curratio = ""
    stkst = ""
    ktkst = ""
    sksmsg = ""
    curar = ""
    htkst = ""
    curfrags = ""
    knst = ""
    curakidmg = ""
    cksst = ""
    cursniperdmg = ""
    curknife = ""
    gtkst = ""
    curshotdmg = ""
    curardmg = ""
    curflags = ""
    curuspdmg = ""
    curscore = ""
    cursniper = ""
    sfst = ""
    cursmg = ""
    scoped = ""
    curaki = ""
    curnade = ""
    ftkst = ""
    curnadedmg = ""
    curcarb = ""
    cursmgdmg = ""
    hfst = ""
    curdeaths = ""
    suicides = ""
    tkst = ""
    lfst = ""
]

if (= (strcmp $altaction_5 " setscope 1; onrelease [ setscope 0 ] ") 1) [ // Add # of times scoped counter to altaction_5...
    altaction_5 = [setscope 1; += scoped 1; onrelease [ setscope 0 ]]
] []

if (checkalias atflags) [] [ // Make all-time stats collecting aliases if they do not already exist.
    atflags = 0
    atfrags = 0
    atdeaths = 0
    atscore = 0
    atratio = 0
    atsniper = 0
    atsniperdmg = 0
    atsmg = 0
    atsmgdmg = 0
    atshot = 0
    atshotdmg = 0
    atar = 0
    atardmg = 0
    atcarb = 0
    atcarbdmg = 0
    atusp = 0
    atuspdmg = 0
    atnade = 0
    atnadedmg = 0
    ataki = 0
    atakidmg = 0
    atknife = 0
    atknifedmg = 0
    clast = 0 // # of times played as CLA.
    rvsfst = 0 // # of times played as RVSF.
    games_played = 0 // Total # of games played.
    attkst = 0
    athtkst = 0
    atstkst = 0
    atgtkst = 0
    atktkst = 0
    atftkst = 0
    athsst = 0
    atknst = 0
    atspst = 0
    atgbst = 0
    atcfst = 0
    atdfst = 0
    athfst = 0
    atlfst = 0
    atkfst = 0
    atsfst = 0
    atsuicides = 0
    gmst = 0
    mpst = 0
    tdmst = 0
    dmst = 0
    tsvst = 0
    svst = 0
    ctfst = 0
    htfst = 0
    ktfst = 0
    tktfst = 0
    pfst = 0
    lssst = 0
    osokst = 0
    tosokst = 0
    btdmst = 0
    bdmst = 0
    bosokst = 0
    coopst = 0
    aqueousst = 0
    arabianst = 0
    arcticst = 0
    aridst = 0
    complexst = 0
    depotst = 0
    desertst = 0
    desert2st = 0
    desert3st = 0
    douzest = 0
//  edificest = 0
    elevationst = 0
    gothicst = 0
    iceroadst = 0
//  industrialst = 0
    ingressst = 0
    kellerst = 0
    minesst = 0
    outpostst = 0
    powerst = 0
    rattrapst = 0
    scaffoldst = 0
    shinest = 0
    snowst = 0
    sunsetst = 0
    toxicst = 0
    urbanst = 0
    werkst = 0
    acstart = 0 // # of AC launches...
    atscoped = 0
    rvsfst = 0 // # of times playing for each team stats.
    clast = 0
    offmpst = 0 // # of times playing official or non-official maps stats.
    cstmpst = 0
    athksst = 0
    ocsize = $consize
    ffast = 0
    botst = 0
    atfratio = "0.0"
    sksmsg = 0
    5ksmsg = "05x 3kill streak!"
    10ksmsg = "010x 3kill streak!"
    15ksmsg = "015x 3kill streak!"
    20ksmsg = "020x 3kill streak!"
    mplextras = 0
    ggst = 0
    strst = 0
    mplss = 0
]

    += acstart 1 // # of times started AC stat, cheap way of doing it I must admit. 8)

// addcheck_si [+= games_played 1]

calc = [ // Function used for gathering and calculating stats.
    curflags = (at (pstat_score (findcn $curname)) 0) // Pull as much stuff from pstat as possible.
    curfrags = (at (pstat_score (findcn $curname)) 1)
    curdeaths = (at (pstat_score (findcn $curname)) 2)
    curscore = (at (pstat_score (findcn $curname)) 3)
    cursniper = (at (pstat_weap (findcn $curname)) 10)
    cursniperdmg = (at (pstat_weap (findcn $curname)) 11)
    cursmg = (at (pstat_weap (findcn $curname)) 8)
    cursmgdmg = (at (pstat_weap (findcn $curname)) 9)
    curar = (at (pstat_weap (findcn $curname)) 12)
    curardmg = (at (pstat_weap (findcn $curname)) 13)
    curshot = (at (pstat_weap (findcn $curname)) 6)
    curshotdmg = (at (pstat_weap (findcn $curname)) 7)
    curcarb = (at (pstat_weap (findcn $curname)) 4)
    curcarbdmg = (at (pstat_weap (findcn $curname)) 5)
    curusp = (at (pstat_weap (findcn $curname)) 2)
    curuspdmg = (at (pstat_weap (findcn $curname)) 3)
    curaki = (at (pstat_weap (findcn $curname)) 18)
    curakidmg = (at (pstat_weap (findcn $curname)) 19)
    curnade = (at (pstat_weap (findcn $curname)) 16)
    curnadedmg = (at (pstat_weap (findcn $curname)) 17)
    curknife = (at (pstat_weap (findcn $curname)) 0)
    curknifedmg = (at (pstat_weap (findcn $curname)) 1)
    curratio = (divf $curfrags $curdeaths) // Calculate ratio.
    fratio = (divf $cfst $sfst)
        if (&& (<= $minutesremaining 0) (= $strst 0)) [ // Add current scores to all-time totals during intermission.
            += atfrags $curfrags // Calculate all-time stats.  // TODO: Make it possible to add to these for on-the-fly all-time stats viewing.
            += atdeaths $curdeaths
            += atscore $curscore
            += atflags $curflags
            += atratio $curratio
            += atftkst $ftkst // Frag teamkills.
            += athtkst $htkst // Headshot teamkills.
            += atstkst $stkst // Splatter teamkills.
            += atktkst $ktkst // Knife teamkills.
            += atgtkst $gtkst // Grenade teamkills.
            += attkst $tkst // Total teamkills.
            += atsniper $cursniper // # of shots per weapon...
            += atsmg $cursmg
            += atar $curar
            += atshot $curshot
            += atcarb $curcarb
            += atusp $curusp
            += ataki $curaki
            += atnade $curnade
            += atknife $curknife
            += atsniperdmg $cursniperdmg // Per weapon damage stats...
            += atsmgdmg $cursmgdmg
            += atardmg $curardmg
            += atshotdmg $curshotdmg
            += atcarbdmg $curcarbdmg
            += atuspdmg $curuspdmg
            += atakidmg $curakidmg
            += atnadedmg $curnadedmg
            += atknifedmg $curknifedmg
            += atcfst $cfst // CTF flags.
            += atdfst $dfst // Dropped flags.
            += athfst $hfst // Hunted flags.
            += atkfst $kfst // Kept flags.
            += atlfst $lfst // Lost flags.
            += atsfst $sfst // Stolen flags.
            += atgbst $gbst // Grenade gibs.
            += athsst $hsst // Headshots.
            += atknst $knst // Knife gibs.
            += atspst $spst // Splatters...
            += atsuicides $suicides // Suicides...
            += atscoped $scoped // Scopes...
        if (> $chksst $athksst) [ // Highest ever kill streak...
            athksst = $chksst
        ] []
            atfratio = (divf $atcfst $atsfst)
            atscoreavg = (divf $curscore $games_played) // Average score.
            atratio = (divf $atfrags $atdeaths) // All-time and/or Average Ratio? FIXME...
        if (= $connected 1) [ // "gg" counter, only for online multiplayer rounds... :P
            if (= (strstr (at $conline 0) $curname) 1) [
                if (|| (= (strcmp (at $conline 1) "gg") 1) (= (strcmp (at $conline 1) "GG") 1)) [
                += ggst 1; conline [  ]
            ] []] []] []
        if (= (curmodeattr team) 1) [ // Check if user is in a team mode.
            if (|| (= $connected 1) (= (curmodeattr bot) 1)) [
                if (= (curteam) 1) [ // If playing for RVSF, +1 to it's stat.
                    += rvsfst 1
                ] [
                    += clast 1 // Else they are playing for CLA, +1 to it's stat.
            ]] []] []
        strst = 1 // In case if this function is called more than once during the intermission, mark this as 1 so the above if statement fails.
        ] []
    if (= $gamemode 0) [ // If statements for holding the curmode acronym for the current round stats menu...
        modest = "TDM"   // Store the acronym in alias "modest".
                         // Only add to the mode/map counting stats if they are playing online or bot multiplayer...
        if (= $gmst 0) [if (|| (= $connected 1) (= (curmodeattr bot) 1)) [gmst = 1; += tdmst 1] []] []
    ] [
    if (= $gamemode 2) [
        modest = "DM"
        if (= $gmst 0) [if (|| (= $connected 1) (= (curmodeattr bot) 1)) [gmst = 1; += dmst 1; += ffast 1] []] []
    ] [
    if (= $gamemode 4) [
        modest = "TSURV"
        if (= $gmst 0) [if (|| (= $connected 1) (= (curmodeattr bot) 1)) [gmst = 1; += tsvst 1] []] []
    ] [
    if (= $gamemode 3) [
        modest = "SURV"
        if (= $gmst 0) [if (|| (= $connected 1) (= (curmodeattr bot) 1)) [gmst = 1; += svst 1; += ffast 1] []] []
    ] [
    if (= $gamemode 5) [
        modest = "CTF"
        if (= $gmst 0) [if (|| (= $connected 1) (= (curmodeattr bot) 1)) [gmst = 1; += ctfst 1] []] []
    ] [
    if (= $gamemode 13) [
        modest = "HTF"
        if (= $gmst 0) [if (|| (= $connected 1) (= (curmodeattr bot) 1)) [gmst = 1; += htfst 1] []] []
    ] [
    if (= $gamemode 15) [
        modest = "KTF"
        if (= $gmst 0) [if (|| (= $connected 1) (= (curmodeattr bot) 1)) [gmst = 1; += ktfst 1; += ffast 1] []] []
    ] [
    if (= $gamemode 14) [
        modest = "TKTF"
        if (= $gmst 0) [if (|| (= $connected 1) (= (curmodeattr bot) 1)) [gmst = 1; += tktfst 1] []] []
    ] [
    if (= $gamemode 6) [
        modest = "PF"
        if (= $gmst 0) [if (|| (= $connected 1) (= (curmodeattr bot) 1)) [gmst = 1; += pfst 1; += ffast 1] []] []
    ] [
    if (= $gamemode 9) [
        modest = "LSS"
        if (= $gmst 0) [if (|| (= $connected 1) (= (curmodeattr bot) 1)) [gmst = 1; += lssst 1; += ffast 1] []] []
    ] [
    if (= $gamemode 10) [
        modest = "OSOK"
        if (= $gmst 0) [if (|| (= $connected 1) (= (curmodeattr bot) 1)) [gmst = 1; += osokst 1; += ffast 1] []] []
    ] [
    if (= $gamemode 11) [
        modest = "TOSOK"
        if (= $gmst 0) [if (|| (= $connected 1) (= (curmodeattr bot) 1)) [gmst = 1; += tosokst 1] []] []
    ] [
    if (= $gamemode 7) [
        modest = "BTDM"
        if (= $gmst 0) [if (|| (= $connected 1) (= (curmodeattr bot) 1)) [gmst = 1; += btdmst 1; += botst 1] []] []
    ] [
    if (= $gamemode 8) [
        modest = "BDM"
        if (= $gmst 0) [if (|| (= $connected 1) (= (curmodeattr bot) 1)) [gmst = 1; += bdmst 1; += ffast 1; += botst 1] []] []
    ] [
    if (= $gamemode 12) [
        modest = "BOSOK"
        if (= $gmst 0) [if (|| (= $connected 1) (= (curmodeattr bot) 1)) [gmst = 1; += bosokst 1; += ffast 1; += botst 1] []] []
    ] [
    if (= $gamemode 1) [
        modest = "COOP"
        if (= $gmst 0) [if (|| (= $connected 1) (= (curmodeattr bot) 1)) [gmst = 1; += coopst 1] []] []
    ] []]]]]]]]]]]]]]]]

    if (= $mpst 0) [
        if (= (strcmp (curmap 1) ac_aqueous) 1) [
            if (|| (= $connected 1) (= (curmodeattr bot) 1)) [mpst = 1; += aqueoussst 1; += offmpst 1] []
        ] [
        if (= (strcmp (curmap 1) ac_arabian) 1) [
            if (|| (= $connected 1) (= (curmodeattr bot) 1)) [mpst = 1; += arabianst 1; += offmpst 1] []
        ] [
        if (= (strcmp (curmap 1) ac_arctic) 1) [
            if (|| (= $connected 1) (= (curmodeattr bot) 1)) [mpst = 1; += arcticst 1; += offmpst 1] []
        ] [
        if (= (strcmp (curmap 1) ac_arid) 1) [
            if (|| (= $connected 1) (= (curmodeattr bot) 1)) [mpst = 1; += aridst 1; += offmpst 1] []
        ] [
        if (= (strcmp (curmap 1) ac_complex) 1) [
            if (|| (= $connected 1) (= (curmodeattr bot) 1)) [mpst = 1; += complexst 1; += offmpst 1] []
        ] [
        if (= (strcmp (curmap 1) ac_depot) 1) [
            if (|| (= $connected 1) (= (curmodeattr bot) 1)) [mpst = 1; += depotst 1; += offmpst 1] []
        ] [
        if (= (strcmp (curmap 1) ac_desert) 1) [
            if (|| (= $connected 1) (= (curmodeattr bot) 1)) [mpst = 1; += desertst 1; += offmpst 1] []
        ] [
        if (= (strcmp (curmap 1) ac_desert2) 1) [
            if (|| (= $connected 1) (= (curmodeattr bot) 1)) [mpst = 1; += desert2st 1; += offmpst 1] []
        ] [
        if (= (strcmp (curmap 1) ac_desert3) 1) [
            if (|| (= $connected 1) (= (curmodeattr bot) 1)) [mpst = 1; += desert3st 1; += offmpst 1] []
        ] [
        if (= (strcmp (curmap 1) ac_douze) 1) [
            if (|| (= $connected 1) (= (curmodeattr bot) 1)) [mpst = 1; += douzest 1; += offmpst 1] []
        ] [
        if (= (strcmp (curmap 1) ac_elevation) 1) [
            if (|| (= $connected 1) (= (curmodeattr bot) 1)) [mpst = 1; += elevationst 1; += offmpst 1] []
        ] [
        if (= (strcmp (curmap 1) ac_gothic) 1) [
            if (|| (= $connected 1) (= (curmodeattr bot) 1)) [mpst = 1; += gothicst 1; += offmpst 1] []
        ] [
        if (= (strcmp (curmap 1) ac_iceroad) 1) [
            if (|| (= $connected 1) (= (curmodeattr bot) 1)) [mpst = 1; += iceroadst 1; += offmpst 1] []
        ] [
        if (= (strcmp (curmap 1) ac_ingress) 1) [
            if (|| (= $connected 1) (= (curmodeattr bot) 1)) [mpst = 1; += ingressst 1; += offmpst 1] []
        ] [
        if (= (strcmp (curmap 1) ac_keller) 1) [
            if (|| (= $connected 1) (= (curmodeattr bot) 1)) [mpst = 1; += kellerst 1; += offmpst 1] []
        ] [
        if (= (strcmp (curmap 1) ac_mines) 1) [
            if (|| (= $connected 1) (= (curmodeattr bot) 1)) [mpst = 1; += minesst 1; += offmpst 1] []
        ] [
        if (= (strcmp (curmap 1) ac_outpost) 1) [
            if (|| (= $connected 1) (= (curmodeattr bot) 1)) [mpst = 1; += outpostst 1; += offmpst 1] []
        ] [
        if (= (strcmp (curmap 1) ac_power) 1) [
            if (|| (= $connected 1) (= (curmodeattr bot) 1)) [mpst = 1; += powerst 1; += offmpst 1] []
        ] [
        if (= (strcmp (curmap 1) ac_rattrap) 1) [
            if (|| (= $connected 1) (= (curmodeattr bot) 1)) [mpst = 1; += rattrapst 1; += offmpst 1] []
        ] [
        if (= (strcmp (curmap 1) ac_scaffold) 1) [
            if (|| (= $connected 1) (= (curmodeattr bot) 1)) [mpst = 1; += scaffoldst 1; += offmpst 1] []
        ] [
        if (= (strcmp (curmap 1) ac_shine) 1) [
            if (|| (= $connected 1) (= (curmodeattr bot) 1)) [mpst = 1; += shinest 1; += offmpst 1] []
        ] [
        if (= (strcmp (curmap 1) ac_snow) 1) [
            if (|| (= $connected 1) (= (curmodeattr bot) 1)) [mpst = 1; += snowst 1; += offmpst 1] []
        ] [
        if (= (strcmp (curmap 1) ac_sunset) 1) [
            if (|| (= $connected 1) (= (curmodeattr bot) 1)) [mpst = 1; += sunsetst 1; += offmpst 1] []
        ] [
        if (= (strcmp (curmap 1) ac_toxic) 1) [
            if (|| (= $connected 1) (= (curmodeattr bot) 1)) [mpst = 1; += toxicst 1; += offmpst 1] []
        ] [
        if (= (strcmp (curmap 1) ac_urban) 1) [
            if (|| (= $connected 1) (= (curmodeattr bot) 1)) [mpst = 1; += urbanst 1; += offmpst 1] []
        ] [
        if (= (strcmp (curmap 1) ac_werk) 1) [
            if (|| (= $connected 1) (= (curmodeattr bot) 1)) [mpst = 1; += werkst 1; += offmpst 1] []
        ] [+= cstmpst 1; mpst = 1]]]]]]]]]]]]]]]]]]]]]]]]]]] []
]

clrst = [ // Function used to clear temporary stats holding and script flow aliases on every map start.
    strst = 0
    hsst = 0
    knst = 0
    spst = 0
    gbst = 0
    cfst = 0
    dfst = 0
    lfst = 0
    kfst = 0
    sfst = 0
    tkst = 0
    htkst = 0
    ktkst = 0
    ftkst = 0
    gtkst = 0
    stkst = 0
    suicides = 0
    scoped = 0
    gmst = 0
    mpst = 0
    cksst = 0
    chksst = 0
    fratio = "0.0"
    curratio = "0.0"
    sksmsg = 0
]

clrats = [ // Function used to clear all-time statistics "on-the-fly" via user input.
    if (= $arg1 1) [
        atcfst = 0
        atdfst = 0
        athfst = 0
        atkfst = 0
        atlfst = 0
        atsfst = 0
        atfrags = 0
        atdeaths = 0
        atsuicides = 0
        atscore = 0
        atratio = 0
        atgbst = 0
        athsst = 0
        atknst = 0
        atspst = 0
        atftkst = 0
        athtkst = 0
        atstkst = 0
        atktkst = 0
        atgtkst = 0
        attkst = 0
        atsniper = 0
        atsniperdmg = 0
        atsmg = 0
        atsmgdmg = 0
        atar = 0
        atardmg = 0
        atshot = 0
        atshotdmg = 0
        atcarb = 0
        atcarbdmg = 0
        atusp = 0
        atuspdmg = 0
        ataki = 0
        atakidmg = 0
        atnade = 0
        atnadedmg = 0
        atknife = 0
        atknifedmg = 0
        acstart = 0
        atscoped = 0
        tdmst = 0
        dmst = 0
        tsvst = 0
        svst = 0
        ctfst = 0
        htfst = 0
        ktfst = 0
        tktfst = 0
        pfst = 0
        lssst = 0
        osokst = 0
        tosokst = 0
        btdmst = 0
        bdmst = 0
        bosokst = 0
        coopst = 0
        aqueousst = 0
        arabianst = 0
        arcticst = 0
        aridst = 0
        complexst = 0
        depotst = 0
        desertst = 0
        desert2st = 0
        desert3st = 0
        douzest = 0
//      edificest = 0
        elevationst = 0
        gothicst = 0
        iceroadst = 0
//      industrialst = 0
        ingressst = 0
        kellerst = 0
        minesst = 0
        outpostst = 0
        powerst = 0
        rattrapst = 0
        scaffoldst = 0
        shinest = 0
        snowst = 0
        sunsetst = 0
        toxicst = 0
        urbanst = 0
        werkst = 0
        rvsfst = 0
        clast = 0
        cstmpst = 0
        offmpst = 0
        athksst = 0
        ffast = 0
        botst = 0
        atfratio = "0.0"
        atratio = "0.0"
        ggst = 0
    ] []
]

stratvalues = [ // Function used for storing current round statistics to the all-time statistics if a proper
                // intermission was not given (i.e. admin forces new map) before clearing stats for the next round.
    if (= $arg1 1) [
        += atfrags $curfrags // Calculate all-time stats.  // TODO: Make it possible to add to these for on-the-fly all-time stats viewing.
        += atdeaths $curdeaths
        += atscore $curscore
        += atflags $curflags
//      += atratio $curratio
        += atftkst $ftkst // Frag teamkills.
        += athtkst $htkst // Headshot teamkills.
        += atstkst $stkst // Splatter teamkills.
        += atktkst $ktkst // Knife teamkills.
        += atgtkst $gtkst // Grenade teamkills.
        += attkst $tkst // Total teamkills.
        += atsniper $cursniper // # of shots per weapon...
        += atsmg $cursmg
        += atar $curar
        += atshot $curshot
        += atcarb $curcarb
        += atusp $curusp
        += ataki $curaki
        += atnade $curnade
        += atknife $curknife
        += atsniperdmg $cursniperdmg // Per weapon damage stats...
        += atsmgdmg $cursmgdmg
        += atardmg $curardmg
        += atshotdmg $curshotdmg
        += atcarbdmg $curcarbdmg
        += atuspdmg $curuspdmg
        += atakidmg $curakidmg
        += atnadedmg $curnadedmg
        += atknifedmg $curknifedmg
        += atcfst $cfst // CTF flags.
        += atdfst $dfst // Dropped flags.
        += athfst $hfst // Hunted flags.
        += atkfst $kfst // Kept flags.
        += atlfst $lfst // Lost flags.
        += atsfst $sfst // Stolen flags.
        += atgbst $gbst // Grenade gibs.
        += athsst $hsst // Headshots.
        += atknst $knst // Knife gibs.
        += atspst $spst // Splatters...
        += atsuicides $suicides // Suicides...
        += atscoped $scoped // Scopes...
        if (> $chksst $athksst) [ // Highest ever kill streak...
            athksst = $chksst
        ] []
        atscoreavg = (divf $curscore $games_played) // Average score.
        atratio = (divf $atfrags $atdeaths) // All-time and/or Average Ratio? FIXME...
    ] []
]

stats = [
    calc // Gather and calculate the stats.
    ocsize = $consize
    consize 100
        if (strcmp $arg1 "all") [ // If user entered "all" as the first argument display the all-time stats instead.
            echo ""
            echo (c 0)Here are your all-time statistics:
            echo ""
            echo (c 2)Scored: (c 5) $atcfst
            echo (c 2)Dropped: (c 5) $atdfst
            echo (c 2)Hunted: (c 5) $athfst
            echo (c 2)Kept: (c 5) $atkfst
            echo (c 2)Stolen: (c 5) $atsfst
            echo (c 2)Flag Ratio: (c 5) $atfratio
            echo ""
            echo (c 2)Frags: (c 5) $atfrags
            echo (c 2)Deaths: (c 5) $atdeaths
            echo (c 2)Suicides: (c 5) $atsuicides
            echo (c 2)Score: (c 5) $atscore
        if (< $atdeaths 2) [ // Ratio = # of kills until >= the 2nd death.
            echo (c 2)Ratio: (c 5) (concatword $atfrags .0)
        ] [
            echo (c 2)Ratio: (c 5) $atratio
        ]
            echo (c 2)Gibs: (c 5) $atgbst
            echo (c 2)Headshots: (c 5) $athsst
            echo (c 2)Knife Gibs: (c 5) $atknst
            echo (c 2)Splatters: (c 5) $atspst
            echo (c 2)Highest KS: (c 5) $athksst
            echo (c 2)FTK's: (c 5) $atftkst
            echo (c 2)HTK's: (c 5) $athtkst
            echo (c 2)STK's: (c 5) $atstkst
            echo (c 2)KTK's: (c 5) $atktkst
            echo (c 2)GTK's: (c 5) $atgtkst
            echo (c 2)Total TK's: (c 5) $attkst
            echo ""
            echo (c 2)Sniper: (c 5) (concatword $atsniper / $atsniperdmg)
            echo (c 2)SMG: (c 5) (concatword $atsmg / $atsmgdmg)
            echo (c 2)AR: (c 5) (concatword $atar / $atardmg)
            echo (c 2)Shotgun: (c 5) (concatword $atshot / $atshotdmg)
            echo (c 2)Carbine: (c 5) (concatword $atcarb / $atcarbdmg)
            echo (c 2)Pistol: (c 5) (concatword $atusp / $atuspdmg)
            echo (c 2)Akimbo: (c 5) (concatword $ataki / $atakidmg)
            echo (c 2)Grenade: (c 5) (concatword $atnade / $atnadedmg)
            echo (c 2)Knife: (c 5) (concatword $atknife / $atknifedmg)
            echo (c 2)Scopes: (c 5) $atscoped
            echo ""
            echo (c 2)TDM: (c 5) $tdmst
            echo (c 2)DM: (c 5) $dmst
            echo (c 2)TSURV: (c 5) $tsvst
            echo (c 2)SURV: (c 5) $svst
            echo (c 2)CTF: (c 5) $ctfst
            echo (c 2)HTF: (c 5) $htfst
            echo (c 2)TKTF: (c 5) $tktfst
            echo (c 2)KTF: (c 5) $ktfst
            echo (c 2)PF: (c 5) $pfst
            echo (c 2)LSS: (c 5) $lssst
            echo (c 2)TOSOK: (c 5) $tosokst
            echo (c 2)OSOK: (c 5) $osokst
            echo (c 2)BTDM: (c 5) $btdmst
            echo (c 2)BDM: (c 5) $bdmst
            echo (c 2)BOSOK: (c 5) $bosokst
            echo (c 2)COOP: (c 5) $coopst
            echo ""
            echo (c 2)ac_aqueous: (c 5) $aqueousst
            echo (c 2)ac_arabian: (c 5) $arabianst
            echo (c 2)ac_arctic: (c 5) $arcticst
            echo (c 2)ac_arid: (c 5) $aridst
            echo (c 2)ac_complex: (c 5) $complexst
            echo (c 2)ac_depot: (c 5) $depotst
            echo (c 2)ac_desert: (c 5) $desertst
            echo (c 2)ac_desert2: (c 5) $desert2st
            echo (c 2)ac_desert3: (c 5) $desert3st
            echo (c 2)ac_douze: (c 5) $douzest
            echo (c 2)ac_elevation: (c 5) $elevationst
            echo (c 2)ac_gothic: (c 5) $gothicst
            echo (c 2)ac_iceroad: (c 5) $iceroadst
            echo (c 2)ac_ingress: (c 5) $ingressst
            echo (c 2)ac_keller: (c 5) $kellerst
            echo (c 2)ac_mines: (c 5) $minesst
            echo (c 2)ac_outpost: (c 5) $outpostst
            echo (c 2)ac_power: (c 5) $powerst
            echo (c 2)ac_rattrap: (c 5) $rattrapst
            echo (c 2)ac_scaffold: (c 5) $scaffoldst
            echo (c 2)ac_shine: (c 5) $shinest
            echo (c 2)ac_snow: (c 5) $snowst
            echo (c 2)ac_sunset: (c 5) $sunsetst
            echo (c 2)ac_toxic: (c 5) $toxicst
            echo (c 2)ac_urban: (c 5) $urbanst
            echo (c 2)ac_werk: (c 5) $werkst
            echo (c 2)Offical: (c 5) $offmpst
            echo (c 2)Custom: (c 5) $cstmpst
            echo ""
            echo (c 2)AC Starts: (c 5) $acstart
            echo (c 2)CLA: (c 5) $clast
            echo (c 2)RVSF: (c 5) $rvsfst
            echo (c 2)FFA: (c 5) $ffast
            echo (c 2)Bot: (c 5) $botst
            echo (c 2)GG: (c 5) $ggst
        ] [ // Else show user the current round stats.
            consize 100
            echo ""
            echo (c 0)Here are your current round statistics:
            echo ""
            echo (c 2)Scored: (c 5) $cfst
            echo (c 2)Dropped: (c 5) $dfst
            echo (c 2)Hunted: (c 5) $hfst
            echo (c 2)Kept: (c 5) $kfst
            echo (c 2)Lost: (c 5) $lfst
            echo (c 2)Stolen: (c 5) $sfst
            echo (c 2)Flag Ratio: (c 5) $fratio
            echo ""
            echo (c 2)Frags: (c 5) $curfrags
            echo (c 2)Deaths: (c 5) $curdeaths
            echo (c 2)Suicides: (c 5) $suicides
        if (= $connected 1) [ // Score is only calculated in multiplayer.
            echo (c 2)Score: (c 5) $curscore
        ] [
            echo (c 2)Score: (c 5) N/A
        ]
        if (< $curdeaths 2) [ // Ratio = # of kills until >= the 2nd death.
            echo (c 2)Ratio: (c 5) (concatword $curfrags .0)
        ] [
            echo (c 2)Ratio: (c 5) $curratio
        ]
            echo (c 2)Gibs: (c 5) $gbst
            echo (c 2)Headshots: (c 5) $hsst
            echo (c 2)Knife Gibs: (c 5) $knst
            echo (c 2)Splatters: (c 5) $spst
            echo (c 2)Current KS: (c 5) $cksst
            echo (c 2)Highest KS: (c 5) $chksst
            echo (c 2)FTK's: (c 5) $ftkst
            echo (c 2)HTK's: (c 5) $htkst
            echo (c 2)STK's: (c 5) $htkst
            echo (c 2)KTK's: (c 5) $ktkst
            echo (c 2)GTK's: (c 5) $gtkst
            echo (c 2)Total TK's: (c 5) $tkst
            echo ""
        if (= $connected 1) [ // Weapon damage is only shown in multiplayer, for some reason. :(
            echo (c 2)Sniper: (c 5) (concatword $cursniper / $cursniperdmg)
            echo (c 2)SMG: (c 5) (concatword $cursmg / $cursmgdmg)
            echo (c 2)AR: (c 5) (concatword $curar / $curardmg)
            echo (c 2)Shotgun: (c 5) (concatword $curshot / $curshotdmg)
            echo (c 2)Carbine: (c 5) (concatword $curcarb / $curcarbdmg)
            echo (c 2)Pistol: (c 5) (concatword $curusp / $curuspdmg)
            echo (c 2)Akimbo: (c 5) (concatword $curaki / $curakidmg)
            echo (c 2)Grenade: (c 5) (concatword $curnade / $curnadedmg)
            echo (c 2)Knife: (c 5) (concatword $curknife / $curknifedmg)
            echo (c 2)Scopes: (c 5) $scoped
            echo ""
            echo (c 4)Weapon stats are currently shots/damage.
        ] [
            echo (c 2)Sniper: (c 5) $cursniper
            echo (c 2)SMG: (c 5) $cursmg
            echo (c 2)AR: (c 5) $curar
            echo (c 2)Shotgun: (c 5) $curshot
            echo (c 2)Carbine: (c 5) $curcarb
            echo (c 2)Pistol: (c 5) $curusp
            echo (c 2)Akimbo: (c 5) $curaki
            echo (c 2)Grenade: (c 5) $curnade
            echo (c 2)Knife: (c 5) $curknife
            echo (c 2)Scopes: (c 5) $scoped
            echo ""
            echo (c 4)Weapon stats for SP are currently # of shots fired.
        ]]
    sleep 500 [consize $ocsize]
]

get_stats = [ // Function used for gathering stats that pstat_score cannot access.
              // Loops every millisecond and scans the contents of the last line
              // on the console for various events. Therefore, some of the stats
              // collected via this method (the only method ATM) may not be 100%
              // accurate. For instance, double grenade gibs will only count 1,
              // because the events are happening simultaneously and CubeScript
              // currently cannot loop itself quickly enough for it to catch both
              // instances. For this exact same reason, we are unable to count your
              // flag covers, defences, combos, multi combos, etc. while you are
              // using /hudextras... Another project for the devs maybe? :P *hint*

    if (= (strstr $conline "3you fragged teammate") 1) [ // Frag teamkills.
        += tkst 1; += ftkst 1; conline [  ] // +1 to the total teamkill count, and the "frag teamkill" count.
                                            // Clear conline immediately after adding to the stats.
    ] [
    if (= (strstr $conline "3you headshot teammate") 1) [ // Headshot teamkills.
        += tkst 1; += htkst 1; conline [  ]
    ] [
    if (= (strstr $conline "3you splattered teammate") 1) [ // Splatter teamkills.
        += tkst 1; += stkst 1; conline [  ]
    ] [
    if (= (strstr $conline "3you slashed teammate") 1) [ // Knife teamkills.
        += tkst 1; += ktkst 1; conline [  ]
    ] [
    if (= (strstr $conline "3you gibbed teammate") 1) [ // Grenade teamkills.
        += tkst 1; += gtkst 1; conline [  ]
    ] [
    if (&& (= (strstr $conline "you fragged") 1) (= (strstr $conline "3teammate") 0)) [ // Used for kill streaks...
        += cksst 1; conline [  ]
    ] [
    if (&& (= (strstr $conline "you headshot") 1) (= (strstr $conline "3teammate") 0)) [ // Headshots...
        += hsst 1; += cksst 1; conline [  ]
    ] [
    if (&& (= (strstr $conline "you slashed") 1) (= (strstr $conline "3teammate") 0)) [ // Knife gibs.
        += knst 1; += cksst 1; conline [  ]
    ] [
    if (&& (= (strstr $conline "you splattered") 1) (= (strstr $conline "3teammate") 0)) [ // Splatters...
        += spst 1; += cksst 1; conline [  ]
    ] [
    if (&& (= (strstr $conline "you gibbed") 1) (= (strstr $conline "3teammate") 0)) [ // Grenade gibs.
        += gbst 1; += cksst 1; conline [  ]
    ] [
    if (&& (= (strcmp (at $conline 0) "2you") 1) (= (strstr $conline "were fragged by") 1)) [ // Used to reset kill streaks...
        cksst = 0; sksmsg = 0; conline [  ]
    ] [
    if (&& (= (strcmp (at $conline 0) "2you") 1) (= (strstr $conline "were headshot by") 1)) [
        cksst = 0; sksmsg = 0; conline [  ]
    ] [
    if (&& (= (strcmp (at $conline 0) "2you") 1) (= (strstr $conline "were slashed by") 1)) [
        cksst = 0; sksmsg = 0; conline [  ]
    ] [
    if (&& (= (strcmp (at $conline 0) "2you") 1) (= (strstr $conline "were splattered by") 1)) [
        cksst = 0; sksmsg = 0; conline [  ]
    ] [
    if (&& (= (strcmp (at $conline 0) "2you") 1) (= (strstr $conline "were gibbed by") 1)) [
        cksst = 0; sksmsg = 0; conline [  ]
    ] [
    if (= (strcmp $conline "2you have the enemy flag") 1) [ // Stolen flags.
        += sfst 1; conline [  ]
    ] [
    if (= (strcmp $conline "2you have the flag") 1) [
        += sfst 1; conline [  ]
    ] [
    if (= (strcmp $conline "2you dropped the flag") 1) [ // Dropped flags.
        += dfst 1; conline [  ]
    ] [
    if (= (strcmp $conline "2you lost the flag") 1) [ // Lost flags.
        += lfst 1; conline [  ]
    ] [
    if (= (strstr $conline "2you have kept the flag for") 1) [ // TKTF/KTF Flags
        += kfst 1; conline [  ]
    ][
    if (&& (= $gamemode 5) (= (strcmp $conline "2you scored") 1)) [ // CTF Flags
        += cfst 1; conline [  ]
    ] [
    if (&& (= $gamemode 13) (= (strcmp $conline "2you scored") 1)) [ // HTF Flags
        += hfst 1; conline [  ]
    ] [
    if (= (strcmp $conline "2you suicided!") 1) [ // Suicides...
        += suicides 1; cksst = 0; sksmsg = 0; conline [  ]
    ] [
    ]]]]]]]]]]]]]]]]]]]]]]]

    if (> $cksst $chksst) [ // Current round highest kill streak...
        chksst = $cksst
    ] []
    if (= $mplextras 1) [ // Extra console kill streak messages.
        if (&& (= $cksst 5) (= $sksmsg 0)) [
            echo $5ksmsg; sksmsg = 1; rksmsg
        ] [
        if (&& (= $cksst 10) (= $sksmsg 0)) [
            echo $10ksmsg; sksmsg = 1; rksmsg
        ] [
        if (&& (= $cksst 15) (= $sksmsg 0)) [
            echo $15ksmsg; sksmsg = 1; rksmsg
        ] [
        if (&& (= $cksst 20) (= $sksmsg 0)) [
            echo $20ksmsg; sksmsg = 1; rksmsg
        ] []]]]] []
    sleep 1 [get_stats] // The loop...
]

rksmsg = [ // Reset the kill streak messages anti-spam measure... :p
    sleep 20000 [sksmsg = 0]
]

rksmsgs = [ // Used by the mod menu to reset kill streak messages to defaults.
    5ksmsg = "05x 3kill streak!"
    10ksmsg = "010x 3kill streak!"
    15ksmsg = "015x 3kill streak!"
    20ksmsg = "020x 3kill streak!"
        closemenu "MPL Mod"
        sleep 1 [showmenu "MPL Mod"]
]

conextras = [ // Used for allowing players to easily enable/disable the extra kill streak messages.
    if (= $arg1 1) [
        mplextras = 1
        echo (c 1)MPL: (c 4)Extra console messages (c 0)enabled! (c 4)Use /conextras 0 to disable.
    ] [
        mplextras = 0
        echo (c 1)MPL: (c 4)Extra console messages (c 3)disabled! (c 4)Use /conextras 1 to enable.
    ]
]

if (strstr $mapstartalways clrst) [] [ // Automate stuff :)
    add2alias mapstartalways [consize $ocsize; sleep 5 [if (= $strst 0) [stratvalues 1] []]; sleep 10 [clrst]; sleep 15 [get_stats]]
    add2alias start_intermission [stats; if (= $mplss 1) [sleep 100 [statshot]] []]
]

statshot = [ // Function used for taking screenshots of the stats menus automatically.
    syear = (at (timestamp) 0)
    smonth = (at (timestamp) 1)
    sday = (at (timestamp) 2)
    shour = (at (timestamp) 3)
    sminute = (at (timestamp) 4)
    ssecond = (at (timestamp) 5)
    if (= $screenshottype 0) [screenext = ".bmp"] []
    if (= $screenshottype 1) [screenext = ".jpg"] []
    if (= $screenshottype 2) [screenext = ".png"] []
    if (strcmp $arg1 "all") [
        showmenu "All-Time Statistics"
        sleep 1 [screenshot (concatword "screenshots/MPL_All-Time_Stats_Shot_" $syear $smonth $sday _ $shour . $sminute . $ssecond _ (curmap 1) _ $modest $screenext)]
        sleep 2 [closemenu "All-Time Statistics"]
        sleep 3 [echo Statshot was sucessfully executed!]
    ] [
        showmenu "Current Round Statistics"
        sleep 1 [screenshot (concatword "screenshots/MPL_Stats_Shot_" $syear $smonth $day _ $shour . $sminute . $ssecond _ (curmap 1) _ $modest $screenext)]
        sleep 2 [closemenu "Current Round Statistics"]
        sleep 3 [echo Statshot was sucessfully executed!]
    ]
]

autostatshot = [ // Function used for enabling/disabling automatic stats screenshots during intermissions.
    if (= $arg1 1) [
        mplss = 1
        echo (c 1)MPL: (c 4)Automatic stats screenshots (c 3)enabled! (c 4)Use /autostatshot 0 to disable.
    ] [
        mplss = 0
        echo (c 1)MPL: (c 4)Automatic stats screenshots (c 3)disabled! (c 4)Use /autostatshot 1 to enable.
    ]
]

// Mod menu for easily customizing the extra kill streak messages.
newmenu "MPL Mod"
menuinit [echo (c 1)MPL: (c 5)This menu allows you to easily modify the various kill streak messages while using (c 0)/conextras 1.]
menuitemtextinput "25x Kill Streak: " "result $5ksmsg" "5ksmsg = $arg1"
menuitemtextinput "210x Kill Streak: " "result $10ksmsg" "10ksmsg = $arg1"
menuitemtextinput "215x Kill Streak: " "result $15ksmsg" "15ksmsg = $arg1"
menuitemtextinput "220x Kill Streak: " "result $20ksmsg" "20ksmsg = $arg1"
menuitem "" -1
menuitemcheckbox "3Reset to defaults: " "" "rksmsgs"
menuitem "                   0OK" [ closemenu "MPL Mod" ]

// A menu seemed like it would be the easiest and most asthetically pleasing method of displaying the stats...IDK
newmenu "Current Round Statistics" // Current Round Stats Menu
menuinit [(calc)]
menuitemvar [concat (c 4)Here are your stats for $modest (concatword (curmap 1) :)]
menuitem "" -1
menuitemvar [concat (c 0) "        ~Flags~"]
menuitemtextinput "2Scored: " "result $cfst" // CTF Flags
menuitemtextinput "2Dropped: " "result $dfst"
menuitemtextinput "2Hunted: " "result $hfst" // HTF Flags
menuitemtextinput "2Kept: " "result $kfst"   // TKTF/KTF Flags
menuitemtextinput "3Lost: " "result $lfst"
menuitemtextinput "2Stolen: " "result $sfst" // # of times carrying flag.
menuitemtextinput "2Flag Ratio: " "result $fratio"
menuitem "" -1
menuitemvar [concat (c 3) "        ~Kills~" ]
menuitemtextinput "2Frags: " "result $curfrags"
menuitemtextinput "3Deaths: " "result $curdeaths"
menuitemtextinput "3Suicides: " "result $suicides"
menuitemtextinput "2Score: " "result $curscore"
menuitemtextinput "2Ratio: " "result $curratio"
menuitemtextinput "2Gibs: " "result $gbst"
menuitemtextinput "2Headshots: " "result $hsst"
menuitemtextinput "2Knife Gibs: " "result $knst"
menuitemtextinput "2Splatters: " "result $spst"
menuitemtextinput "2Current KS: " "result $cksst"
menuitemtextinput "2Highest KS: " "result $chksst"
menuitemtextinput "3FTK's: " "result $ftkst"
menuitemtextinput "3HTK's: " "result $htkst"
menuitemtextinput "3STK's: " "result $stkst"
menuitemtextinput "3KTK's: " "result $ktkst"
menuitemtextinput "3GTK's: " "result $gtkst"
menuitemtextinput "7Total TK's: " "result $tkst"
menuitem "" -1
menuitemvar [concat (c 1) "      ~Weapons~" ]
menuitemtextinput "2Sniper: " [(concatword $cursniper / $cursniperdmg)]
menuitemtextinput "2SMG: " [(concatword $cursmg / $cursmgdmg)]
menuitemtextinput "2AR: " [(concatword $curar / $curardmg)]
menuitemtextinput "2Shotgun: " [(concatword $curshot / $curshotdmg)]
menuitemtextinput "2Carbine: " [(concatword $curcarb / $curcarbdmg)]
menuitemtextinput "2Pistol: " [(concatword $curusp / $curuspdmg)]
menuitemtextinput "2Akimbo: " [(concatword $curaki / $curakidmg)]
menuitemtextinput "2Grenade: " [(concatword $curnade / $curnadedmg)]
menuitemtextinput "2Knife: " [(concatword $curknife / $curknifedmg)]
menuitemtextinput "2Scopes: " "result $scoped"
menuitem "" -1
menuitemvar [concat (c 4)Weapon stats are currently shots/damage.]

newmenu "All-Time Statistics" // All-Time Stats Menu
menuinit [(calc)]
menuitemvar [concat (c 4)Here are your all-time statistics:]
menuitem "" -1
menuitemvar [concat (c 0) "        ~Flags~"]
menuitemtextinput "2Scored: " "result $atcfst" // CTF Flags
menuitemtextinput "2Dropped: " "result $atdfst"
menuitemtextinput "2Hunted: " "result $athfst" // HTF Flags
menuitemtextinput "2Kept: " "result $atkfst"   // TKTF/KTF Flags
menuitemtextinput "3Lost: " "result $atlfst"
menuitemtextinput "2Stolen: " "result $atsfst" // # of times carrying flag.
menuitemtextinput "2Flag Ratio: " "result $atfratio"
menuitem "" -1
menuitemvar [concat (c 3) "        ~Kills~" ]
menuitemtextinput "2Frags: " "result $atfrags"
menuitemtextinput "3Deaths: " "result $atdeaths"
menuitemtextinput "3Suicides: " "result $atsuicides"
menuitemtextinput "2Score: " "result $atscore"
menuitemtextinput "2Ratio: " "result $atratio"
menuitemtextinput "2Gibs: " "result $atgbst"
menuitemtextinput "2Headshots: " "result $athsst"
menuitemtextinput "2Knife Gibs: " "result $atknst"
menuitemtextinput "2Splatters: " "result $atspst"
menuitemtextinput "2Highest KS: " "result $athksst"
menuitemtextinput "3FTK's: " "result $atftkst"
menuitemtextinput "3HTK's: " "result $athtkst"
menuitemtextinput "3STK's: " "result $atstkst"
menuitemtextinput "3KTK's: " "result $atktkst"
menuitemtextinput "3GTK's: " "result $atgtkst"
menuitemtextinput "7Total TK's: " "result $attkst"
menuitem "" -1
menuitemvar [concat (c 1) "      ~Weapons~" ]
menuitemtextinput "2Sniper: " [(concatword $atsniper / $atsniperdmg)]
menuitemtextinput "2SMG: " [(concatword $atsmg / $atsmgdmg)]
menuitemtextinput "2AR: " [(concatword $atar / $atardmg)]
menuitemtextinput "2Shotgun: " [(concatword $atshot / $atshotdmg)]
menuitemtextinput "2Carbine: " [(concatword $atcarb / $atcarbdmg)]
menuitemtextinput "2Pistol: " [(concatword $atusp / $atuspdmg)]
menuitemtextinput "2Akimbo: " [(concatword $ataki / $atakidmg)]
menuitemtextinput "2Grenade: " [(concatword $atnade / $atnadedmg)]
menuitemtextinput "2Knife: " [(concatword $atknife / $atknifedmg)]
menuitemtextinput "2Scopes: " "result $atscoped"
menuitem "" -1
menuitemvar [concat (c 4)Weapon stats are currently shots/damage.]
menuitem "" -1
menuitemvar [concat (c 6) "        ~Modes~" ]
menuitemtextinput "2TDM: " "result $tdmst"
menuitemtextinput "2DM: " "result $dmst"
menuitemtextinput "2TSURV: " "result $tsvst"
menuitemtextinput "2SURV: " "result $svst"
menuitemtextinput "2CTF: " "result $ctfst"
menuitemtextinput "2HTF: " "result $htfst"
menuitemtextinput "2TKTF: " "result $tktfst"
menuitemtextinput "2KTF: " "result $ktfst"
menuitemtextinput "2PF: " "result $pfst"
menuitemtextinput "2LSS: " "result $lssst"
menuitemtextinput "2TOSOK: " "result $tosokst"
menuitemtextinput "2OSOK: " "result $osokst"
menuitemtextinput "2BTDM: " "result $btdmst"
menuitemtextinput "2BDM: " "result $bdmst"
menuitemtextinput "2BOSOK: " "result $bosokst"
menuitemtextinput "2COOP: " "result $coopst"
menuitem "" -1
menuitemvar [concat (c 7) "        ~Maps~" ]
menuitemtextinput "2ac_aqueous: " "result $aqueousst"
menuitemtextinput "2ac_arabian: " "result $arabianst"
menuitemtextinput "2ac_arctic: " "result $arcticst"
menuitemtextinput "2ac_arid: " "result $aridst"
menuitemtextinput "2ac_complex: " "result $complexst"
menuitemtextinput "2ac_depot: " "result $depotst"
menuitemtextinput "2ac_desert: " "result $desertst"
menuitemtextinput "2ac_desert2: " "result $desert2st"
menuitemtextinput "2ac_desert3: " "result $desert3st"
menuitemtextinput "2ac_douze: " "result $douzest"
//menuitemtextinput "2ac_edifice: " "result $edificest"
menuitemtextinput "2ac_elevation: " "result $elevationst"
menuitemtextinput "2ac_gothic: " "result $gothicst"
menuitemtextinput "2ac_iceroad: " "result $iceroadst"
//menuitemtextinput "2ac_industrial: " "result $industrialst"
menuitemtextinput "2ac_ingress: " "result $ingressst"
menuitemtextinput "2ac_keller: " "result $kellerst"
menuitemtextinput "2ac_mines: " "result $minesst"
menuitemtextinput "2ac_outpost: " "result $outpostst"
menuitemtextinput "2ac_power: " "result $powerst"
menuitemtextinput "2ac_rattrap: " "result $rattrapst"
menuitemtextinput "2ac_scaffold: " "result $scaffoldst"
menuitemtextinput "2ac_shine: " "result $shinest"
menuitemtextinput "2ac_snow: " "result $snowst"
menuitemtextinput "2ac_sunset: " "result $sunsetst"
menuitemtextinput "2ac_toxic: " "result $toxicst"
menuitemtextinput "2ac_urban: " "result $urbanst"
menuitemtextinput "2ac_werk: " "result $werkst"
menuitemtextinput "2Official: " "result $offmpst"
menuitemtextinput "2Custom: " "result $cstmpst"
menuitem "" -1
menuitemvar [concat (c 0) "        ~Other~" ]
menuitemtextinput "2AC Starts: " "result $acstart"
menuitemtextinput "3CLA: " "result $clast"
menuitemtextinput "1RVSF: " "result $rvsfst"
menuitemtextinput "4FFA: " "result $ffast"
menuitemtextinput "2Bot: " "result $botst"
menuitemtextinput "2GG: " "result $ggst"

showcurstatsbind = [ // Pre-built current round stats menu viewing alias for easy key binding...
                     // Acts as a "toggle" bind similar to viewing the scoreboard. Press
                     // and hold to view, release to close.

    calc // For accuracy purposes calculate updated statistics before showing the menu.
    showmenu "Current Round Statistics"
    onrelease [closemenu "Current Round Statistics"]
]

showatstatsbind = [ // Pre-built all-time stats menu viewing alias for easy key binding...
                    // Acts as a "toggle" bind similar to viewing the scoreboard. Press
                    // and hold to view, release to close.

    calc // For accuracy purposes calculate updated statistics before showing the menu.
    showmenu "All-Time Statistics"
    onrelease [closemenu "All-Time Statistics"]
]

statsmenu = [ // Command for showing the menus, IDK why people would not want to use the binds. :P
    if (strcmp $arg1 "all") [
        showmenu "All-Time Statistics"
    ] [
        showmenu "Current Round Statistics"
    ]
]

modmenu = [ // Command for showing the mod menu.
    showmenu "MPL Mod"
]

// bind BACKQUOTE [showcurstatsbind]
// bind EQUALS [showatstatsbind]

docsection [MPL] // In-game documentation of the script's various commands.

docident [clrst] [1MPL: 5Clears the current round stats.]
docexample [/clrst] []

docident [clrats] [1MPL: 5Clears the all-time stats.]
docargument [A] [Clears the values only if this is set to 01.]
docexample [/clrats 1] []

docident [conextras] [1MPL: 5Displays extra skill based messages.]
docargument [A] [Displays messages if this is set to 01.]
docexample [/conextras 1] [0Enables 5the messages.]
docexample [/conextras 0] [3Disables 5the messages.]

docident [modmenu] [1MPL: 5Displays the MPL Mod menu.]
docremark [Allows you to easily customize the kill streak messages.]
docexample [/modmenu]

docident [stats] [1MPL: 5Prints your current round stats to the console.]
docargument [A] [Prints your all time stats to the console if this is set to 0"all".]
docexample [/stats] [Prints your current round stats.]
docexample [/stats all] [Prints your all-time stats.]

docident [statshot] [1MPL: 5Automatically takes a screenshot of the current round stats menu.]
docargument [A] [Screenshots the all-time stats menu instead if this is set to 0"all".]
docexample [/statshot] [Screenshots the current round stats menu.]
docexample [/statshot all] [Screenshots the all-time stats menu.]

docident [autostatshot] [1MPL: 5Automatically takes a /statshot during intermissions if enabled.]
docargument [A] [30 0= disabled; 31 0= enabled]
docexample [/autostatshot 1] [Enables automatic statshots.]
docexample [/autostatshot 0] [Disables automatic statshots.]

docident [statsmenu] [1MPL: 5Shows your current round stats menu.]
docargument [A] [Shows your all-time stats menu if this is set to 0"all".]
docexample [/statsmenu] [Shows your current round stats menu.]
docexample [/statsmenu all] [Shows your all-time stats menu.]