tf-scripts/arkadia/stats.tf

365 lines
20 KiB
HCL

; by unknown
/def -Fp2 -t'*trafia cie * w nogi* wyparowan*' stats_wyparowane_nogi = /dodaj_wyparowane nogi %{L1}
/def -Fp2 -t'*trafia cie * w lewe ramie* wyparowan*' stats_wyparowane_lramie = /dodaj_wyparowane lramie %{L1}
/def -Fp2 -t'*trafia cie * w prawe ramie* wyparowan*' stats_wyparowane_pramie = /dodaj_wyparowane pramie %{L1}
/def -Fp2 -t'*trafia cie * w korpus* wyparowan*' stats_wyparowane_korpus = /dodaj_wyparowane korpus %{L1}
/def -Fp2 -t'*trafia cie * w glowe* wyparowan*' stats_wyparowane_glowa = /dodaj_wyparowane glowa %{L1}
/def -Fp2 -mregexp -t'.* trafia cie .* w .*, lecz caly impet uderzenia zostaje wyparowan.*' cos_ci_defensnelo_zbroja = /substitute -p @{C%c_bold}[zbr]@{n} %{P0}
/def -Fp2 -t'* cie w glowe.' stats_rany_glowa = /test ++glowa_rany
/def -Fp2 -t'* cie w lewe ramie.' stats_rany_lramie = /test ++lramie_rany
/def -Fp2 -t'* cie w prawe ramie.' stats_rany_pramie = /test ++pramie_rany
/def -Fp2 -t'* cie w korpus.' stats_rany_korpus = /test ++korpus_rany
/def -Fp2 -t'* cie w nogi.' stats_rany_nogi = /test ++nogi_rany
/def -Fp2 -mregexp -t'(.* udaje ci sie oslonic .*)' stats_oslona = /test ++oslona_tarcza%;/substitute -p @{C%c_bold}[tarcza]@{n} %{P1}
/def -Fp2 -mregexp -t'(.* tobie udaje sie oslonic .*)' stats_oslona2 = /test ++oslona_tarcza%;/substitute -p @{C%c_bold}[tarcza]@{n} %{P1}
/def -Fp2 -t'*, zbijajac uderzenie i momentalnie przechodzac do przeciwnatarcia.' stats_oslona4 = /test ++oslona_tarcza
/def -Fp2 -t'*, lecz ty zbijasz go *' stats_oslona5 = /test ++oslona_tarcza
/def -Fp2 -t'Wycwiczonym blokiem*odbijasz*' stats_oslona6 = /test ++oslona_tarcza
/def -Fp2 -t'W pore zaslaniasz sie*' stats_oslona7 = /test ++oslona_tarcza
/def -Fp2 -t'Skutecznie oslaniasz*' stats_oslona8 = /test ++oslona_tarcza
/def -Fp2 -t'Bez trudu zbijasz*' stats_oslona9 = /test ++oslona_tarcza
/def -Fp2 -mregexp -t'(.* tobie udaje sie uniknac .*)' stats_unk = /test ++unik%;/substitute -p @{C%c_bold}[unk]@{n} %{P1}
/def -Fp2 -mregexp -t'(.* nie udaje sie trafic ciebie .*)' stats_unk2 = /test ++unik%;/substitute -p @{C%c_bold}[unk]@{n} %{P1}
/def -Fp2 -t'*, lecz tobie udaje sie go uniknac.' stats_unik3 = /test ++unik
/def -Fp2 -t'*przecina powietrze tuz przed twoja glowa.' stats_unik4 = /test ++unik
/def -Fp2 -t'Z drwiacym usmiechem unikasz*' stats_unik5 = /test ++unik
/def -Fp2 -t'Z osiagnieta podczas lat treningu wprawa omijasz*' stats_unik6 = /test ++unik
/def -Fp2 -t'Efektownym wypadem schodzisz*' stats_unik7 = /test ++unik
/def -Fp2 -t'Z pokazowa latwoscia unikasz*' stats_unik8 = /test ++unik
/def -Fp2 -mregexp -t'(.* tobie udaje sie je zbic.*)' stats_parowanie = /test ++parowanie%;/substitute -p @{C%c_bold}[par]@{n} %{P1}
/def -Fp2 -mregexp -t'(.*, lecz tobie udaje sie zbic je z linii ataku.*)' stats_parowanie2 = /test ++parowanie%;/substitute -p @{C%c_bold}[par]@{n} %{P1}
/def -Fp2 -mregexp -t'(.*, lecz tobie udaje sie go sparowac.*)' stats_parowanie3 = /test ++parowanie%;/substitute -p @{C%c_bold}[par]@{n} %{P1}
/def -Fp2 -mregexp -t'(W pore zakleszczasz cios.*)' stats_parowanie4 = /test ++parowanie%;/substitute -p @{C%c_bold}[par]@{n} %{P1}
/def -Fp2 -t'*, lecz sprawnie parujesz go*' stats_parowanie5 = /test ++parowanie
/def -Fp2 -t'Odpierasz natarcie*blyskawiczna zaslona*' stats_parowanie6 = /test ++parowanie
/def -Fp2 -t'Efektownie parujesz*' stats_parowanie7 = /test ++parowanie
/def -Fp2 -t'Jak gdyby od niechcenia zbijasz*' stats_parowanie8 = /test ++parowanie
/def -Fp2 -t'Elegancko odbijasz cios*' stats_parowanie9 = /test ++parowanie
/def -Fp2 -t'*dotknal cie w glowe *' stats_rany_glowa2 = /test ++glowa_rany
/def -Fp2 -t'*dotknal cie w lewe ramie *' stats_rany_lramie2 = /test ++lramie_rany
/def -Fp2 -t'*dotknal cie w prawe ramie *' stats_rany_pramie2 = /test ++pramie_rany
/def -Fp2 -t'*dotknal cie w korpus *' stats_rany_korpus2 = /test ++korpus_rany
/def -Fp2 -t'*dotknal cie w nogi *' stats_rany_nogi2 = /test ++nogi_rany
/def -Fp2 -mregexp -t'Wykorzystujac brak broni .* (ze swistem|zbijajac w pore)' stats_spec_0 = /test ++spec_0
/def -Fp2 -mregexp -t'Wykorzystujac brak broni .* (ledwie zahaczajac|ledwie sinca)' stats_spec_1 = /test ++spec_1
/def -Fp2 -mregexp -t'Wykorzystujac brak broni .* (lekko raniac|krwawiace zadrapanie)' stats_spec_2 = /test ++spec_2
/def -Fp2 -mregexp -t'Wykorzystujac brak broni .* (mocno raniac|dluga, poszarpana rane)' stats_spec_3 = /test ++spec_3
/def -Fp2 -mregexp -t'Wykorzystujac brak broni .* (bardzo mocno raniac|gleboka rane z wystajacymi)' stats_spec_4 = /test ++spec_4
/def -Fp2 -mregexp -t'Wykorzystujac brak broni .* smiertelne obrazenia' stats_spec_5 = /test ++spec_5
/def -Fp2 -mregexp -t'ktory ma zmasakrowac.* twoja bron jakims cudem ' stats_spec_0 = /test ++spec_0
/def -Fp2 -mregexp -t'rzucasz sie do ataku.* (ledwo muskajac) ' stats_spec_1 = /test ++spec_1
/def -Fp2 -mregexp -t'rzucasz sie do ataku.* (lekko raniac) ' stats_spec_2 = /test ++spec_2
/def -Fp2 -mregexp -t'rzucasz sie do ataku.* ((?<!lekko |powaznie |bardzo ciezko )raniac) ' stats_spec_3 = /test ++spec_3
/def -Fp2 -mregexp -t'rzucasz sie do ataku.* (powaznie raniac) ' stats_spec_4 = /test ++spec_4
/def -Fp2 -mregexp -t'rzucasz sie do ataku.* (bardzo ciezko raniac) ' stats_spec_5 = /test ++spec_5
/def -Fp2 -mregexp -t'rzucasz sie do ataku.* (masakrujac) ' stats_spec_6 = /test ++spec_6
/def -Fp2 -mregexp -t'Stajesz pewnie na szeroko rozstawionych nogach' stats_spec_7 = /test ++spec_7
/def dodaj_wyparowane = \
/let co=$[replace(".","",{2})]%;\
/test (wyparowane_%{1}_%{co}:=wyparowane_%{1}_%{co} + 1)%;
/def stats_wyparowane = \
/let j=%{1}%;\
/let wyp_razem=0%;\
/let wyparowane_lista=$(/listvar -s -mglob wyparowane_%{j}_*)%;\
/let wyparowane_lista=$[strcat(wyparowane_lista," end")]%;\
/let linia=%;\
/while /let i=$[strstr(wyparowane_lista," ")]%; /@test i>0%;/do \
/let sprzet=$[substr(wyparowane_lista,0,i)]%;\
/let wyparowane_lista=$[substr(wyparowane_lista,i+1)]%;\
/let wyp_ile=$(/listvar -v %{sprzet})%;\
/let wyp_razem=$[wyp_razem+wyp_ile]%;\
/let sprzet_nazwa=$[substr(sprzet,strrchr(sprzet,"_")+1)]%;\
/let linia=$[strcat(linia," ",sprzet_nazwa,":",wyp_ile," ")]%;\
/done%;\
/let procent=100%;\
/let x=$(/listvar -v %{j}_rany)%;\
/let x=$[wyp_razem+x]%;\
/set wszystkie_parowania=$[wszystkie_parowania+wyp_razem]%;\
/if ({x}>0) \
/let procent=$[100*wyp_razem / x ]%;\
/else \
/let procent=?%;\
/endif%;\
/let linia=$[strcat("| ",pad(j,-6)," ",pad(wyp_razem,5),"/",pad(x,-5)," [",pad(procent,3),"%%] |",linia)]%;\
/eval /echo -p %{linia}@{n}
/def stats =\
/set wszystkie_parowania=0%;\
/echo -p +----[ Skutecznosc zbroi ]---+-----------[ Wyparowane przez ]---------+@{n}%;\
/stats_wyparowane glowa%;\
/stats_wyparowane lramie%;\
/stats_wyparowane pramie%;\
/stats_wyparowane korpus%;\
/stats_wyparowane nogi%;\
/echo -p +----------------------------+----------------------------------------+@{n}%;\
/test (wszystkie_rany:=glowa_rany+lramie_rany+pramie_rany+korpus_rany+nogi_rany)%;\
/let x=$[wszystkie_parowania+wszystkie_rany+unik+oslona_tarcza+parowanie]%;\
/let spece_suma=$[spec_0+spec_1+spec_2+spec_3+spec_4+spec_5+spec_6+spec_7]%;\
/if (x>0) \
/let p1=$[100*unik / x]%;\
/let p2=$[100*parowanie / x]%;\
/let y=$[wszystkie_parowania+unik+oslona_tarcza+parowanie]%;\
/let p3=$[100*oslona_tarcza / x]%;\
/let p4=$[100*y / x]%;\
/else \
/let p1=?%;\
/let p2=?%;\
/let p3=?%;\
/let p4=?%;\
/endif%;\
/if (spece_suma>0) \
/let ppp0=$[100*spec_0 / spece_suma]%;\
/let ppp1=$[100*spec_1 / spece_suma]%;\
/let ppp2=$[100*spec_2 / spece_suma]%;\
/let ppp3=$[100*spec_3 / spece_suma]%;\
/let ppp4=$[100*spec_4 / spece_suma]%;\
/let ppp5=$[100*spec_5 / spece_suma]%;\
/let ppp5=$[100*spec_6 / spece_suma]%;\
/let ppp5=$[100*spec_7 / spece_suma]%;\
/let ppp8=$[100*spece_suma / (ilosc_ciosow+spece_suma)]%;\
/else \
/let ppp0=?%;\
/let ppp1=?%;\
/let ppp2=?%;\
/let ppp3=?%;\
/let ppp4=?%;\
/let ppp5=?%;\
/let ppp6=?%;\
/let ppp7=?%;\
/let ppp8=0%;\
/endif%;\
/if ({_rozkaz_udany} > 0) \
/let p6=$[100*_rozkaz_udany/ (_rozkaz_nieudany+_rozkaz_udany)]%;\
/else \
/let p6=?%;\
/endif%;\
/let linia=$[strcat("| ",pad("uniki",-6)," ",pad(unik,5),"/",pad(x,-5)," [",pad(p1,3),"%%] |")]%;\
/eval /echo -p %{linia}@{n}%;\
/let linia=$[strcat("| ",pad("zbicia",-6)," ",pad(parowanie,5),"/",pad(x,-5)," [",pad(p2,3),"%%] |")]%;\
/eval /echo -p %{linia}@{n}%;\
/let linia=$[strcat("| ",pad("oslona",-6)," ",pad(oslona_tarcza,5),"/",pad(x,-5)," [",pad(p3,3),"%%] |")]%;\
/eval /echo -p %{linia}@{n}%;\
/let linia=$[strcat("| ",pad("rozkaz",-6)," ",pad(_rozkaz_udany,5),"/",pad(_rozkaz_nieudany,-5)," [",pad(p6,3),"%%] |")]%;\
/eval /echo -p %{linia}@{n}%;\
/let linia=$[strcat("+----[ Statystyka specow ]---+")]%;\
/let linia=$[strcat(linia,"-----[ W sumie: ",pad(y,5),"/",pad(x,-5)," [",decode_attr(pad(p4,3), {zc_info}),"@{C%c_info}%%@{n}] ]----+")]%;\
/eval /echo -p %{linia}@{n}%;\
/let linia=$[strcat("| ",pad("Spec 0/7",-6)," ",pad(spec_0,3),"/",pad(spece_suma,-5)," [",pad(ppp0,3),"%%] |")]%;\
/eval /echo -p %{linia}@{n}%;\
/let linia=$[strcat("| ",pad("Spec 1/7",-6)," ",pad(spec_1,3),"/",pad(spece_suma,-5)," [",pad(ppp1,3),"%%] |")]%;\
/eval /echo -p %{linia}@{n}%;\
/let linia=$[strcat("| ",pad("Spec 2/7",-6)," ",pad(spec_2,3),"/",pad(spece_suma,-5)," [",pad(ppp2,3),"%%] |")]%;\
/eval /echo -p %{linia}@{n}%;\
/let linia=$[strcat("| ",pad("Spec 3/7",-6)," ",pad(spec_3,3),"/",pad(spece_suma,-5)," [",pad(ppp3,3),"%%] |")]%;\
/eval /echo -p %{linia}@{n}%;\
/let linia=$[strcat("| ",pad("Spec 4/7",-6)," ",pad(spec_4,3),"/",pad(spece_suma,-5)," [",pad(ppp4,3),"%%] |")]%;\
/eval /echo -p %{linia}@{n}%;\
/let linia=$[strcat("| ",pad("Spec 5/7",-6)," ",pad(spec_5,3),"/",pad(spece_suma,-5)," [",pad(ppp5,3),"%%] |")]%;\
/eval /echo -p %{linia}@{n}%;\
/let linia=$[strcat("| ",pad("Spec 6/7",-6)," ",pad(spec_6,3),"/",pad(spece_suma,-5)," [",pad(ppp5,3),"%%] |")]%;\
/eval /echo -p %{linia}@{n}%;\
/let linia=$[strcat("| ",pad("Spec 7/7",-6)," ",pad(spec_7,3),"/",pad(spece_suma,-5)," [",pad(ppp5,3),"%%] |")]%;\
/eval /echo -p %{linia}@{n}%;\
/let linia=$[strcat("+----------------------------+")]%;\
/eval /echo -p %{linia}@{n}%;\
/def czysc_staty = \
/quote -S /unset `/listvar -s wyparowane_*%;\
/quote -S /unset `/listvar -s *_rany%;\
/quote -S /unset `/listvar -s unik%;\
/quote -S /unset `/listvar -s oslona_tarcza%;\
/quote -S /unset `/listvar -s parowanie%;\
/def czysc_spece = /quote -S /unset `/listvar -s spec_*%;
; postepy
/set _postepy_max=16
/set _postepy_list=\
logowanie|\
minimalne|\
nieznaczne|\
bardzo male|\
male|\
nieduze|\
zadowalajace|\
spore|\
dosc duze|\
znaczne|\
duze|\
bardzo duze|\
ogromne|\
imponujace|\
wspaniale|\
gigantyczne|\
niebotyczne
/def exp = \
/purge cechy_set_* %;\
/quote -S /unset `/listvar _cechy_* %;\
/def -FP -p4 -t' slabiutk' cechy_set_show_str1 = /set _cechy_show_str=0%;\
/def -FP -p4 -t' watl' cechy_set_show_str2 = /set _cechy_show_str=5%;\
/def -FP -p5 -t' slab' cechy_set_show_str3 = /set _cechy_show_str=10%;\
/def -FP -p4 -t' krzepk' cechy_set_show_str4 = /set _cechy_show_str=15%;\
/def -FP -p4 -t' siln' cechy_set_show_str5 = /set _cechy_show_str=20%;\
/def -FP -p4 -t' mocn' cechy_set_show_str6 = /set _cechy_show_str=25%;\
/def -FP -p4 -t' potezn' cechy_set_show_str7 = /set _cechy_show_str=30%;\
/def -FP -p4 -t' mocarn' cechy_set_show_str8 = /set _cechy_show_str=35%;\
/def -FP -p4 -t'Masz epicka sile' cechy_set_str9 = /set _cechy_show_str=40%;\
/def -FP -p4 -t' sila osiagnela nadludzki' cechy_set_str10 = /set _cechy_show_str=45%;\
%;\
/def -FP -p4 -t' nieskoordynowan' cechy_set_show_dex1 = /set _cechy_show_dex=0%;\
/def -FP -p4 -t' niezreczn' cechy_set_show_dex2 = /set _cechy_show_dex=5%;\
/def -FP -p4 -t' niezgrabn' cechy_set_show_dex3 = /set _cechy_show_dex=10%;\
/def -FP -p4 -t' sprawn' cechy_set_show_dex4 = /set _cechy_show_dex=15%;\
/def -FP -p4 -t' zwinn' cechy_set_show_dex5 = /set _cechy_show_dex=20%;\
/def -FP -p4 -t' zreczn' cechy_set_show_dex6 = /set _cechy_show_dex=25%;\
/def -FP -p4 -t' gibk' cechy_set_show_dex7 = /set _cechy_show_dex=30%;\
/def -FP -p4 -t' akrobatyczn' cechy_set_show_dex8 = /set _cechy_show_dex=35%;\
/def -FP -p4 -t'Masz epicka zrecznosc' cechy_set_dex9 = /set _cechy_show_dex=40%;\
/def -FP -p4 -t' zrecznosc osiagnela nadludzki' cechy_set_dex10 = /set _cechy_show_dex=45%;\
%;\
/def -FP -p4 -t' cherlaw' cechy_set_show_con1 = /set _cechy_show_con=0%;\
/def -FP -p4 -t' rachityczn' cechy_set_show_con2 = /set _cechy_show_con=5%;\
/def -FP -p4 -t' mizern' cechy_set_show_con3 = /set _cechy_show_con=10%;\
/def -FP -p4 -t' dobrze zbudowan' cechy_set_show_con4 = /set _cechy_show_con=15%;\
/def -FP -p4 -t' wytrzymal' cechy_set_show_con5 = /set _cechy_show_con=20%;\
/def -FP -p4 -t' tward' cechy_set_show_con6 = /set _cechy_show_con=25%;\
/def -FP -p4 -t' muskularn' cechy_set_show_con7 = /set _cechy_show_con=30%;\
/def -FP -p4 -t' atletyczn' cechy_set_show_con8 = /set _cechy_show_con=35%;\
/def -FP -p4 -t'Masz epicka wytrzymalosc' cechy_set_show_con9 = /set _cechy_show_con=40%;\
/def -FP -p4 -t' wytrzymalosc osiagnela nadludzki' cechy_set_show_con10 = /set _cechy_show_con=45%;\
%;\
/def -FP -p4 -t' bezmysln' cechy_set_show_int1 = /set _cechy_show_int=0%;\
/def -FP -p4 -t' tepa| tepy' cechy_set_show_int2 = /set _cechy_show_int=5%;\
/def -FP -p4 -t' ograniczon' cechy_set_show_int3 = /set _cechy_show_int=10%;\
/def -FP -p4 -t' pojetn' cechy_set_show_int4 = /set _cechy_show_int=15%;\
/def -FP -p4 -t' inteligentn' cechy_set_show_int5 = /set _cechy_show_int=20%;\
/def -FP -p4 -t' bystr' cechy_set_show_int6 = /set _cechy_show_int=25%;\
/def -FP -p4 -t' blyskotliw' cechy_set_show_int7 = /set _cechy_show_int=30%;\
/def -FP -p4 -t' genialn' cechy_set_show_int8 = /set _cechy_show_int=35%;\
/def -FP -p4 -t'Masz epicki intelekt' cechy_set_show_int9 = /set _cechy_show_int=40%;\
/def -FP -p4 -t' intelekt osiagnal nadludzki' cechy_set_show_int10 = /set _cechy_show_int=45%;\
%;\
/def -FP -p4 -t' tchorzliw' cechy_set_show_dis1 = /set _cechy_show_dis=0%;\
/def -FP -p4 -t' strachliw' cechy_set_show_dis2 = /set _cechy_show_dis=5%;\
/def -FP -p4 -t' niepewn' cechy_set_show_dis3 = /set _cechy_show_dis=10%;\
/def -FP -p4 -t' zdecydowan' cechy_set_show_dis4 = /set _cechy_show_dis=15%;\
/def -FP -p4 -t' odwazn' cechy_set_show_dis5 = /set _cechy_show_dis=20%;\
/def -FP -p4 -t' dzieln' cechy_set_show_dis6 = /set _cechy_show_dis=25%;\
/def -FP -p4 -t' nieugiet' cechy_set_show_dis7 = /set _cechy_show_dis=30%;\
/def -FP -p4 -t' nieustraszon' cechy_set_show_dis8 = /set _cechy_show_dis=35%;\
/def -FP -p4 -t'Masz epicka odwage' cechy_set_show_show_dis9 = /set _cechy_show_dis=40%;\
/def -FP -p4 -t' odwaga osiagnela nadludzki' cechy_set_show_show_dis10 = /set _cechy_show_dis=45%;\
%;\
/set _cechy_add_str=0%;\
/set _cechy_add_dex=0%;\
/set _cechy_add_con=0%;\
/set _cechy_add_int=0%;\
/set _cechy_add_dis=0%;\
/def -p5 -P -t'ze bardzo duzo ci brakuje, .* swa sile' cechy_set_left_str1 = /set _cechy_add_str=0%;\
/def -p5 -P -t'ze duzo ci brakuje, .* swa sile' cechy_set_left_str2 = /set _cechy_add_str=1%;\
/def -p5 -P -t'ze troche ci brakuje, .* swa sile' cechy_set_left_str3 = /set _cechy_add_str=2%;\
/def -p5 -P -t'ze niewiele ci brakuje, .* swa sile' cechy_set_left_str4 = /set _cechy_add_str=3%;\
/def -p5 -P -t'ze bardzo niewiele ci brakuje, .* swa sile' cechy_set_left_str5 = /set _cechy_add_str=4%;\
%;\
/def -p5 -P -t'ze bardzo duzo ci brakuje, .* swa zrecznosc' cechy_set_left_dex1 = /set _cechy_add_dex=0%;\
/def -p5 -P -t'ze duzo ci brakuje, .* swa zrecznosc' cechy_set_left_dex2 = /set _cechy_add_dex=1%;\
/def -p5 -P -t'ze troche ci brakuje, .* swa zrecznosc' cechy_set_left_dex3 = /set _cechy_add_dex=2%;\
/def -p5 -P -t'ze niewiele ci brakuje, .* swa zrecznosc' cechy_set_left_dex4 = /set _cechy_add_dex=3%;\
/def -p5 -P -t'ze bardzo niewiele ci brakuje, .* swa zrecznosc' cechy_set_left_dex5 = /set _cechy_add_dex=4%;\
%;\
/def -p5 -P -t'ze bardzo duzo ci brakuje, .* swa wytrzymalosc' cechy_set_left_con1 = /set _cechy_add_con=0%;\
/def -p5 -P -t'ze duzo ci brakuje, .* swa wytrzymalosc' cechy_set_left_con2 = /set _cechy_add_con=1%;\
/def -p5 -P -t'ze troche ci brakuje, .* swa wytrzymalosc' cechy_set_left_con3 = /set _cechy_add_con=2%;\
/def -p5 -P -t'ze niewiele ci brakuje, .* swa wytrzymalosc' cechy_set_left_con4 = /set _cechy_add_con=3%;\
/def -p5 -P -t'ze bardzo niewiele ci brakuje, .* swa wytrzymalosc' cechy_set_left_con5 = /set _cechy_add_con=4%;\
%;\
/def -p5 -P -t'ze bardzo duzo ci brakuje, .* swoj intelekt' cechy_set_left_int1 = /set _cechy_add_int=0%;\
/def -p5 -P -t'ze duzo ci brakuje, .* swoj intelekt' cechy_set_left_int2 = /set _cechy_add_int=1%;\
/def -p5 -P -t'ze troche ci brakuje, .* swoj intelekt' cechy_set_left_int3 = /set _cechy_add_int=2%;\
/def -p5 -P -t'ze niewiele ci brakuje, .* swoj intelekt' cechy_set_left_int4 = /set _cechy_add_int=3%;\
/def -p5 -P -t'ze bardzo niewiele ci brakuje, .* swoj intelekt' cechy_set_left_int5 = /set _cechy_add_int=4%;\
%;\
/def -p5 -P -t'ze bardzo duzo ci brakuje, .* swa odwage' cechy_set_left_dis1 = /set _cechy_add_dis=0%;\
/def -p5 -P -t'ze duzo ci brakuje, .* swa odwage' cechy_set_left_dis2 = /set _cechy_add_dis=1%;\
/def -p5 -P -t'ze troche ci brakuje, .* swa odwage' cechy_set_left_dis3 = /set _cechy_add_dis=2%;\
/def -p5 -P -t'ze niewiele ci brakuje, .* swa odwage' cechy_set_left_dis4 = /set _cechy_add_dis=3%;\
/def -p5 -P -t'ze bardzo niewiele ci brakuje, .* swa odwage' cechy_set_left_dis5 = /set _cechy_add_dis=4%;\
%;\
/send usiadz %;\
/send medytuj %;\
/send cechy %;\
/send ocen cechy %;\
/send powstan %;\
/def -ag -mregexp -Fp2 -t'Czujesz sie.*(wypoczet|zmeczon|wyczerpan|wycienczon).\\.' cechy_set_fake = /_cechy_count%;\
/send zmeczenie
; fragment Ingwara
/def _cechy_poziom_one = \
/eval /return {$[{1} + 1]}
/def _cechy_poziom = \
/let _opis=$[_cechy_poziom_one({1}, \
'niedoswiadczonego', \
'widzial juz to i owo', \
'pewnie stapa po swiecie', \
'niejedno widzial', \
'swoje przezyl', \
'doswiadczonego', \
'wiele przeszedl', \
'widzial kawal swiata', \
'bardzo doswiadczonego', \
'zwiedzil caly swiat', \
'wielce doswiadczonego', \
'widzial i doswiadczyl wszystkiego', \
'osobe owiana legenda')] %;\
/return strcat(" Lvl: ", decode_attr(_opis, {zc_info}))
; koniec fragmentu Ingwara
/def _cechy_count = \
/let _cechy_str=$[_cechy_show_str + _cechy_add_str]%;\
/let _cechy_dex=$[_cechy_show_dex + _cechy_add_dex]%;\
/let _cechy_con=$[_cechy_show_con + _cechy_add_con]%;\
/let _cechy_int=$[_cechy_show_int + _cechy_add_int]%;\
/let _cechy_dis=$[_cechy_show_dis + _cechy_add_dis]%;\
/let _cechy_sum=$[_cechy_str + _cechy_dex + _cechy_con + _cechy_int + _cechy_dis]%;\
/let _cechy_avg=$[_cechy_sum / 5]%;\
/let _cechy_lvl=$[trunc(_cechy_sum - 34) / 12]%;\
/let _cechy_left=$[mod((_cechy_sum - 34),12)]%;\
/test echo(strcat("+", strrep("-", 51), "+")) %;\
/test echo(pad("| ", 0, \
" Str ", 4, " |", 0, \
" Dex ", 4, " |", 0, \
" Con ", 4, " |", 0, \
" Int ", 4, " |", 0, \
" Dis ", 4, " |||", 0, \
" Sum ", 4, " |", 0, \
" Avg ", 4, " |", 0)) %;\
/test echo(pad("| ", 0, \
decode_attr(_cechy_str, {zc_info}), 4, " |", 0, \
decode_attr(_cechy_dex, {zc_info}), 4, " |", 0, \
decode_attr(_cechy_con, {zc_info}), 4, " |", 0, \
decode_attr(_cechy_int, {zc_info}), 4, " |", 0, \
decode_attr(_cechy_dis, {zc_info}), 4, " |||", 0, \
decode_attr(_cechy_sum, {zc_info}), 4, " |", 0, \
decode_attr(_cechy_avg, {zc_info}), 4, " |", 0)) %;\
/test echo(strcat("+", strrep("-", 51), "+")) %;\
/if ({_cechy_lvl} > 0)\
/test echo(strcat("|", pad(strcat(_cechy_poziom({_cechy_lvl}), ", next: ", decode_attr($[12 - {_cechy_left}], {zc_info})), -51), "|"))%;\
/endif%;\
/test echo(strcat("+", strrep("-", 51), "+"))%;\
/purge cechy_set_*%;\
/quote -S /unset `/listvar _cechy_*