/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("none", {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 -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 trakt wiodacy 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): |Tunel.* ciagn.* na |Wedrowke przez rozlegle laki mozesz kontynuowac udajac sie na |W panujacym tu polmroku zauwazasz .*: |Wedrujac po gorach zauwazasz, ze jedyne widoczne wyjscia stad prowadza na |W trudnym gorskim terenie udaje ci sie spostrzec jedno jedyne wyjscie prowadzace na |Gorski teren nie nalezy do zbyt przyjaznych, lecz udaje ci sie spostrzec wyjscia prowadzace na |W ciemnosci z trudem dostrzegasz .* prowadzace 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=$[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}=~"most") /set czy_kierunek_jest_inne=X%;\ /elseif ({w_zn}=~"drzwi") /set czy_kierunek_jest_inne=X%;\ /elseif ({w_zn}=~"schody") /set czy_kierunek_jest_inne=X%;\ /elseif ({w_zn}=~"targ") /set czy_kierunek_jest_inne=X%;\ /elseif ({w_zn}=~"wieza") /set czy_kierunek_jest_inne=X%;\ /elseif ({w_zn}=~"bank") /set czy_kierunek_jest_inne=X%;\ /elseif ({w_zn}=~"poczta") /set czy_kierunek_jest_inne=X%;\ /elseif ({w_zn}=~"karczma") /set czy_kierunek_jest_inne=X%;\ /elseif ({w_zn}=~"sklep") /set czy_kierunek_jest_inne=X%;\ /elseif ({w_zn}=~"ulica") /set czy_kierunek_jest_inne=X%;\ /elseif ({w_zn}=~"bazar") /set czy_kierunek_jest_inne=X%;\ /elseif ({w_zn}=~"stragan") /set czy_kierunek_jest_inne=X%;\ /elseif ({w_zn}=~"kuznia") /set czy_kierunek_jest_inne=X%;\ /elseif ({w_zn}=~"zaklad") /set czy_kierunek_jest_inne=X%;\ /elseif ({w_zn}=~"piekarnia") /set czy_kierunek_jest_inne=X%;\ /elseif ({w_zn}=~"sala") /set czy_kierunek_jest_inne=X%;\ /elseif ({w_zn}=~"stajnia") /set czy_kierunek_jest_inne=X%;\ /elseif ({w_zn}=~"krzaki") /set czy_kierunek_jest_inne=X%;\ /elseif ({w_zn}=~"drzwiczki") /set czy_kierunek_jest_inne=X%;\ /elseif ({w_zn}=~"schodki") /set czy_kierunek_jest_inne=X%;\ /elseif ({w_zn}=~"sciezka") /set czy_kierunek_jest_inne=X%;\ /elseif ({w_zn}=~"tawerna") /set czy_kierunek_jest_inne=X%;\ /elseif ({w_zn}=~"miasto") /set czy_kierunek_jest_inne=X%;\ /elseif ({w_zn}=~"palac") /set czy_kierunek_jest_inne=X%;\ /elseif ({w_zn}=~"trakt") /set czy_kierunek_jest_inne=X%;\ /elseif ({w_zn}=~"baszta") /set czy_kierunek_jest_inne=X%;\ /elseif ({w_zn}=~"gmach") /set czy_kierunek_jest_inne=X%;\ /elseif ({w_zn}=~"kuchnia") /set czy_kierunek_jest_inne=X%;\ /elseif ({w_zn}=~"wrota") /set czy_kierunek_jest_inne=X%;\ /elseif ({w_zn}=~"swiatynia") /set czy_kierunek_jest_inne=X%;\ /elseif ({w_zn}=~"szpital") /set czy_kierunek_jest_inne=X%;\ /elseif ({w_zn}=~"korytarz") /set czy_kierunek_jest_inne=X%;\ /elseif ({w_zn}=~"zaplecze") /set czy_kierunek_jest_inne=X%;\ /elseif ({w_zn}=~"podworko") /set czy_kierunek_jest_inne=X%;\ /elseif ({w_zn}=~"restauracja") /set czy_kierunek_jest_inne=X%;\ /elseif ({w_zn}=~"komnata") /set czy_kierunek_jest_inne=X%;\ /elseif ({w_zn}=~"faktoria") /set czy_kierunek_jest_inne=X%;\ /elseif ({w_zn}=~"kantorek") /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'(Zaslaniasz|Nie udaje ci sie zaslonic|Probujesz zaslonic) .* przed ciosami wrogow.' zaslo1 = \ /_odliczaj_zaslone_5 /def -mregexp -Fp2 -t'(Zaslaniasz|Nie udaje ci sie zaslonic|Probujesz zaslonic) .* przed ciosami (.* .*|[A-Z]*).' zaslo2 = \ /_odliczaj_zaslone_8 /def -mregexp -Fp2 -t'wypowiadasz rozkaz' = \ /_odliczaj_rozkaz /def -mregexp -Fp2 -t'(probujesz|obijasz|siniaczysz) .* (noga|stopa|lokciem|piescia|kolanem)' _bez_broni = \ /set alarm=$[decode_attr("WALKA BEZ BRONI",{zc_alarm})] /def -mregexp -Fp2 -t'(Wystarczy moment nieuwagi, chwila rozproszenia bys nie|Niespodziewanie z gruntu pod twoimi stopami wytryskuje strumien roslinnych pedow oraz korzeni!)' _stun = \ /set warningstat=$[strcat("[", decode_attr(decode_attr(" STUN ", {zc_bold}), {zc_crit_background}), "]")] /def -mregexp -Fp2 -t'(Cios jest tak silny, ze lekko cie oszalamia. Z trudem dostrzegasz kolejne uderzenia.)' _daze = \ /set warningstat=$[strcat("[", decode_attr(decode_attr(" DAZE ", {zc_bold}), {zc_crit_background}), "]")] /def -mregexp -p2 -t'(Czujesz, ze paraliz minal|Konczysz paralyze|Powoli dochodzisz do siebie)' _nostun = \ /set warningstat=[ ] /def -mregexp -Fp2 -t'skupia na chwile swoj wzrok na tobie' _zniewolenie = \ /set alarm=$[decode_attr("ODLOZONY SPRZET",{zc_alarm})] /def -mregexp -Fp2 -t'.* wytraca ci ' _wytracenie = \ /set warningstat=$[strcat("[", decode_attr(decode_attr(" WYTRACENIE ", {zc_bold}), {zc_crit_background}), "]")]%;\ /set weaponstat=ERR%;\ /status_edit -r3 weaponstat:4:C%c_crit /def -mregexp -p2 -t'Czujesz, jak krew w twoch dloniach krazy coraz predzej i odretwienie ustepuje.' _nowytracenie = \ /set warningstat=$[strcat("[", decode_attr(decode_attr(" DOBADZ BRONI: F3 ", {zc_bold}), {zc_blue}), "]")] %;\ /def key_f3 = \ dobadz wszystkich broni %%; \ /set warningstat=[ ] %%;\ /set alarm=$[decode_attr("none", {zc_main})] /def -mregexp -Fp2 -t'(Dobywasz|Wykonujac .* szybkiego mlynca|Chwytasz pewnie za rekojesc|Wiedziony naglym instynktem siegasz|Z pelnym dostojenstwem chwytasz za|Chwyta.* za idealnie dopasowane|Trzymasz.*(w prawej|w lewej|oburacz))' weapon_on = \ /set weaponstat=ON%;\ /status_edit -r3 weaponstat:4:C%c_alarm /def -mregexp -Fp2 -t'(^Opuszczasz |Zwalniasz uchwyt na rekojesci| ogarniajac wzrokiem cala okolice)' weapon_off = \ /set weaponstat=off%;\ /status_edit -r3 weaponstat:4:C%c_main /def -ar -mregexp -Fp2 -t'^(?:(?!dzierzon).)*peka!$' weapon_break = \ /beep 1%;\ /set weaponstat=ERR%;\ /status_edit -r3 weaponstat:4:C%c_crit /def -mregexp -p2 -t'Na rozkaz .* rzucasz sie.*' _no_atak = \ /set wskazanie= /def _odliczaj_zaslone_5 = \ /set nxt_zaslona=$[strcat(decode_attr("5", {zc_crit}))]%;\ /repeat -00:00:01 1 /set nxt_zaslona=$$[strcat(decode_attr("4", {zc_crit}))]%;\ /repeat -00:00:02 1 /set nxt_zaslona=$$[strcat(decode_attr("3", {zc_crit}))]%;\ /repeat -00:00:03 1 /set nxt_zaslona=$$[strcat(decode_attr("2", {zc_alarm}))]%;\ /repeat -00:00:04 1 /set nxt_zaslona=$$[strcat(decode_attr("1", {zc_alarm}))]%;\ /repeat -00:00:05 1 /set nxt_zaslona=$$[strcat(decode_attr("rdy", {zc_main}))] /def _odliczaj_zaslone_8 = \ /set nxt_zaslona=$[strcat(decode_attr("8", {zc_crit}))]%;\ /repeat -00:00:01 1 /set nxt_zaslona=$$[strcat(decode_attr("7", {zc_crit}))]%;\ /repeat -00:00:02 1 /set nxt_zaslona=$$[strcat(decode_attr("6", {zc_crit}))]%;\ /repeat -00:00:03 1 /set nxt_zaslona=$$[strcat(decode_attr("5", {zc_crit}))]%;\ /repeat -00:00:04 1 /set nxt_zaslona=$$[strcat(decode_attr("4", {zc_crit}))]%;\ /repeat -00:00:05 1 /set nxt_zaslona=$$[strcat(decode_attr("3", {zc_alarm}))]%;\ /repeat -00:00:06 1 /set nxt_zaslona=$$[strcat(decode_attr("2", {zc_alarm}))]%;\ /repeat -00:00:07 1 /set nxt_zaslona=$$[strcat(decode_attr("1", {zc_alarm}))]%;\ /repeat -00:00:08 1 /set nxt_zaslona=$$[strcat(decode_attr("rdy", {zc_main}))] /def _odliczaj_rozkaz = \ /set nxt_order=$[strcat(decode_attr("10", {zc_crit}))]%;\ /repeat -00:00:01 1 /set nxt_order=$$[strcat(decode_attr("9", {zc_crit}))]%;\ /repeat -00:00:02 1 /set nxt_order=$$[strcat(decode_attr("8", {zc_crit}))]%;\ /repeat -00:00:03 1 /set nxt_order=$$[strcat(decode_attr("7", {zc_crit}))]%;\ /repeat -00:00:04 1 /set nxt_order=$$[strcat(decode_attr("6", {zc_crit}))]%;\ /repeat -00:00:05 1 /set nxt_order=$$[strcat(decode_attr("5", {zc_crit}))]%;\ /repeat -00:00:06 1 /set nxt_order=$$[strcat(decode_attr("4", {zc_crit}))]%;\ /repeat -00:00:07 1 /set nxt_order=$$[strcat(decode_attr("3", {zc_crit}))]%;\ /repeat -00:00:08 1 /set nxt_order=$$[strcat(decode_attr("2", {zc_crit}))]%;\ /repeat -00:00:09 1 /set nxt_order=$$[strcat(decode_attr("1", {zc_crit}))]%;\ /repeat -00:00:10 1 /set nxt_order=$$[strcat(decode_attr("rdy", {zc_main}))] /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:4:C%c_main /eval /status_add -r1 "Cover: ":: nxt_zaslona:3 /eval /status_add -r1 "Mail: ":: poczta_show:5:C%c_main /eval /status_add -r1 spacebreak:: /eval /status_add -r1 ownkills:3:C%c_main /eval /status_add -r1 "/ ":: allkills:3:C%c_main /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:4:C%c_main /eval /status_add -r2 "Order: ":: nxt_order:3 /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 "T: [ ":: bindings:67:C%c_info /eval /status_add -r3 "] Weapon: ":: weaponstat:4:C%c_main