Nowosc: status broni; ogolne porzadki w statusbarze.

This commit is contained in:
Bartek Stalewski 2013-12-20 23:22:35 +01:00
parent fb1d5a6f57
commit 50e9ce36c7
7 changed files with 345 additions and 327 deletions

View File

@ -31,7 +31,7 @@
/eval /set alarm=$[decode_attr("none", {zc_main})]
/def bd = \
/send opusc wszystkie bronie %;\
/send %{opusccmd-opusc} wszystkie bronie %;\
/if ( {pochwa} =~ "on" )\
/send powsun %bron do %pochwa1 %;\
/if ( {dual} =~ "on" ) \

View File

@ -4,12 +4,12 @@
/eval /set spacebreak=$[strrep(' ',columns()-141)]
/def ack = \
/set alarm=$[decode_attr("none", {zc_main})] %;\
/set alarm=$[decode_attr("none", {zc_main})] %;\
/set blokowanko=[ ]%;\
/set warningstat=[ ]%;\
/set bindings=%;\
/set bindings=%;\
/set wskazanie=%;\
/undef tempbind
/undef tempbind
/def -Fp3 -mregexp -t'tes( fizycznie|) w swietnej kondycji' kon1 = /set kondycja=$[strcat("[", decode_attr(" ", {zc_main_background}), "] ")]
/def -Fp3 -mregexp -t'tes( fizycznie|) w dobrym stanie' kon2 = /set kondycja=$[strcat("[", decode_attr(" ", {zc_main_background}), " ] ")]
@ -35,207 +35,208 @@
/def _first = /result {1}
/def _all_but_first = /result {-1}
/def _wyjscia_z_lokacji = \
/quote -S /unset `/listvar -s czy_kierunek_jest* %;\
/let w_z_l_input=%{*}%;\
/let w_z_l=$[replace(". Mozna jednak z niego zejsc i udac sie na ", " ", {w_z_l_input})] %;\
/let pnum=%{#}%; \
/let i=0%; \
/let w_zn_t=%; \
/let wyjscia_z_lokacji_t=%; \
/set idzna_ile_wyjsc=-1%; \
/if (strstr({w_z_l},".")>=0) \
/let w_z_l=$[strcat(substr({w_z_l},0,strlen({w_z_l})-1))]%; \
/endif%; \
/while /let i=$[i+1]%; /@test i<=pnum%; /do \
/let w_zn=$(/_first %{w_z_l})%; \
/if (strstr({w_zn},",")>=0) \
/let w_zn=$[strcat(substr({w_zn},0,strlen({w_zn})-1))]%; \
/endif%;\
/if ({w_zn}=~"polnoc")\
/if ({lwlast}=~"s")\
/set czy_kierunek_jest_n=$[decode_attr("|", {zc_main_bold})]%;\
/else \
/set czy_kierunek_jest_n=$[decode_attr("|", {zc_alarm})]%;\
/endif %;\
/elseif ({w_zn}=~"poludnie")\
/if ({lwlast}=~"n")\
/set czy_kierunek_jest_s=$[decode_attr("|", {zc_main_bold})]%;\
/else \
/set czy_kierunek_jest_s=$[decode_attr("|", {zc_alarm})]%;\
/endif %;\
/elseif ({w_zn}=~"wschod")\
/if ({lwlast}=~"w")\
/set czy_kierunek_jest_e=$[decode_attr("-", {zc_main_bold})]%;\
/else \
/set czy_kierunek_jest_e=$[decode_attr("-", {zc_alarm})]%;\
/endif %;\
/elseif ({w_zn}=~"zachod")\
/if ({lwlast}=~"e")\
/set czy_kierunek_jest_w=$[decode_attr("-", {zc_main_bold})]%;\
/else \
/set czy_kierunek_jest_w=$[decode_attr("-", {zc_alarm})]%;\
/endif %;\
/elseif ({w_zn}=~"polnocny-wschod")\
/if ({lwlast}=~"sw")\
/set czy_kierunek_jest_ne=$[decode_attr("/", {zc_main_bold})]%;\
/else \
/set czy_kierunek_jest_ne=$[decode_attr("/", {zc_alarm})]%;\
/endif %;\
/elseif ({w_zn}=~"polnocny-zachod")\
/if ({lwlast}=~"se")\
/set czy_kierunek_jest_nw=$[decode_attr("\\", {zc_main_bold})]%;\
/else \
/set czy_kierunek_jest_nw=$[decode_attr("\\", {zc_alarm})]%;\
/endif %;\
/elseif ({w_zn}=~"poludniowy-wschod")\
/if ({lwlast}=~"nw")\
/set czy_kierunek_jest_se=$[decode_attr("\\", {zc_main_bold})]%;\
/else \
/set czy_kierunek_jest_se=$[decode_attr("\\", {zc_alarm})]%;\
/endif %;\
/elseif ({w_zn}=~"poludniowy-zachod")\
/if ({lwlast}=~"ne")\
/set czy_kierunek_jest_sw=$[decode_attr("/", {zc_main_bold})]%;\
/else \
/set czy_kierunek_jest_sw=$[decode_attr("/", {zc_alarm})]%;\
/endif %;\
/elseif ({w_zn}=~"gora")\
/if ({lwlast}=~"d")\
/set czy_kierunek_jest_u=$[decode_attr("U", {zc_main_bold})]%;\
/else \
/set czy_kierunek_jest_u=$[decode_attr("U", {zc_alarm})]%;\
/endif %;\
/elseif ({w_zn}=~"dol")\
/if ({lwlast}=~"u")\
/set czy_kierunek_jest_d=$[decode_attr("D", {zc_main_bold})]%;\
/else \
/set czy_kierunek_jest_d=$[decode_attr("D", {zc_alarm})]%;\
/endif %;\
/elseif ({w_zn}=~"wyjscie") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"drzwi") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"drzwiczki") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"most") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"schody") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"furta") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"ulica") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"sklep") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"prom") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"kaplica") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"karczma") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"schodki") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"mlyn") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"piekarnia") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"trakt") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"jaskinia") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"szopa") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"barak") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"wrota") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"brama") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"wejscie") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"ganek") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"chata") /set czy_kierunek_jest_inne=X%;\
/else \
/let w_zn_t=?%; \
/endif%; \
/let wyjscia_z_lokacji_t=%{wyjscia_z_lokacji_t} %{w_zn_t} %; \
/let w_z_l=$(/_all_but_first %{w_z_l})%; \
/set idzna_ile_wyjsc=$[{idzna_ile_wyjsc} + 1]%; \
/done%; \
/set wyjscia_z_lokacji=%{wyjscia_z_lokacji_t}
/quote -S /unset `/listvar -s czy_kierunek_jest* %;\
/let w_z_l_input=%{*}%;\
/let w_z_l=$[replace(". Mozna jednak z niego zejsc i udac sie na ", " ", {w_z_l_input})] %;\
/let pnum=%{#}%; \
/let i=0%; \
/let w_zn_t=%; \
/let wyjscia_z_lokacji_t=%; \
/set idzna_ile_wyjsc=-1%; \
/if (strstr({w_z_l},".")>=0) \
/let w_z_l=$[strcat(substr({w_z_l},0,strlen({w_z_l})-1))]%; \
/endif%; \
/while /let i=$[i+1]%; /@test i<=pnum%; /do \
/let w_zn=$(/_first %{w_z_l})%; \
/if (strstr({w_zn},",")>=0) \
/let w_zn=$[strcat(substr({w_zn},0,strlen({w_zn})-1))]%; \
/endif%;\
/if ({w_zn}=~"polnoc")\
/if ({lwlast}=~"s")\
/set czy_kierunek_jest_n=$[decode_attr("|", {zc_main_bold})]%;\
/else \
/set czy_kierunek_jest_n=$[decode_attr("|", {zc_alarm})]%;\
/endif %;\
/elseif ({w_zn}=~"poludnie")\
/if ({lwlast}=~"n")\
/set czy_kierunek_jest_s=$[decode_attr("|", {zc_main_bold})]%;\
/else \
/set czy_kierunek_jest_s=$[decode_attr("|", {zc_alarm})]%;\
/endif %;\
/elseif ({w_zn}=~"wschod")\
/if ({lwlast}=~"w")\
/set czy_kierunek_jest_e=$[decode_attr("-", {zc_main_bold})]%;\
/else \
/set czy_kierunek_jest_e=$[decode_attr("-", {zc_alarm})]%;\
/endif %;\
/elseif ({w_zn}=~"zachod")\
/if ({lwlast}=~"e")\
/set czy_kierunek_jest_w=$[decode_attr("-", {zc_main_bold})]%;\
/else \
/set czy_kierunek_jest_w=$[decode_attr("-", {zc_alarm})]%;\
/endif %;\
/elseif ({w_zn}=~"polnocny-wschod")\
/if ({lwlast}=~"sw")\
/set czy_kierunek_jest_ne=$[decode_attr("/", {zc_main_bold})]%;\
/else \
/set czy_kierunek_jest_ne=$[decode_attr("/", {zc_alarm})]%;\
/endif %;\
/elseif ({w_zn}=~"polnocny-zachod")\
/if ({lwlast}=~"se")\
/set czy_kierunek_jest_nw=$[decode_attr("\\", {zc_main_bold})]%;\
/else \
/set czy_kierunek_jest_nw=$[decode_attr("\\", {zc_alarm})]%;\
/endif %;\
/elseif ({w_zn}=~"poludniowy-wschod")\
/if ({lwlast}=~"nw")\
/set czy_kierunek_jest_se=$[decode_attr("\\", {zc_main_bold})]%;\
/else \
/set czy_kierunek_jest_se=$[decode_attr("\\", {zc_alarm})]%;\
/endif %;\
/elseif ({w_zn}=~"poludniowy-zachod")\
/if ({lwlast}=~"ne")\
/set czy_kierunek_jest_sw=$[decode_attr("/", {zc_main_bold})]%;\
/else \
/set czy_kierunek_jest_sw=$[decode_attr("/", {zc_alarm})]%;\
/endif %;\
/elseif ({w_zn}=~"gora")\
/if ({lwlast}=~"d")\
/set czy_kierunek_jest_u=$[decode_attr("U", {zc_main_bold})]%;\
/else \
/set czy_kierunek_jest_u=$[decode_attr("U", {zc_alarm})]%;\
/endif %;\
/elseif ({w_zn}=~"dol")\
/if ({lwlast}=~"u")\
/set czy_kierunek_jest_d=$[decode_attr("D", {zc_main_bold})]%;\
/else \
/set czy_kierunek_jest_d=$[decode_attr("D", {zc_alarm})]%;\
/endif %;\
/elseif ({w_zn}=~"wyjscie") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"drzwi") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"drzwiczki") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"most") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"schody") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"furta") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"ulica") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"sklep") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"prom") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"kaplica") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"karczma") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"schodki") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"mlyn") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"piekarnia") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"trakt") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"jaskinia") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"szopa") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"barak") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"wrota") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"brama") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"wejscie") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"ganek") /set czy_kierunek_jest_inne=X%;\
/elseif ({w_zn}=~"chata") /set czy_kierunek_jest_inne=X%;\
/else \
/let w_zn_t=?%; \
/endif%; \
/let wyjscia_z_lokacji_t=%{wyjscia_z_lokacji_t} %{w_zn_t} %; \
/let w_z_l=$(/_all_but_first %{w_z_l})%; \
/set idzna_ile_wyjsc=$[{idzna_ile_wyjsc} + 1]%; \
/done%; \
/set wyjscia_z_lokacji=%{wyjscia_z_lokacji_t}
/def -mregexp -Fp2 -t'(Zrecznie zaslaniasz|Nie udaje ci sie zaslonic|Probujesz zaslonic|Na rozkaz .* (zaslaniasz|probujesz zaslonic)|Rzucasz sie na|Bezskutecznie rzucasz sie na)' = \
/_odliczaj_zaslone
/_odliczaj_zaslone
/def -mregexp -Fp2 -t'(Wydajesz rozkaz|Niestety, nikt nie|Glosno wypowiadasz rozkaz)' = \
/_odliczaj_rozkaz
/_odliczaj_rozkaz
/def -mregexp -Fp2 -t'przymierza sie do odciecia ci drogi ucieczki' = \
/_odliczaj_blok
/_odliczaj_blok
/def -mregexp -Fp2 -t'Przymierzasz sie do odciecia' = \
/_odliczaj_blok_self
/_odliczaj_blok_self
/def -mregexp -Fp2 -t'zajmuje pozycje umozliwiajaca odciecie ci drogi ucieczki.' _blok = /set blokowanko=$[strcat("[", decode_attr(decode_attr("Z A B L O K O W A N O", {zc_bold}), {zc_crit_background}), "] ")]
/def -mregexp -Fp2 -t'Zajmujesz pozycje umozliwiajaca odciecie' _blok_self = /set blokowanko=$[strcat("[", decode_attr(decode_attr(" B L O K U J E S Z ! ", {zc_bold}), {zc_main_background}), "] ")]
/def -mregexp -Fp2 -t'(Udaje ci sie ominac | omija twoj nieskuteczny |Uciekl.s .+|przestaje.* odcinac .*ucieczki| podazasz )' _blok_off0 = /set blokowanko=[ ]
/def -mregexp -Fp2 -t'(probujesz|muskasz|ranisz|masakrujesz) .* (noga|stopa|lokciem|piescia|kolanem)' _bez_broni = \
/set alarm=$[decode_attr("WALKA BEZ BRONI",{zc_alarm})]
/set alarm=$[decode_attr("WALKA BEZ BRONI",{zc_alarm})]
/def -mregexp -Fp2 -t'(Powoli osuwasz sie na ziemie|Potem robi sie ciemno|Sila uderzania zamroczyla cie|czujesz, ze tracisz przytomnosc|Nagle czujesz jak na glowe spada ci ciezki sznur|Nagle czujesz, ze tracisz kontrole nad swym cialem| wali cie na odlew)' _stun = \
/set warningstat=$[strcat("[", decode_attr(decode_attr(" --* OGLUSZENIE *-- ", {zc_bold}), {zc_crit_background}), "] ")]
/set warningstat=$[strcat("[", decode_attr(decode_attr(" --* OGLUSZENIE *-- ", {zc_bold}), {zc_crit_background}), "] ")]
/def -mregexp -p2 -t'(Powoli dochodzisz do siebie|Czujesz jak slabosc po zadanym ciosie w glowe mija|Udaje ci sie uwolnic z sieci|Powoli odzyskujesz swobode ruchow)' _nostun = \
/set warningstat=[ ]
/def -mregexp -p2 -t'(.* wytraca ci .* z r|Uderzenie jest tak silne, ze bezwiednie puszczasz|Czujesz potezne szarpniecie)' _wytracenie = \
/set warningstat=$[strcat("[", decode_attr(decode_attr(" --* WYTRACENIE *-- ", {zc_bold}), {zc_crit_background}), "] ")]
/set warningstat=$[strcat("[", decode_attr(decode_attr(" --* WYTRACENIE *-- ", {zc_bold}), {zc_crit_background}), "] ")]
/set zc_blue=Cbgblue
/def -mregexp -p2 -t'(lecac lagodnym lukiem, laduje na ziemi obok ciebie|Bol .* staje sie mniej odczuwalny)' _wytracenie_off = \
/set warningstat=$[strcat("[", decode_attr(decode_attr(" DOBADZ BRONI -- F2 ", {zc_bold}), {zc_blue}), "] ")] %;\
/def key_f2 = \
/set warningstat=$[strcat("[", decode_attr(decode_attr(" DOBADZ BRONI -- F2 ", {zc_bold}), {zc_blue}), "] ")] %;\
/def key_f2 = \
dobadz broni %%; \
/set warningstat=[ ] %%;\
/set alarm=$[decode_attr("none", {zc_main})]
/def -mregexp -p2 -t'Na rozkaz .* rzucasz sie.*' _no_atak = \
/set wskazanie=
/set wskazanie=
/def _odliczaj_zaslone = \
/set nxt_zaslona=$[strcat(decode_attr("4", {zc_crit}))]%;\
/repeat -00:00:01.25 1 /set nxt_zaslona=$$[strcat(decode_attr("3", {zc_crit}))]%;\
/repeat -00:00:02.35 1 /set nxt_zaslona=$$[strcat(decode_attr("2", {zc_alarm}))]%;\
/repeat -00:00:03.45 1 /set nxt_zaslona=$$[strcat(decode_attr("1", {zc_alarm}))]%;\
/repeat -00:00:04.58 1 /set nxt_zaslona=$$[strcat(decode_attr("rdy", {zc_main}))]
/set nxt_zaslona=$[strcat(decode_attr("4", {zc_crit}))]%;\
/repeat -00:00:01.25 1 /set nxt_zaslona=$$[strcat(decode_attr("3", {zc_alarm}))]%;\
/repeat -00:00:02.35 1 /set nxt_zaslona=$$[strcat(decode_attr("2", {zc_alarm}))]%;\
/repeat -00:00:03.45 1 /set nxt_zaslona=$$[strcat(decode_attr("1", {zc_crit}))]%;\
/repeat -00:00:04.58 1 /set nxt_zaslona=$$[strcat(decode_attr("ready", {zc_main}))]
/def _odliczaj_rozkaz = \
/set nxt_order=$[strcat(decode_attr("12", {zc_crit}))]%;\
/repeat -00:00:01.00 1 /set nxt_order=$$[strcat(decode_attr("11", {zc_crit}))]%;\
/repeat -00:00:02.05 1 /set nxt_order=$$[strcat(decode_attr("10", {zc_crit}))]%;\
/repeat -00:00:03.10 1 /set nxt_order=$$[strcat(decode_attr("9", {zc_crit}))]%;\
/repeat -00:00:04.20 1 /set nxt_order=$$[strcat(decode_attr("8", {zc_crit}))]%;\
/repeat -00:00:05.25 1 /set nxt_order=$$[strcat(decode_attr("7", {zc_crit}))]%;\
/repeat -00:00:06.30 1 /set nxt_order=$$[strcat(decode_attr("6", {zc_crit}))]%;\
/repeat -00:00:07.35 1 /set nxt_order=$$[strcat(decode_attr("5", {zc_alarm}))]%;\
/repeat -00:00:08.40 1 /set nxt_order=$$[strcat(decode_attr("4", {zc_alarm}))]%;\
/repeat -00:00:09.45 1 /set nxt_order=$$[strcat(decode_attr("3", {zc_alarm}))]%;\
/repeat -00:00:10.50 1 /set nxt_order=$$[strcat(decode_attr("2", {zc_alarm}))]%;\
/repeat -00:00:11.55 1 /set nxt_order=$$[strcat(decode_attr("1", {zc_alarm}))]%;\
/repeat -00:00:12.60 1 /set nxt_order=$$[strcat(decode_attr("rdy", {zc_main}))]
/set nxt_order=$[strcat(decode_attr("12", {zc_crit}))]%;\
/repeat -00:00:01.00 1 /set nxt_order=$$[strcat(decode_attr("11", {zc_alarm}))]%;\
/repeat -00:00:02.05 1 /set nxt_order=$$[strcat(decode_attr("10", {zc_alarm}))]%;\
/repeat -00:00:03.10 1 /set nxt_order=$$[strcat(decode_attr("9", {zc_alarm}))]%;\
/repeat -00:00:04.20 1 /set nxt_order=$$[strcat(decode_attr("8", {zc_alarm}))]%;\
/repeat -00:00:05.25 1 /set nxt_order=$$[strcat(decode_attr("7", {zc_alarm}))]%;\
/repeat -00:00:06.30 1 /set nxt_order=$$[strcat(decode_attr("6", {zc_alarm}))]%;\
/repeat -00:00:07.35 1 /set nxt_order=$$[strcat(decode_attr("5", {zc_crit}))]%;\
/repeat -00:00:08.40 1 /set nxt_order=$$[strcat(decode_attr("4", {zc_crit}))]%;\
/repeat -00:00:09.45 1 /set nxt_order=$$[strcat(decode_attr("3", {zc_crit}))]%;\
/repeat -00:00:10.50 1 /set nxt_order=$$[strcat(decode_attr("2", {zc_crit}))]%;\
/repeat -00:00:11.55 1 /set nxt_order=$$[strcat(decode_attr("1", {zc_crit}))]%;\
/repeat -00:00:12.60 1 /set nxt_order=$$[strcat(decode_attr("ready", {zc_main}))]
/def _odliczaj_blok = \
/set blokowanko=$[strcat("[", decode_attr(" ", {zc_crit_background}), "] ")]%;\
/repeat -00:00:01 1 /set blokowanko=$$[strcat("[", decode_attr(" ", {zc_crit_background}), " ] ")]%;\
/repeat -00:00:02.40 1 /set blokowanko=$$[strcat("[", decode_attr(" ", {zc_crit_background}), " ] ")]%;\
/repeat -00:00:03.50 1 /set blokowanko=$$[strcat("[", decode_attr(" ", {zc_crit_background}), " ] ")]%;\
/repeat -00:00:04.60 1 /set blokowanko=$$[strcat("[", decode_attr(" ", {zc_crit_background}), " ] ")]
/set blokowanko=$[strcat("[", decode_attr(" ", {zc_crit_background}), "] ")]%;\
/repeat -00:00:01 1 /set blokowanko=$$[strcat("[", decode_attr(" ", {zc_crit_background}), " ] ")]%;\
/repeat -00:00:02.40 1 /set blokowanko=$$[strcat("[", decode_attr(" ", {zc_crit_background}), " ] ")]%;\
/repeat -00:00:03.50 1 /set blokowanko=$$[strcat("[", decode_attr(" ", {zc_crit_background}), " ] ")]%;\
/repeat -00:00:04.60 1 /set blokowanko=$$[strcat("[", decode_attr(" ", {zc_crit_background}), " ] ")]
/def _odliczaj_blok_self = \
/repeat -00:00:01 1 /set blokowanko=$$[strcat("[", decode_attr(" ", {zc_main_background}), " ] ")]%;\
/repeat -00:00:02.40 1 /set blokowanko=$$[strcat("[", decode_attr(" ", {zc_main_background}), " ] ")]%;\
/repeat -00:00:03.50 1 /set blokowanko=$$[strcat("[", decode_attr(" ", {zc_main_background}), " ] ")]%;\
/repeat -00:00:04.60 1 /set blokowanko=$$[strcat("[", decode_attr(" ", {zc_main_background}), " ] ")]
/repeat -00:00:01 1 /set blokowanko=$$[strcat("[", decode_attr(" ", {zc_main_background}), " ] ")]%;\
/repeat -00:00:02.40 1 /set blokowanko=$$[strcat("[", decode_attr(" ", {zc_main_background}), " ] ")]%;\
/repeat -00:00:03.50 1 /set blokowanko=$$[strcat("[", decode_attr(" ", {zc_main_background}), " ] ")]%;\
/repeat -00:00:04.60 1 /set blokowanko=$$[strcat("[", decode_attr(" ", {zc_main_background}), " ] ")]
/eval /status_add -c -r0 statusline::
/eval /status_add -c -r1 "[ " czy_kierunek_jest_nw:1 czy_kierunek_jest_n:1 czy_kierunek_jest_ne:2 czy_kierunek_jest_u:1 " ] "::
/eval /status_add -r1 "K: ":: kondycja:24
/eval /status_add -r1 "Z: ":: zmeczenie:24
/eval /status_add -r1 "Hide: ":: hide:3:C%c_main
/eval /status_add -r1 " Sneak: ":: sneak:4:C%c_main
/eval /status_add -r1 "Hidden: ":: hide:4:C%c_main
/eval /status_add -r1 " Cover: ":: nxt_zaslona:5
/eval /status_add -r1 "Mail: ":: poczta_show:5:C%c_main
/eval /status_add -c -r2 "[ ":: czy_kierunek_jest_w:1 "#":1:C%c_alarm czy_kierunek_jest_e:2 czy_kierunek_jest_d:1 " ] "::
/eval /status_add -r2 "B: ":: blokowanko:24
/eval /status_add -r2 "W: ":: warningstat:24
/eval /status_add -r2 "Zasl: ":: nxt_zaslona:4
/eval /status_add -r2 "Order: ":: nxt_order:4
/eval /status_add -r2 "Sneaky: ":: sneak:4:C%c_main
/eval /status_add -r2 "Order: ":: nxt_order:5
/eval /status_add -r2 "Warn: ":: alarm:20
/eval /status_add -c -r3 "[ ":: czy_kierunek_jest_sw:1 czy_kierunek_jest_s:1 czy_kierunek_jest_se:2 czy_kierunek_jest_inne:1 " ] "::
/eval /status_add -r3 "R: [ ":: wskazanie:47:C%c_alarm
/eval /status_add -r3 "] Bind: ":: bindings:35:C%c_info
/eval /status_add -r3 "] Weapon: ":: weaponstat:4:C%c_main
/eval /status_add -r3 "tBind:":: bindings:35:C%c_info
/eval /status_add -r3 spacebreak::
/eval /status_add -r3 ownkills:3:C%c_main
/eval /status_add -r3 "/ ":: allkills:3:C%c_main

