/def lw5=\ /set lw1=$[substr(lw,0,strchr(lw,'., '))] %;\ /set lw=$[substr(lw,strchr(lw,'., ')+1,strlen(lw)-strchr(lw,'., ')-1) ]%;\ /if (lw1=/"zachod") /set _lw0=w,%; /test ++lwcount %;\ /elseif (lw1=/"polnocny-zachod") /set _lw1=nw,%; /test ++lwcount %;\ /elseif (lw1=/"polnoc") /set _lw2=n,%; /test ++lwcount %;\ /elseif (lw1=/"polnocny-wschod") /set _lw3=ne,%; /test ++lwcount %;\ /elseif (lw1=/"wschod") /set _lw4=e,%; /test ++lwcount %;\ /elseif (lw1=/"poludniowy-wschod") /set _lw5=se,%; /test ++lwcount %;\ /elseif (lw1=/"poludnie") /set _lw6=s,%; /test ++lwcount %;\ /elseif (lw1=/"poludniowy-zachod") /set _lw7=sw,%; /test ++lwcount %;\ /elseif (lw1=/"gora") /set _lw8=u,%; /test ++lwcount %;\ /elseif (lw1=/"dol") /set _lw9=d,%; /test ++lwcount %;\ /elseif (lw1=/"wyjscie") /set _lw10=wyjscie,%; /test ++lwcount%; /unnormalset wyjscie %;\ /elseif (lw1=/"drzwiczki") /set _lw11=drzwiczki,%; /test ++lwcount%; /unnormalset drzwiczki %;\ /elseif (lw1=/"drzwi") /set _lw12=drzwi,%; /test ++lwcount%; /unnormalset drzwi %;\ /elseif (lw1=/"most") /set _lw13=most,%; /test ++lwcount%; /unnormalset most %;\ /elseif (lw1=/"schody") /set _lw14=schody,%; /test ++lwcount%; /unnormalset schody %;\ /elseif (lw1=/"furta") /set _lw15=furta,%; /test ++lwcount%; /unnormalset furta %;\ /elseif (lw1=/"ulica") /set _lw16=ulica,%; /test ++lwcount%; /unnormalset ulica %;\ /elseif (lw1=/"sklep") /set _lw17=sklep,%; /test ++lwcount%; /unnormalset sklep %;\ /elseif (lw1=/"prom") /set _lw18=prom,%; /test ++lwcount%; /unnormalset prom %;\ /elseif (lw1=/"kaplica") /set _lw19=kaplica,%; /test ++lwcount%; /unnormalset kaplica %;\ /elseif (lw1=/"karczma") /set _lw20=karczma,%; /test ++lwcount%; /unnormalset karczma %;\ /elseif (lw1=/"schodki") /set _lw21=schodki,%; /test ++lwcount%; /unnormalset schodki %;\ /elseif (lw1=/"mlyn") /set _lw22=mlyn,%; /test ++lwcount%; /unnormalset mlyn %;\ /elseif (lw1=/"piekarnia") /set _lw23=piekarnia,%; /test ++lwcount%; /unnormalset piekarnia %;\ /elseif (lw1=/"trakt") /set _lw24=trakt,%; /test ++lwcount%; /unnormalset trakt %;\ /elseif (lw1=/"jaskinia") /set _lw25=jaskinia,%; /test ++lwcount%; /unnormalset jaskinia %;\ /elseif (lw1=/"szopa") /set _lw26=szopa,%; /test ++lwcount%; /unnormalset szopa %;\ /elseif (lw1=/"barak") /set _lw27=barak,%; /test ++lwcount%; /unnormalset barak %;\ /elseif (lw1=/"wrota") /set _lw28=wrota,%; /test ++lwcount%; /unnormalset wrota %;\ /elseif (lw1=/"brama") /set _lw29=brama,%; /test ++lwcount%; /unnormalset brama %;\ /elseif (lw1=/"wejscie") /set _lw30=wejscie,%; /test ++lwcount%; /unnormalset wejscie %;\ /elseif (lw1=/"ganek") /set _lw31=ganek,%; /test ++lwcount%; /unnormalset ganek %;\ /elseif (lw1=/"chata") /set _lw32=chata,%; /test ++lwcount%; /unnormalset chata %;\ /endif /def -mregexp -Fp2 -t'Jest tutaj (.*) widoczne wyjscie: (.*)\\.$' olw0 = /set lw %P2 %; /lw4 /def -mregexp -Fp2 -t'Jest tutaj (.*) widocznych wyjsc: (.*)\\.$' olw1 = /set lw %P2 %; /lw4 /def -mregexp -Fp2 -t'Sa tutaj (.*) widoczne wyjscia: (.*)\\.$' olw2 = /set lw %P2 %; /lw4 /def -mregexp -Fp2 -t'Trakt wiedzie na (.*)\\.$' olw3 = /set lw %P1 %; /lw4 /def -mregexp -Fp2 -t'Trakt rozgalezia sie na (.*)\\.$' olwr4 = /set lw %P1 %; /lw4 /def -mregexp -Fp2 -t'W gestych ciemnosciach dostrzegasz .* wiodac.* na (.*)\\.$' olw5 = /set lw %P1 %; /lw4 /def -mregexp -Fp2 -t'W gestych ciemnosciach dostrzegasz, ze trakt rozgalezia sie na (.*)\\.$' olw6 = /set lw %P1 %; /lw4 /def -mregexp -Fp2 -t'Sciezka prowadzi tutaj w (.*) kierunkach: (.*)\\.$' olw7 = /set lw %P2 %; /lw4 /def -mregexp -Fp2 -t'Sciezka prowadzi tutaj w (.*) kierunku: (.*)\\.$' olw8 = /set lw %P2 %; /lw4 /def -mregexp -Fp2 -t'W mroku nocy dostrzegasz (.*) widoczn.* wyjsc.*: (.*)\\.$' olw9 = /set lw %P2 %; /lw4 /def -mregexp -Fp2 -t'Wyjscia prowadza tutaj w (.*) kierunkach: (.*)\\.$' olw10 = /set lw %P2 %; /lw4 /def -mregexp -Fp2 -t'Dostrzegasz tu jedno wyjscie: (.*)\\.$' olw11 = /set lw %P1 %; /lw4 /def -mregexp -Fp2 -t'Wydeptane w kukurydzy sciezki prowadza na (.*)\\.$' olw12 = /set lw %P1 %; /lw4 /def -mregexp -Fp2 -t'Szlak prowadzi tutaj w (.*) kierunkach: (.*)\\.$' olw13 = /set lw %P2 %; /lw4 /def -mregexp -Fp2 -t'Tunel.* ciagn.* sie na (.*)\\.$' olw14 = /set lw %P1 %; /lw4 /def -mregexp -Fp2 -t'Ledwo widoczn.* sciezk.* poprzez zatopiony w ciemnosciach gaj na (.*)\\.%' olw15 = /set lw %P1 %; /lw4 /def -mregexp -Fp2 -t'Sciezk.* (wiedzie|rozgalezia sie) na (.*)\\.%' olw16 = /set lw %P2 %; /lw4 /def -mregexp -p2 -t'(Wszyscy na poklad!|przybija wielki trojmasztowy galeon.|przybija do brzegu)' ship_on = \ /tbind wns /def -mregexp -p2 -t'(Doplynelismy.*(Mozna|w calej swej)|Marynarze sprawnie cumuja)' ship_off = \ /tbind zsiadz ze statku /def -mregexp -p2 -t'.*dylizans powoli zatrzymuje sie' dyl_on = \ /tbind wdyl /def -mregexp -p2 -t'Powoli pojazd zaczyna tracic predkosc' dyl_of = \ /tbind wyjscie /def -mregexp -p2 -t'i wsiada do .* dylizansu' dyl0_2 = \ /tbind wdyl /def -mregexp -p2 -t'Stalowa klatka nadjezdza' winda0 = /beep 1 /def -mregexp -p2 -t'Otworzyly sie drzwi klatki' winda1 = /beep 1 /def -mregexp -Fp2 -t'Wykonuje komende \'idz' _autowalk_on = \ /set autowalk=on /def -mregexp -Fp2 -t'Wykonywanie komendy \'idz\' zostaje przerwane.' _autowalk_off = \ /set autowalk=off /def -E(autowalk=~"on") -mregexp -Fp2 -t'(Zamkniet|Otwart).*(?