tf-scripts/common/combat.tf

/def comp = \
  /send porownaj sile z %{*}%;\
  /send porownaj zrecznosc z %{*} %;\
  /send porownaj wytrzymalosc z %{*}

/def cel = \
  /if ( {*} !~  NULL )\
    /if (strstr({*}, "|") != -1) \
        /let n=$[strchr({*}, '|')] %;\
        /test cel := substr({*}, 0, n) %;\
        /test celu := substr({*}, n+1) %;\
    /else \
        /set cel %{*} %;\
        /set celu %{*} %;\
    /endif %;\
  /endif %;\
  /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 )\
    /if (strstr({*}, "|") != -1) \
        /let n=$[strchr({*}, '|')] %;\
        /test cel2 := substr({*}, 0, n) %;\
        /test cel2u := substr({*}, n+1) %;\
    /else \
        /set cel2 %{*} %;\
        /set cel2u %{*} %;\
    /endif %;\
  /endif %;\
  /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" ) \
    /set attackmode=1 %;\
    /set opis_ataku atak %;\
  /elseif ( {1} =~ "2") \
    /set attackmode=2 %;\
    /set opis_ataku wskazanie - atak %;\
  /elseif ( {1} =~ "3") \
    /set attackmode=3 %;\
    /set opis_ataku atak - wskazanie - rozkaz %;\
  /elseif ( {1} =~ "4") \
    /set attackmode=4 %;\
    /set opis_ataku lamanie - atak - wskazanie - rozkaz %;\
  /elseif ( {1} =~ "5") \
    /set attackmode=5 %;\
    /set opis_ataku atak - przedstawienie - wskazanie - rozkaz %;\
  /elseif ( {1} =~ "6") \
    /set attackmode=6 %;\
    /set opis_ataku lamanie - atak - przedstawienie - wskazanie - rozkaz %;\
  /elseif ( {1} =~ "help" )\
    /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 #@{C%c_info}#@{n}# Typ ataku: @{C%c_info}%opis_ataku@{n} %;\
  /endif

/alias x \
  /if (strstr({*}, "|") != -1) \
    /let n=$[strchr({*}, '|')] %;\
    /test p1 := substr({*}, 0, n) %;\
    /test p2 := substr({*}, n+1) %;\
    /_atak %{p1}|%{p2} %;\
  /else \
    /_atak %{*}|%{*} %;\
  /endif
/alias x1 /_atak %{cel}|%{celu}
/alias x2 /_atak drugiego %{cel}|drugiego %{celu}
/alias x3 /_atak trzeciego %{cel}|trzeciego %{celu}
/alias x4 /_atak czwartego %{cel}|czwartego %{celu}
/alias x5 /_atak piatego %{cel}|piatego %{celu}
/alias x6 /_atak szostego %{cel}|szostego %{celu}
/alias c1 przelam obrone %{celu}
/alias c2 przelam obrone drugiego %{celu}
/alias c3 przelam obrone trzeciego %{celu}
/alias c4 przelam obrone czwartego %{celu}
/alias c5 przelam obrone piatego %{celu}
/alias c6 przelam obrone szostego %{celu}
/alias n1 /_atak %{cel2}|%{cel2u}
/alias n2 /_atak drugiego %{cel2}|drugiego %{cel2u}
/alias n3 /_atak trzeciego %{cel2}|trzeciego %{cel2u}
/alias n4 /_atak czwartego %{cel2}|czwartego %{cel2u}
/alias n5 /_atak piatego %{cel2}|piatego %{cel2u}
/alias n6 /_atak szostego %{cel2}|szostego %{cel2u}
/alias m1 przelam obrone %{cel2u}
/alias m2 przelam obrone drugiego %{cel2u}
/alias m3 przelam obrone trzeciego %{cel2u}
/alias m4 przelam obrone czwartego %{cel2u}
/alias m5 przelam obrone piatego %{cel2u}
/alias m6 przelam obrone szostego %{cel2u}

/def _war_binds = \
  /def key_f9 = /_atak %%{cel}|%%{celu} %;\
  /def key_f10 = /_atak %%{cel2}|%{cel2u} %;\
  /def key_esc_f9 = /send przelam obrone %%{celu} %;\
  /def key_esc_f10 = /send przelam obrone %%{cel2u} %;\
  /def key_f11 = /send przestan walczyc %;\
  /if ( {ktype} =~ "mac" ) \
    /def key_f16 = /_atak %%{cel}|%%{celu} %;\
    /def key_f17 = /_atak %%{cel2}|%%{cel2u} %;\
    /def key_esc_f16 = /send przelam obrone %%{celu} %;\
    /def key_esc_f17 = /send przelam obrone %%{cel2u} %;\
    /def key_f18 = /send przestan walczyc %;\
  /endif
/_war_binds

/def -mregexp -Fp2 -t'.* wydaje ci rozkaz ataku na (.*).' _order_atak = \
  /set atakowany=$[tolower({P1})] %;\
  /echo %;\
  /echo -p @{C%c_crit_bold}>>> ROZKAZ ATAKU NA @{n}%atakowany@{C%c_crit_bold} <<<@{n} %;\
  /echo %;\
  /set wskazanie=%{atakowany} %;\
  /def -b'[' _atakporozkazie = %{zabijcmd-zabij} %atakowany %%; /set wskazanie= %;\
  /def -b']' =  przelam obrone %atakowany

/def -mregexp -Fp2 -t'(.*) wydaje .*rozkaz zasloniecia (.*).' _order_zaslona = \
  /echo %;\
  /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 (\w+ ){0,3}\w+[.!]$' atakujesz = /sneak off%; /test substitute(strcat(decode_attr(">>> ", {zc_fightme}), toupper({P0}), decode_attr(" <<<", {zc_fightme})))
/def -mregexp -Fp2 -t'(Wspierasz|(R|Z zacietoscia r)zucasz sie na) .*' atakujesz_other = /sneak off%; /test substitute(strcat(decode_attr(">>> ", {zc_fightme}), toupper({P0}), decode_attr(" <<<", {zc_fightme})))
/def -mregexp -Fp2 -t'(.* atakuj(e|a) cie(!|bie!)|stajesz na.*drodze|przebijajac sie przez twoja|szybko przesuwa sie za ciebie, kryjac sie|[Zz]aslaniasz )' mnie_atakuja0 = /beep 1 %; /sneak off

/def -mregexp -Fp3 -t'((powaznie|bardzo ciezko) [a-z]+ | masakruj(e|ac) )cie ' cios_warn0 = /beep 1

/def -mregexp -Fp2 -t'rzucasz sie na (.*) przebijajac' lamanie_atak = \
  /if ( {attackmode} != "1" )\
    /echo %;\
    /echo -p @{C%c_alarm} <<< POPRAW ROZKAZ >>>@{n}%;\
    /tbind x %P1%;\
  /endif