;; Rangers =)
/require -q bat-generic.tf
/set camp=ready

/def -F -p11 -mregexp -t'^[H|h]p: ([-0-9]+) \\(([0-9]+)\\) [S|s]p: \
([-0-9]+) \\(([0-9]+)\\) [E|e]p: ([-0-9]+) \\(([0-9]+)\\)' status=\
   /set hpold=%{hp}%;\
   /set hp=%{P1}%;\
   /set hpmax=%{P2}%;\
   /let tickhp=$[{hp}-{hpold}]%;\
   /if (tickhp>0) %;\
         /let tick=$[strcat("(",(($(/eval /_echo %%{hp})*100)/$(/eval /_echo %{hpmax})),"%) change [+",($(/eval /_echo %{hp})-$(/eval /_echo %{hpold})),"]")]%;\
         @party say \*has %{hp}/%{hpmax} %{tick}\*%;\
   /endif %;\
   /if (tickhp<0) %;\
         /let tick=$[strcat("(",(($(/eval /_echo %%{hp})*100)/$(/eval /_echo %{hpmax})),"%) change [",($(/eval /_echo %{hp})-$(/eval /_echo %{hpold})),"]")]%;\
         @party say \*has %{hp}/%{hpmax} %{tick}\*%;\
   /endif

/stack push off_skill_stack
/def psh=/set skill=push%;/set skill_rounds=2%;/set targettype=off%;/do_skill %{*}

/stack kick off_skill_stack
/def kk=/set skill=kick%;/set skill_rounds=2%;/set targettype=off%;/do_skill %{*}

/stack bladed_fury off_skill_stack
/def bf=/set skill=bladed_fury%;/set skill_rounds=random%;/set targettype=off%;/do_skill %{*}

/def -b'^[[18~' = camp
/def -b'^[[19~' = fb
/def -b'^[[24~' = /bf .

/def -t'You stretch yourself and consider about camping.' camp3 = /set camp=ready%;@party say <camp ready>
/def -t'You feel a bit tired.' camp1 = /set camp=ready%;@party say <camp ready>
/def -t'You feel like camping a little.' camp2 = /set camp=ready%;@party say <camp ready>
/def -t'You awaken from your short rest, and feel slightly better.' camped = /set camp=no%;@party say <awake>
/def -t'You don\'t quite feel like camping at the moment.' nocamp = /set camp=no%;@party say <camp not ready yet>

/def -t'The fire burns out, spoiling anything in it.' newfire = fb

/def -mregexp -t'^Exp: ([0-9]+)' exp=\
        /let exp2=%P1%; \
        /if (exp2!=exp1) \
                /echo -aB .o0<> $[exp2-exp1] Experience gained <>0o.%;\
                /set exp1=%exp2%;\
        /endif
/def -mregexp -t'([a-zA-Z ]+) is DEAD, R.I.P.' trig2 = exp