View File

@ -1,129 +1,140 @@
/def get = \
/send wez %{*} %;\
/send wez %{*} z ciala %;\
/send wez %{*} z drugiego ciala %;\
/send wez %{*} z trzeciego ciala %;\
/send wez %{*} z czwartego ciala %;\
/send wez %{*} z piatego ciala %;\
/send wez %{*} z szostego ciala %;\
/send wez %{*} z siodmego ciala %;\
/send wez %{*} z osmego ciala
/send wez %{*} %;\
/send wez %{*} z ciala %;\
/send wez %{*} z drugiego ciala %;\
/send wez %{*} z trzeciego ciala %;\
/send wez %{*} z czwartego ciala %;\
/send wez %{*} z piatego ciala %;\
/send wez %{*} z szostego ciala %;\
/send wez %{*} z siodmego ciala %;\
/send wez %{*} z osmego ciala
/def -Fp2 -ar -t'* rozpada sie!*' = /beep 1
/def -Fp2 -ar -t'* peka!*' = /beep 1
/def -ar -mregexp -Fp2 -t'^[a-z]+ [a-z]+ [a-z]+ rozpada sie!*' = /beep 1
/def -mregexp -Fp2 -t'(Dobywasz|Wiedziony naglym instynktem siegasz|Trzymasz.*(w prawej|w lewej|oburacz))' weapon_on = \
/set weaponstat=ON%;\
/status_edit -r3 weaponstat:4:C%c_alarm
/def -mregexp -Fp2 -t'(^Opuszczasz | ogarniajac wzrokiem cala okolice)' weapon_off = \
/set weaponstat=off%;\
/status_edit -r3 weaponstat:4:C%c_main
/def -ar -mregexp -Fp2 -t'^[a-z]+ [a-z]+ [a-z]+ (?:|bojowa |bojowy )peka!' weapon_break = \
/beep 1%;\
/set weaponstat=!!!%;\
/status_edit -r3 weaponstat:4:C%c_crit
/def -mregexp -p2 -t'bierze twoj.' = /set moje on
/def -mregexp -p2 -t'konczy prace.$' = \
/if ( {moje} =~ "on" )\
/tbind do_kowal %;\
/endif
/if ( {moje} =~ "on" )\
/tbind do_kowal %;\
/endif
/def kowal = \
/if ( {pack} =~ "on" )\
/zp monety %;\
/endif%;\
/do_kowal
/if ( {pack} =~ "on" )\
/zp monety %;\
/endif%;\
/do_kowal
/def do_kowal = \
/def -ag -p2 -t'*jest pochloniety*nie wypada*' _kowal_gag_0 %;\
/def -ag -p2 -t'*Nie masz niczego takiego*' _kowal_gag_1 %;\
/def -ag -p2 -t'*Juz dzierzysz*' _kowal_gag2 %;\
/def -ag -p2 -t'*masz*na plecach*' _kowal_gag3 %;\
/set moje off %;\
/send naostrz bron %;\
/if ( {dual} =~ "on" ) \
/send naostrz druga bron %;\
/endif %;\
/send napraw zbroje %;\
/send napraw druga zbroje %;\
/send napraw trzecia zbroje %;\
/send napraw czwarta zbroje %;\
/send napraw piata zbroje %;\
/send napraw szosta zbroje %;\
/send napraw siodma zbroje %;\
/send napraw osma zbroje %;\
/send napraw dziewiata zbroje %;\
/send napraw dziesiata zbroje %;\
/purge _kowal_gag_* %;\
/repeat -1 1 /_kowal_finish
/def -ag -p2 -t'*jest pochloniety*nie wypada*' _kowal_gag_0 %;\
/def -ag -p2 -t'*Nie masz niczego takiego*' _kowal_gag_1 %;\
/def -ag -p2 -t'*Juz dzierzysz*' _kowal_gag2 %;\
/def -ag -p2 -t'*masz*na plecach*' _kowal_gag3 %;\
/set moje off %;\
/send naostrz bron %;\
/if ( {dual} =~ "on" ) \
/send naostrz druga bron %;\
/endif %;\
/send napraw zbroje %;\
/send napraw druga zbroje %;\
/send napraw trzecia zbroje %;\
/send napraw czwarta zbroje %;\
/send napraw piata zbroje %;\
/send napraw szosta zbroje %;\
/send napraw siodma zbroje %;\
/send napraw osma zbroje %;\
/send napraw dziewiata zbroje %;\
/send napraw dziesiata zbroje %;\
/purge _kowal_gag_* %;\
/repeat -1 1 /_kowal_finish
/def _kowal_finish = \
/if ({moje} =~ "off" ) \
/send dobadz wszystkich broni %;\
/send zaloz wszystkie zbroje %;\
/if ( {sakiewka} =~ "on" )\
/sad monety %;\
/elseif ( {pack} =~ "on" )\
/dp monety %;\
/endif%;\
/endif
/if ({moje} =~ "off" ) \
/send dobadz wszystkich broni %;\
/send zaloz wszystkie zbroje %;\
/if ( {sakiewka} =~ "on" )\
/sad monety %;\
/elseif ( {pack} =~ "on" )\
/dp monety %;\
/endif%;\
/endif
/alias do_kowal /do_kowal
/def -mregexp -p2 -t'.* (pochodnia|luczywo) wypala sie i gasnie\.' light_off0 = \
/tbind odloz wypalona pochodnie %%; zapal pochodnie
/tbind odloz wypalona pochodnie %%; zapal pochodnie
/def -mglob -p2 -t'*lampa wypala sie i gasnie*' light_off1 = \
/tickoff %;\
/tbind lampa_on_cmd
/tickoff %;\
/tbind lampa_on_cmd
/def -mglob -p2 -t'*Probujesz zapalic* lampe, ale ci sie*' light_on0 = \
/tickoff %;\
/tbind lampa_on_cmd
/tickoff %;\
/tbind lampa_on_cmd
/def -mglob -p2 -t'pelniasz .*lampe\\\.' light_on1_0 = \
/tickoff %;\
/def -i tick_warn = %;\
/def -i tick_action = /_lampa_warn %;\
/ticksize %lampatick %;\
/tickon %;\
/tbind zapal lampe
/tickoff %;\
/def -i tick_warn = %;\
/def -i tick_action = /_lampa_warn %;\
/ticksize %lampatick %;\
/tickon %;\
/tbind zapal lampe
/def -mglob -p2 -t'*lampe, oprozniajac *' light_on1_1 = \
/tickoff %;\
/def -i tick_warn = %;\
/def -i tick_action = /_lampa_warn %;\
/ticksize %lampatick %;\
/tickon %;\
/tbind lampa_off_cmd
/tickoff %;\
/def -i tick_warn = %;\
/def -i tick_action = /_lampa_warn %;\
/ticksize %lampatick %;\
/tickon %;\
/tbind lampa_off_cmd
/def -mglob -p2 -t'*Zapalasz*lampe*' light_on2 = \
/tickoff %;\
/def -i tick_warn = %;\
/def -i tick_action = /_lampa_warn %;\
/ticksize %lampatick %;\
/tickon
/tickoff %;\
/def -i tick_warn = %;\
/def -i tick_action = /_lampa_warn %;\
/ticksize %lampatick %;\
/tickon
/def -mglob -p2 -t'*Gasisz*' light_off01 = \
/tickoff
/tickoff
/def -mglob -p2 -t'*nie jest zapalona*' light_off02 = \
/tickoff
/tickoff
/def manipuluj_plecakiem = \
/if ( {pack} =~ "on" )\
/send %{*} %;\
/endif
/if ( {pack} =~ "on" )\
/send %{*} %;\
/endif
/def dp = /manipuluj_plecakiem wloz %{*} do %packitem1
/def zp = /manipuluj_plecakiem wez %{*} z %packitem1
/def np = /manipuluj_plecakiem napelnij %packitem0
/def sd = \
/dp wszystkie zbroje
/dp wszystkie zbroje
/def sz = \
/zp wszystkie zbroje %;\
/send zaloz wszystkie zbroje
/zp wszystkie zbroje %;\
/send zaloz wszystkie zbroje
/def -mglob -p2 -t'*Nie jestes w stanie * zamknietego pojemnika*' open_pack = \
/tbind otworz %packitem0
/tbind otworz %packitem0
/def -mregexp -p2 -t'Zdejmujesz .* (plecak|worek|torbe|sakwe)' pof0 = \
/set pack=off
/set pack=off
/def zw = \
otworz woreczek %;\
wez %{*} z woreczka %;\
zamknij woreczek
otworz woreczek %;\
wez %{*} z woreczka %;\
zamknij woreczek
/def dw = \
otworz woreczek %;\
wloz %{*} do woreczka %;\
zamknij woreczek
otworz woreczek %;\
wloz %{*} do woreczka %;\
zamknij woreczek
/def ow = otworz woreczek%; ob woreczek%; zamknij woreczek
/def o2w = zajrzyj do drugiego woreczka
@ -135,71 +146,71 @@
/def o8w = zajrzyj do osmego woreczka
/def z2w = \
otworz drugi woreczek %;\
wez %{*} z drugiego woreczka %;\
zamknij drugi woreczek
otworz drugi woreczek %;\
wez %{*} z drugiego woreczka %;\
zamknij drugi woreczek
/def d2w = \
otworz drugi woreczek %;\
wloz %{*} do drugiego woreczka %;\
zamknij drugi woreczek
otworz drugi woreczek %;\
wloz %{*} do drugiego woreczka %;\
zamknij drugi woreczek
/def z3w = \
otworz trzeci woreczek %;\
wez %{*} z trzeciego woreczka %;\
zamknij trzeci woreczek
otworz trzeci woreczek %;\
wez %{*} z trzeciego woreczka %;\
zamknij trzeci woreczek
/def d3w = \
otworz trzeci woreczek %;\
wloz %{*} do trzeciego woreczka %;\
zamknij trzeci woreczek
otworz trzeci woreczek %;\
wloz %{*} do trzeciego woreczka %;\
zamknij trzeci woreczek
/def z4w = \
otworz czwarty woreczek %;\
wez %{*} z czwartego woreczka %;\
zamknij czwarty woreczek
otworz czwarty woreczek %;\
wez %{*} z czwartego woreczka %;\
zamknij czwarty woreczek
/def d4w = \
otworz czwarty woreczek %;\
wloz %{*} do czwartego woreczka %;\
zamknij czwarty woreczek
otworz czwarty woreczek %;\
wloz %{*} do czwartego woreczka %;\
zamknij czwarty woreczek
/def z5w = \
otworz piaty woreczek %;\
wez %{*} z piatego woreczka %;\
zamknij piaty woreczek
otworz piaty woreczek %;\
wez %{*} z piatego woreczka %;\
zamknij piaty woreczek
/def d5w = \
otworz piaty woreczek %;\
wloz %{*} do piatego woreczka %;\
zamknij piaty woreczek
otworz piaty woreczek %;\
wloz %{*} do piatego woreczka %;\
zamknij piaty woreczek
/def z6w = \
otworz szosty woreczek %;\
wez %{*} z szostego woreczka %;\
zamknij szosty woreczek
otworz szosty woreczek %;\
wez %{*} z szostego woreczka %;\
zamknij szosty woreczek
/def d6w = \
otworz szosty woreczek %;\
wloz %{*} do szostego woreczka %;\
zamknij szosty woreczek
otworz szosty woreczek %;\
wloz %{*} do szostego woreczka %;\
zamknij szosty woreczek
/def z7w = \
otworz siodmy woreczek %;\
wez %{*} z siodmego woreczka %;\
zamknij siodmy woreczek
otworz siodmy woreczek %;\
wez %{*} z siodmego woreczka %;\
zamknij siodmy woreczek
/def d7w = \
otworz siodmy woreczek %;\
wloz %{*} do siodmego woreczka %;\
zamknij siodmy woreczek
otworz siodmy woreczek %;\
wloz %{*} do siodmego woreczka %;\
zamknij siodmy woreczek
/def z8w = \
otworz osmy woreczek %;\
wez %{*} z osmego woreczka %;\
zamknij osmy woreczek
otworz osmy woreczek %;\
wez %{*} z osmego woreczka %;\
zamknij osmy woreczek
/def d8w = \
otworz osmy woreczek %;\
wloz %{*} do osmego woreczka %;\
zamknij osmy woreczek
otworz osmy woreczek %;\
wloz %{*} do osmego woreczka %;\
zamknij osmy woreczek

