tf-scripts/arkadia/statusbar.tf

/visual on

/eval /set statusline=$[strcat(strrep(decode_attr("-", {zc_bold}),82), decode_attr("+", {zc_bold}),strrep(decode_attr("-", {zc_bold}),columns()-82))]
/eval /set spacebreak=$[strrep(' ',columns()-141)]

/def ack = \
  /set alarm=$[decode_attr("---", {zc_main})]%;\
  /set blokowanko=[                     ]%;\
  /set warningstat=[                  ]%;\
  /set bindings=%;\
  /set wskazanie=%;\
  /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}), "   ] ")]
/def -Fp3 -mregexp -t'tes( fizycznie|) lekko rann.'         kon3 = /set kondycja=$[strcat("[", decode_attr("               ", {zc_main_background}), "      ] ")]
/def -Fp3 -mregexp -t'tes( fizycznie|) rann.'               kon4 = /set kondycja=$[strcat("[", decode_attr("            ", {zc_alarm_background}), "         ] ")]
/def -Fp3 -mregexp -t'tes( fizycznie|) w zlej kondycji'     kon5 = /set kondycja=$[strcat("[", decode_attr("         ", {zc_alarm_background}), "            ] ")]
/def -Fp3 -mregexp -t'tes( fizycznie|) ciezko rann.'        kon6 = /set kondycja=$[strcat("[", decode_attr("      ", {zc_crit_background}), "               ] ")]
/def -Fp3 -mregexp -t'tes( fizycznie|) ledwo zyw.'          kon7 = /set kondycja=$[strcat("[", decode_attr(decode_attr("      L E D W O      ", {zc_bold}), {zc_crit_background}),"]")]

/def -p2 -mregexp -t'(i jestes|Czujesz sie|Jestes) w pelni wypoczet.' zmecz1 = /set zmeczenie=$[strcat("[", decode_attr("                  ", {zc_main_background}), "] ")]
/def -p2 -mregexp -t'(i jestes|Czujesz sie|Jestes) wypoczet.'         zmecz2 = /set zmeczenie=$[strcat("[", decode_attr("                ", {zc_main_background}), "  ] ")]
/def -p2 -mregexp -t'(i jestes|Czujesz sie|Jestes) troche zmeczon.'   zmecz3 = /set zmeczenie=$[strcat("[", decode_attr("              ", {zc_main_background}), "    ] ")]
/def -p2 -mregexp -t'(i jestes|Czujesz sie|Jestes) zmeczon.'          zmecz4 = /set zmeczenie=$[strcat("[", decode_attr("            ", {zc_main_background}), "      ] ")]
/def -p2 -mregexp -t'(i jestes|Czujesz sie|Jestes) bardzo zmeczon.'   zmecz5 = /set zmeczenie=$[strcat("[", decode_attr("          ", {zc_main_background}), "        ] ")]
/def -p2 -mregexp -t'(i jestes|Czujesz sie|Jestes) nieco wyczerpan.'  zmecz6 = /set zmeczenie=$[strcat("[", decode_attr("        ", {zc_main_background}), "          ] ")]
/def -p2 -mregexp -t'(i jestes|Czujesz sie|Jestes) wyczerpan.'        zmecz7 = /set zmeczenie=$[strcat("[", decode_attr("      ", {zc_alarm_background}), "            ] ")]
/def -p2 -mregexp -t'(i jestes|Czujesz sie|Jestes) bardzo wyczerpan.' zmecz8 = /set zmeczenie=$[strcat("[", decode_attr("    ", {zc_alarm_background}), "              ] ")]
/def -p2 -mregexp -t'(i jestes|Czujesz sie|Jestes) wycienczon.'       zmecz9 = /set zmeczenie=$[strcat("[", decode_attr("  ", {zc_crit_background}), "                ] ")]
/def -p2 -mregexp -t'(i jestes|Czujesz sie|Jestes) calkowicie wycienczon.|nie mozesz dalej podazac |Czujesz sie (smiertelnie|ekstremalnie) zmeczon' zmecz10 = /set zmeczenie=$[strcat("[", decode_attr(decode_attr("    CALKOWICIE    ", {zc_bold}), {zc_crit_background}), "]")]

