Dodanie wsparcia dla schematow kolorow.
This commit is contained in:
parent
685168bae4
commit
7abac10695
32 changed files with 1430 additions and 1407 deletions
|
@ -16,15 +16,15 @@
|
|||
/if ( {ktype} =~ "mac" ) \
|
||||
/def key_nkp- = /dobind %{*} %;\
|
||||
/endif %;\
|
||||
/echo -p @{BC%kolor_info}>>>@{n} %;\
|
||||
/echo -p @{C%c_info}>>>@{n} %;\
|
||||
/beep 1 %;\
|
||||
/endif
|
||||
|
||||
/def f1 = \
|
||||
/if ( {1} =~ "" ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# f1 - @{BC%kolor_info}%{f1} %;\
|
||||
/echo -p #@{C%c_info}#@{n}# f1 - @{C%c_info}%{f1} %;\
|
||||
/elseif ( {1} =~ "empty" ) \
|
||||
/def key_f1 = /echo -p #@{BC%kolor_info}#@{n}# Not set. %;\
|
||||
/def key_f1 = /echo -p #@{C%c_info}#@{n}# Not set. %;\
|
||||
/set f1 empty %;\
|
||||
/else \
|
||||
/def key_f1 = %{*} %;\
|
||||
|
@ -33,9 +33,9 @@
|
|||
|
||||
/def f2 = \
|
||||
/if ( {1} =~ "" ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# f2 - @{BC%kolor_info}%{f2} %;\
|
||||
/echo -p #@{C%c_info}#@{n}# f2 - @{C%c_info}%{f2} %;\
|
||||
/elseif ( {1} =~ "empty" ) \
|
||||
/def key_f2 = /echo -p #@{BC%kolor_info}#@{n}# Not set. %;\
|
||||
/def key_f2 = /echo -p #@{C%c_info}#@{n}# Not set. %;\
|
||||
/set f2 empty %;\
|
||||
/else \
|
||||
/def key_f2 = %{*} %;\
|
||||
|
@ -44,9 +44,9 @@
|
|||
|
||||
/def f3 = \
|
||||
/if ( {1} =~ "" ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# f3 - @{BC%kolor_info}%{f3} %;\
|
||||
/echo -p #@{C%c_info}#@{n}# f3 - @{C%c_info}%{f3} %;\
|
||||
/elseif ( {1} =~ "empty" ) \
|
||||
/def key_f3 = /echo -p #@{BC%kolor_info}#@{n}# Not set. %;\
|
||||
/def key_f3 = /echo -p #@{C%c_info}#@{n}# Not set. %;\
|
||||
/set f3 empty %;\
|
||||
/else \
|
||||
/def key_f3 = %{*} %;\
|
||||
|
@ -55,9 +55,9 @@
|
|||
|
||||
/def f4 = \
|
||||
/if ( {1} =~ "" ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# f4 - @{BC%kolor_info}%{f4} %;\
|
||||
/echo -p #@{C%c_info}#@{n}# f4 - @{C%c_info}%{f4} %;\
|
||||
/elseif ( {1} =~ "empty" ) \
|
||||
/def key_f4 = /echo -p #@{BC%kolor_info}#@{n}# Not hunting anyone. %;\
|
||||
/def key_f4 = /echo -p #@{C%c_info}#@{n}# Not hunting anyone. %;\
|
||||
/set f4 empty %;\
|
||||
/else \
|
||||
/def key_f4 = %{*} %;\
|
||||
|
@ -66,9 +66,9 @@
|
|||
|
||||
/def f5 = \
|
||||
/if ( {1} =~ "" ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# f5 - @{BC%kolor_info}%{f5} %;\
|
||||
/echo -p #@{C%c_info}#@{n}# f5 - @{C%c_info}%{f5} %;\
|
||||
/elseif ( {1} =~ "empty" ) \
|
||||
/def key_f5 = /echo -p #@{BC%kolor_info}#@{n}# Not set. %;\
|
||||
/def key_f5 = /echo -p #@{C%c_info}#@{n}# Not set. %;\
|
||||
/set f5 empty %;\
|
||||
/else \
|
||||
/def key_f5 = %{*} %;\
|
||||
|
@ -77,9 +77,9 @@
|
|||
|
||||
/def f6 = \
|
||||
/if ( {1} =~ "" ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# f6 - @{BC%kolor_info}%{f6} %;\
|
||||
/echo -p #@{C%c_info}#@{n}# f6 - @{C%c_info}%{f6} %;\
|
||||
/elseif ( {1} =~ "empty" ) \
|
||||
/def key_f6 = /echo -p #@{BC%kolor_info}#@{n}# Not set. %;\
|
||||
/def key_f6 = /echo -p #@{C%c_info}#@{n}# Not set. %;\
|
||||
/set f6 empty %;\
|
||||
/else \
|
||||
/def key_f6 = %{*} %;\
|
||||
|
@ -88,9 +88,9 @@
|
|||
|
||||
/def f7 = \
|
||||
/if ( {1} =~ "" ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# f7 - @{BC%kolor_info}%{f7} %;\
|
||||
/echo -p #@{C%c_info}#@{n}# f7 - @{C%c_info}%{f7} %;\
|
||||
/elseif ( {1} =~ "empty" ) \
|
||||
/def key_f7 = /echo -p #@{BC%kolor_info}#@{n}# Not set. %;\
|
||||
/def key_f7 = /echo -p #@{C%c_info}#@{n}# Not set. %;\
|
||||
/set f7 empty %;\
|
||||
/else \
|
||||
/def key_f7 = %{*} %;\
|
||||
|
@ -99,9 +99,9 @@
|
|||
|
||||
/def f8 = \
|
||||
/if ( {1} =~ "" ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# f8 - @{BC%kolor_info}%{f8} %;\
|
||||
/echo -p #@{C%c_info}#@{n}# f8 - @{C%c_info}%{f8} %;\
|
||||
/elseif ( {1} =~ "empty" ) \
|
||||
/def key_f8 = /echo -p #@{BC%kolor_info}#@{n}# Not set. %;\
|
||||
/def key_f8 = /echo -p #@{C%c_info}#@{n}# Not set. %;\
|
||||
/set f8 empty %;\
|
||||
/else \
|
||||
/def key_f8 = %{*} %;\
|
||||
|
@ -109,12 +109,12 @@
|
|||
/endif
|
||||
|
||||
/def bs = \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------ %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# f2 - @{BC%kolor_info}%{f2}@{n} %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# f3 - @{BC%kolor_info}%{f3}@{n} %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# f4 - @{BC%kolor_info}%{f4}@{n} %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------ %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# f5 - @{BC%kolor_info}%{f5} %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# f6 - @{BC%kolor_info}%{f6} %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# f7 - @{BC%kolor_info}%{f7} %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# f8 - @{BC%kolor_info}%{f8}
|
||||
/echo -p #@{C%c_info}#@{n}# ------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# f2 - @{C%c_info}%{f2}@{n} %;\
|
||||
/echo -p #@{C%c_info}#@{n}# f3 - @{C%c_info}%{f3}@{n} %;\
|
||||
/echo -p #@{C%c_info}#@{n}# f4 - @{C%c_info}%{f4}@{n} %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# f5 - @{C%c_info}%{f5} %;\
|
||||
/echo -p #@{C%c_info}#@{n}# f6 - @{C%c_info}%{f6} %;\
|
||||
/echo -p #@{C%c_info}#@{n}# f7 - @{C%c_info}%{f7} %;\
|
||||
/echo -p #@{C%c_info}#@{n}# f8 - @{C%c_info}%{f8}
|
||||
|
|
45
common/colorscheme.tf
Normal file
45
common/colorscheme.tf
Normal file
|
@ -0,0 +1,45 @@
|
|||
/def _colorscheme_load = \
|
||||
/if ( {colorscheme} =~ "solarized-dark" )\
|
||||
/set kecho_attr=Crgb030 %;\
|
||||
/set c_bold=white %;\
|
||||
/set c_main=rgb030 %;\
|
||||
/set c_main_bold=rgb050 %;\
|
||||
/set c_crit=rgb300 %;\
|
||||
/set c_crit_bold=rgb500 %;\
|
||||
/set c_spec=magenta %;\
|
||||
/set c_spec_bold=rgb405 %;\
|
||||
/set c_speak=cyan %;\
|
||||
/set c_speak_bold=rgb133 %;\
|
||||
/set c_alarm=rgb550 %;\
|
||||
/set c_fightme=rgb530 %;\
|
||||
/set c_info=magenta %;\
|
||||
/set c_glow=rgb405 %;\
|
||||
/set c_guild=white %;\
|
||||
/else \
|
||||
/set kecho_attr=Cgreen %;\
|
||||
/set c_bold=brightwhite %;\
|
||||
/set c_main=green %;\
|
||||
/set c_main_bold=brightgreen %;\
|
||||
/set c_crit=red %;\
|
||||
/set c_crit_bold=brightred %;\
|
||||
/set c_spec=magenta %;\
|
||||
/set c_spec_bold=brightmagenta %;\
|
||||
/set c_speak=cyan %;\
|
||||
/set c_speak_bold=brightcyan %;\
|
||||
/set c_alarm=brightyellow %;\
|
||||
/set c_fightme=rgb530 %;\
|
||||
/set c_info=magenta %;\
|
||||
/set c_glow=brightmagenta %;\
|
||||
/set c_guild=white %;\
|
||||
/endif
|
||||
|
||||
/_colorscheme_load
|
||||
|
||||
/eval /set zc_bold=C%c_bold
|
||||
/eval /set zc_main=C%c_main
|
||||
/eval /set zc_main_bold=C%c_main_bold
|
||||
/eval /set zc_main_background=Cbg%c_main
|
||||
/eval /set zc_alarm=C%c_alarm
|
||||
/eval /set zc_alarm_background=Cbg%c_alarm_bold
|
||||
/eval /set zc_crit=C%c_crit_bold
|
||||
/eval /set zc_crit_background=Cbg%c_crit_bold
|
|
@ -14,9 +14,9 @@
|
|||
/set celu %{*} %;\
|
||||
/endif %;\
|
||||
/endif %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# 1st: @{BC%kolor_info}%cel@{n} (lamanie @{BC%kolor_info}%celu@{n})%;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# 2nd: @{BC%kolor_info}%cel2@{n} (lamanie @{BC%kolor_info}%cel2u@{n})%;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Typ: @{BC%kolor_info}%opis_ataku@{n}
|
||||
/echo -p #@{C%c_info}#@{n}# 1st: @{C%c_info}%cel@{n} (lamanie @{C%c_info}%celu@{n})%;\
|
||||
/echo -p #@{C%c_info}#@{n}# 2nd: @{C%c_info}%cel2@{n} (lamanie @{C%c_info}%cel2u@{n})%;\
|
||||
/echo -p #@{C%c_info}#@{n}# Typ: @{C%c_info}%opis_ataku@{n}
|
||||
|
||||
/def cel2 = \
|
||||
/if ( {*} !~ NULL )\
|
||||
|
@ -29,9 +29,9 @@
|
|||
/set cel2u %{*} %;\
|
||||
/endif %;\
|
||||
/endif %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# 1st: @{BC%kolor_info}%cel@{n} (lamanie @{BC%kolor_info}%celu@{n})%;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# 2nd: @{BC%kolor_info}%cel2@{n} (lamanie @{BC%kolor_info}%cel2u@{n})%;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Typ: @{BC%kolor_info}%opis_ataku@{n}
|
||||
/echo -p #@{C%c_info}#@{n}# 1st: @{C%c_info}%cel@{n} (lamanie @{C%c_info}%celu@{n})%;\
|
||||
/echo -p #@{C%c_info}#@{n}# 2nd: @{C%c_info}%cel2@{n} (lamanie @{C%c_info}%cel2u@{n})%;\
|
||||
/echo -p #@{C%c_info}#@{n}# Typ: @{C%c_info}%opis_ataku@{n}
|
||||
|
||||
/def am = \
|
||||
/if ( {1} =~ "1" ) \
|
||||
|
@ -53,16 +53,16 @@
|
|||
/set attackmode=6 %;\
|
||||
/set opis_ataku lamanie - atak - przedstawienie - wskazanie - rozkaz %;\
|
||||
/elseif ( {1} =~ "help" )\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# --------------------------------------------------------@{n} %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# 1: atak @{n} %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# 2: wskazanie - atak @{n} %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# 3: atak - wskazanie - rozkaz @{n} %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# 4: lamanie - atak - wskazanie - rozkaz @{n} %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# 5: atak - przedstawienie - wskazanie - rozkaz @{n} %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# 6: lamanie - atak - przedstawienie - wskazanie - rozkaz@{n} %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# --------------------------------------------------------@{n} %;\
|
||||
/echo -p #@{C%c_info}#@{n}# --------------------------------------------------------@{n} %;\
|
||||
/echo -p #@{C%c_info}#@{n}# 1: atak @{n} %;\
|
||||
/echo -p #@{C%c_info}#@{n}# 2: wskazanie - atak @{n} %;\
|
||||
/echo -p #@{C%c_info}#@{n}# 3: atak - wskazanie - rozkaz @{n} %;\
|
||||
/echo -p #@{C%c_info}#@{n}# 4: lamanie - atak - wskazanie - rozkaz @{n} %;\
|
||||
/echo -p #@{C%c_info}#@{n}# 5: atak - przedstawienie - wskazanie - rozkaz @{n} %;\
|
||||
/echo -p #@{C%c_info}#@{n}# 6: lamanie - atak - przedstawienie - wskazanie - rozkaz@{n} %;\
|
||||
/echo -p #@{C%c_info}#@{n}# --------------------------------------------------------@{n} %;\
|
||||
/else \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Typ ataku: @{BC%kolor_info}%opis_ataku@{n} %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Typ ataku: @{C%c_info}%opis_ataku@{n} %;\
|
||||
/endif
|
||||
|
||||
/alias x \
|
||||
|
@ -117,7 +117,7 @@
|
|||
/def -mregexp -Fp2 -t'.* wydaje ci rozkaz ataku na (.*).' _order_atak = \
|
||||
/set atakowany=$[tolower({P1})] %;\
|
||||
/echo %;\
|
||||
/echo -p @{BC%kolor_atak}>>> ROZKAZ ATAKU NA @{n}%atakowany@{BC%kolor_atak} <<<@{n} %;\
|
||||
/echo -p @{C%c_crit_bold}>>> ROZKAZ ATAKU NA @{n}%atakowany@{C%c_crit_bold} <<<@{n} %;\
|
||||
/echo %;\
|
||||
/set rozkaz_ataku=%{atakowany} %;\
|
||||
/def -b'[' _atakporozkazie = zabij %atakowany %%; /set rozkaz_ataku= %;\
|
||||
|
@ -125,7 +125,7 @@
|
|||
|
||||
/def -mregexp -Fp2 -t'(.*) wydaje .*rozkaz zasloniecia (.*).' _order_zaslona = \
|
||||
/echo %;\
|
||||
/echo -p @{BC%kolor_atak}>>> @{n}%P1@{BC%kolor_atak} chce zasloniecia @{n}%P2@{BC%kolor_atak} <<< %;\
|
||||
/echo -p @{C%c_crit_bold}>>> @{n}%P1@{C%c_crit_bold} chce zasloniecia @{n}%P2@{C%c_crit_bold} <<< %;\
|
||||
/echo
|
||||
|
||||
/def -mregexp -Fp2 -t'Atakujesz' atakujesz = /beep 1 %; /sneak off
|
||||
|
|
|
@ -2,7 +2,7 @@
|
|||
|
||||
/def -Fp2 -mregexp -t'Zabil.s ' _zabiles_cosik_licz = %;\
|
||||
/_dodaj_do_zabitych %{PR}%;\
|
||||
/substitute -p @{BC%kolor_crit}%{PL}%{P0}%{PR} (%{ownkills}/%{allkills})@{n}
|
||||
/substitute -p @{C%c_crit_bold}%{PL}%{P0}%{PR} (%{ownkills}/%{allkills})@{n}
|
||||
|
||||
/def -Fp2 -mregexp -t'( | \\(.*\\) )zabil.' _ktos_zabil_cosik_licz = \
|
||||
/_dodaj_do_kto_zabil %{PL} %;\
|
||||
|
@ -58,7 +58,7 @@
|
|||
/let linia1=$[strrep("-------------------------+",po_ile-1)] %;\
|
||||
/let linia= %;\
|
||||
/let cc=0 %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# +%{linia1}-------------------------+%;\
|
||||
/echo -p #@{C%c_info}#@{n}# +%{linia1}-------------------------+%;\
|
||||
/let zabici_lista=$(/listvar -s -mglob allkilled_*) %;\
|
||||
/let zabici_lista=$[strcat(zabici_lista," end")] %;\
|
||||
/while /let i=$[strstr(zabici_lista," ")]%; /@test i > 0%; /do \
|
||||
|
@ -71,20 +71,20 @@
|
|||
/test ++cc %;\
|
||||
/let zabici_lista=$[substr(zabici_lista,i+1)] %;\
|
||||
/else \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# %{linia}| @{n}%;\
|
||||
/echo -p #@{C%c_info}#@{n}# %{linia}| @{n}%;\
|
||||
/let cc=0 %;\
|
||||
/let linia= %;\
|
||||
/endif %;\
|
||||
/done %;\
|
||||
/if (cc>0) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# $[strcat(linia,strrep("| : ( )",po_ile-cc),"|")] @{n}%;\
|
||||
/echo -p #@{C%c_info}#@{n}# $[strcat(linia,strrep("| : ( )",po_ile-cc),"|")] @{n}%;\
|
||||
/endif %;\
|
||||
/let linia=$[strcat("(@{BCmagenta} ",pad(ownkills,6),"@{n} |")] %;\
|
||||
/let linia=$[strcat(" ", pad(ownkills,6),"@{n} |")] %;\
|
||||
/if (wrapsize > {po_ile}*27+6) \
|
||||
/let linia=$[strcat(linia,"@{n}")] %;\
|
||||
/let linia=$[strcat(linia,"@{n}")] %;\
|
||||
/endif %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# +%{linia1}----- W sumie: %{linia} %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# +%{linia1}-------------------------+%;\
|
||||
/echo -p #@{C%c_info}#@{n}# +%{linia1}----- W sumie: %{linia} %;\
|
||||
/echo -p #@{C%c_info}#@{n}# +%{linia1}-------------------------+%;\
|
||||
/let linia= %;\
|
||||
/let cc=0 %;\
|
||||
/let zabici_lista=$(/listvar -s -mglob killer_*) %;\
|
||||
|
@ -98,17 +98,17 @@
|
|||
/test ++cc %;\
|
||||
/let zabici_lista=$[substr(zabici_lista,i+1)] %;\
|
||||
/else \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# %{linia}| @{n}%;\
|
||||
/echo -p #@{C%c_info}#@{n}# %{linia}| @{n}%;\
|
||||
/let cc=0 %;\
|
||||
/let linia= %;\
|
||||
/endif %;\
|
||||
/done %;\
|
||||
/if (cc>0) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# $[strcat(linia,strrep("| : ( )",po_ile-cc),"|")] @{n}%;\
|
||||
/echo -p #@{C%c_info}#@{n}# $[strcat(linia,strrep("| : ( )",po_ile-cc),"|")] @{n}%;\
|
||||
/endif %;\
|
||||
/let linia=$[strcat("(@{BCmagenta} ",pad(allkills,6),"@{n} |")] %;\
|
||||
/let linia=$[strcat(" ",pad(allkills,6),"@{n} |")] %;\
|
||||
/if (wrapsize > {po_ile}*27+6) \
|
||||
/let linia=$[strcat(linia," @{n}")] %;\
|
||||
/endif %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# +%{linia1}----- W sumie: %{linia} %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# +%{linia1}-------------------------+@{n}
|
||||
/echo -p #@{C%c_info}#@{n}# +%{linia1}----- W sumie: %{linia} %;\
|
||||
/echo -p #@{C%c_info}#@{n}# +%{linia1}-------------------------+@{n}
|
||||
|
|
136
common/hunt.tf
136
common/hunt.tf
|
@ -1,7 +1,7 @@
|
|||
/def -mregexp -Fp2 -t'(.*) uciekl(|a) ci.' ktos_mi_uciekl = \
|
||||
/set kto_uciekl=%{P1} %;\
|
||||
/_pokaz_ucieczke %P1 %;\
|
||||
/return substitute(decode_attr("@{BCbg%kolor_main}UCIECZKA ---> %P1 <--- UCIECZKA"))
|
||||
/return substitute(decode_attr(decode_attr("UCIECZKA ---> %P1 <--- UCIECZKA", {zc_bold}), {zc_main_background}))
|
||||
|
||||
/def _pokaz_ucieczke = \
|
||||
/runne %{*} %;\
|
||||
|
@ -20,124 +20,124 @@
|
|||
%{*} %;\
|
||||
/f4 empty
|
||||
|
||||
/def runne = /def -mglob -aBC%kolor_alarm -Fp2 -t"*%{kto_uciekl} * na polnocny-wschod." runne2 = \
|
||||
/def runne = /def -mglob -aC%c_alarm -Fp2 -t"*%{kto_uciekl} * na polnocny-wschod." runne2 = \
|
||||
/echo %%;\
|
||||
/test echo(decode_attr(" # # # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # # @{BCwhite}%{kto_uciekl} F4"), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # # # "), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # # @{c_bold}%{kto_uciekl} F4"), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # # "), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # "), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # "), {zc_alarm}) %%;\
|
||||
/echo %%;\
|
||||
/beep 1 %%;\
|
||||
/f4 /dobind_war ne
|
||||
|
||||
/def runnw = /def -mglob -aBC%kolor_alarm -Fp2 -t"*%{kto_uciekl} * na polnocny-zachod." runnw2 = \
|
||||
/def runnw = /def -mglob -aC%c_alarm -Fp2 -t"*%{kto_uciekl} * na polnocny-zachod." runnw2 = \
|
||||
/echo %%;\
|
||||
/test echo(decode_attr(" # # # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # # @{BCwhite}%{kto_uciekl} F4"), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # # # "), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # # @{c_bold}%{kto_uciekl} F4"), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # # "), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # "), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # "), {zc_alarm}) %%;\
|
||||
/echo %%;\
|
||||
/beep 1 %%;\
|
||||
/f4 /dobind_war nw
|
||||
|
||||
/def runse = /def -mglob -aBC%kolor_alarm -Fp2 -t"*%{kto_uciekl} * na poludniowy-wschod." runse2 = \
|
||||
/def runse = /def -mglob -aC%c_alarm -Fp2 -t"*%{kto_uciekl} * na poludniowy-wschod." runse2 = \
|
||||
/echo %%;\
|
||||
/test echo(decode_attr(" # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # @{BCwhite}%{kto_uciekl} F4"), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # # # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # "), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # @{c_bold}%{kto_uciekl} F4"), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # # "), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # # "), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # # # "), {zc_alarm}) %%;\
|
||||
/echo %%;\
|
||||
/beep 1 %%;\
|
||||
/f4 /dobind_war se
|
||||
|
||||
/def runsw = /def -mglob -aBC%kolor_alarm -Fp2 -t"*%{kto_uciekl} * na poludniowy-zachod." runsw2 = \
|
||||
/def runsw = /def -mglob -aC%c_alarm -Fp2 -t"*%{kto_uciekl} * na poludniowy-zachod." runsw2 = \
|
||||
/echo %%;\
|
||||
/test echo(decode_attr(" # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # @{BCwhite}%{kto_uciekl} F4"), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # # # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # "), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # @{c_bold}%{kto_uciekl} F4"), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # # "), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # # "), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # # # "), {zc_alarm}) %%;\
|
||||
/echo %%;\
|
||||
/beep 1 %%;\
|
||||
/f4 /dobind_war sw
|
||||
|
||||
/def rune = /def -mglob -aBC%kolor_alarm -Fp2 -t"*%{kto_uciekl} * na wschod." rune2 = \
|
||||
/def rune = /def -mglob -aC%c_alarm -Fp2 -t"*%{kto_uciekl} * na wschod." rune2 = \
|
||||
/echo %%;\
|
||||
/test echo(decode_attr(" # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # @{BCwhite}%{kto_uciekl} F4"), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" ######### "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # "), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # @{c_bold}%{kto_uciekl} F4"), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" ######### "), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # "), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # "), {zc_alarm}) %%;\
|
||||
/echo %%;\
|
||||
/beep 1 %%;\
|
||||
/f4 /dobind_war e
|
||||
|
||||
/def runw = /def -mglob -aBC%kolor_alarm -Fp2 -t"*%{kto_uciekl} * na zachod." runw2 = \
|
||||
/def runw = /def -mglob -aC%c_alarm -Fp2 -t"*%{kto_uciekl} * na zachod." runw2 = \
|
||||
/echo %%;\
|
||||
/test echo(decode_attr(" # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # @{BCwhite}%{kto_uciekl} F4"), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" ########## "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # "), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # @{c_bold}%{kto_uciekl} F4"), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" ########## "), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # "), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # "), {zc_alarm}) %%;\
|
||||
/echo %%;\
|
||||
/beep 1 %%;\
|
||||
/f4 /dobind_war w
|
||||
|
||||
/def runn = /def -mglob -aBC%kolor_alarm -Fp2 -t"*%{kto_uciekl} * na polnoc." runn2 = \
|
||||
/def runn = /def -mglob -aC%c_alarm -Fp2 -t"*%{kto_uciekl} * na polnoc." runn2 = \
|
||||
/echo %%;\
|
||||
/test echo(decode_attr(" # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" ### @{BCwhite}%{kto_uciekl} F4"), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # # # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # "), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" ### @{c_bold}%{kto_uciekl} F4"), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # # # "), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # "), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # "), {zc_alarm}) %%;\
|
||||
/echo %%;\
|
||||
/beep 1 %%;\
|
||||
/f4 /dobind_war n
|
||||
|
||||
/def runs = /def -mglob -aBC%kolor_alarm -Fp2 -t"*%{kto_uciekl} * na poludnie." runs2 = \
|
||||
/def runs = /def -mglob -aC%c_alarm -Fp2 -t"*%{kto_uciekl} * na poludnie." runs2 = \
|
||||
/echo %%;\
|
||||
/test echo(decode_attr(" # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # @{BCwhite}%{kto_uciekl} F4"), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # # # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" ### "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # "), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # @{c_bold}%{kto_uciekl} F4"), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # # # "), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" ### "), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # "), {zc_alarm}) %%;\
|
||||
/echo %%;\
|
||||
/beep 1 %%;\
|
||||
/f4 /dobind_war s
|
||||
|
||||
/def runu = /def -mglob -aBC%kolor_alarm -Fp2 -t"*%{kto_uciekl} * na gore." runu2 = \
|
||||
/def runu = /def -mglob -aC%c_alarm -Fp2 -t"*%{kto_uciekl} * na gore." runu2 = \
|
||||
/echo %%;\
|
||||
/test echo(decode_attr(" # # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # # @{BCwhite}%{kto_uciekl} F4"), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" #### "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # # "), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # # @{c_bold}%{kto_uciekl} F4"), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # # "), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # # "), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" #### "), {zc_alarm}) %%;\
|
||||
/echo %%;\
|
||||
/beep 1 %%;\
|
||||
/f4 /dobind_war u
|
||||
|
||||
/def rund = /def -mglob -aBC%kolor_alarm -Fp2 -t"*%{kto_uciekl} * na dol." rund2 = \
|
||||
/def rund = /def -mglob -aC%c_alarm -Fp2 -t"*%{kto_uciekl} * na dol." rund2 = \
|
||||
/echo %%;\
|
||||
/test echo(decode_attr(" ##### "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # # @{BCwhite}%{kto_uciekl} F4"), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" ##### "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" ##### "), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # # "), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # # @{c_bold}%{kto_uciekl} F4"), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # # "), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # # "), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" ##### "), {zc_alarm}) %%;\
|
||||
/echo %%;\
|
||||
/beep 1 %%;\
|
||||
/f4 /dobind_war d
|
||||
|
||||
/def runx = /def -mglob -aBC%kolor_alarm -Fp2 -t"*%{kto_uciekl} * do wyjscia." runx2 = \
|
||||
/def runx = /def -mglob -aC%c_alarm -Fp2 -t"*%{kto_uciekl} * do wyjscia." runx2 = \
|
||||
/echo %%;\
|
||||
/test echo(decode_attr(" # # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # # @{BCwhite}%{kto_uciekl} F4"), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # # "), "BC%kolor_alarm") %%;\
|
||||
/test echo(decode_attr(" # # "), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # # @{c_bold}%{kto_uciekl} F4"), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # "), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # # "), {zc_alarm}) %%;\
|
||||
/test echo(decode_attr(" # # "), {zc_alarm}) %%;\
|
||||
/echo %%;\
|
||||
/beep 1 %%;\
|
||||
/f4 /dobind_war wyjscie
|
||||
|
|
|
@ -6,3 +6,8 @@
|
|||
/f6 empty
|
||||
/f7 empty
|
||||
/f8 empty
|
||||
|
||||
;; kompatybilność wsteczna:
|
||||
/eval /set kolor_info=%c_info
|
||||
/eval /set obecnie_swiat=%mudworld
|
||||
/eval /set obecnie_expujacy=%player
|
||||
|
|
274
common/lists.tf
274
common/lists.tf
|
@ -1,7 +1,7 @@
|
|||
; originally by Kalreg, szydell
|
||||
|
||||
/eval /set rebinder_plik_wejscia %{priv_dir}/%{obecnie_swiat}/players/%{obecnie_expujacy}/lista.tf
|
||||
/eval /set rebinder_plik_wyjscia %{priv_dir}/%{obecnie_swiat}/players/%{obecnie_expujacy}/lista.tmp
|
||||
/eval /set rebinder_plik_wejscia %{priv_dir}/%{mudworld}/players/%{player}/lista.tf
|
||||
/eval /set rebinder_plik_wyjscia %{priv_dir}/%{mudworld}/players/%{player}/lista.tmp
|
||||
|
||||
/require textutil.tf
|
||||
/require lisp.tf
|
||||
|
@ -32,26 +32,26 @@
|
|||
|
||||
/def lists = \
|
||||
/if ( {1} =~ "help" | {1} =~ "pomoc" ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ---------- [ DODAWANIE ] ----------------------------------------------- %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# /dodaj liste <nazwa listy> <kolor> [kolor tla] %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# /dodaj <nazwa listy> <opis mianownik> [priorytet] %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ---------- [ USUWANIE ] ------------------------------------------------ %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# /usun liste <nazwa listy> %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# /usun <nazwa listy> <wpis> %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ---------- [ ZMIANA KOLOROW LISTY ] ------------------------------------ %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# /zmien <nazwa listy> <kolor> [kolor tla] %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ---------- [ WYSWIETLANIE ] -------------------------------------------- %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# /wyswietl listy %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# /wyswietl <nazwa_listy> %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ---------- [ DODAWANIE ] ----------------------------------------------- %;\
|
||||
/echo -p #@{C%c_info}#@{n}# %;\
|
||||
/echo -p #@{C%c_info}#@{n}# /dodaj liste <nazwa listy> <kolor> [kolor tla] %;\
|
||||
/echo -p #@{C%c_info}#@{n}# /dodaj <nazwa listy> <opis mianownik> [priorytet] %;\
|
||||
/echo -p #@{C%c_info}#@{n}# %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ---------- [ USUWANIE ] ------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# %;\
|
||||
/echo -p #@{C%c_info}#@{n}# /usun liste <nazwa listy> %;\
|
||||
/echo -p #@{C%c_info}#@{n}# /usun <nazwa listy> <wpis> %;\
|
||||
/echo -p #@{C%c_info}#@{n}# %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ---------- [ ZMIANA KOLOROW LISTY ] ------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# %;\
|
||||
/echo -p #@{C%c_info}#@{n}# /zmien <nazwa listy> <kolor> [kolor tla] %;\
|
||||
/echo -p #@{C%c_info}#@{n}# %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ---------- [ WYSWIETLANIE ] -------------------------------------------- %;\
|
||||
/echo -p #@{C%c_info}#@{n}# %;\
|
||||
/echo -p #@{C%c_info}#@{n}# /wyswietl listy %;\
|
||||
/echo -p #@{C%c_info}#@{n}# /wyswietl <nazwa_listy> %;\
|
||||
/echo -p #@{C%c_info}#@{n}# %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/else \
|
||||
/let REBINDER_AKTUALNY_Z_LISTY_LIST $[strcat(substr(rebinder_def_pomocniczy("LISTY"),1),":")]%;\
|
||||
/let i=1%;\
|
||||
|
@ -62,7 +62,7 @@
|
|||
/elseif ( {2} =~ "silent") \
|
||||
\
|
||||
/else \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/endif%;\
|
||||
/while ( strstr(REBINDER_AKTUALNY_Z_LISTY_LIST,":") != 0 ) \
|
||||
/let REBINDER_AKTUALNA_LISTA_LIST $[substr({REBINDER_AKTUALNY_Z_LISTY_LIST},0,strstr({REBINDER_AKTUALNY_Z_LISTY_LIST},"#"))]%;\
|
||||
|
@ -106,24 +106,24 @@
|
|||
/if ( strstr(REBINDER_KOLOR," ") == -1 ) \
|
||||
/if (regmatch("^b(.*)",REBINDER_KOLOR)) \
|
||||
/if ( {P1} =~ "lue" ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Lista "@{Cblue}$[toupper(REBINDER_AKTUALNA_LISTA_LIST)]@{n}" wgrana. Rekordy: @{B}$[--j]@{n} %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Lista "@{Cblue}$[toupper(REBINDER_AKTUALNA_LISTA_LIST)]@{n}" wgrana. Rekordy: @{B}$[--j]@{n} %;\
|
||||
/else \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Lista "@{BC%P1}$[toupper(REBINDER_AKTUALNA_LISTA_LIST)]@{n}" wgrana. Rekordy: @{B}$[--j]@{n} %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Lista "@{BC%P1}$[toupper(REBINDER_AKTUALNA_LISTA_LIST)]@{n}" wgrana. Rekordy: @{B}$[--j]@{n} %;\
|
||||
/endif %;\
|
||||
/else \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Lista "@{C%REBINDER_KOLOR}$[toupper(REBINDER_AKTUALNA_LISTA_LIST)]@{n}" wgrana. Rekordy: @{B}$[--j]@{n} %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Lista "@{C%REBINDER_KOLOR}$[toupper(REBINDER_AKTUALNA_LISTA_LIST)]@{n}" wgrana. Rekordy: @{B}$[--j]@{n} %;\
|
||||
/endif %;\
|
||||
/else \
|
||||
/let REBINDER_KOLOR_1 $[substr(REBINDER_KOLOR,0,strstr(REBINDER_KOLOR," "))]%;\
|
||||
/let REBINDER_KOLOR_2 $[substr(REBINDER_KOLOR,strstr(REBINDER_KOLOR," ")+1)]%;\
|
||||
/if (regmatch("^b(.*)",REBINDER_KOLOR_1)) \
|
||||
/if ({P1} =~ "lue" ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Lista "@{Cblue,Cbg%REBINDER_KOLOR_2}$[toupper(REBINDER_AKTUALNA_LISTA_LIST)]@{n}" wgrana. Rekordy: @{B}$[--j]@{n} %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Lista "@{Cblue,Cbg%REBINDER_KOLOR_2}$[toupper(REBINDER_AKTUALNA_LISTA_LIST)]@{n}" wgrana. Rekordy: @{B}$[--j]@{n} %;\
|
||||
/else \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Lista "@{BC%P1,Cbg%REBINDER_KOLOR_2}$[toupper(REBINDER_AKTUALNA_LISTA_LIST)]@{n}" wgrana. Rekordy: @{B}$[--j]@{n} %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Lista "@{BC%P1,Cbg%REBINDER_KOLOR_2}$[toupper(REBINDER_AKTUALNA_LISTA_LIST)]@{n}" wgrana. Rekordy: @{B}$[--j]@{n} %;\
|
||||
/endif %;\
|
||||
/else \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Lista "@{C%REBINDER_KOLOR_1,Cbg%REBINDER_KOLOR_2}$[toupper(REBINDER_AKTUALNA_LISTA_LIST)]@{n}" wgrana. Rekordy: @{B}$[--j]@{n} %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Lista "@{C%REBINDER_KOLOR_1,Cbg%REBINDER_KOLOR_2}$[toupper(REBINDER_AKTUALNA_LISTA_LIST)]@{n}" wgrana. Rekordy: @{B}$[--j]@{n} %;\
|
||||
/endif %;\
|
||||
/endif%;\
|
||||
/endif%;\
|
||||
|
@ -132,60 +132,60 @@
|
|||
/let i=$[++i]%;\
|
||||
/done%;\
|
||||
/if ( {*} =~ NULL ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Ilosc list: @{B}$[--i]@{n}, rekordow: @{B}$[--m]@{n} %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Ilosc list: @{B}$[--i]@{n}, rekordow: @{B}$[--m]@{n} %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/endif%;\
|
||||
/endif
|
||||
|
||||
/def dodaj = \
|
||||
/if ( %{*} =~ NULL ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Jaka liste badz osobe dodac? %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Jaka liste badz osobe dodac? %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/elseif ( %{1} =~ "liste" & %{2} =~ NULL ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Podaj nazwe listy, ktora chcesz dodac. %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Podaj nazwe listy, ktora chcesz dodac. %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/elseif ( {1} =~ "liste" & %{2} !~ NULL ) \
|
||||
/if ( strstr({REBINDER_LISTA_LISTY},{2}) > -1 ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Taka lista juz istnieje. %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Taka lista juz istnieje. %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/elseif ( strstr({REBINDER_LISTA_LISTY},{2}) == -1 & {3} =~ NULL ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Nie podano koloru dla tej listy. %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Nie podano koloru dla tej listy. %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/elseif ( strstr({REBINDER_LISTA_LISTY},{2}) == -1 & {3} !~ NULL ) \
|
||||
/if ( {4} =~ NULL ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/if (regmatch("^b(.*)",{3})) \
|
||||
/if ({P1} =~ "lue" ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Lista "@{Cblue}$[toupper({2})]@{n}" zostala dodana. %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Lista "@{Cblue}$[toupper({2})]@{n}" zostala dodana. %;\
|
||||
/else \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Lista "@{BC%P1}$[toupper({2})]@{n}" zostala dodana. %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Lista "@{BC%P1}$[toupper({2})]@{n}" zostala dodana. %;\
|
||||
/endif %;\
|
||||
/else \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Lista "@{C%{3}}$[toupper({2})]@{n}" zostala dodana. %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Lista "@{C%{3}}$[toupper({2})]@{n}" zostala dodana. %;\
|
||||
/endif %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/if ( strstr({REBINDER_LISTA_LISTY},"@") == -1 ) \
|
||||
/set REBINDER_LISTA_LISTY $[strcat("@",{REBINDER_LISTA_LISTY})]%;\
|
||||
/endif%;\
|
||||
/set REBINDER_LISTA_LISTY $[strcat({REBINDER_LISTA_LISTY},{2},"#",{3},"@")]%;\
|
||||
/rebinder_zapisz_liste LISTY%;\
|
||||
/else \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/if (regmatch("^b(.*)",{3})) \
|
||||
/if ({P1} =~ "lue" ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Lista "@{Cblue}@{Cbg%{4}}$[toupper({2})]@{n}" zostala dodana. %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Lista "@{Cblue}@{Cbg%{4}}$[toupper({2})]@{n}" zostala dodana. %;\
|
||||
/else \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Lista "@{BC%P1,Cbg%{4}}$[toupper({2})]@{n}" zostala dodana. %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Lista "@{BC%P1,Cbg%{4}}$[toupper({2})]@{n}" zostala dodana. %;\
|
||||
/endif %;\
|
||||
/else \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Lista "@{C%{3},Cbg%{4}}$[toupper({2})]@{n}" zostala dodana. %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Lista "@{C%{3},Cbg%{4}}$[toupper({2})]@{n}" zostala dodana. %;\
|
||||
/endif %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/if ( strstr({REBINDER_LISTA_LISTY},"@") == -1 ) \
|
||||
/set REBINDER_LISTA_LISTY $[strcat("@",{REBINDER_LISTA_LISTY})]%;\
|
||||
/endif%;\
|
||||
|
@ -194,22 +194,22 @@
|
|||
/endif%;\
|
||||
/endif%;\
|
||||
/elseif ( strstr({REBINDER_LISTA_LISTY},{1}) == -1 ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Taka lista nie istnieje. %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Taka lista nie istnieje. %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/elseif ( strstr({REBINDER_LISTA_LISTY},{1}) > -1 ) \
|
||||
/if ( strstr(rebinder_def_pomocniczy({1}),{-1}) > -1 ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Ta osoba jest juz w tej liscie. %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Ta osoba jest juz w tej liscie. %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/else \
|
||||
/if ( strstr(rebinder_def_pomocniczy({1}),"@") == -1 ) \
|
||||
/set REBINDER_LISTA_%1 $[strcat("@",rebinder_def_pomocniczy({1}))]%;\
|
||||
/endif%;\
|
||||
/set REBINDER_LISTA_%1 $[strcat(rebinder_def_pomocniczy({1}),{-1},"@")]%;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Dodaje $[toupper({-1})] do listy "$[toupper({1})]". %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Dodaje $[toupper({-1})] do listy "$[toupper({1})]". %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/rebinder_zapisz_liste $[tolower({1})]%;\
|
||||
/lists $[tolower({1})] silent%;\
|
||||
/endif %;\
|
||||
|
@ -217,17 +217,17 @@
|
|||
|
||||
/def zmien = \
|
||||
/if ( %{*} =~ NULL ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Podaj liste, ktorej kolor chcesz zmienic. %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Podaj liste, ktorej kolor chcesz zmienic. %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/elseif ( strstr({REBINDER_LISTA_LISTY},{1}) == -1 ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Taka lista nie istnieje. %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Taka lista nie istnieje. %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/elseif ( {2} =~ NULL ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Podaj przynajmniej jeden kolor, ktory chcesz zmienic w liscie. %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Podaj przynajmniej jeden kolor, ktory chcesz zmienic w liscie. %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/else \
|
||||
/let REBINDER_LEWO=$[substr(REBINDER_LISTA_LISTY,0,strstr(REBINDER_LISTA_LISTY,{1}))]%;\
|
||||
/let REBINDER_SRODEK=$[substr(REBINDER_LISTA_LISTY,strstr(REBINDER_LISTA_LISTY,{1}))]%;\
|
||||
|
@ -235,33 +235,33 @@
|
|||
/let REBINDER_SRODEK_1=$[substr(REBINDER_SRODEK,0,strstr(REBINDER_SRODEK,"#") + 1)]%;\
|
||||
/let REBINDER_SRODEK_2=$[substr(REBINDER_SRODEK,strstr(REBINDER_SRODEK,"#") + 1)]%;\
|
||||
/if ( {3} =~ NULL ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/if (regmatch("^b(.*)",{2})) \
|
||||
/if ({P1} =~ "lue" ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Zmieniono kolor listy "@{Cblue}$[toupper({1})]@{n}" %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Zmieniono kolor listy "@{Cblue}$[toupper({1})]@{n}" %;\
|
||||
/else \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Zmieniono kolor listy "@{BC%P1}$[toupper({1})]@{n}" %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Zmieniono kolor listy "@{BC%P1}$[toupper({1})]@{n}" %;\
|
||||
/endif %;\
|
||||
/else \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Zmieniono kolor listy "@{C%{2}}$[toupper({1})]@{n}" %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Zmieniono kolor listy "@{C%{2}}$[toupper({1})]@{n}" %;\
|
||||
/let REBINDER_KOLOR %{2}%;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/set REBINDER_LISTA_LISTY $[strcat(REBINDER_LEWO,REBINDER_SRODEK_1,REBINDER_KOLOR,REBINDER_PRAWO)]%;\
|
||||
/rebinder_zapisz_liste LISTY%;\
|
||||
/lists $[tolower({1})] silent%;\
|
||||
/endif %;\
|
||||
/else \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/if (regmatch("^b(.*)",{2})) \
|
||||
/if ({P1} =~ "lue" ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Zmieniono kolor listy "@{Cblue,Cbg%{3}}$[toupper({1})]@{n}" %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Zmieniono kolor listy "@{Cblue,Cbg%{3}}$[toupper({1})]@{n}" %;\
|
||||
/else \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Zmieniono kolor listy "@{BC%P1,Cbg%{3}}$[toupper({1})]@{n}" %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Zmieniono kolor listy "@{BC%P1,Cbg%{3}}$[toupper({1})]@{n}" %;\
|
||||
/endif %;\
|
||||
/else \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Zmieniono kolor listy "@{C%{2},Cbg%{3}}$[toupper({1})]@{n}" %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Zmieniono kolor listy "@{C%{2},Cbg%{3}}$[toupper({1})]@{n}" %;\
|
||||
/endif %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/let REBINDER_KOLOR %{2}#%{3}%;\
|
||||
/set REBINDER_LISTA_LISTY $[strcat(REBINDER_LEWO,REBINDER_SRODEK_1,REBINDER_KOLOR,REBINDER_PRAWO)]%;\
|
||||
/rebinder_zapisz_liste LISTY%;\
|
||||
|
@ -271,13 +271,13 @@
|
|||
|
||||
/def wyswietl = \
|
||||
/if ( {*} =~ NULL ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Podaj liste, ktora chcesz przejrzec. %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Podaj liste, ktora chcesz przejrzec. %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/elseif ( {1} =~ "listy" ) \
|
||||
/let REBINDER_AKTUALNY_Z_LISTY_LIST $[strcat(substr(rebinder_def_pomocniczy("LISTY"),1),":")]%;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# -- [ ZALOZONE LISTY ] -------------------------------------------------- %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# %;\
|
||||
/echo -p #@{C%c_info}#@{n}# -- [ ZALOZONE LISTY ] -------------------------------------------------- %;\
|
||||
/echo -p #@{C%c_info}#@{n}# %;\
|
||||
/let i=1%;\
|
||||
/while ( strstr(REBINDER_AKTUALNY_Z_LISTY_LIST,":") != 0 ) \
|
||||
/let REBINDER_AKTUALNA_LISTA_LIST $[substr({REBINDER_AKTUALNY_Z_LISTY_LIST},0,strstr({REBINDER_AKTUALNY_Z_LISTY_LIST},"#"))]%;\
|
||||
|
@ -285,88 +285,88 @@
|
|||
/if ( strstr(REBINDER_KOLOR," ") == -1 ) \
|
||||
/if (regmatch("^b(.*)",REBINDER_KOLOR)) \
|
||||
/if ( {P1} =~ "lue" ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# [ %i $[strrep(".",60 - strlen({i}) - strlen(REBINDER_AKTUALNA_LISTA_LIST))] @{Cblue}$[toupper(REBINDER_AKTUALNA_LISTA_LIST)]@{n} ]@{n} %;\
|
||||
/echo -p #@{C%c_info}#@{n}# [ %i $[strrep(".",60 - strlen({i}) - strlen(REBINDER_AKTUALNA_LISTA_LIST))] @{Cblue}$[toupper(REBINDER_AKTUALNA_LISTA_LIST)]@{n} ]@{n} %;\
|
||||
/else \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# [ %i $[strrep(".",60 - strlen({i}) - strlen(REBINDER_AKTUALNA_LISTA_LIST))] @{BC%P1}$[toupper(REBINDER_AKTUALNA_LISTA_LIST)]@{n} ]@{n} %;\
|
||||
/echo -p #@{C%c_info}#@{n}# [ %i $[strrep(".",60 - strlen({i}) - strlen(REBINDER_AKTUALNA_LISTA_LIST))] @{BC%P1}$[toupper(REBINDER_AKTUALNA_LISTA_LIST)]@{n} ]@{n} %;\
|
||||
/endif %;\
|
||||
/else \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# [ %i $[strrep(".",60 - strlen({i}) - strlen(REBINDER_AKTUALNA_LISTA_LIST))] @{C%{REBINDER_KOLOR}}$[toupper(REBINDER_AKTUALNA_LISTA_LIST)]@{n} ]@{n}%;\
|
||||
/echo -p #@{C%c_info}#@{n}# [ %i $[strrep(".",60 - strlen({i}) - strlen(REBINDER_AKTUALNA_LISTA_LIST))] @{C%{REBINDER_KOLOR}}$[toupper(REBINDER_AKTUALNA_LISTA_LIST)]@{n} ]@{n}%;\
|
||||
/endif %;\
|
||||
/else \
|
||||
/let REBINDER_KOLOR_1 $[substr(REBINDER_KOLOR,0,strstr(REBINDER_KOLOR," "))]%;\
|
||||
/let REBINDER_KOLOR_2 $[substr(REBINDER_KOLOR,strstr(REBINDER_KOLOR," ")+1)]%;\
|
||||
/if (regmatch("^b(.*)",REBINDER_KOLOR_1)) \
|
||||
/if ( {P1} =~ "lue" ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# [ %i $[strrep(".",60 - strlen({i}) - strlen(REBINDER_AKTUALNA_LISTA_LIST))] @{Cblue,Cbg%{REBINDER_KOLOR_2}}$[toupper(REBINDER_AKTUALNA_LISTA_LIST)]@{n} ]@{n}%;\
|
||||
/echo -p #@{C%c_info}#@{n}# [ %i $[strrep(".",60 - strlen({i}) - strlen(REBINDER_AKTUALNA_LISTA_LIST))] @{Cblue,Cbg%{REBINDER_KOLOR_2}}$[toupper(REBINDER_AKTUALNA_LISTA_LIST)]@{n} ]@{n}%;\
|
||||
/else \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# [ %i $[strrep(".",60 - strlen({i}) - strlen(REBINDER_AKTUALNA_LISTA_LIST))] @{BC%P1,Cbg%{REBINDER_KOLOR_2}}$[toupper(REBINDER_AKTUALNA_LISTA_LIST)]@{n} ]@{n}%;\
|
||||
/echo -p #@{C%c_info}#@{n}# [ %i $[strrep(".",60 - strlen({i}) - strlen(REBINDER_AKTUALNA_LISTA_LIST))] @{BC%P1,Cbg%{REBINDER_KOLOR_2}}$[toupper(REBINDER_AKTUALNA_LISTA_LIST)]@{n} ]@{n}%;\
|
||||
/endif %;\
|
||||
/else \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# [ %i $[strrep(".",60 - strlen({i}) - strlen(REBINDER_AKTUALNA_LISTA_LIST))] @{C%{REBINDER_KOLOR_1}}@{Cbg%{REBINDER_KOLOR_2}}$[toupper(REBINDER_AKTUALNA_LISTA_LIST)]@{n} ]@{n}%;\
|
||||
/echo -p #@{C%c_info}#@{n}# [ %i $[strrep(".",60 - strlen({i}) - strlen(REBINDER_AKTUALNA_LISTA_LIST))] @{C%{REBINDER_KOLOR_1}}@{Cbg%{REBINDER_KOLOR_2}}$[toupper(REBINDER_AKTUALNA_LISTA_LIST)]@{n} ]@{n}%;\
|
||||
/endif %;\
|
||||
/endif%;\
|
||||
/let REBINDER_AKTUALNY_Z_LISTY $[strcat(substr(rebinder_def_pomocniczy({REBINDER_AKTUALNA_LISTA_LIST}),1),":")]%;\
|
||||
/let REBINDER_AKTUALNY_Z_LISTY_LIST $[substr(REBINDER_AKTUALNY_Z_LISTY_LIST,strstr(REBINDER_AKTUALNY_Z_LISTY_LIST,"@") +1)]%;\
|
||||
/let i=$[++i]%;\
|
||||
/done%;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# $[strrep("-",50 - strlen({i}))] [ Lacznie list: @{BC%kolor_info}$[--i]@{n} ] -- %;\
|
||||
/echo -p #@{C%c_info}#@{n}# %;\
|
||||
/echo -p #@{C%c_info}#@{n}# $[strrep("-",50 - strlen({i}))] [ Lacznie list: @{C%c_info}$[--i]@{n} ] -- %;\
|
||||
/elseif ( strstr({REBINDER_LISTA_LISTY},{1}) == -1 ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Taka lista nie istnieje. %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Taka lista nie istnieje. %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/else \
|
||||
/let REBINDER_KOLOR $[pobierz_kolor_z_listy({1})]%;\
|
||||
/if ( strstr(REBINDER_KOLOR," ") == -1 ) \
|
||||
/if (regmatch("^b(.*)",REBINDER_KOLOR)) \
|
||||
/if ( {P1} =~ "lue" ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# -- [ OSOBY Z LISTY @{Cblue}$[toupper({1})]@{n} @{n}] $[strrep("-",50 - strlen({1}))] %;\
|
||||
/echo -p #@{C%c_info}#@{n}# -- [ OSOBY Z LISTY @{Cblue}$[toupper({1})]@{n} @{n}] $[strrep("-",50 - strlen({1}))] %;\
|
||||
/else \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# -- [ OSOBY Z LISTY @{BC%P1}$[toupper({1})]@{n} @{n}] $[strrep("-",50 - strlen({1}))] %;\
|
||||
/echo -p #@{C%c_info}#@{n}# -- [ OSOBY Z LISTY @{BC%P1}$[toupper({1})]@{n} @{n}] $[strrep("-",50 - strlen({1}))] %;\
|
||||
/endif %;\
|
||||
/else \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# -- [ OSOBY Z LISTY @{C%REBINDER_KOLOR}$[toupper({1})]@{n}] $[strrep("-",50 - strlen({1}))] %;\
|
||||
/echo -p #@{C%c_info}#@{n}# -- [ OSOBY Z LISTY @{C%REBINDER_KOLOR}$[toupper({1})]@{n}] $[strrep("-",50 - strlen({1}))] %;\
|
||||
/endif %;\
|
||||
/else \
|
||||
/let REBINDER_KOLOR_1 $[substr(REBINDER_KOLOR,0,strstr(REBINDER_KOLOR," "))]%;\
|
||||
/let REBINDER_KOLOR_2 $[substr(REBINDER_KOLOR,strstr(REBINDER_KOLOR," ")+1)]%;\
|
||||
/if (regmatch("^b(.*)",REBINDER_KOLOR_1)) \
|
||||
/if ( {P1} =~ "lue" ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# -- [ OSOBY Z LISTY @{Cblue,Cbg%{REBINDER_KOLOR_2}}$[toupper({1})]@{n}] $[strrep("-",50 - strlen({1}))] %;\
|
||||
/echo -p #@{C%c_info}#@{n}# -- [ OSOBY Z LISTY @{Cblue,Cbg%{REBINDER_KOLOR_2}}$[toupper({1})]@{n}] $[strrep("-",50 - strlen({1}))] %;\
|
||||
/else \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# -- [ OSOBY Z LISTY @{BC%P1,Cbg%{REBINDER_KOLOR_2}}$[toupper({1})]@{n}] $[strrep("-",50 - strlen({1}))] %;\
|
||||
/echo -p #@{C%c_info}#@{n}# -- [ OSOBY Z LISTY @{BC%P1,Cbg%{REBINDER_KOLOR_2}}$[toupper({1})]@{n}] $[strrep("-",50 - strlen({1}))] %;\
|
||||
/endif %;\
|
||||
/else \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# -- [ OSOBY Z LISTY @{C%REBINDER_KOLOR_1,Cbg%REBINDER_KOLOR_2}$[toupper({1})]@{n}] $[strrep("-",50 - strlen({1}))] %;\
|
||||
/echo -p #@{C%c_info}#@{n}# -- [ OSOBY Z LISTY @{C%REBINDER_KOLOR_1,Cbg%REBINDER_KOLOR_2}$[toupper({1})]@{n}] $[strrep("-",50 - strlen({1}))] %;\
|
||||
/endif %;\
|
||||
/endif%;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# %;\
|
||||
/echo -p #@{C%c_info}#@{n}# %;\
|
||||
/let REBINDER_WYSWIETLANI $[strcat(substr(rebinder_def_pomocniczy({1}),1),"@")]%;\
|
||||
/let i=1%;\
|
||||
/while ( strstr(REBINDER_WYSWIETLANI,"@") != 0 ) \
|
||||
/let REBINDER_AKTUALNIE_WYSWIETLANY $[substr(REBINDER_WYSWIETLANI,0,strstr(REBINDER_WYSWIETLANI,"@"))]%;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# [ %i $[strrep(".",60 - strlen({i}) - strlen(REBINDER_AKTUALNIE_WYSWIETLANY))] $[strcat(toupper(substr({REBINDER_AKTUALNIE_WYSWIETLANY},0,1)),substr({REBINDER_AKTUALNIE_WYSWIETLANY},1))] ] %;\
|
||||
/echo -p #@{C%c_info}#@{n}# [ %i $[strrep(".",60 - strlen({i}) - strlen(REBINDER_AKTUALNIE_WYSWIETLANY))] $[strcat(toupper(substr({REBINDER_AKTUALNIE_WYSWIETLANY},0,1)),substr({REBINDER_AKTUALNIE_WYSWIETLANY},1))] ] %;\
|
||||
/let REBINDER_WYSWIETLANI $[substr(REBINDER_WYSWIETLANI,strstr(REBINDER_WYSWIETLANI,"@") +1)]%;\
|
||||
/let i=$[++i]%;\
|
||||
/done%;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# $[strrep("-",41 - strlen({i}))] [ Lacznie na tej liscie: @{BC%kolor_info}$[--i]@{n} ] -- %;\
|
||||
/echo -p #@{C%c_info}#@{n}# %;\
|
||||
/echo -p #@{C%c_info}#@{n}# $[strrep("-",41 - strlen({i}))] [ Lacznie na tej liscie: @{C%c_info}$[--i]@{n} ] -- %;\
|
||||
/endif
|
||||
|
||||
/def usun = \
|
||||
/if ( %{*} =~ NULL ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Jaka liste badz osobe usunac? %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Jaka liste badz osobe usunac? %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/elseif ( %{1} =~ "liste" & %{2} =~ NULL ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Podaj nazwe listy, ktora chcesz usunac. %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Podaj nazwe listy, ktora chcesz usunac. %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/elseif ( {1} =~ "liste" & %{2} !~ NULL ) \
|
||||
/if ( strstr({REBINDER_LISTA_LISTY},{2}) == -1 ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Taka lista nie istnieje. %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Taka lista nie istnieje. %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/elseif ( strstr({REBINDER_LISTA_LISTY},{2}) > -1) \
|
||||
/let REBINDER_NOW %REBINDER_LISTA_%{2} %;\
|
||||
/let REBINDER_KOLOR $[pobierz_kolor_z_listy({REBINDER_NOW})]%;\
|
||||
|
@ -374,50 +374,50 @@
|
|||
/let REBINDER_LISTA_TEMP=$[substr({REBINDER_LISTA_LISTY},strstr({REBINDER_LISTA_LISTY},{2}))]%;\
|
||||
/let REBINDER_LISTA_PRAWO=$[substr({REBINDER_LISTA_TEMP},strstr({REBINDER_LISTA_TEMP},"@"))]%;\
|
||||
/set REBINDER_LISTA_LISTY=$[strcat({REBINDER_LISTA_LEWO}, {REBINDER_LISTA_PRAWO})]%;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/if ( strstr(REBINDER_KOLOR," ") == -1 ) \
|
||||
/if (regmatch("^b(.*)",REBINDER_KOLOR)) \
|
||||
/if ( {P1} =~ "lue" ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Lista "@{Cblue}$[toupper({2})]@{n}" zostala usunieta. %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Lista "@{Cblue}$[toupper({2})]@{n}" zostala usunieta. %;\
|
||||
/else \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Lista "@{BC%P1}$[toupper({2})]@{n}" zostala usunieta. %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Lista "@{BC%P1}$[toupper({2})]@{n}" zostala usunieta. %;\
|
||||
/endif %;\
|
||||
/else \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Lista "@{C%REBINDER_KOLOR}$[toupper({2})]@{n}" zostala usunieta. %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Lista "@{C%REBINDER_KOLOR}$[toupper({2})]@{n}" zostala usunieta. %;\
|
||||
/endif %;\
|
||||
/else \
|
||||
/let REBINDER_KOLOR_1 $[substr(REBINDER_KOLOR,0,strstr(REBINDER_KOLOR," "))]%;\
|
||||
/let REBINDER_KOLOR_2 $[substr(REBINDER_KOLOR,strstr(REBINDER_KOLOR," ")+1)]%;\
|
||||
/if (regmatch("^b(.*)",REBINDER_KOLOR_1)) \
|
||||
/if ({P1} =~ "lue" ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Lista "@{Cblue,Cbg%REBINDER_KOLOR_2}$[toupper({2})]@{n}" zostala usunieta. %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Lista "@{Cblue,Cbg%REBINDER_KOLOR_2}$[toupper({2})]@{n}" zostala usunieta. %;\
|
||||
/else \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Lista "@{BC%P1,Cbg%REBINDER_KOLOR_2}$[toupper({2})]@{n}" zostala usunieta. %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Lista "@{BC%P1,Cbg%REBINDER_KOLOR_2}$[toupper({2})]@{n}" zostala usunieta. %;\
|
||||
/endif %;\
|
||||
/else \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Lista "@{C%REBINDER_KOLOR_1,Cbg%REBINDER_KOLOR_2}$[toupper({2})]@{n}" zostala usunieta. %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Lista "@{C%REBINDER_KOLOR_1,Cbg%REBINDER_KOLOR_2}$[toupper({2})]@{n}" zostala usunieta. %;\
|
||||
/endif %;\
|
||||
/endif%;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/rebinder_zapisz_liste LISTY%;\
|
||||
/rebinder_zapisz_liste $[tolower({2})] 0%;\
|
||||
/unset REBINDER_LISTA_%{2}%;\
|
||||
/purge REBINDER_%2*%;\
|
||||
/endif%;\
|
||||
/elseif ( strstr({REBINDER_LISTA_LISTY},{1}) == -1 ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Nie ma takiej listy. %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Nie ma takiej listy. %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/elseif ( strstr({REBINDER_LISTA_LISTY},{1}) > -1) \
|
||||
/if ( {2} =~ NULL ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Podaj jakies imie badz opis w mianowniku. %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Podaj jakies imie badz opis w mianowniku. %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/elseif ( {2} !~ NULL ) \
|
||||
/if ( strstr(rebinder_def_pomocniczy({1}),{-1}) == -1 ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Podanej osoby nie ma na tej liscie. %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Podanej osoby nie ma na tej liscie. %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/else \
|
||||
/let REBINDER_LISTA_LEWO=$[substr(rebinder_def_pomocniczy({1}),0,strstr(rebinder_def_pomocniczy({1}),{-1})-1)]%;\
|
||||
/let REBINDER_LISTA_TEMP=$[substr(rebinder_def_pomocniczy({1}),strstr(rebinder_def_pomocniczy({1}),{-1}))]%;\
|
||||
|
@ -425,9 +425,9 @@
|
|||
/let NAME $[replace("[a-z]*","",{-1})] %;\
|
||||
/let NAME $[replace(" ","",{NAME})] %;\
|
||||
/purge REBINDER_%{1}_%{NAME} %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Wpis $[toupper({-1})] zostal usuniety z listy "$[toupper({1})]". %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Wpis $[toupper({-1})] zostal usuniety z listy "$[toupper({1})]". %;\
|
||||
/echo -p #@{C%c_info}#@{n}# ------------------------------------------------------------------------ %;\
|
||||
/set REBINDER_LISTA_%1 $[strcat({REBINDER_LISTA_LEWO}, {REBINDER_LISTA_PRAWO})]%;\
|
||||
/rebinder_zapisz_liste $[tolower({1})]%;\
|
||||
/endif%;\
|
||||
|
|
|
@ -1,18 +1,18 @@
|
|||
/def poczta = \
|
||||
/if ({*}=~NULL | {*}=~'check') \
|
||||
/if ({ogolne_poczta}=~NULL ) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Brak poczty. %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Brak poczty. %;\
|
||||
/else \
|
||||
/let _poczta=%{ogolne_poczta} %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Listy: %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Listy: %;\
|
||||
/while /let i=$[strstr({_poczta},"|")] %; /@test i>-1 %; /do \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Od: @{BC%kolor_info}$[substr({_poczta},5,i-5)] @{n}($[substr({_poczta},0,5)]). %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Od: @{C%c_info}$[substr({_poczta},5,i-5)] @{n}($[substr({_poczta},0,5)]). %;\
|
||||
/let _poczta=$[substr({_poczta},i+1)] %;\
|
||||
/done %;\
|
||||
/endif %;\
|
||||
/elseif ({*} =~ 'clear') \
|
||||
/unset ogolne_poczta %;\
|
||||
/status_edit -r1 poczta_show:5:BC%{kolor_main} %;\
|
||||
/status_edit -r1 poczta_show:5:C%{c_main} %;\
|
||||
/set poczta_show=none %;\
|
||||
/endif
|
||||
|
||||
|
@ -30,7 +30,7 @@
|
|||
/else \
|
||||
/set poczta_show=MAIL%;\
|
||||
/endif %;\
|
||||
/status_edit -r1 poczta_show:5:BC%{kolor_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},"|")] %;\
|
||||
|
@ -40,7 +40,7 @@
|
|||
/else \
|
||||
/set poczta_show=MAIL%;\
|
||||
/endif %;\
|
||||
/status_edit -r1 poczta_show:5:BC%{kolor_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},"'|")] %;\
|
||||
|
@ -50,4 +50,4 @@
|
|||
/else \
|
||||
/set poczta_show=MAIL%;\
|
||||
/endif %;\
|
||||
/status_edit -r1 poczta_show:5:BC%{kolor_alarm}
|
||||
/status_edit -r1 poczta_show:5:C%{c_alarm}
|
||||
|
|
|
@ -22,10 +22,10 @@
|
|||
|
||||
/def delay = \
|
||||
/if ( {1} =~ "" )\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Delay: @{BC%kolor_info}%delay@{n}%;\
|
||||
/echo -p #@{C%c_info}#@{n}# Delay: @{C%c_info}%delay@{n}%;\
|
||||
/else \
|
||||
/set delay %{*} %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Delay: @{BC%kolor_info}%delay@{n}%;\
|
||||
/echo -p #@{C%c_info}#@{n}# Delay: @{C%c_info}%delay@{n}%;\
|
||||
/endif
|
||||
|
||||
/def wns = \
|
||||
|
@ -118,7 +118,7 @@
|
|||
|
||||
/def unnormalset = \
|
||||
/alias ww /dounnormal %{*} %%; /set lwlast=dziwne %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Dziwne wyjscie - @{BC%kolor_info}%{*}@{n}. %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Dziwne wyjscie - @{C%c_info}%{*}@{n}. %;\
|
||||
|
||||
/def dounnormal = \
|
||||
/if ( {sneak} =~ "ON" ) \
|
||||
|
@ -200,27 +200,27 @@
|
|||
|
||||
/def sneak = \
|
||||
/if ( {1} =~ NULL )\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Przemykanie: @{BC%kolor_info}%sneak@{n}%;\
|
||||
/echo -p #@{C%c_info}#@{n}# Przemykanie: @{C%c_info}%sneak@{n}%;\
|
||||
/elseif ( {1} =~ "off" ) \
|
||||
/set sneak %{1} %;\
|
||||
/status_edit -r1 sneak:4:BC%{kolor_main} %;\
|
||||
/status_edit -r1 sneak:4:C%{c_main} %;\
|
||||
/elseif ( {1} =~ "ON" ) \
|
||||
/set sneak %{1} %;\
|
||||
/status_edit -r1 sneak:4:BC%{kolor_alarm} %;\
|
||||
/status_edit -r1 sneak:4:C%{c_alarm} %;\
|
||||
/elseif ( {1} =~ "TEAM" ) \
|
||||
/set sneak %{1} %;\
|
||||
/status_edit -r1 sneak:4:BC%{kolor_alarm} %;\
|
||||
/status_edit -r1 sneak:4:C%{c_alarm} %;\
|
||||
/endif
|
||||
|
||||
/def hide = \
|
||||
/if ( {1} =~ NULL )\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Ukrycie: @{BC%kolor_info}%hide@{n}%;\
|
||||
/echo -p #@{C%c_info}#@{n}# Ukrycie: @{C%c_info}%hide@{n}%;\
|
||||
/elseif ( {1} =~ "off" ) \
|
||||
/set hide %{1} %;\
|
||||
/status_edit -r1 hide:3:BC%{kolor_main} %;\
|
||||
/status_edit -r1 hide:3:C%{c_main} %;\
|
||||
/elseif ( {1} =~ "ON" ) \
|
||||
/set hide %{1} %;\
|
||||
/status_edit -r1 hide:3:BC%{kolor_alarm} %;\
|
||||
/status_edit -r1 hide:3:C%{c_alarm} %;\
|
||||
/endif
|
||||
|
||||
/def -mregexp -Fp2 -t'Chowasz sie .* potrafisz' hideon0 = /hide ON
|
||||
|
|
|
@ -17,7 +17,7 @@
|
|||
/eval /set ogolne_odmiana_n_%{1}=$$[tolower({P1})] %;\
|
||||
/def -p20 -agLG -mregexp -t'Miejscownik: (.*).' _rodmien_mie = \
|
||||
/purge _rodmien_* %%;\
|
||||
/eval /echo -p #@{BC%kolor_info}#@{n}# Odmiana @{BC%kolor_info}%{1}@{n}: %%ogolne_odmiana_d_%{1}/%%ogolne_odmiana_b_%{1}/%%ogolne_odmiana_n_%{1}
|
||||
/eval /echo -p #@{C%c_info}#@{n}# Odmiana @{C%c_info}%{1}@{n}: %%ogolne_odmiana_d_%{1}/%%ogolne_odmiana_b_%{1}/%%ogolne_odmiana_n_%{1}
|
||||
|
||||
/def _l_odmien = \
|
||||
/let _tmp=$[strcat({-1}, "|")] %;\
|
||||
|
|
|
@ -7,23 +7,23 @@
|
|||
/def _zapamietaj_imie = \
|
||||
/let imiex=%{1} %;\
|
||||
/let imie_opis=$[strcat("[",substr({2},0,1),tolower(substr({2},0,1)),"]",substr({2},1))]%;\
|
||||
/let imie_def=/def -Fp5 -mregexp -t'(%{imie_opis})(( \\\\([^,.]*\\\\))|([ .,]))' _imie_%{imiex} = /substitute -p %%{PL}%%{P1} @{BCwhite}_%{imiex}_%%{P3}@{n}%%{P4}%%{PR}%;\
|
||||
/let imie_def=/def -Fp5 -mregexp -t'(%{imie_opis})(( \\\\([^,.]*\\\\))|([ .,]))' _imie_%{imiex} = /substitute -p %%{PL}%%{P1} @{C\%c_bold}_%{imiex}_%%{P3}@{n}%%{P4}%%{PR}%;\
|
||||
/if ($(/list -s _imie_%{imiex})=~NULL) \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Zapamietany: @{BC%kolor_info}%{imiex}@{n} %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Zapamietany: @{C%c_info}%{imiex}@{n} %;\
|
||||
/eval -s0 %{imie_def} %;\
|
||||
/echo %{imie_def}%|/writefile -a %{priv_dir}/%{obecnie_swiat}/players/%{obecnie_expujacy}/imiona.tf %;\
|
||||
/echo %{imie_def}%|/writefile -a %{priv_dir}/%{mudworld}/players/%{player}/imiona.tf %;\
|
||||
/elseif /test (strstr("($(/list -s _imie_%{imiex}))","(%{imie_opis})((")==-1) %;/then \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Zmienil sie opis dla wpisu: @{BC%kolor_info}%{imiex}@{n} %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Zmienil sie opis dla wpisu: @{C%c_info}%{imiex}@{n} %;\
|
||||
/undef _imie_%{imiex} %;\
|
||||
/eval -s0 %{imie_def} %;\
|
||||
/echo /undef _imie_%{imiex}%|/writefile -a %{priv_dir}/%{obecnie_swiat}/players/%{obecnie_expujacy}/imiona.tf %;\
|
||||
/echo %{imie_def}%|/writefile -a %{priv_dir}/%{obecnie_swiat}/players/%{obecnie_expujacy}/imiona.tf %;\
|
||||
/echo /undef _imie_%{imiex}%|/writefile -a %{priv_dir}/%{mudworld}/players/%{player}/imiona.tf %;\
|
||||
/echo %{imie_def}%|/writefile -a %{priv_dir}/%{mudworld}/players/%{player}/imiona.tf %;\
|
||||
/endif
|
||||
|
||||
/def czysc_imiona = \
|
||||
/def -ag -h'REDEF' _redef_gag %;\
|
||||
/load -q %{priv_dir}/%{obecnie_swiat}/players/%{obecnie_expujacy}/imiona.tf %;\
|
||||
/save %{priv_dir}/%{obecnie_swiat}/players/%{obecnie_expujacy}/imiona.tf _imie_* %;\
|
||||
/load -q %{priv_dir}/%{mudworld}/players/%{player}/imiona.tf %;\
|
||||
/save %{priv_dir}/%{mudworld}/players/%{player}/imiona.tf _imie_* %;\
|
||||
/purge _redef_gag %;\
|
||||
/ktoto licz
|
||||
|
||||
|
@ -32,13 +32,13 @@
|
|||
/if ({*} =~ "licz" ) \
|
||||
/set _ilu_ludzi=0 %;\
|
||||
/quote -S /_ktoto_licz `/list -s _imie_* %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Zapamietanych @{BC%kolor_info}%{_ilu_ludzi} @{n}opisow.%;\
|
||||
/echo -p #@{C%c_info}#@{n}# Zapamietanych @{C%c_info}%{_ilu_ludzi} @{n}opisow.%;\
|
||||
/unset _ilu_ludzi %;\
|
||||
/else \
|
||||
/set _ilu_ludzi=0 %;\
|
||||
/quote -S /_ktoto `/list -s _imie_%{*} %;\
|
||||
/quote -S /_ktoto `/list -s -mregexp -t'$[strcat(tolower(substr({*},0,1)),"(]|)",tolower(substr({*},1)))]' _imie_* %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# W bazie @{BC%kolor_info}%{_ilu_ludzi} @{n}pasujacych rekordow.%;\
|
||||
/echo -p #@{C%c_info}#@{n}# W bazie @{C%c_info}%{_ilu_ludzi} @{n}pasujacych rekordow.%;\
|
||||
/unset _ilu_ludzi %;\
|
||||
/endif %;\
|
||||
/endif
|
||||
|
@ -48,7 +48,7 @@
|
|||
/let pocz_opisu=$[strstr({*},"'([")] %;\
|
||||
/let koni_opisu=$[strstr({*},")(")] %;\
|
||||
/let pocz_imienia=$[strstr({*},"_imie_")+6] %;\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# $[pad(substr({*},{pocz_imienia}),-15,substr({*},{pocz_opisu}+3,1),1,substr({*},{pocz_opisu}+6,{koni_opisu}-{pocz_opisu}-6))]
|
||||
/echo -p #@{C%c_info}#@{n}# $[pad(substr({*},{pocz_imienia}),-15,substr({*},{pocz_opisu}+3,1),1,substr({*},{pocz_opisu}+6,{koni_opisu}-{pocz_opisu}-6))]
|
||||
|
||||
/def _ktoto_licz = \
|
||||
/test ++_ilu_ludzi
|
||||
|
|
|
@ -1,87 +1,27 @@
|
|||
; ------------------------------------
|
||||
; Ustawienia do edycji według potrzeb:
|
||||
; (mogą być nadpisane w pliku postaci)
|
||||
; ------------------------------------
|
||||
|
||||
; typ klawiatury (standard/mac):
|
||||
/set ktype=standard
|
||||
|
||||
; domyślny czas zmiany lokacji przez autołazika:
|
||||
/set delay=0
|
||||
|
||||
; prefix przed wpisywanymi komendami (przy włączonym ich pokazywaniu - /set kecho on):
|
||||
/set ingame=0
|
||||
/set kprefix=>
|
||||
|
||||
; kolor komend wpisywanych przez gracza (edytować nazwę koloru _po_ znaku 'C'):
|
||||
/set kecho_attr=Cgreen
|
||||
|
||||
; kolory:
|
||||
|
||||
; kolor główny:
|
||||
/set kolor_main green
|
||||
|
||||
; kolor różnych warningów:
|
||||
/set kolor_alarm yellow
|
||||
|
||||
; kolor sytuacji krytycznych:
|
||||
/set kolor_crit red
|
||||
|
||||
; kolor ataków:
|
||||
/set kolor_atak red
|
||||
|
||||
; kolor informacji wyświetlanych przez skrypty:
|
||||
/set kolor_info magenta
|
||||
|
||||
; kolor walki
|
||||
/set kolor_fight red
|
||||
|
||||
; kolor ciosów własnych
|
||||
/set kolor_fight_me rgb530
|
||||
|
||||
; kolor speców:
|
||||
/set kolor_spec magenta
|
||||
|
||||
; kolor znaków gildiowych:
|
||||
/set kolor_guild white
|
||||
|
||||
; kolor podświetleń chwilowych (/glow):
|
||||
/set kolor_glow magenta
|
||||
|
||||
; kolor mówienia:
|
||||
/set kolor_speak cyan
|
||||
|
||||
; defaultowy tryb ataku:
|
||||
/set attackmode=1
|
||||
|
||||
; ------------------------------------------------------------------------------------------
|
||||
; Poniższych opcji radzę nie edytować. Może to prowadzić do problemów z działaniem skryptów.
|
||||
; ------------------------------------------------------------------------------------------
|
||||
/set ingame=0
|
||||
|
||||
/set hiliteattr=BCmagenta
|
||||
/set wrapspace=2
|
||||
/set isize=1
|
||||
/set warn_status=off
|
||||
/set status_pad=
|
||||
/set status_height=4
|
||||
|
||||
/set pack=off
|
||||
/set delay=0
|
||||
/set attackmode=1
|
||||
/set sneak=off
|
||||
/set hide=off
|
||||
/set auto=off
|
||||
/set unnormal=none
|
||||
|
||||
/set zar_godzina=?
|
||||
/set am_czy_pm=?
|
||||
/set ownkills=0
|
||||
/set allkills=0
|
||||
/set poczta_show=none
|
||||
/set dobadzcmd=dobadz
|
||||
/eval /set tank=$[decode_attr("nie", "BCgreen")]
|
||||
/eval /set alarm=$[decode_attr("none", "BCgreen")]
|
||||
/eval /set nxt_zaslona=$[decode_attr("rdy", "BCgreen")]
|
||||
/eval /set nxt_order=$[decode_attr("rdy", "BCgreen")]
|
||||
/eval /set kondycja=$[strcat("[", decode_attr(" ", "Cbggreen"), "] ")]
|
||||
/eval /set zmeczenie=$[strcat("[", decode_attr(" ", "Cbggreen"), "] ")]
|
||||
/eval /set blokowanko=$[strcat("[", decode_attr(" ", "Cgreen"), "] ")]
|
||||
/eval /set warningstat=$[strcat("[", decode_attr(" ", "Cgreen"), "] ")]
|
||||
|
||||
/eval /set alarm=$[decode_attr("none", {zc_main})]
|
||||
/eval /set nxt_zaslona=$[decode_attr("rdy", {zc_main})]
|
||||
/eval /set nxt_order=$[decode_attr("rdy", {zc_main})]
|
||||
/eval /set kondycja=$[strcat("[", decode_attr(" ", {zc_main_background}), "] ")]
|
||||
/eval /set zmeczenie=$[strcat("[", decode_attr(" ", {zc_main_background}), "] ")]
|
||||
/eval /set blokowanko=[ ]
|
||||
/eval /set warningstat=[ ]
|
||||
|
|
|
@ -6,10 +6,9 @@
|
|||
/def -Fp2 -mregexp -t"^(> )+" _unprompty = /substitute %{PR}
|
||||
|
||||
/def log_on = \
|
||||
/eval /log -w%{obecnie_swiat} %{logpath}/%{obecnie_swiat}/%{obecnie_expujacy}_$[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 = \
|
||||
/reload %;\
|
||||
/repeat -5 1 /start %;\
|
||||
/repeat -6 1 /set ingame=1
|
||||
|
||||
|
@ -24,6 +23,7 @@
|
|||
|
||||
/load array.tf
|
||||
/load binds.tf
|
||||
/load colorscheme.tf
|
||||
/load combat.tf
|
||||
/load counter.tf
|
||||
/load equipment.tf
|
||||
|
@ -46,22 +46,14 @@
|
|||
/def -ag -h'Load' hide_load %;\
|
||||
/eval /cd %{main_dir}/common %;\
|
||||
/load start.tf %;\
|
||||
/eval /cd %{main_dir}/%{obecnie_swiat} %;\
|
||||
/eval /cd %{main_dir}/%{mudworld} %;\
|
||||
/load start.tf %;\
|
||||
/load %{priv_dir}/%{obecnie_swiat}/players/%{obecnie_expujacy}/%{obecnie_expujacy}.tf %;\
|
||||
/load %{priv_dir}/%{obecnie_swiat}/players/%{obecnie_expujacy}/imiona.tf %;\
|
||||
/load %{priv_dir}/%{mudworld}/players/%{player}/%{player}.tf %;\
|
||||
/load %{priv_dir}/%{mudworld}/players/%{player}/imiona.tf %;\
|
||||
/if ( {poczta_show} =~ "NOWA" )\
|
||||
/status_edit -r1 poczta_show:4:BC%{kolor_alarm} %;\
|
||||
/endif %;\
|
||||
/if ( {sneak} =~ "off" ) \
|
||||
/set sneak %sneak %;\
|
||||
/status_edit -r1 sneak:4:BC%{kolor_main} %;\
|
||||
/elseif ( {sneak} =~ "ON" ) \
|
||||
/set sneak %sneak %;\
|
||||
/status_edit -r1 sneak:4:BC%{kolor_alarm} %;\
|
||||
/elseif ( {sneak} =~ "TEAM" ) \
|
||||
/set sneak %sneak %;\
|
||||
/status_edit -r1 sneak:4:BC%{kolor_alarm} %;\
|
||||
/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} %;\
|
||||
|
@ -69,6 +61,7 @@
|
|||
/def key_nkp- = /dobind %{*} %;\
|
||||
/endif %;\
|
||||
/endif %;\
|
||||
/sneak %sneak %;\
|
||||
/hide %hide %;\
|
||||
/f1 %f1 %;\
|
||||
/f2 %f2 %;\
|
||||
|
|
|
@ -18,12 +18,11 @@
|
|||
;;
|
||||
/set broni=broni
|
||||
|
||||
|
||||
;; Jeśli postać nosi broń w pochwie, należy ustawić na 'on':
|
||||
;;
|
||||
/set pochwa=off
|
||||
|
||||
;; .. oraz ustawić jej nazwę, w dopełniaczu:
|
||||
;; ... oraz ustawić jej nazwę, w dopełniaczu:
|
||||
;;
|
||||
/set pochwa1=bardzo ladnej pochwy
|
||||
|
||||
|
@ -31,12 +30,27 @@
|
|||
;;
|
||||
/set dual=off
|
||||
|
||||
;; ...oraz analogicznie do pierwszej broni ustawić poniższe zmienne:
|
||||
;; ... oraz analogicznie do pierwszej broni ustawić poniższe zmienne:
|
||||
;;
|
||||
/set bron2=drugi paskudny miecz
|
||||
/set broni2=drugiego paskudnego miecza
|
||||
/set pochwa2=jeszcze ladniejszej pochwy
|
||||
|
||||
;; Po zmianach sprawiających, że sprzęt nie musi być zakładany co logowanie, należy ustawić na 'on'
|
||||
;; jesli postać nosi ze sobą jakiś pojemnik (plecak, torbe, sakwe itp.):
|
||||
;;
|
||||
/set pack=off
|
||||
|
||||
;; ... jej nazwę w bierniku
|
||||
;;
|
||||
/set packitem0=swoja torbe
|
||||
|
||||
;; ... oraz dopełniaczu
|
||||
;;
|
||||
/set packitem1=swojej torby
|
||||
|
||||
;;;;;;;;;;;;;;;;;;;;;;;;
|
||||
|
||||
/def start = \
|
||||
;;
|
||||
;; Poniżej należy ustawić wszystkie komendy, które mają się wykonać po zalogowaniu usuwając
|
||||
|
@ -49,11 +63,4 @@
|
|||
;;
|
||||
;; Poniższe linie powinny zostać:
|
||||
;;
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Loaded settings for: @{BC%kolor_info}%{obecnie_expujacy}@{n}.
|
||||
|
||||
;; Tworzenie własnych aliasów:
|
||||
;; /alias <skrot> <komenda> [%; <komenda2> %; <komenda3>]
|
||||
;;
|
||||
;; Przykłady:
|
||||
;; /alias pod podskocz
|
||||
;; /alias ojej powiedz Ojej! %; rozejrzyj sie strachliwie
|
||||
/echo -p #@{C%c_info}#@{n}# Loaded settings for: @{C%c_info}%{player}@{n}.
|
||||
|
|
|
@ -1,4 +1,4 @@
|
|||
/def -mregexp -Fp3 -t'ledwo zyw.' _sub_ledwo = /substitute -p %{PL}@{BCwhite}@{Cbgred}$[toupper({P0})]@{n}%{PR}
|
||||
/def -mregexp -Fp3 -t'ledwo zyw.' _sub_ledwo = /substitute -p %{PL}@{C%c_bold}@{Cbg%c_crit_bold}$[toupper({P0})]@{n}%{PR}
|
||||
|
||||
/def _sub = \
|
||||
/return substitute(strcat(decode_attr(strcat({PL}, {P0}, {PR}, " [", {1}, "] "))))
|
||||
|
@ -10,7 +10,7 @@
|
|||
/let _ile=%{PL} %; \
|
||||
/let _ile=$[replace("##", " ", replace(" ", "_",replace(", ", "##", replace(" i ", "##", {_ile}))))]%; \
|
||||
/podlicz_team %{_ile}%; \
|
||||
/substitute -p [@{BC%kolor_info}%{_il_wr}@{n}] %{PL}%{P0}%{PR}%;\
|
||||
/substitute -p [@{C%c_info}%{_il_wr}@{n}] %{PL}%{P0}%{PR}%;\
|
||||
/unset _il_wr
|
||||
|
||||
/def podlicz_team = \
|
||||
|
@ -40,11 +40,11 @@
|
|||
/if ({lalala} =~ {ktokondycjalewa_check}) \
|
||||
/set kogonaparza=$(/eval /eval /echo $$[%{ktokondycjalewa}_kogo_bije]) %;\
|
||||
/if ({kogonaparza} =~ "cie" ) \
|
||||
/echo -p $[strcat({PL}, {P0}, "@{BCwhite} >>>@{nBCred}>>> CIEBIE!@{n}")] %;\
|
||||
/eval /echo -p $[strcat({PL}, {P0}, "@{C%c_bold} >>>@{nC%c_crit_bold}>>> CIEBIE!@{n}")] %;\
|
||||
/elseif ({kogonaparza} =~ "ciebie" ) \
|
||||
/echo -p $[strcat({PL}, {P0}, "@{BCwhite} >>>@{nBCred}>>> CIEBIE!@{n}")] %;\
|
||||
/eval /echo -p $[strcat({PL}, {P0}, "@{C%c_bold} >>>@{nC%c_crit_bold}>>> CIEBIE!@{n}")] %;\
|
||||
/else \
|
||||
/echo -p $[strcat({PL}, {P0}, "@{BCwhite} >>>>>> @{n}", {kogonaparza})] %;\
|
||||
/eval /echo -p $[strcat({PL}, {P0}, "@{C%c_bold} >>>>>> @{n}", {kogonaparza})] %;\
|
||||
/endif %;\
|
||||
/else \
|
||||
/echo -p $[strcat({PL}, {P0})] %;\
|
||||
|
@ -55,11 +55,11 @@
|
|||
/if ({PL} =~ {ktokondycjalewa_check}) \
|
||||
/set kogonaparza=$(/eval /eval /echo $$[%{ktokondycjalewa}_kogo_bije]) %;\
|
||||
/if ({kogonaparza} =~ "cie" ) \
|
||||
/echo -p $[strcat({PL}, {P0}, "@{BCwhite} >>>@{nBCred}>>> CIEBIE!@{n}")] %;\
|
||||
/eval /echo -p $[strcat({PL}, {P0}, "@{C%c_bold} >>>@{nC%c_crit_bold}>>> CIEBIE!@{n}")] %;\
|
||||
/elseif ({kogonaparza} =~ "ciebie" ) \
|
||||
/echo -p $[strcat({PL}, {P0}, "@{BCwhite} >>>@{nBCred}>>> CIEBIE!@{n}")] %;\
|
||||
/eval /echo -p $[strcat({PL}, {P0}, "@{C%c_bold} >>>@{nC%c_crit_bold}>>> CIEBIE!@{n}")] %;\
|
||||
/else \
|
||||
/echo -p $[strcat({PL}, {P0}, "@{BCwhite} >>>>>> @{n}", {kogonaparza})] %;\
|
||||
/eval /echo -p $[strcat({PL}, {P0}, "@{C%c_bold} >>>>>> @{n}", {kogonaparza})] %;\
|
||||
/endif %;\
|
||||
/else \
|
||||
/echo -p $[strcat({PL}, {P0})] %;\
|
||||
|
@ -104,7 +104,7 @@
|
|||
/nf
|
||||
|
||||
/def -mregexp -Fp2 -t' (polegl(a|o|)|umarl(a|o|))\\.' ktos_zdedzil_unset = \
|
||||
/echo -p @{BC%kolor_alarm}>>>>>>****** ZGON ******<<<<<<@{n} %;\
|
||||
/echo -p @{C%c_alarm}>>>>>>****** ZGON ******<<<<<<@{n} %;\
|
||||
/set ktoumarllewa=$[replace(" ", "_", {PL})] %;\
|
||||
/quote -S /unset `/listvar -s %{ktoumarllewa}_kto_bije%;\
|
||||
/quote -S /unset `/listvar -s %{ktoumarllewa}_kogo_bije
|
||||
|
@ -116,6 +116,6 @@
|
|||
/let n=$[strchr({*}, '|')]%;\
|
||||
/test param1 := substr({*}, 0, n) %;\
|
||||
/test param2 := substr({*}, n+1) %;\
|
||||
/echo -p @{BCyellow}###@{n} Zdefiniowana podmiana: @{B}%{param1}@{n} => @{B}%{param2}@{n} %;\
|
||||
/echo -p #@{C%c_info}#@{n}# Zdefiniowana podmiana: @{C%c_info}%{param1}@{n} => @{C%c_info}%{param2}@{n} %;\
|
||||
/def -mregexp -h'SEND %{param1}'\
|
||||
typo_%{1} = /send $$[strcat ({PL}, '%{param2}', replace('%{param1}', '%{param2}', {PR}))]
|
||||
|
|
|
@ -5,19 +5,19 @@
|
|||
/beep 1
|
||||
|
||||
/def -mregexp -Fp2 -t'dolacza(sz|) * do ' _druzyna_trig_0 = \
|
||||
/echo -p @{BC%kolor_info}>>> @{n}Team has changed (@{BC%kolor_info}ctrl+d@{n}).
|
||||
/echo -p @{C%c_info}>>> @{n}Team has changed (@{C%c_info}ctrl+d@{n}).
|
||||
|
||||
/def -mregexp -Fp2 -t'porzuca.* druzyne' _druzyna_trig_2 = \
|
||||
/echo -p @{BC%kolor_info}>>> @{n}Team has changed (@{BC%kolor_info}ctrl+d@{n}).
|
||||
/echo -p @{C%c_info}>>> @{n}Team has changed (@{C%c_info}ctrl+d@{n}).
|
||||
|
||||
/def -mregexp -Fp2 -t'rozwiazuje druzyne' _druzyna_trig_3 = \
|
||||
/echo -p @{BC%kolor_info}>>> @{n}Team has changed (@{BC%kolor_info}ctrl+d@{n}).
|
||||
/echo -p @{C%c_info}>>> @{n}Team has changed (@{C%c_info}ctrl+d@{n}).
|
||||
|
||||
/def -mregexp -Fp2 -t'zmusza.* do opuszczenia druzyny' _druzyna_trig_4 = \
|
||||
/echo -p @{BC%kolor_info}>>> @{n}Team has changed (@{BC%kolor_info}ctrl+d@{n}).
|
||||
/echo -p @{C%c_info}>>> @{n}Team has changed (@{C%c_info}ctrl+d@{n}).
|
||||
|
||||
/def -mregexp -Fp2 -t'przekazuje.* druzyn' _druzyna_trig_5 = \
|
||||
/echo -p @{BC%kolor_info}>>> @{n}Team has changed (@{BC%kolor_info}ctrl+d@{n}).
|
||||
/echo -p @{C%c_info}>>> @{n}Team has changed (@{C%c_info}ctrl+d@{n}).
|
||||
|
||||
/def tablica_druzyny = \
|
||||
/quote -S /unset `/listvar -s __druzyna_pozycja_*%;\
|
||||
|
@ -105,7 +105,7 @@
|
|||
/set ogolne_druzyna=%%{P5-DRUZYNA} %%;\
|
||||
/_ustaw_druzyne%;\
|
||||
/if ( {1} !~ "-q" )\
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Team set, attack mode: @{BC%kolor_info}%opis_ataku@{n}.%;\
|
||||
/echo -p #@{C%c_info}#@{n}# Team set, attack mode: @{C%c_info}%opis_ataku@{n}.%;\
|
||||
/endif
|
||||
|
||||
/def _ustaw_druzyne = \
|
||||
|
@ -176,7 +176,7 @@
|
|||
/let _name=$[substr({_tmp},0,i)] %;\
|
||||
/let _tmp=$[substr({_tmp},i+1)] %;\
|
||||
/if ({_numer_do_zaslony} < 13) \
|
||||
/def -mregexp -Fp3 -t'^%{_name}.* jest (w swietnej kondycji|w dobrym stanie|lekko rann(y|a)|rann(y|a)|w zlej kondycji|ciezko rann(y|a)|ledwo zyw(y|a)).' _zaslona_show_numbers_%{_numer_do_zaslony} = /return substitute(strcat("@{BCwhite}[ ", pad(strcat("F", %{_numer_do_zaslony}), -2), " ]@{n} ", {*}), "x", 1) %;\
|
||||
/def -mregexp -Fp3 -t'^%{_name}.* jest (w swietnej kondycji|w dobrym stanie|lekko rann(y|a)|rann(y|a)|w zlej kondycji|ciezko rann(y|a)|ledwo zyw(y|a)).' _zaslona_show_numbers_%{_numer_do_zaslony} = /return substitute(strcat("@{C%c_bold}[ ", pad(strcat("F", %{_numer_do_zaslony}), -2), " ]@{n} ", {*}), "x", 1) %;\
|
||||
/endif %;\
|
||||
/let _numer_do_zaslony=$[{_numer_do_zaslony} + 1] %;\
|
||||
/done
|
||||
|
@ -190,7 +190,7 @@
|
|||
/shift $[2+ {_ilosc}] %;\
|
||||
/def key_esc_f%{1} = zaslon %{_name}%;\
|
||||
/alias z%{1} chr %{_name} %;\
|
||||
/if ({obecnie_swiat} =~ "arkadia" )\
|
||||
/if ({mudworld} =~ "arkadia" )\
|
||||
/alias g%{1} zaslon %{_name} przed grupa %;\
|
||||
/endif %;\
|
||||
/shift 12 %;\
|
||||
|
|
|
@ -65,10 +65,10 @@
|
|||
/let num=$$$[strstr({_testuj_komendy2},{_testuj_ilosc})+3] %%%;\
|
||||
/let num2=$$$[strstr(substr({_testuj_komendy2},{num}),"|")] %%%;\
|
||||
/let _testuj_kom=$$$[substr({_testuj_komendy2},{num},{num2})] %%%;\
|
||||
/echo -p Komenda: @{BC%kolor_info}%%%{_testuj_kom}@{n} %%%;\
|
||||
/echo -p Komenda: @{C%c_info}%%%{_testuj_kom}@{n} %%%;\
|
||||
/endif %%;\
|
||||
/def -p305 -agLG -i -t'*Spoliczkuj kogo?' _testuj_koniec = \
|
||||
/echo -p #@{BC%kolor_info}#@{n}# Udanych: @{BC%kolor_info}%%%{_testuj_ilosc2-}@{n}/%%%{_testuj_ilosc}@{n} %%%;\
|
||||
/echo -p #@{C%c_info}#@{n}# Udanych: @{C%c_info}%%%{_testuj_ilosc2-}@{n}/%%%{_testuj_ilosc}@{n} %%%;\
|
||||
/purge -i _testuj_* %%%;\
|
||||
/unset _testuj_ilosc %%%;\
|
||||
/unset _testuj_ilosc2 %%%;\
|
||||
|
|
|
@ -1,19 +1,24 @@
|
|||
/def -mregexp -Fp2 -t' daje ci (?!sie we znaki)' warn_give = \
|
||||
/echo %;\
|
||||
/echo -p @{BC%kolor_main} <<< podanie >>> %;\
|
||||
/echo -p @{C%c_main_bold} <<< podanie >>> %;\
|
||||
/echo
|
||||
|
||||
/def -mregexp -Fp2 -t'zaprasza cie do swojej druzyny' warn_team = \
|
||||
/echo %;\
|
||||
/echo -p @{C%c_main_bold} <<< zaproszenie >>> %;\
|
||||
/echo
|
||||
|
||||
/def -mregexp -Fp2 -t'porzuca twoja druzyne' warn_sygnal = \
|
||||
/echo %;\
|
||||
/echo -p @{BC%kolor_alarm}XXXXXXXXXXXXXXXXXXXXXXXXXXXX@{n}@{BCwhite}--- SYGNAL ---@{n}@{BC%kolor_alarm}XXXXXXXXXXXXXXXXXXXXXXXXXXX %;\
|
||||
/echo -p @{BC%kolor_alarm}XXXXXXXXXXXXXXXXXXXXXXXXXXXX@{n}@{BCwhite}--- SYGNAL ---@{n}@{BC%kolor_alarm}XXXXXXXXXXXXXXXXXXXXXXXXXXX %;\
|
||||
/echo -p @{BC%kolor_alarm}XXXXXXXXXXXXXXXXXXXXXXXXXXXX@{n}@{BCwhite}--- SYGNAL ---@{n}@{BC%kolor_alarm}XXXXXXXXXXXXXXXXXXXXXXXXXXX %;\
|
||||
/echo -p @{C%c_alarm}XXXXXXXXXXXXXXXXXXXXXXXXXXXX@{n}@{C%c_bold}--- SYGNAL ---@{n}@{C%c_alarm}XXXXXXXXXXXXXXXXXXXXXXXXXXX %;\
|
||||
/echo -p @{C%c_alarm}XXXXXXXXXXXXXXXXXXXXXXXXXXXX@{n}@{C%c_bold}--- SYGNAL ---@{n}@{C%c_alarm}XXXXXXXXXXXXXXXXXXXXXXXXXXX %;\
|
||||
/echo -p @{C%c_alarm}XXXXXXXXXXXXXXXXXXXXXXXXXXXX@{n}@{C%c_bold}--- SYGNAL ---@{n}@{C%c_alarm}XXXXXXXXXXXXXXXXXXXXXXXXXXX %;\
|
||||
/echo
|
||||
|
||||
/def _lampa_warn = \
|
||||
/echo %;\
|
||||
/echo -p @{BC%kolor_alarm}XXXXXXXXXXXXXXXXXXXXXXXXXXXX@{n}@{BCwhite}--- LAMPA ---@{n}@{BC%kolor_alarm}XXXXXXXXXXXXXXXXXXXXXXXXXXXX %;\
|
||||
/echo -p @{BC%kolor_alarm}XXXXXXXXXXXXXXXXXXXXXXXXXXXX@{n}@{BCwhite}--- LAMPA ---@{n}@{BC%kolor_alarm}XXXXXXXXXXXXXXXXXXXXXXXXXXXX %;\
|
||||
/echo -p @{BC%kolor_alarm}XXXXXXXXXXXXXXXXXXXXXXXXXXXX@{n}@{BCwhite}--- LAMPA ---@{n}@{BC%kolor_alarm}XXXXXXXXXXXXXXXXXXXXXXXXXXXX %;\
|
||||
/echo -p @{C%c_alarm}XXXXXXXXXXXXXXXXXXXXXXXXXXXX@{n}@{C%c_bold}--- LAMPA ---@{n}@{C%c_alarm}XXXXXXXXXXXXXXXXXXXXXXXXXXXX %;\
|
||||
/echo -p @{C%c_alarm}XXXXXXXXXXXXXXXXXXXXXXXXXXXX@{n}@{C%c_bold}--- LAMPA ---@{n}@{C%c_alarm}XXXXXXXXXXXXXXXXXXXXXXXXXXXX %;\
|
||||
/echo -p @{C%c_alarm}XXXXXXXXXXXXXXXXXXXXXXXXXXXX@{n}@{C%c_bold}--- LAMPA ---@{n}@{C%c_alarm}XXXXXXXXXXXXXXXXXXXXXXXXXXXX %;\
|
||||
/echo %;\
|
||||
/tbind lampa_on_cmd
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue