; cautious macro:
/require stack-q.tf
/load dmglist.tf

;********************************* Fighting aliases *************************

; gag when the lpmud stuff doesn't work properly and >'s are printed.
;/def -F -p10000000 -t"^> ([^>].*)$" badpromptfix = /substitute %P1
;/def -aCcyan  -F -t'\([nsewud,]+.*\)' hiliteplace

/def -F -p100 -t"^([A-Z][A-Za-z ]+) dealt the killing blow to" kwon =        /eval /set lastRounds   %{rounds}%;       /eval /set lastTotalDmg %{totaldmg}%;       /eval /set totaldmg 0%;       /set rounds 0%;       /eval /set combat 0%;       /eval /set mobsinroom $[mobsinroom - 1]%;       /if (mobsinroom < 0)                 /set mobsinroom 0%;       /endif%;       /eval /set corpsesinroom $[corpsesinroom + 1]%;       /eval /set foundmob $[foundmob - 1]%;       /if (killbeep) /beep 1%;/endif%;       /if (morgue) slab%;/endif%;       /if (pcorpse) y%;di%;              /if (morgue) slab%;/endif%;              /if (adivvy) divvy coins%;/endif%;              /if (aget) g%;/endif%;              /if (abag) bags%;/endif%;       /endif%;        /if ( {P1} =~ 'Fjord')               /if (morgue & !pcorpse & corpse) slab%;/endif%;              /if (!pcorpse & acorpse) y%;/endif%;              /if (!pcorpse & adivvy) divvy coins%;/endif%;              /if (!pcorpse & aget) g%;/endif%;              /if (!pcorpse & abag & !corpsesinroom) bags%;/endif%;       /endif %;       /eval /set combat 0%;

/set lasthps 0
/set hps     0
/set dmg     0
/set maxhps  0
/set lastsps 0
/set sps     0
/set spcost  0
/set maxsps  0

/def guild_kill_hook = y
/alias report /eval emote reports: HP:%{hps}/%{maxhps} SP:%{sps}/%{maxsps}

/def -aBCyellow -t"^ HP: ([0-9]+)\/([0-9]+)  SP: ([0-9]+)\/([0-9]+)(  Attacking:)?" hpbar =         /set wholehp %P0 %;       /set lasthps %{hps} %;        /set hps     %P1 %;        /set dmg     $[lasthps-hps] %;        /set maxhps  %P2 %;        /set lastsps %{sps} %;        /set sps     %P3 %;        /set spcost  $[lastsps-sps] %;        /set maxsps  %P4 %;        /set hpdiff $[maxhps-hps]%;        /set hpdiff2 $[maxhps*3/4-hps]%;        /set spdiff $[maxsps-sps]%; ;       /set lastgxp %{gxp} %;;       /set gxp   %P8 %;;       /set deltagxp  $[lastgxp-gxp] %; ;       /set total_gxp $[total_gxp+deltagxp]%;        /if ({P5} =~ '') /set combat 0%;/else /set combat 1%;/endif%;        /set totaldmg $[totaldmg+dealdmg]%;       /echo -p @{Ccyan} dh: %{dmg} ds: %{spcost} dk: %{karmacost} gxp: %{deltagxp} Last: %{lastRounds}(%{lastTotalDmg}) Curr: %{rounds}(%{totaldmg}) Dealt: %{dealdmg} %;       /set dealdmg=0%;       /if (hptyped == 0)          /if (ascan == 1)            scan%;         /endif%;         /doaheal%;       /else /eval /set combat 0 %;       /endif%;       /if (hps < maxhps*.8) /repeat -2 1 salve%;/endif%;       /if (combat)               /eval /set rounds $[rounds+1]%;              /eval /set totalRounds $[totalRounds+1]%;       /endif%;       /set hptyped 0 %;

/eval /set waitingoneh %{waitingoneh-0}
/def doaheal = /set navgdmg $[-avgdmg]%;;       /elseif ((hps < minhps) & ((bouncer & atmob) | !bouncer) & (power > 0)) ;         /beep 1%;
/def -F -ag -t"is at ([0-9]+)% strength\." grabenemypct = /set enemypct=%P1
/eval /set enemypct=%{enemypct-??}

; ************ Damage Tracker and On Hit (hitdmg) ***************************
/def -p1000000 -i -t"struck, but did no damage to you.$" no_dmg =        /if (abrief) ba%;/endif

/alias hh /repeat -2 10 h
/alias reload /reload

/def buyarmour = smithy%;buy cloak%;buy platemail%;buy helmet%;buy boots%;buy gauntlets%;buy two-handed sword%;/send home%;wear all%;wield sword  

/alias cco cast cats claw at off%;
/def afk = afk +5 con for 10k coins.  Big bucks and no whammies! 

/alias depositall 	/def -F -t'^You are carrying ?([0-9]+) coins' moneygrab =	  /set coins %%{P1}%%;deposit $$[coins - 15]%%;h%%;/undef moneygrab%;	bank%;coins

/alias dfix wear earmuffs%;earmuffs 75%;wear shades%;keep earmuffs%;keep shades%;hold wand%;keep wand%;wield %{weapon}

/eval /set hptyped %{hptyped-0}
/alias hp /send hp%;/set hptyped 1