View File

@ -12,7 +12,7 @@
/endif %;\
/elseif ({*} =~ 'clear') \
/unset ogolne_poczta %;\
/status_edit -r1 poczta_show:5:C%{c_main} %;\
/status_edit -r1 poczta_show:5:C%c_main %;\
/set poczta_show=none %;\
/endif
@ -26,7 +26,7 @@
/else \
/set poczta_show=MAIL%;\
/endif %;\
/status_edit -r1 poczta_show:5:C%{c_alarm}
/status_edit -r1 poczta_show:5:C%c_alarm
/def -mregexp -Fp2 -t'^Masz nowa poczte od (.*).' _poczta_1 = \
/set ogolne_poczta=$[strcat({ogolne_poczta},ftime("%H:%M",time()),{P1},"|")] %;\
@ -36,7 +36,7 @@
/else \
/set poczta_show=MAIL%;\
/endif %;\
/status_edit -r1 poczta_show:5:C%{c_alarm}
/status_edit -r1 poczta_show:5:C%c_alarm
/def -mregexp -Fp2 -t'^Masz nowy list.*od ([^ ]*), zatytulowany \'(.*)(\'|[^.]$)' _poczta_2 = \
/set ogolne_poczta=$[strcat({ogolne_poczta},ftime("%H:%M",time()),{P1}," zatytulowany '",{P2},"'|")] %;\
@ -46,4 +46,4 @@
/else \
/set poczta_show=MAIL%;\
/endif %;\
/status_edit -r1 poczta_show:5:C%{c_alarm}
/status_edit -r1 poczta_show:5:C%c_alarm

