Mini-MPL Script Concept

alias stats_names [Frags: Gibs: Headshots: Slashes: Splats: Ratio: TKs: Flags: Deaths: Suicides:]
alias guns [Knife: Pistol: Carbine: Shotgun: SMG: Sniper: AR: " " " " Akimbo:]
alias accuracy_dump [
  loop adl 10 [
    if (|| (= $adl 7) (= $adl 8)) [] [
      alias shots_landed (div (at (pstat_weap (findcn $curname)) (+ (* $adl 2) 1)) (at $weapons_dmg $adl))
      echo (at $guns $adl) (curaccuracy (findcn $curname) $adl)
      echo (concatword $shots_landed / (at (pstat_weap (findcn $curname)) (* $adl 2)))
      echo ""
    ]
  ]
]
addcheck_si [accuracy_dump]
alias stats_aliases_2 [fragged_stat gibbed_stat headshot_stat slashed_stat splattered_stat ratio_stat tk_stat flag_stat death_stat suicide_stat]
alias make_stats_aliases [
  loop msal 10 [alias (at $stats_aliases_2 $msal) 0]
]
make_stats_aliases
addcheck_msa [make_stats_aliases]
alias kills [fragged gibbed headshot slashed splattered]
alias collect_stats [
  loop csl 5 [
    if_conline_has (format "you %1" (at $kills $csl)) but_not "teammate" [
      if (= $csl 0) [] [
        += (at $stats_aliases_2 $csl) 1
      ]
    ] []
    if_conline_has (format "you %1" (at $kills $csl)) and_also "teammate" [
      += tk_stat 1
    ] []
  ]
  if_conline_has "you suicided!" [if (strcmp (at $conline 0) "you") [+= suicide_stat 1] []] []
  alias ratio_stat (curratio (findcn $curname))
  alias flag_stat (at (pstat_score (findcn $curname)) 0)
  alias fragged_stat (at (pstat_score (findcn $curname)) 1)
  alias death_stat (at (pstat_score (findcn $curname)) 2)
]
add2conloop [collect_stats]
alias dumpstats [
  accuracy_dump
  loop dsl 10 [echo (at $stats_names $dsl) (getalias (at $stats_aliases_2 $dsl))]
]