Initial commit.
This commit is contained in:
commit
a05f1331d6
51 changed files with 6224 additions and 0 deletions
76
common/testuj.tf
Normal file
76
common/testuj.tf
Normal file
|
@ -0,0 +1,76 @@
|
|||
; by Ingwar
|
||||
|
||||
/def szukaj = /testuj
|
||||
/def testuj = \
|
||||
spoliczkuj kogo? %;\
|
||||
/def -p306 -1 -i -agLG -t'Spoliczkuj kogo?' _testuj_poczatek = \
|
||||
/let _testuj_komendy=\
|
||||
wykop|kop|trenuj|kup|przejrzyj|zamow|wejdz|przejdz|wespnij|zlap|\
|
||||
chwyc|zejdz|zsun|dotknij|urwij|wyskocz|zlam|zniszcz|rozwal|uderz|\
|
||||
pomodl|modl|rozsun|wsun|dosun|posun|odsun|nasun|wysun|zasun|\
|
||||
przesun|usun|rozciagnij|wciagnij|dociagnij|pociagnij|odciagnij|\
|
||||
naciagnij|wyciagnij|zaciagnij|uciagnij|wcisnij|docisnij|pocisnij|\
|
||||
odcisnij|wycisnij|zacisnij|przecisnij|ucisnij|rozlacz|wlacz|\
|
||||
polacz|odlacz|wylacz|zalacz|przelacz|rozerwij|porwij|oderwij|narwij|\
|
||||
wyrwyj|przerwij|podwaz|wywaz|przewaz|roznies|wnies|donies|\
|
||||
ponies|odnies|nanies|wynies|zanies|przenies|unies|wplyn|doplyn|\
|
||||
poplyn|wyplyn|zanurkuj|nurkuj|przeplyn|umiesc|nadaj|wypowiedz|\
|
||||
zapukaj|zadzwon|rozpal|podpal|rzuc|podrzuc|podsadz|rozbij|przebij|\
|
||||
zmien|zamien|przemien|pokaz|podloz|podeprzyj|przeczolgaj|czolgaj|\
|
||||
wdrap|wyjdz|zastukaj|przepraw|przelej|wyrwij|wyjrzyj|wczolgaj|\
|
||||
wygladnij|podciagnij|wygnij|nalej|odlej|wyrzuc|podnies|zloz|\
|
||||
zasyp|nasyp|przesyp|podlej|opowiedz|sprawdz|popraw|zwroc|\
|
||||
nacisnij|zajrzyj|siadz|usiadz|popchnij|pchnij|wplyn|\
|
||||
wslizgnij|wskocz|zeskocz|wkrec|wykrec|odkrec|zakrec|przekrec|\
|
||||
odbierz|wydlub|poswiec|ukorz|oddaj|kleknij|ukleknij|poddaj|\
|
||||
odetnij|odwiaz|odetkaj|wykap|zdeponuj|przeskocz|postaw|zdepcz|zadepcz|\
|
||||
rozdepcz|przetrzyj|wyczysc|oczysc|powachaj|wachaj|sproboj|pobierz|\
|
||||
wygrzeb|odgrzeb|zerwij|zaczep|odczep|przyczep|przypnij|przyloz|przystaw|\
|
||||
odchyl|przezuj|sproszkuj|spal|wypal|przywiaz|zawiaz|rozgryz|pozbieraj|\
|
||||
zbieraj|doloz|zabierz|zalej|zagrzeb|rozbroj|przekop|popusc|obroc|\
|
||||
wydoj|sciagnij|zatknij|rozegraj|graj|przymij|zarzuc|\
|
||||
zdenominuj|wypozycz|pozycz|napraw|wybierz|wydrap|naloz|odpocznij|\
|
||||
potargaj|utul|zanuc|pobij|mietos|spij|przytrocz|dmuchnij|odczytaj|\
|
||||
wyryj|naostrz|zlomuj|wrzuc|odrzuc|ogrzej|wstan|powstan|kucnij|ukucnij|\
|
||||
wytnij|rozpostrzyj|zepnij|rozepnij|przylacz|odlacz|przeslizgnij|\
|
||||
zadeklaruj|zaplac|\
|
||||
%%;\
|
||||
/while /let i=$$[strstr({_testuj_komendy},"|")] %%; /@test i > 0 %%; /do \
|
||||
/send $$[strcat(substr({_testuj_komendy},0,i), " Grrrrr..")] %%;\
|
||||
/let _i_=$$[{_i_}+1] %%;\
|
||||
/set _testuj_komendy2=$$[strcat({_testuj_komendy2},pad({_i_},-3),substr({_testuj_komendy},0,i+1))] %%;\
|
||||
/let _testuj_komendy=$$[substr({_testuj_komendy},i+1)] %%;\
|
||||
/done %%;\
|
||||
/set _testuj_ilosc=0 %%;\
|
||||
spoliczkuj kogo? %%;\
|
||||
/def -agLG -p301 -i -mregexp -t'^(> )*Slucham\\\\\\\\?$$$$' _testuj_gag1 = \
|
||||
/set _testuj_ilosc=$$$[{_testuj_ilosc}+1] %%%;\
|
||||
/set _testuj_cos=1 %%;\
|
||||
/def -agLG -p301 -i -mregexp -t'^(> )*Ze co\\\\\\\\?$$$$' _testuj_gag2 = \
|
||||
/set _testuj_ilosc=$$$[{_testuj_ilosc}+1] %%%;\
|
||||
/set _testuj_cos=1 %%;\
|
||||
/def -agLG -p301 -i -mregexp -t'^(> )*Pociagnij .nosem. .jak.\\\\\\\\?$$$$' _testuj_gag3 = \
|
||||
/set _testuj_ilosc=$$$[{_testuj_ilosc}+1] %%%;\
|
||||
/set _testuj_cos=1 %%;\
|
||||
/def -p205 -i -mregexp -h'PROMPT ^> ' _testuj_gag4 = \
|
||||
/set _testuj_cos=1 %%;\
|
||||
/def -p300 -i -mregexp -t'^> ' _testuj_gag5 = \
|
||||
/set _testuj_cos=1 %%%;\
|
||||
/_testuj_gag_hit %%;\
|
||||
/def -p200 -i -t'*' _testuj_gag_hit = \
|
||||
/if ({_testuj_cos}==1) \
|
||||
/set _testuj_ilosc=$$$[{_testuj_ilosc}+1] %%%;\
|
||||
/set _testuj_ilosc2=$$$[{_testuj_ilosc2}+1] %%%;\
|
||||
/set _testuj_cos=0 %%%;\
|
||||
/let num=$$$[strstr({_testuj_komendy2},{_testuj_ilosc})+3] %%%;\
|
||||
/let num2=$$$[strstr(substr({_testuj_komendy2},{num}),"|")] %%%;\
|
||||
/let _testuj_kom=$$$[substr({_testuj_komendy2},{num},{num2})] %%%;\
|
||||
/echo -p Komenda: @{BC%kolor_info}%%%{_testuj_kom}@{n} %%%;\
|
||||
/endif %%;\
|
||||
/def -p305 -agLG -i -t'*Spoliczkuj kogo?' _testuj_koniec = \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Udanych: @{BC%kolor_info}%%%{_testuj_ilosc2-}@{n}/%%%{_testuj_ilosc}@{n} %%%;\
|
||||
/purge -i _testuj_* %%%;\
|
||||
/unset _testuj_ilosc %%%;\
|
||||
/unset _testuj_ilosc2 %%%;\
|
||||
/unset _testuj_cos %%%;\
|
||||
/unset _testuj_komendy2
|
Loading…
Add table
Add a link
Reference in a new issue