View File

@ -213,13 +213,13 @@
/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} %;\
/status_edit -r2 sneak:4:C%{c_main} %;\
/elseif ( {1} =~ "ON" ) \
/set sneak %{1} %;\
/status_edit -r1 sneak:4:C%{c_alarm} %;\
/status_edit -r2 sneak:4:C%{c_alarm} %;\
/elseif ( {1} =~ "TEAM" ) \
/set sneak %{1} %;\
/status_edit -r1 sneak:4:C%{c_alarm} %;\
/status_edit -r2 sneak:4:C%{c_alarm} %;\
/endif
/def hide = \

View File

@ -15,6 +15,7 @@
/set ownkills=0
/set allkills=0
/set poczta_show=none
/set weaponstat=???
/eval /set alarm=$[decode_attr("none", {zc_main})]
/eval /set nxt_zaslona=$[decode_attr("rdy", {zc_main})]

View File

@ -6,11 +6,11 @@
/def -Fp2 -mregexp -t"^(> )+" _unprompty = /substitute %{PR}
/def log_on = \
/eval /log -w%{mudworld} %{logpath}/%{mudworld}/%{player}_$[ftime("%Y-%m-%d", time())].log
/eval /log -w%{mudworld} %{logpath}/%{mudworld}/%{player}_$[ftime("%Y-%m-%d", time())].log
/def -mglob -Fp2 -t'* z hosta:*' _logged = \
/repeat -5 1 /start %;\
/repeat -6 1 /set ingame=1
/repeat -5 1 /start %;\
/repeat -6 1 /set ingame=1
/sub on
/def c = /for i 1 100 /_echo
@ -41,39 +41,44 @@
/load warn.tf
/def reload = \
/purge %;\
/purge -i alias_body_* %;\
/purge -i alias_call_* %;\
/def -ag -h'Load' hide_load %;\
/eval /cd %{main_dir}/common %;\
/load start.tf %;\
/eval /cd %{main_dir}/%{mudworld} %;\
/load start.tf %;\
/load %{priv_dir}/%{mudworld}/players/%{player}/%{player}.tf %;\
/load %{priv_dir}/%{mudworld}/imiona.tf %;\
/if ( {poczta_show} =~ "NOWA" )\
/status_edit -r1 poczta_show:4:C%{c_alarm} %;\
/purge %;\
/purge -i alias_body_* %;\
/purge -i alias_call_* %;\
/def -ag -h'Load' hide_load %;\
/eval /cd %{main_dir}/common %;\
/load start.tf %;\
/eval /cd %{main_dir}/%{mudworld} %;\
/load start.tf %;\
/load %{priv_dir}/%{mudworld}/players/%{player}/%{player}.tf %;\
/load %{priv_dir}/%{mudworld}/imiona.tf %;\
/if ( {poczta_show} =~ "NOWA" )\
/status_edit -r1 poczta_show:4:C%{c_alarm} %;\
/elseif ( {poczta_show} =~ "MULTI" )\
/status_edit -r1 poczta_show:4:C%{c_alarm} %;\
/endif %;\
/if ( {bindings} !~ NULL ) \
/def -b'`' tempbind = /dobind %{bindings} %;\
/if ( {ktype} =~ "mac" ) \
/def key_nkp- = /dobind %{*} %;\
/endif %;\
/endif %;\
/status_edit -r1 poczta_show:4:C%{c_alarm} %;\
/endif %;\
/if ( {bindings} !~ NULL ) \
/def -b'`' tempbind = /dobind %{bindings} %;\
/if ( {ktype} =~ "mac" ) \
/def key_nkp- = /dobind %{*} %;\
/endif %;\
/endif %;\
/sneak %sneak %;\
/hide %hide %;\
/f1 %f1 %;\
/f2 %f2 %;\
/f3 %f3 %;\
/f4 %f4 %;\
/f5 %f5 %;\
/f6 %f6 %;\
/f7 %f7 %;\
/f8 %f8 %;\
/am %attackmode %;\
/if ( {ingame} =~ "1" )\
/druzyna -q %;\
/endif%;\
/echo Reloaded.
/hide %hide %;\
/if ( {weaponstat} =~ "ON" )\
/weapon_on%;\
/elseif ( {weaponstat} =~ "!!!" )\
/weapon_break%;\
/endif%;\
/f1 %f1 %;\
/f2 %f2 %;\
/f3 %f3 %;\
/f4 %f4 %;\
/f5 %f5 %;\
/f6 %f6 %;\
/f7 %f7 %;\
/f8 %f8 %;\
/am %attackmode %;\
/if ( {ingame} =~ "1" )\
/druzyna -q %;\
/endif%;\
/echo Reloaded.