From 4613e89b3dee00f141c78cb250d6c4de5ac3ed67 Mon Sep 17 00:00:00 2001 From: Bartek Stalewski Date: Tue, 1 Oct 2013 22:03:41 +0200 Subject: [PATCH] Support for mapper in movement.tf. --- common/movement.tf | 330 ++++++++++++++++++++++++++------------------- 1 file changed, 190 insertions(+), 140 deletions(-) diff --git a/common/movement.tf b/common/movement.tf index dffa0fd..a4f736b 100644 --- a/common/movement.tf +++ b/common/movement.tf @@ -1,137 +1,168 @@ /def _walk_binds = \ - /def key_nkp/ = /sneak off %;\ - /def key_nkp* = /sneak ON %;\ - /def key_nkp- = /sneak TEAM %;\ - /if ( {ktype} =~ "mac" ) \ - /def key_f13 = /sneak off %;\ - /def key_f14 = /sneak ON %;\ - /def key_f15 = /sneak TEAM %;\ - /endif + /def key_nkp/ = /sneak off %;\ + /def key_nkp* = /sneak ON %;\ + /def key_nkp- = /sneak TEAM %;\ + /if ( {ktype} =~ "mac" ) \ + /def key_f13 = /sneak off %;\ + /def key_f14 = /sneak ON %;\ + /def key_f15 = /sneak TEAM %;\ + /endif /_walk_binds /def wns = \ - /if ( {hide} =~ "on" )\ - /send ujawnij sie %;\ - /endif%;\ - /if ( {pack} =~ "on" )\ - /zp monety %;\ - /endif%;\ - /send kup bilet%;\ - /send wejdz na statek%;\ - /if ( {pack} =~ "on" )\ - /dp monety %;\ - /endif + /if ( {hide} =~ "on" )\ + /send ujawnij sie %;\ + /endif%;\ + /if ( {pack} =~ "on" )\ + /zp monety %;\ + /endif%;\ + /send kup bilet%;\ + /send wejdz na statek%;\ + /if ( {pack} =~ "on" )\ + /dp monety %;\ + /endif /alias wns /wns /def wdyl = \ - /if ( {hide} =~ "on" )\ - /send ujawnij sie %;\ - /endif%;\ - /if ( {pack} =~ "on" )\ - /zp monety %;\ - /endif%;\ - /send wsiadz do dylizansu %;\ - /if ( {pack} =~ "on" )\ - /dp monety %;\ - /endif + /if ( {hide} =~ "on" )\ + /send ujawnij sie %;\ + /endif%;\ + /if ( {pack} =~ "on" )\ + /zp monety %;\ + /endif%;\ + /send wsiadz do dylizansu %;\ + /if ( {pack} =~ "on" )\ + /dp monety %;\ + /endif /alias wdyl /wdyl /def skroc_kierunek =\ - /eval /set v=%dlugi_kierunek%;\ - /set v=$[replace("polnocny-","n",v)]%;\ - /set v=$[replace("poludniowy-","s",v)]%;\ - /set v=$[replace("polnoc","n",v)]%;\ - /set v=$[replace("poludnie","s",v)]%;\ - /set v=$[replace("wschod","e",v)]%;\ - /set v=$[replace("zachod","w",v)]%;\ - /set v=$[replace("gore","u",v)]%;\ - /set v=$[replace("gora","u",v)]%;\ - /set v=$[replace("dol","d",v)]%;\ - /eval /set krotki_kierunek=%{v}%;\ - /set lwgo=0 + /eval /set v=%dlugi_kierunek%;\ + /set v=$[replace("polnocny-","n",v)]%;\ + /set v=$[replace("poludniowy-","s",v)]%;\ + /set v=$[replace("polnoc","n",v)]%;\ + /set v=$[replace("poludnie","s",v)]%;\ + /set v=$[replace("wschod","e",v)]%;\ + /set v=$[replace("zachod","w",v)]%;\ + /set v=$[replace("gore","u",v)]%;\ + /set v=$[replace("gora","u",v)]%;\ + /set v=$[replace("dol","d",v)]%;\ + /eval /set krotki_kierunek=%{v}%;\ + /set lwgo=0 /def -i statusvar2 /def -i statusvar3 /def -i status /def idz = \ - /set lwgo=1 %;\ - /set lwlast=%{1} %;\ - /if ( {sneak} =~ "off" )\ - /send -h %{1} %;\ - /hide off %;\ - /elseif ( {sneak} =~ "ON" )\ - /send -h przemknij %{1} %;\ - /hide ON %;\ - /elseif ( {sneak} =~ "TEAM" )\ - /send -h przemknij z druzyna %{1} %;\ - /hide ON %;\ - /endif %;\ - /def key_nkp5 + /set lwgo=1 %;\ + /set lwlast=%{1} %;\ + /if ( {sneak} =~ "off" )\ + /send -h %{1} %;\ + /hide off %;\ + /elseif ( {sneak} =~ "ON" )\ + /send -h przemknij %{1} %;\ + /hide ON %;\ + /elseif ( {sneak} =~ "TEAM" )\ + /send -h przemknij z druzyna %{1} %;\ + /hide ON %;\ + /endif %;\ + /def key_nkp5 + +/def idzk = \ + /set lwgo=1 %;\ + /set lwlast=%{1} %;\ + /if ( {sneak} =~ "off" )\ + /send %{1} %;\ + /hide off %;\ + /elseif ( {sneak} =~ "ON" )\ + /send przemknij %{1} %;\ + /hide ON %;\ + /elseif ( {sneak} =~ "TEAM" )\ + /send przemknij z druzyna %{1} %;\ + /hide ON %;\ + /endif %;\ + /_map_go navigate:%{1}%;\ + /def key_nkp5 + +/def idzkp = \ + /set lwgo=1 %;\ + /set lwlast=%{1} %;\ + /send przemknij %{1} %;\ + /hide ON %;\ + /_map_go navigate:%{1}%;\ + /def key_nkp5 + +/def idzkpt = \ + /set lwgo=1 %;\ + /set lwlast=%{1} %;\ + /send przemknij sie z druzyna %{1} %;\ + /hide ON %;\ + /_map_go navigate:%{1}%;\ + /def key_nkp5 /def lw4=\ - /for a 0 12 /eval /unset _lw%%a %;\ - /set lwcount=0%;\ - /set lw=%lw,%;\ - /set lw2=%;\ - /while (lw!~"") /lw5%; /done%;\ - /set lw2=$[strcat(_lw0,_lw1,_lw2,_lw3,_lw4,_lw5,_lw6,_lw7,_lw8,_lw9,_lw10,_lw11,_lw12)]%;\ - /set exits=$[substr(lw2,0,strlen(lw2)-1)]%;\ - /status%;\ - /checkgo + /for a 0 12 /eval /unset _lw%%a %;\ + /set lwcount=0%;\ + /set lw=%lw,%;\ + /set lw2=%;\ + /while (lw!~"") /lw5%; /done%;\ + /set lw2=$[strcat(_lw0,_lw1,_lw2,_lw3,_lw4,_lw5,_lw6,_lw7,_lw8,_lw9,_lw10,_lw11,_lw12)]%;\ + /set exits=$[substr(lw2,0,strlen(lw2)-1)]%;\ + /status%;\ + /checkgo /def -mregexp -Fp2 -t'(Ruszasz .* na (.*)|podazasz .*za .* na (.*))\\.' ide_za_kims = \ - /if ({P2} =~ "polnoc" ) /set lwlast=n%;\ - /elseif ({P2} =~ "poludnie" ) /set lwlast=s%;\ - /elseif ({P2} =~ "zachod" ) /set lwlast=w%;\ - /elseif ({P2} =~ "wschod" ) /set lwlast=e%;\ - /elseif ({P2} =~ "polnocny-zachod" ) /set lwlast=nw%;\ - /elseif ({P2} =~ "polnocny-wschod" ) /set lwlast=ne%;\ - /elseif ({P2} =~ "poludniowy-zachod" ) /set lwlast=sw%;\ - /elseif ({P2} =~ "poludniowy-wschod" ) /set lwlast=se%;\ - /elseif ({P2} =~ "gore" ) /set lwlast=u%;\ - /elseif ({P2} =~ "dol" ) /set lwlast=d%;\ - /else /set lwlast=X%;\ - /endif + /if ({P2} =~ "polnoc" ) /set lwlast=n%;\ + /elseif ({P2} =~ "poludnie" ) /set lwlast=s%;\ + /elseif ({P2} =~ "zachod" ) /set lwlast=w%;\ + /elseif ({P2} =~ "wschod" ) /set lwlast=e%;\ + /elseif ({P2} =~ "polnocny-zachod" ) /set lwlast=nw%;\ + /elseif ({P2} =~ "polnocny-wschod" ) /set lwlast=ne%;\ + /elseif ({P2} =~ "poludniowy-zachod" ) /set lwlast=sw%;\ + /elseif ({P2} =~ "poludniowy-wschod" ) /set lwlast=se%;\ + /elseif ({P2} =~ "gore" ) /set lwlast=u%;\ + /elseif ({P2} =~ "dol" ) /set lwlast=d%;\ + /else /set lwlast=X%;\ + /endif /def unnormalset = \ - /alias ww /dounnormal %{*} %%; /set lwlast=dziwne %;\ - /echo -p #@{C%c_info}#@{n}# Dziwne wyjscie - @{C%c_info}%{*}@{n}. %;\ - -/def dounnormal = \ - /if ( {sneak} =~ "ON" ) \ - /send -h przemknij %{*} %;\ - /elseif ( {sneak} =~ "TEAM" ) \ - /send -h przemknij z druzyna %{*} %;\ - /else \ - /send -h %{*} %;\ - /endif + /alias ww /dounnormal %{*} %%; /set lwlast=dziwne %;\ + /echo -p #@{C%c_info}#@{n}# Dziwne wyjscie - @{C%c_info}%{*}@{n}. %;\ + /def dounnormal = \ + /if ( {sneak} =~ "ON" ) \ + /send -h przemknij %{*} %;\ + /elseif ( {sneak} =~ "TEAM" ) \ + /send -h przemknij z druzyna %{*} %;\ + /else \ + /send -h %{*} %;\ + /endif /def checkgo=\ - /if (lwgo==1) \ - /if (lwcount==2) \ - /def key_nkp5 = /testujwyjscia%;\ - /else \ - /set lwgo=0%;\ - /endif %;\ - /endif + /if (lwgo==1) \ + /if (lwcount==2) \ + /def key_nkp5 = /testujwyjscia%;\ + /else \ + /set lwgo=0%;\ + /endif %;\ + /endif /def testujwyjscia=\ - /if ((_lw0!~"") & (lwlast!~"e")) /set lwlast=w%; w%;\ - /elseif ((_lw1!~"") & (lwlast!~"se")) /set lwlast=nw%; nw%;\ - /elseif ((_lw2!~"") & (lwlast!~"s")) /set lwlast=n%; n%;\ - /elseif ((_lw3!~"") & (lwlast!~"sw")) /set lwlast=ne%; ne%;\ - /elseif ((_lw4!~"") & (lwlast!~"w")) /set lwlast=e%; e%;\ - /elseif ((_lw5!~"") & (lwlast!~"nw")) /set lwlast=se%; se%;\ - /elseif ((_lw6!~"") & (lwlast!~"n")) /set lwlast=s%; s%;\ - /elseif ((_lw7!~"") & (lwlast!~"ne")) /set lwlast=sw%; sw%;\ - /elseif ((_lw8!~"") & (lwlast!~"d")) /set lwlast=u%; u%;\ - /elseif ((_lw9!~"") & (lwlast!~"u")) /set lwlast=d%; d%;\ - /else \ - /beep 1 %;\ - /set lwgo=0%;\ - /endif%;\ - /def key_nkp5 + /if ((_lw0!~"") & (lwlast!~"e")) /set lwlast=w%; w%;\ + /elseif ((_lw1!~"") & (lwlast!~"se")) /set lwlast=nw%; nw%;\ + /elseif ((_lw2!~"") & (lwlast!~"s")) /set lwlast=n%; n%;\ + /elseif ((_lw3!~"") & (lwlast!~"sw")) /set lwlast=ne%; ne%;\ + /elseif ((_lw4!~"") & (lwlast!~"w")) /set lwlast=e%; e%;\ + /elseif ((_lw5!~"") & (lwlast!~"nw")) /set lwlast=se%; se%;\ + /elseif ((_lw6!~"") & (lwlast!~"n")) /set lwlast=s%; s%;\ + /elseif ((_lw7!~"") & (lwlast!~"ne")) /set lwlast=sw%; sw%;\ + /elseif ((_lw8!~"") & (lwlast!~"d")) /set lwlast=u%; u%;\ + /elseif ((_lw9!~"") & (lwlast!~"u")) /set lwlast=d%; d%;\ + /else \ + /beep 1 %;\ + /set lwgo=0%;\ + /endif%;\ + /def key_nkp5 /def -i -b'Ol' = /key_nkp+ /def key_nkp8 = /idz n @@ -145,41 +176,61 @@ /def key_nkp+ = /idz u /def key_nkp. = /idz d -;/def -mregexp -p2 -h'SEND ^n$' = /idz n -;/def -mregexp -p2 -h'SEND ^s$' = /idz s -;/def -mregexp -p2 -h'SEND ^w$' = /idz w -;/def -mregexp -p2 -h'SEND ^e$' = /idz e -;/def -mregexp -p2 -h'SEND ^nw$' = /idz nw -;/def -mregexp -p2 -h'SEND ^ne$' = /idz ne -;/def -mregexp -p2 -h'SEND ^sw$' = /idz sw -;/def -mregexp -p2 -h'SEND ^se$' = /idz se -;/def -mregexp -p2 -h'SEND ^d$' = /idz d -;/def -mregexp -p2 -h'SEND ^u$' = /idz u +/def -mregexp -Fp2 -h'SEND ^n$' = /idzk n +/def -mregexp -Fp2 -h'SEND ^s$' = /idzk s +/def -mregexp -Fp2 -h'SEND ^w$' = /idzk w +/def -mregexp -Fp2 -h'SEND ^e$' = /idzk e +/def -mregexp -Fp2 -h'SEND ^nw$' = /idzk nw +/def -mregexp -Fp2 -h'SEND ^ne$' = /idzk ne +/def -mregexp -Fp2 -h'SEND ^sw$' = /idzk sw +/def -mregexp -Fp2 -h'SEND ^se$' = /idzk se +/def -mregexp -Fp2 -h'SEND ^d$' = /idzk d +/def -mregexp -Fp2 -h'SEND ^u$' = /idzk u +/def -mregexp -Fp2 -h'SEND ^przemknij n$' = /idzkp n +/def -mregexp -Fp2 -h'SEND ^przemknij s$' = /idzkp s +/def -mregexp -Fp2 -h'SEND ^przemknij w$' = /idzkp w +/def -mregexp -Fp2 -h'SEND ^przemknij e$' = /idzkp e +/def -mregexp -Fp2 -h'SEND ^przemknij nw$' = /idzkp nw +/def -mregexp -Fp2 -h'SEND ^przemknij ne$' = /idzkp ne +/def -mregexp -Fp2 -h'SEND ^przemknij sw$' = /idzkp sw +/def -mregexp -Fp2 -h'SEND ^przemknij se$' = /idzkp se +/def -mregexp -Fp2 -h'SEND ^przemknij d$' = /idzkp d +/def -mregexp -Fp2 -h'SEND ^przemknij u$' = /idzkp u +/def -mregexp -Fp2 -h'SEND ^przemknij sie z druzyna n$' = /idzkpt n +/def -mregexp -Fp2 -h'SEND ^przemknij sie z druzyna s$' = /idzkpt s +/def -mregexp -Fp2 -h'SEND ^przemknij sie z druzyna w$' = /idzkpt w +/def -mregexp -Fp2 -h'SEND ^przemknij sie z druzyna e$' = /idzkpt e +/def -mregexp -Fp2 -h'SEND ^przemknij sie z druzyna nw$' = /idzkpt nw +/def -mregexp -Fp2 -h'SEND ^przemknij sie z druzyna ne$' = /idzkpt ne +/def -mregexp -Fp2 -h'SEND ^przemknij sie z druzyna sw$' = /idzkpt sw +/def -mregexp -Fp2 -h'SEND ^przemknij sie z druzyna se$' = /idzkpt se +/def -mregexp -Fp2 -h'SEND ^przemknij sie z druzyna d$' = /idzkpt d +/def -mregexp -Fp2 -h'SEND ^przemknij sie z druzyna u$' = /idzkpt u /def sneak = \ - /if ( {1} =~ NULL )\ - /echo -p #@{C%c_info}#@{n}# Przemykanie: @{C%c_info}%sneak@{n}%;\ - /elseif ( {1} =~ "off" ) \ - /set sneak %{1} %;\ - /status_edit -r1 sneak:4:C%{c_main} %;\ - /elseif ( {1} =~ "ON" ) \ - /set sneak %{1} %;\ - /status_edit -r1 sneak:4:C%{c_alarm} %;\ - /elseif ( {1} =~ "TEAM" ) \ - /set sneak %{1} %;\ - /status_edit -r1 sneak:4:C%{c_alarm} %;\ - /endif + /if ( {1} =~ NULL )\ + /echo -p #@{C%c_info}#@{n}# Przemykanie: @{C%c_info}%sneak@{n}%;\ + /elseif ( {1} =~ "off" ) \ + /set sneak %{1} %;\ + /status_edit -r1 sneak:4:C%{c_main} %;\ + /elseif ( {1} =~ "ON" ) \ + /set sneak %{1} %;\ + /status_edit -r1 sneak:4:C%{c_alarm} %;\ + /elseif ( {1} =~ "TEAM" ) \ + /set sneak %{1} %;\ + /status_edit -r1 sneak:4:C%{c_alarm} %;\ + /endif /def hide = \ - /if ( {1} =~ NULL )\ - /echo -p #@{C%c_info}#@{n}# Ukrycie: @{C%c_info}%hide@{n}%;\ - /elseif ( {1} =~ "off" ) \ - /set hide %{1} %;\ - /status_edit -r1 hide:3:C%{c_main} %;\ - /elseif ( {1} =~ "ON" ) \ - /set hide %{1} %;\ - /status_edit -r1 hide:3:C%{c_alarm} %;\ - /endif + /if ( {1} =~ NULL )\ + /echo -p #@{C%c_info}#@{n}# Ukrycie: @{C%c_info}%hide@{n}%;\ + /elseif ( {1} =~ "off" ) \ + /set hide %{1} %;\ + /status_edit -r1 hide:3:C%{c_main} %;\ + /elseif ( {1} =~ "ON" ) \ + /set hide %{1} %;\ + /status_edit -r1 hide:3:C%{c_alarm} %;\ + /endif /def -mregexp -Fp2 -t'Chowasz sie .* potrafisz' hideon0 = /hide ON /def -mregexp -Fp2 -t'Nie potrafisz ukryc sie jeszcze bardziej' hideon1 = /hide ON @@ -193,4 +244,3 @@ /def -E(hide=~'ON') -mregexp -Fp2 -t'Podazasz za ' hideoff6 = /hide off /def -mregexp -Fp2 -t'Nie jestes w stanie wymknac' sneakoff0 = /sneak off /def -mregexp -Fp2 -t'Nie jestes dowodca zadnej druzyny.' sneakoff1 = /sneak ON -