tf-scripts/nightal/stats.tf

; postepy
/set _postepy_max=19
/set _postepy_list=\
  start/restart|\
  znikome|\
  minimalne|\
  mizerne|\
  nieznaczne|\
  niewielkie|\
  bardzo male|\
  male|\
  nieduze|\
  znaczne|\
  istotne|\
  owocne|\
  duze|\
  pokazne|\
  bardzo duze|\
  trwale|\
  wspaniale|\
  wielkie|\
  ogromne|\
  kolosalne|\
  nieopisane

/def postepy = \
  /if ({1} =~ "reset") \
    /set _postepy_czas_0=$[ftime("%H:%M", time())]%;\
    /set _postepy_own_0=%ownkills%;\
    /set _postepy_all_0=%allkills%;\
    /test ++_postepy_reset_counter%;\
    /set _postepy_current=0%;\
    /send postepy reset%;\
  /else \
    /let __index=0%; \
    /echo +---------------+-------------------+%;\
    /echo $[strcat("| ", pad("cykl", -14), "|", pad({_postepy_reset_counter}, 18), " |")]%;\
    /echo +---------------+-------+-----+-----+%; \
    /while ({__index}<={_postepy_current}) \
      /let __postep=$[_get_element({__index}, {_postepy_list})]%;\
      /let __czas=$(/listvar -v _postepy_czas_$[strcat({__index})])%;\
      /let __own=$(/listvar -v _postepy_own_$[strcat({__index})])%;\
      /let __all=$(/listvar -v _postepy_all_$[strcat({__index})])%;\
      /if ({__czas} =~ "" )\
        /let __czas=?:?%;\
      /endif%;\
      /if ({__own} =~ "" )\
        /let __own=?%;\
      /endif%;\
      /if ({__all} =~ "" )\
        /let __all=?%;\
      /endif%;\
      /echo $[strcat("| ", pad({__postep},-14), "| ", pad({__czas},5), " |", pad({__own},4), " |", pad({__all},4), " |")]%;\
      /let __index=$[{__index}+1]%; \
    /done%; \
    /if ({_postepy_current}==-1) \
      /echo -p @{n}|              |       |%; \
    /endif%; \
    /echo +---------------+-------+-----+-----+%;\
  /endif

/def -Fp2 -mregexp -t'[Zz]abil.* ' poka_exp = /send postepy

/def exp = \
  /send usiadz %;\
  /send medytuj %;\
  /send ocen sile %;\
  /send ocen zrecznosc %;\
  /send ocen wytrzymalosc %;\
  /send ocen inteligencje %;\
  /send ocen madrosc %;\
  /send ocen odwage %;\
  /send powstan