/def -Fp3 -mregexp -t'(Jestes| zas) mentalnie w pelni sil'     mana1 = /set mana=$[strcat("[", decode_attr("                  ", {zc_main_background}), "] ")]
/def -Fp3 -mregexp -t'(Jestes| zas) mentalnie lekko oslabion.' mana2 = /set mana=$[strcat("[", decode_attr("                ", {zc_main_background}), "  ] ")]
/def -Fp3 -mregexp -t'(Jestes| zas) mentalnie oslabion.'       mana3 = /set mana=$[strcat("[", decode_attr("              ", {zc_main_background}), "    ] ")]
/def -Fp3 -mregexp -t'(Jestes| zas) mentalnie zmeczon.'        mana4 = /set mana=$[strcat("[", decode_attr("            ", {zc_main_background}), "      ] ")]
/def -Fp3 -mregexp -t'(Jestes| zas) mentalnie bardzo zmeczon.' mana5 = /set mana=$[strcat("[", decode_attr("          ", {zc_alarm_background}), "        ] ")]
/def -Fp3 -mregexp -t'(Jestes| zas) mentalnie w zlej kondycji' mana6 = /set mana=$[strcat("[", decode_attr("        ", {zc_alarm_background}), "          ] ")]
/def -Fp3 -mregexp -t'(Jestes| zas) mentalnie wyczerpan.'      mana7 = /set mana=$[strcat("[", decode_attr("      ", {zc_alarm_background}), "            ] ")]
/def -Fp3 -mregexp -t'(Jestes| zas) mentalnie wykonczon.'      mana8 = /set mana=$[strcat("[", decode_attr("    ", {zc_crit_background}), "              ] ")]
/def -Fp3 -mregexp -t'(Jestes| zas) mentalnie u kresu sil'     mana9 = /set mana=$[strcat("[", decode_attr(decode_attr("   U  K R E S U   ", {zc_bold}), {zc_crit_background}), "]")]

/def -p2 -mregexp -t'Twoj ekwipunek nie wadzi ci ani troche.'       load0 = /set show_load=$[decode_attr("0", {zc_main})]
/def -p2 -mregexp -t'ciezar twego ekwipunku wadzi ci troche'        load1 = /set show_load=$[decode_attr("1", {zc_main})]
/def -p2 -mregexp -t'ciezar twego ekwipunku daje ci sie we znaki'   load2 = /set show_load=$[decode_attr("2", {zc_alarm})]
/def -p2 -mregexp -t'ciezar twego ekwipunku jest dosyc klopotliwy'  load3 = /set show_load=$[decode_attr("3", {zc_alarm})]
/def -p2 -mregexp -t'twoj ekwipunek jest wyjatkowo ciezki'          load4 = /set show_load=$[decode_attr("4", {zc_crit})]
/def -p2 -mregexp -t'twoj ekwipunek jest niemilosiernie ciezki'     load5 = /set show_load=$[decode_attr("5", {zc_crit})]
/def -p2 -mregexp -t'twoj ekwipunek prawie przygniata cie do ziemi' load6 = /set show_load=$[decode_attr("6", {zc_crit})]

/def -Fp2 -mregexp -t'jestes bardzo glodn..$'    hunger0 = /set show_hunger=$[decode_attr("-2", {zc_crit})]
/def -Fp2 -mregexp -t'jestes glodn..$'           hunger1 = /set show_hunger=$[decode_attr("-1", {zc_alarm})]
/def -Fp2 -mregexp -t'jestes najedzon..$'        hunger2 = /set show_hunger=$[decode_attr("+1", {zc_main})]
/def -Fp2 -mregexp -t'jestes bardzo najedzon..$' hunger3 = /set show_hunger=$[decode_attr("+2", {zc_main})]

/def -Fp2 -mregexp -t'chce ci sie bardzo pic'             thirst0 = /set show_thirst=$[decode_attr("3", {zc_crit})]
/def -Fp2 -mregexp -t'(Czujesz, ze chce|Chce) ci sie pic' thirst1 = /set show_thirst=$[decode_attr("2", {zc_alarm})]
/def -Fp2 -mregexp -t'troche chce ci sie pic'             thirst2 = /set show_thirst=$[decode_attr("1", {zc_main})]
/def -Fp2 -mregexp -t'nie chce ci sie pic'                thirst3 = /set show_thirst=$[decode_attr("0", {zc_main})]

