232 lines
16 KiB
Terraform
232 lines
16 KiB
Terraform
|
/def -mregexp -p2 -t'^Wyglada(|sz) na kompletnego zoltodzioba\.' _poziomy_doswiadczenia_1 = /_sub 1/17@{n}
|
||
|
/def -mregexp -p2 -t'^Wyglada(|sz) na kogos, kto stawia pierwsze kroki\.' _poziomy_doswiadczenia_2 = /_sub 2/17@{n}
|
||
|
/def -mregexp -p2 -t'^Wyglada(|sz) na kogos, kto jeszcze niewiele widzial\.' _poziomy_doswiadczenia_3 = /_sub 3/17@{n}
|
||
|
/def -mregexp -p2 -t'^Wyglada(|sz) na kogos, kto niewiele wie o swiecie\.' _poziomy_doswiadczenia_4 = /_sub 4/17@{n}
|
||
|
/def -mregexp -p2 -t'^Wyglada(|sz) na kogos niedoswiadczonego\.' _poziomy_doswiadczenia_5 = /_sub 5/17@{n}
|
||
|
/def -mregexp -p2 -t'^Wyglada(|sz) na kogos, kto widzial juz to i owo\.' _poziomy_doswiadczenia_6 = /_sub 6/17@{n}
|
||
|
/def -mregexp -p2 -t'^Wyglada(|sz) na kogos, kto pewnie stapa po swiecie\.' _poziomy_doswiadczenia_7 = /_sub 7/17@{n}
|
||
|
/def -mregexp -p2 -t'^Wyglada(|sz) na kogos, kto niejedno widzial\.' _poziomy_doswiadczenia_8 = /_sub 8/17@{n}
|
||
|
/def -mregexp -p2 -t'^Wyglada(|sz) na kogos, kto swoje przezyl\.' _poziomy_doswiadczenia_9 = /_sub 9/17@{n}
|
||
|
/def -mregexp -p2 -t'^Wyglada(|sz) na kogos (?!bardzo |wielce )doswiadczonego\.' _poziomy_doswiadczenia_10= /_sub 10/17@{n}
|
||
|
/def -mregexp -p2 -t'^Wyglada(|sz) na kogos, kto wiele przeszedl\.' _poziomy_doswiadczenia_11= /_sub 11/17@{n}
|
||
|
/def -mregexp -p2 -t'^Wyglada(|sz) na kogos, kto widzial kawal swiata\.' _poziomy_doswiadczenia_12= /_sub 12/17@{n}
|
||
|
/def -mregexp -p2 -t'^Wyglada(|sz) na kogos bardzo doswiadczonego\.' _poziomy_doswiadczenia_13= /_sub 13/17@{n}
|
||
|
/def -mregexp -p2 -t'^Wyglada(|sz) na kogos, kto zwiedzil caly swiat\.' _poziomy_doswiadczenia_14= /_sub 14/17@{n}
|
||
|
/def -mregexp -p2 -t'^Wyglada(|sz) na kogos wielce doswiadczonego\.' _poziomy_doswiadczenia_15= /_sub 15/17@{n}
|
||
|
/def -mregexp -p2 -t'^Wyglada(|sz) na kogos, kto widzial i doswiadczyl wszystkiego\.' _poziomy_doswiadczenia_16= /_sub 16/17@{n}
|
||
|
/def -mregexp -p2 -t'^Wyglada(|sz) na osobe owiana legenda\.' _poziomy_doswiadczenia_17= /_sub 17/17@{n}
|
||
|
|
||
|
/def -mregexp -PB -Fp2 -t'kompletnie nieskuteczn[aye](?: w parowaniu ciosow|).$$' _skutecznosc_bro1 = /_sub_inside (1/14)
|
||
|
/def -mregexp -PB -Fp2 -t'strasznie nieskuteczn[aye](?: w parowaniu ciosow|).$$' _skutecznosc_bro2 = /_sub_inside (2/14)
|
||
|
/def -mregexp -PB -Fp2 -t'bardzo nieskuteczn[aye](?: w parowaniu ciosow|).$$' _skutecznosc_bro3 = /_sub_inside (3/14)
|
||
|
/def -mregexp -PB -Fp2 -t'raczej nieskuteczn[aye](?: w parowaniu ciosow|).$$' _skutecznosc_bro4 = /_sub_inside (4/14)
|
||
|
/def -mregexp -PB -Fp2 -t'malo skuteczn[aye](?: w parowaniu ciosow|).$$' _skutecznosc_bro5 = /_sub_inside (5/14)
|
||
|
/def -mregexp -PB -Fp2 -t'niezbyt skuteczn[aye](?: w parowaniu ciosow|).$$' _skutecznosc_bro6 = /_sub_inside (6/14)
|
||
|
/def -mregexp -PB -Fp2 -t'raczej skuteczn[aye](?: w parowaniu ciosow|).$$' _skutecznosc_bro7 = /_sub_inside (7/14)
|
||
|
/def -mregexp -PB -Fp2 -t'dosyc skuteczn[aye](?: w parowaniu ciosow|).$$' _skutecznosc_bro8 = /_sub_inside (8/14)
|
||
|
/def -mregexp -PB -Fp2 -t'calkiem skuteczn[aye](?: w parowaniu ciosow|).$$' _skutecznosc_bro9 = /_sub_inside (9/14)
|
||
|
/def -mregexp -PB -Fp2 -t'bardzo skuteczn[aye](?: w parowaniu ciosow|).$$' _skutecznosc_bro10 = /_sub_inside (10/14)
|
||
|
/def -mregexp -PB -Fp2 -t'niezwykle skuteczn[aye](?: w parowaniu ciosow|).$$' _skutecznosc_bro11 = /_sub_inside (11/14)
|
||
|
/def -mregexp -PB -Fp2 -t'wyjatkowo skuteczn[aye](?: w parowaniu ciosow|).$$' _skutecznosc_bro12 = /_sub_inside (12/14)
|
||
|
/def -mregexp -PB -Fp2 -t'zabojczo skuteczn[aye](?: w parowaniu ciosow|).$$' _skutecznosc_bro13 = /_sub_inside (13/14)
|
||
|
/def -mregexp -PB -Fp2 -t'fantastycznie skuteczn[aye](?: w parowaniu ciosow|).$$' _skutecznosc_bro14 = /_sub_inside (14/14)
|
||
|
/def -mregexp -PB -Fp2 -t'wyjatkowo zle wywazon[aye]' _wywazenie_bro1 = /_sub_inside (1/14)
|
||
|
/def -mregexp -PB -Fp2 -t'bardzo zle wywazon[aye]' _wywazenie_bro2 = /_sub_inside (2/14)
|
||
|
/def -mregexp -PB -Fp2 -t'(?<!nie|bardzo )zle wywazon[aye]' _wywazenie_bro3 = /_sub_inside (3/14)
|
||
|
/def -mregexp -PB -Fp2 -t'bardzo kiepsko wywazon[aye]' _wywazenie_bro4 = /_sub_inside (4/14)
|
||
|
/def -mregexp -PB -Fp2 -t'(?<!bardzo) kiepsko wywazon[aye]' _wywazenie_bro5 = /_sub_inside (5/14)
|
||
|
/def -mregexp -PB -Fp2 -t'przyzwoicie wywazon[aye]' _wywazenie_bro6 = /_sub_inside (6/14)
|
||
|
/def -mregexp -PB -Fp2 -t'srednio wywazon[aye]' _wywazenie_bro7 = /_sub_inside (7/14)
|
||
|
/def -mregexp -PB -Fp2 -t'niezle wywazon[aye]' _wywazenie_bro8 = /_sub_inside (8/14)
|
||
|
/def -mregexp -PB -Fp2 -t'dosc dobrze wywazon[aye]' _wywazenie_bro9 = /_sub_inside (9/14)
|
||
|
/def -mregexp -PB -Fp2 -t'(?<!bardzo |dosc )dobrze wywazon[aye]' _wywazenie_bro10 = /_sub_inside (10/14)
|
||
|
/def -mregexp -PB -Fp2 -t'bardzo dobrze wywazon[aye]' _wywazenie_bro11 = /_sub_inside (11/14)
|
||
|
/def -mregexp -PB -Fp2 -t'doskonale wywazon[aye]' _wywazenie_bro12 = /_sub_inside (12/14)
|
||
|
/def -mregexp -PB -Fp2 -t'perfekcyjnie wywazon[aye]' _wywazenie_bro13 = /_sub_inside (13/14)
|
||
|
/def -mregexp -PB -Fp2 -t'genialnie wywazon[aye]' _wywazenie_bro14 = /_sub_inside (14/14)
|
||
|
/def -mregexp -PB -Fp2 -t'wyjatkowo zle przed(?: obrazeniami|)' _skutecznosc_zbro1 = /_sub_inside (1/12)
|
||
|
/def -mregexp -PB -Fp2 -t'bardzo zle przed(?: obrazeniami|)' _skutecznosc_zbro2 = /_sub_inside (2/12)
|
||
|
/def -mregexp -PB -Fp2 -t'(?<!nie)zle przed(?: obrazeniami|)' _skutecznosc_zbro3 = /_sub_inside (3/12)
|
||
|
/def -mregexp -PB -Fp2 -t'bardzo kiepsko przed(?: obrazeniami|)' _skutecznosc_zbro4 = /_sub_inside (4/12)
|
||
|
/def -mregexp -PB -Fp2 -t'(?<!bardzo )kiepsko przed(?: obrazeniami|)' _skutecznosc_zbro5 = /_sub_inside (5/12)
|
||
|
/def -mregexp -PB -Fp2 -t'przyzwoicie przed(?: obrazeniami|)' _skutecznosc_zbro6 = /_sub_inside (6/12)
|
||
|
/def -mregexp -PB -Fp2 -t'niezle przed(?: obrazeniami|)' _skutecznosc_zbro7 = /_sub_inside (7/12)
|
||
|
/def -mregexp -PB -Fp2 -t'dosc dobrze przed(?: obrazeniami|)' _skutecznosc_zbro8 = /_sub_inside (8/12)
|
||
|
/def -mregexp -PB -Fp2 -t'(?<!bardzo |dosc )dobrze przed(?: obrazeniami|)' _skutecznosc_zbro9 = /_sub_inside (9/12)
|
||
|
/def -mregexp -PB -Fp2 -t'bardzo dobrze przed(?: obrazeniami|)' _skutecznosc_zbro10 = /_sub_inside (10/12)
|
||
|
/def -mregexp -PB -Fp2 -t'doskonale przed(?: obrazeniami|)' _skutecznosc_zbro11 = /_sub_inside (11/12)
|
||
|
/def -mregexp -PB -Fp2 -t'perfekcyjnie przed(?: obrazeniami|)' _skutecznosc_zbro12 = /_sub_inside (12/12)
|
||
|
|
||
|
/def odpornosci_stany = \
|
||
|
/if ({1} =~ "minimalna") \
|
||
|
/return 1 %;\
|
||
|
/elseif ({1} =~"znikoma") \
|
||
|
/return 2 %;\
|
||
|
/elseif ({1} =~"niewielka") \
|
||
|
/return 3 %;\
|
||
|
/elseif ({1} =~"czesciowa") \
|
||
|
/return 4 %;\
|
||
|
/elseif ({1} =~"polowiczna") \
|
||
|
/return 5 %;\
|
||
|
/elseif ({1} =~"znaczna") \
|
||
|
/return 6 %;\
|
||
|
/elseif ({1} =~"duza") \
|
||
|
/return 7 %;\
|
||
|
/elseif ({1} =~"bardzo duza") \
|
||
|
/return 8 %;\
|
||
|
/elseif ({1} =~"prawie pelna") \
|
||
|
/return 9 %;\
|
||
|
/elseif ({1} =~"calkowita") \
|
||
|
/return 10 %;\
|
||
|
/elseif ({1} =~"brak") \
|
||
|
/return 0 %;\
|
||
|
/endif
|
||
|
|
||
|
/def odpornosci = \
|
||
|
/repeat -1 1 /purge __odpornosci_* %;\
|
||
|
/repeat -1 1 /unset __odpornosci_* %;\
|
||
|
/purge __odpornosci_* %;\
|
||
|
/unset __odpornosci_* %;\
|
||
|
/def -ag -Fp2 -mregexp -t'^$$' __odpornosci_gag_empty %;\
|
||
|
/def -ag -Fp2 -mregexp -t'^Obrazenia fizyczne:$$' __odpornosci_gag_fizyczne %;\
|
||
|
/def -ag -Fp2 -mregexp -t'^Obrazenia od zywiolow:$$' __odpornosci_gag_elemental %;\
|
||
|
/def -ag -Fp2 -mregexp -t'^Obrazenia magiczne:$$' __odpornosci_gag_magic %;\
|
||
|
/def -ag -Fp2 -mregexp -t'^Inne:$$' __odpornosci_gag_misc %;\
|
||
|
/def -ag -Fp2 -mregexp -t'^ +ciete - (.*)' __odpornosci_ciete = \
|
||
|
/set __odpornosci_ciete_string=%%{P1}%%;\
|
||
|
/set __odpornosci_ciete_value=$[odpornosci_stany(__odpornosci_ciete_string)] %;\
|
||
|
/def -ag -Fp2 -mregexp -t'^ +klute - (.*)' __odpornosci_klute = \
|
||
|
/set __odpornosci_klute_string=%%{P1}%%;\
|
||
|
/set __odpornosci_klute_value=$[odpornosci_stany(__odpornosci_klute_string)] %;\
|
||
|
/def -ag -Fp2 -mregexp -t'^ +obuchowe - (.*)' __odpornosci_obuchowe = \
|
||
|
/set __odpornosci_obuchowe_string=%%{P1}%%;\
|
||
|
/set __odpornosci_obuchowe_value=$[odpornosci_stany(__odpornosci_obuchowe_string)] %;\
|
||
|
/def -ag -Fp2 -mregexp -t'^ +bronie niemagiczne - (.*)' __odpornosci_bronieniemagiczne = \
|
||
|
/set __odpornosci_bronieniemagiczne_string=%%{P1}%%;\
|
||
|
/set __odpornosci_bronieniemagiczne_value=$[odpornosci_stany(__odpornosci_bronieniemagiczne_string)] %;\
|
||
|
/def -ag -Fp2 -mregexp -t'^ +ogien - (.*)' __odpornosci_ogien = \
|
||
|
/set __odpornosci_ogien_string=%%{P1}%%;\
|
||
|
/set __odpornosci_ogien_value=$[odpornosci_stany(__odpornosci_ogien_string)] %;\
|
||
|
/def -ag -Fp2 -mregexp -t'^ +powietrze - (.*)' __odpornosci_powietrze = \
|
||
|
/set __odpornosci_powietrze_string=%%{P1}%%;\
|
||
|
/set __odpornosci_powietrze_value=$[odpornosci_stany(__odpornosci_powietrze_string)] %;\
|
||
|
/def -ag -Fp2 -mregexp -t'^ +woda - (.*)' __odpornosci_woda = \
|
||
|
/set __odpornosci_woda_string=%%{P1}%%;\
|
||
|
/set __odpornosci_woda_value=$[odpornosci_stany(__odpornosci_woda_string)] %;\
|
||
|
/def -ag -Fp2 -mregexp -t'^ +ziemia - (.*)' __odpornosci_ziemia = \
|
||
|
/set __odpornosci_ziemia_string=%%{P1}%%;\
|
||
|
/set __odpornosci_ziemia_value=$[odpornosci_stany(__odpornosci_ziemia_string)] %;\
|
||
|
/def -ag -Fp2 -mregexp -t'^ +czysta magia - (.*)' __odpornosci_puremagic = \
|
||
|
/set __odpornosci_puremagic_string=%%{P1}%%;\
|
||
|
/set __odpornosci_puremagic_value=$[odpornosci_stany(__odpornosci_puremagic_string)] %;\
|
||
|
/def -ag -Fp2 -mregexp -t'^ +magia umyslu - (.*)' __odpornosci_mindmagic = \
|
||
|
/set __odpornosci_mindmagic_string=%%{P1}%%;\
|
||
|
/set __odpornosci_mindmagic_value=$[odpornosci_stany(__odpornosci_mindmagic_string)] %;\
|
||
|
/def -ag -Fp2 -mregexp -t'^ +magia zycia - (.*)' __odpornosci_lifemagic = \
|
||
|
/set __odpornosci_lifemagic_string=%%{P1}%%;\
|
||
|
/set __odpornosci_lifemagic_value=$[odpornosci_stany(__odpornosci_lifemagic_string)] %;\
|
||
|
/def -ag -Fp2 -mregexp -t'^ +magia smierci - (.*)' __odpornosci_deathmagic = \
|
||
|
/set __odpornosci_deathmagic_string=%%{P1}%%;\
|
||
|
/set __odpornosci_deathmagic_value=$[odpornosci_stany(__odpornosci_deathmagic_string)] %;\
|
||
|
/def -ag -Fp2 -mregexp -t'^ +elektrycznosc - (.*)' __odpornosci_elektrycznosc = \
|
||
|
/set __odpornosci_elektrycznosc_string=%%{P1}%%;\
|
||
|
/set __odpornosci_elektrycznosc_value=$[odpornosci_stany(__odpornosci_elektrycznosc_string)] %;\
|
||
|
/def -ag -Fp2 -mregexp -t'^ +kwas - (.*)' __odpornosci_kwas = \
|
||
|
/set __odpornosci_kwas_string=%%{P1}%%;\
|
||
|
/set __odpornosci_kwas_value=$[odpornosci_stany(__odpornosci_kwas_string)] %;\
|
||
|
/def -ag -Fp2 -mregexp -t'^ +spaczen - (.*)' __odpornosci_spaczen = \
|
||
|
/set __odpornosci_spaczen_string=%%{P1}%%;\
|
||
|
/set __odpornosci_spaczen_value=$[odpornosci_stany(__odpornosci_spaczen_string)] %;\
|
||
|
/def -ag -Fp2 -mregexp -t'^ +trucizna - (.*)' __odpornosci_trucizna = \
|
||
|
/set __odpornosci_trucizna_string=%%{P1}%%;\
|
||
|
/set __odpornosci_trucizna_value=$[odpornosci_stany(__odpornosci_trucizna_string)] %;\
|
||
|
/def -ag -Fp2 -mregexp -t'^ +zimno - (.*)' __odpornosci_zimno = \
|
||
|
/set __odpornosci_zimno_string=%%{P1}%%;\
|
||
|
/set __odpornosci_zimno_value=$[odpornosci_stany(__odpornosci_zimno_string)] %;\
|
||
|
/send odpornosci %;\
|
||
|
/echo -p +--------------------------------+--------------------------------+---------------------------------+----------------------------------+@{n}%;\
|
||
|
/echo -p | Fizyczne | Zywioly | Magia | Inne |%;\
|
||
|
/echo -p +--------------------------------+--------------------------------+---------------------------------+----------------------------------+@{n}%;\
|
||
|
/echo -p | | | | |@{n}%;\
|
||
|
/let linia=$[strcat("| ","Ciete ",pad(__odpornosci_ciete_string,16)," [",pad(__odpornosci_ciete_value,2),"/10] | Ogien ",pad(__odpornosci_ogien_string,16)," [",pad(__odpornosci_ogien_value,2),"/10] | Czysta ",pad(__odpornosci_puremagic_string,16)," [",pad(__odpornosci_puremagic_value,2),"/10] | Elektrycznosc ",pad(__odpornosci_elektrycznosc_string,10)," [",pad(__odpornosci_elektrycznosc_value,2),"/10] |")] %;\
|
||
|
/echo -p %{linia} %;\
|
||
|
/let linia=$[strcat("| ","Klute ",pad(__odpornosci_klute_string,16)," [",pad(__odpornosci_klute_value,2),"/10] | Powietrze ",pad(__odpornosci_powietrze_string,12)," [",pad(__odpornosci_powietrze_value,2),"/10] | Umyslu ",pad(__odpornosci_mindmagic_string,16)," [",pad(__odpornosci_mindmagic_value,2),"/10] | Kwas ",pad(__odpornosci_kwas_string,19)," [",pad(__odpornosci_kwas_value,2),"/10] |")] %;\
|
||
|
/echo -p %{linia} %;\
|
||
|
/let linia=$[strcat("| ","Obuchy ",pad(__odpornosci_obuchowe_string,15)," [",pad(__odpornosci_obuchowe_value,2),"/10] | Woda ",pad(__odpornosci_woda_string,17)," [",pad(__odpornosci_woda_value,2),"/10] | Zycia ",pad(__odpornosci_lifemagic_string,17)," [",pad(__odpornosci_lifemagic_value,2),"/10] | Spaczen ",pad(__odpornosci_spaczen_string,16)," [",pad(__odpornosci_spaczen_value,2),"/10] |")] %;\
|
||
|
/echo -p %{linia} %;\
|
||
|
/let linia=$[strcat("| ","Niemagiczne ",pad(__odpornosci_bronieniemagiczne_string,10)," [",pad(__odpornosci_bronieniemagiczne_value,2),"/10] | Ziemia ",pad(__odpornosci_ziemia_string,15)," [",pad(__odpornosci_ziemia_value,2),"/10] | Smierci ",pad(__odpornosci_deathmagic_string,15)," [",pad(__odpornosci_deathmagic_value,2),"/10] | Trucizna ",pad(__odpornosci_trucizna_string,15)," [",pad(__odpornosci_trucizna_value,2),"/10] |")] %;\
|
||
|
/echo -p %{linia} %;\
|
||
|
/let linia=$[strcat("| | | | Zimno ",pad(__odpornosci_zimno_string,18)," [",pad(__odpornosci_zimno_value,2),"/10] |")] %;\
|
||
|
/echo -p %{linia} %;\
|
||
|
/echo -p +--------------------------------+--------------------------------+---------------------------------+----------------------------------+@{n}
|
||
|
|
||
|
/def -mregexp -Fp2 -t' ledwo muska ' ldwmsk = \
|
||
|
/set klew=%PL %;\
|
||
|
/set kpra=%PR %;\
|
||
|
/if (regmatch("Nagle", {klew})) \
|
||
|
/else \
|
||
|
/set ktobijelewa=$[replace(" ", "_", {klew})] %;\
|
||
|
/eval /set %{ktobijelewa}_kto_bije=%{klew} %;\
|
||
|
/eval /set %{ktobijelewa}_kogo_bije=$[strcat(substr({kpra}, 0, strstr({kpra}, " ")))] %;\
|
||
|
/endif
|
||
|
|
||
|
/def -mregexp -Fp2 -t' lekko rani ' lkrn = \
|
||
|
/set klew=%PL %;\
|
||
|
/set kpra=%PR %;\
|
||
|
/if (regmatch("Nagle", {klew})) \
|
||
|
/else \
|
||
|
/set ktobijelewa=$[replace(" ", "_", {klew})] %;\
|
||
|
/eval /set %{ktobijelewa}_kto_bije=%{klew} %;\
|
||
|
/eval /set %{ktobijelewa}_kogo_bije=$[strcat(substr({kpra}, 0, strstr({kpra}, " ")))] %;\
|
||
|
/endif
|
||
|
|
||
|
/def -mregexp -Fp2 -t'(?<!lekko|powaznie|bardzo ciezko) rani ' rni = \
|
||
|
/set klew=%PL %;\
|
||
|
/set kpra=%PR %;\
|
||
|
/if (regmatch("Nagle", {klew})) \
|
||
|
/else \
|
||
|
/set ktobijelewa=$[replace(" ", "_", {klew})] %;\
|
||
|
/eval /set %{ktobijelewa}_kto_bije=%{klew} %;\
|
||
|
/eval /set %{ktobijelewa}_kogo_bije=$[strcat(substr({kpra}, 0, strstr({kpra}, " ")))] %;\
|
||
|
/endif
|
||
|
|
||
|
/def -mregexp -Fp2 -t'( powaznie rani | bardzo ciezko rani | masakruje )' reszta = \
|
||
|
/set klew=%PL %;\
|
||
|
/set kpra=%PR %;\
|
||
|
/if (regmatch("Nagle", {klew})) \
|
||
|
/else \
|
||
|
/set ktobijelewa=$[replace(" ", "_", {klew})] %;\
|
||
|
/eval /set %{ktobijelewa}_kto_bije=%{klew} %;\
|
||
|
/eval /set %{ktobijelewa}_kogo_bije=$[strcat(substr({kpra}, 0, strstr({kpra}, " ")))] %;\
|
||
|
/endif
|
||
|
|
||
|
/def -mregexp -Fp2 -t'Nagle (.*) wykonuje zamaszysty cios .+ celujac w (.*), lecz .+ zbija go .+' zbitka_czyms = \
|
||
|
/set ktobijelewa=$[toupper({P1},1)] %;\
|
||
|
/set ktobijelewa=$[replace(" ", "_", {ktobijelewa})] %;\
|
||
|
/eval /set %{ktobijelewa}_kto_bije=$[toupper({P1},1)] %;\
|
||
|
/if (strlen({P2}) > 15) \
|
||
|
/eval /set %{ktobijelewa}_kogo_bije=$[strcat(substr({P2}, 0, strstr({P2}, " ")))] %;\
|
||
|
/else \
|
||
|
/eval /set %{ktobijelewa}_kogo_bije=%P2%;\
|
||
|
/endif
|
||
|
|
||
|
/def -mregexp -Fp2 -t'Nagle (.*) wykonuje zamaszysty cios .+ celujac w (.*), lecz .+ udaje sie go uniknac.' unik_czyjs = \
|
||
|
/set ktobijelewa=$[toupper({P1},1)] %;\
|
||
|
/set ktobijelewa=$[replace(" ", "_", {ktobijelewa})] %;\
|
||
|
/eval /set %{ktobijelewa}_kto_bije=$[toupper({P1},1)] %;\
|
||
|
/if (strlen({P2}) > 15) \
|
||
|
/eval /set %{ktobijelewa}_kogo_bije=$[strcat(substr({P2}, 0, strstr({P2}, " ")))] %;\
|
||
|
/else \
|
||
|
/eval /set %{ktobijelewa}_kogo_bije=%P2%;\
|
||
|
/endif
|
||
|
|
||
|
/def -mregexp -Fp2 -t'Nagle (.*) wykonuje zamaszysty cios .+ celujac w (.*), lecz uderzenie zatrzymuje sie na je.+.' zbroja_czyjas = \
|
||
|
/set ktobijelewa=$[toupper({P1},1)] %;\
|
||
|
/set ktobijelewa=$[replace(" ", "_", {ktobijelewa})] %;\
|
||
|
/eval /set %{ktobijelewa}_kto_bije=$[toupper({P1},1)] %;\
|
||
|
/if (strlen({P2}) > 15) \
|
||
|
/eval /set %{ktobijelewa}_kogo_bije=$[strcat(substr({P2}, 0, strstr({P2}, " ")))] %;\
|
||
|
/else \
|
||
|
/eval /set %{ktobijelewa}_kogo_bije=%P2%;\
|
||
|
/endif
|