/def -p2 -mregexp -t'masz potwornego kaca'   drunk00 = /set show_drunk=$[decode_attr("-6", {zc_crit})]
/def -p2 -mregexp -t'masz straszliwego kaca' drunk01 = /set show_drunk=$[decode_attr("-5", {zc_crit})]
/def -p2 -mregexp -t'masz niezlego kaca'     drunk02 = /set show_drunk=$[decode_attr("-4", {zc_crit})]
/def -p2 -mregexp -t'masz drazniacego kaca'  drunk03 = /set show_drunk=$[decode_attr("-3", {zc_crit})]
/def -p2 -mregexp -t'masz niemilego kaca'    drunk04 = /set show_drunk=$[decode_attr("-2", {zc_crit})]
/def -p2 -mregexp -t'masz lekkiego kaca'     drunk05 = /set show_drunk=$[decode_attr("-1", {zc_crit})]
/def -p2 -mregexp -t'(Bol glowy przechodzi.$|Jestes trzezw..$)'       drunk06 = /set show_drunk=$[decode_attr("0",  {zc_main})]
/def -p2 -mregexp -t'jestes podchmielon.'    drunk07 = /set show_drunk=$[decode_attr("+1", {zc_alarm})]
/def -p2 -mregexp -t'jestes lekko podpit.'    drunk08 = /set show_drunk=$[decode_attr("+2", {zc_alarm})]
/def -p2 -mregexp -t'jestes podpit.'         drunk09 = /set show_drunk=$[decode_attr("+3", {zc_alarm})]
/def -p2 -mregexp -t'jestes wstawion.'       drunk10 = /set show_drunk=$[decode_attr("+4", {zc_alarm})]
/def -p2 -mregexp -t'jestes mocno wstawion.' drunk11 = /set show_drunk=$[decode_attr("+5", {zc_alarm})]
/def -p2 -mregexp -t'jestes pijan.'          drunk12 = /set show_drunk=$[decode_attr("+6", {zc_crit})]
/def -p2 -mregexp -t'jestes schlan.'         drunk13 = /set show_drunk=$[decode_attr("+7", {zc_crit})]
/def -p2 -mregexp -t'jestes naprut.'         drunk14 = /set show_drunk=$[decode_attr("+8", {zc_crit})]
/def -p2 -mregexp -t'jestes nawalon.'        drunk15 = /set show_drunk=$[decode_attr("+9", {zc_crit})]
/def -p2 -mregexp -t'jestes pijan. jak bela' drunk16 = /set show_drunk=$[decode_attr("10", {zc_crit})]

/def -Fp2 -mregexp -t'czujesz sie bezpiecznie'       panic0 = /set show_panic=$[decode_attr("0", {zc_main})]
/def -Fp2 -mregexp -t'czujesz sie spokojnie'         panic1 = /set show_panic=$[decode_attr("1", {zc_main})]
/def -Fp2 -mregexp -t'czujesz sie nieswojo'          panic2 = /set show_panic=$[decode_attr("2", {zc_alarm})]
/def -Fp2 -mregexp -t'czujesz sie nerwowo'           panic3 = /set show_panic=$[decode_attr("3", {zc_alarm})]
/def -Fp2 -mregexp -t'czujesz sie przerazony'        panic4 = /set show_panic=$[decode_attr("4", {zc_crit})]
/def -Fp2 -mregexp -t'czujesz sie bardzo przerazony' panic5 = /set show_panic=$[decode_attr("5", {zc_crit})]

/def -Fp2 -mregexp -t'(Jestes|i) w nieziemskiej formie'     form7 = /set show_form=$[decode_attr("6", {zc_main})]
/def -Fp2 -mregexp -t'(Jestes|i) w doskonalej formie'       form6 = /set show_form=$[decode_attr("5", {zc_main})]
/def -Fp2 -mregexp -t'(Jestes|i) w bardzo dobrej formie'  form5 = /set show_form=$[decode_attr("4", {zc_main})]
/def -Fp2 -mregexp -t'(Jestes|i) w dobrej formie'           form4 = /set show_form=$[decode_attr("3", {zc_alarm})]
/def -Fp2 -mregexp -t'(Jestes|i) w w dosc dobrej formie'    form3 = /set show_form=$[decode_attr("2", {zc_alarm})]
/def -Fp2 -mregexp -t'(Jestes|i) w w niezlej formie formie' form2 = /set show_form=$[decode_attr("1", {zc_alarm})]
/def -Fp2 -mregexp -t'(Jestes|i) w przecietnej formie'      form1 = /set show_form=$[decode_attr("0", {zc_crit})]

/def -Fp2 -mregexp -t'((Jest|Sa) tutaj ([^ ]*) (widoczne|widocznych) (wyjsc|wyjscia|wyjscie): |Trakt wiedzie na |W mroku nocy dostrzegasz .* widoczn(e|ych) wyjsc(|ia|ie): |Trakt rozgalezia sie na |W gestych ciemnosciach dostrzegasz .* wiodac.* na |W gestych ciemnosciach dostrzegasz, ze trakt rozgalezia sie na |Sciezka prowadzi tutaj w .* (kierunkach|kierunku): |Szlak.* tutaj w .* kierunk.*: |Wyjsc.* prowadz.* tutaj w .* (kierunkach|kierunku): |.* ciagn.* na |Wedrowke przez rozlegle laki mozesz kontynuowac udajac sie na |Sciezka (rozgalezia sie|wiedzie) na |(Wydeptane w|Dostrzegasz wydeptana w) kukurydzy sciezk.* prowadza.* na |Krete, widmowe drozki prowadza na )' widoczne_wyjscia = /_wyjscia_z_lokacji %{PR}

/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_parse=$[replace(". Mozna jednak z niego zejsc i udac sie ", " ", {w_z_l_input})] %;\
  /let w_z_l_case_na=$[replace(" na ", " ", {w_z_l_parse})]%;\
  /let w_z_l=$[replace(" do ", " ", {w_z_l_case_na})]%;\
  /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=$[decode_attr("X", {zc_main_bold})]%;\
    /elseif ({w_zn}=~"drzwi") /set czy_kierunek_jest_inne=$[decode_attr("X", {zc_main_bold})]%;\
    /elseif ({w_zn}=~"drzwiczki") /set czy_kierunek_jest_inne=$[decode_attr("X", {zc_main_bold})]%;\
    /elseif ({w_zn}=~"most") /set czy_kierunek_jest_inne=$[decode_attr("X", {zc_main_bold})]%;\
    /elseif ({w_zn}=~"schody") /set czy_kierunek_jest_inne=$[decode_attr("X", {zc_main_bold})]%;\
    /elseif ({w_zn}=~"furta") /set czy_kierunek_jest_inne=$[decode_attr("X", {zc_main_bold})]%;\
    /elseif ({w_zn}=~"ulica") /set czy_kierunek_jest_inne=$[decode_attr("X", {zc_main_bold})]%;\
    /elseif ({w_zn}=~"sklep") /set czy_kierunek_jest_inne=$[decode_attr("X", {zc_main_bold})]%;\
    /elseif ({w_zn}=~"prom") /set czy_kierunek_jest_inne=$[decode_attr("X", {zc_main_bold})]%;\
    /elseif ({w_zn}=~"kaplica") /set czy_kierunek_jest_inne=$[decode_attr("X", {zc_main_bold})]%;\
    /elseif ({w_zn}=~"karczma") /set czy_kierunek_jest_inne=$[decode_attr("X", {zc_main_bold})]%;\
    /elseif ({w_zn}=~"schodki") /set czy_kierunek_jest_inne=$[decode_attr("X", {zc_main_bold})]%;\
    /elseif ({w_zn}=~"mlyn") /set czy_kierunek_jest_inne=$[decode_attr("X", {zc_main_bold})]%;\
    /elseif ({w_zn}=~"piekarnia") /set czy_kierunek_jest_inne=$[decode_attr("X", {zc_main_bold})]%;\
    /elseif ({w_zn}=~"trakt") /set czy_kierunek_jest_inne=$[decode_attr("X", {zc_main_bold})]%;\
    /elseif ({w_zn}=~"jaskinia") /set czy_kierunek_jest_inne=$[decode_attr("X", {zc_main_bold})]%;\
    /elseif ({w_zn}=~"szopa") /set czy_kierunek_jest_inne=$[decode_attr("X", {zc_main_bold})]%;\
    /elseif ({w_zn}=~"barak") /set czy_kierunek_jest_inne=$[decode_attr("X", {zc_main_bold})]%;\
    /elseif ({w_zn}=~"wrota") /set czy_kierunek_jest_inne=$[decode_attr("X", {zc_main_bold})]%;\
    /elseif ({w_zn}=~"brama") /set czy_kierunek_jest_inne=$[decode_attr("X", {zc_main_bold})]%;\
    /elseif ({w_zn}=~"wejscie") /set czy_kierunek_jest_inne=$[decode_attr("X", {zc_main_bold})]%;\
    /elseif ({w_zn}=~"ganek") /set czy_kierunek_jest_inne=$[decode_attr("X", {zc_main_bold})]%;\
    /elseif ({w_zn}=~"chata") /set czy_kierunek_jest_inne=$[decode_attr("X", {zc_main_bold})]%;\
    /elseif ({w_zn}=~"obozu") /set czy_kierunek_jest_inne=$[decode_attr("X", {zc_main_bold})]%;\
    /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|i szybko przesuwa sie)' = \
  /_odliczaj_zaslone

/def -mregexp -Fp2 -t'(Wydajesz rozkaz|Niestety, nikt nie|Glosno wypowiadasz rozkaz)' = \
  /_odliczaj_rozkaz

/def -mregexp -Fp2 -t'przymierza sie do odciecia ci drogi ucieczki' = \
  /_odliczaj_blok

/def -mregexp -Fp2 -t'Przymierzasz sie do odciecia' = \
  /_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'(Przerywasz przygotowania do odciecia|Przestajesz odcinac droge |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})]

/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.*chwiejesz|ze swiat przed twoimi oczami niknie|Przymroczony tym uderzeniem czujesz jak nogi|Swiat przed twoimi oczami ciemnieje. Czujesz, ze tracisz wzrok!)' _stun = \
  /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|Bezwladnie opuszczasz)' _wytracenie = \
  /set warningstat=$[strcat("[", decode_attr(decode_attr("    WYTRACENIE    ", {zc_bold}), {zc_crit_background}), "]")]%;\
  /set weaponstat=ERR%;\
  /status_edit -r3 weaponstat:3:C%c_crit

/set zc_blue=Cbgblue
/def _dobywanie = \
  /if ({dual} =~ "off")\
    /send dobadz broni%;\
  /else \
    /send dobadz wszystkich broni%;\
  /endif%;\
  /set warningstat=[                  ]
/alias _dobywanie /_dobywanie
/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   ", {zc_bold}), {zc_blue}), "]")] %;\
  /tbind _dobywanie

/def -mregexp -Fp2 -t'(.obywasz|Wiedziony naglym instynktem siegasz|Pelnym pewnosci siebie ruchem dobywasz| twego pewnego chwytu, | zaciskasz dlon |Trzymasz.*(w prawej|w lewej|oburacz))' weapon_on = \
  /set weaponstat=ON%;\
  /status_edit -r3 weaponstat:3:C%c_alarm

/def -mregexp -Fp2 -t'(^Opuszczasz | ogarniajac wzrokiem cala okolice| opuszczasz | rozluzniasz uchwyt | do tej pory twe serce )' weapon_off = \
  /set weaponstat=off%;\
  /status_edit -r3 weaponstat:3:C%c_main

/def -ar -mregexp -Fp2 -t'^(?:(?!dzierzon).)*peka!$' weapon_break = \
  /beep 1%;\
  /set weaponstat=ERR%;\
  /status_edit -r3 weaponstat:3:C%c_crit

/def -mregexp -p2 -t'Na rozkaz .* rzucasz sie.*' _no_atak = \
  /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_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("rdy", {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_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("rdy", {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}), "                    ] ")]

/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}), " ] ")]

/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:23
/eval /status_add -r1 "Z:":: zmeczenie:20
/eval /status_add -r1 "M:":: mana:20
/eval /status_add -r1 "Hidden: ":: hideshow:3:C%c_main
/eval /status_add -r1 "Cover: ":: nxt_zaslona:3
/eval /status_add -r1 "Mail: ":: poczta_show:4:C%c_main
/eval /status_add -r1 spacebreak::
/eval /status_add -r1 "F: ":: show_form:1
/eval /status_add -r1 "L: ":: show_load:-2
/eval /status_add -r1 "D: ":: show_drunk:-2
/eval /status_add -r1 "P: ":: show_panic:1
/eval /status_add -r1 "T: ":: show_thirst:1
/eval /status_add -r1 "H: ":: show_hunger:2

/eval /status_add -c -r2 "[  ":: czy_kierunek_jest_w:1  ".":1 czy_kierunek_jest_e:2 czy_kierunek_jest_d:1 " ] "::
/eval /status_add -r2 "B:":: blokowanko:23
/eval /status_add -r2 "W:":: warningstat:20
/eval /status_add -r2 "R:[ ":: wskazanie:16
/eval /status_add -r2 "] Sneaky: ":: sneak:3:C%c_main
/eval /status_add -r2 "Order: ":: nxt_order:3
/eval /status_add -r2 spacebreak::
/eval /status_add -r2 "Enemies: ":: aggro:-2:C%c_main
/eval /status_add -r2 "Kill: ":: ownkills:-3:C%c_main
/eval /status_add -r2 "/ ":: allkills:-3:C%c_main

/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 "B:[ ":: bindings:65:C%c_info
/eval /status_add -r3 "] Weapon: ":: weaponstat:3:C%c_main
/eval /status_add -r3 "Alert: ":: alarm:15