;;Vampiric Blow
;;=============
;;type '/vbdmg on' to set vb damage report trig on
;;type 'vbstat' to see vampiric blow statistics
;;and 'vbclear' to clear vbstats

/def vbdmg=\
  /if (%* !~ "on") \
    /undef vbdmg0%; \
    /undef vbdmg1%; \
    /undef vbdmg2%; \
    /undef vbdmg3%; \
    /undef vbdmg4%; \
    /undef vbdmg5%; \
    /undef vbdmg6%; \
    /undef vbdmg7%; \
    /undef vbdmg8%; \
    /undef vbdmg9%; \
    /undef vbdmgfumble%; \
    /echo -aB ... TF info: Report Vampiric Blow Damage triggers (off)%; \
  /else \
    /def -p1 -t'MASSIVE blows into ([A-Za-z]*) bloody body*' vbdmg9= @party say ( VB Dmg lev 9 )\%; \
    /def -p1 -t'Screaming hellishly, you HACK and HACK at*' vbdmg8= @party say ( VB Dmg lev 8 )\%; \
    /def -p1 -t'A blanket of rage shuts out all but*' vbdmg7= @party say ( VB Dmg lev 7 )\%; \
    /def -p1 -t'Bending reality around its sharp edge, ([A-Za-z]*) warps you right behind*' vbdmg6= @party say ( VB Dmg lev 6 )\%; \
    /def -p1 -t'You strike * a mighty blow with *, which *' vbdmg5= @party say ( VB Dmg lev 5 )\%; \
    /def -p1 -t'You bring * around in a tight arc that ends in *' vbdmg4= @party say ( VB Dmg lev 4 )\%; \
    /def -p1 -t'A quick feint leaves an opening that you exploit *' vbdmg3= @party say ( VB Dmg lev 3 )\%; \
    /def -p1 -t'Your wounds heal slightly as you score a gash on *.' vbdmg2= @party say ( VB Dmg lev 2 )\%; \
    /def -p1 -t'Somehow, your weak thrust manages to get past *\\'s defenses.' vbdmg1= @party say ( VB Dmg lev 1 )\%; \
    /def -p1 -t'Your blade doesn\\'t even come close to *' vbdmg0= @party say ( VB Dmg lev 0 )\%; \
    /def -p1 -t'Something goes terribly wrong as you bring *' vbdmgfumble= @party say ( VB Fumble )\%; \
    /echo -aB ... TF info:  Report Vampiric Blow Damage triggers (on)%; \
  /endif

;;VB COUNTER
 /def -h'SEND vbclear' vbreset=/set weak=0%; \
	/set slight=0%; \
	/set feint=0%; \
	/set arc=0%; \
	/set mighty=0%; \
	/set bend=0%; \
	/set rage=0%; \
	/set hack=0%; \
	/set mas=0%; \
	/set fumble=0%; \
	/set huti=0%; \
	/set vbtotal=0%;@party say Vb counter cleared!
	
/def -h'SEND vbstat' vbstatreport = party say Vb statistics:%;party say ---------------------%;party say Weak: %{weak}     ($[(%{weak}*100/%{vbtotal})]\%)%;party say Slight: %{slight}     ($[(%{slight}*100/%{vbtotal})]\%)%;party say Feint: %{feint}     ($[(%{feint}*100/%{vbtotal})]\%)%;party say Arc: %{arc}     ($[(%{arc}*100/%{vbtotal})]\%)%;party say Mighty: %{mighty}     ($[(%{mighty}*100/%{vbtotal})]\%)%;party say Bend: %{bend}     ($[(%{bend}*100/%{vbtotal})]\%)%;party say Rage: %{rage}     ($[(%{rage}*100/%{vbtotal})]\%)%;party say Hack: %{hack}     ($[(%{hack}*100/%{vbtotal})]\%)%;party say Massive: %{mas}     ($[(%{mas}*100/%{vbtotal})]\%)%;party say Fumble: %{fumble}     ($[(%{fumble}*100/%{vbtotal})]\%)%;party say Miss: %{huti}     ($[(%{huti}*100/%{vbtotal})]\%)%;party say ----------------------%;party say Total vb hits: %{vbtotal}


	/def -t'Something goes terribly wrong as you bring*' vfum= /set fumble=$[({fumble}+1)] %;/set vbtotal=$[({vbtotal}+1)];% \
	/def -t'Your blade doesn\'t even come close t*' vfhuti=/set huti=$[({huti}+1)] %;/set vbtotal=$[({vbtotal}+1)];% \
	/def -t'Somehow, your weak thrust manages to get past*' vsh=/set weak=$[({weak}+1)] %;/set vbtotal=$[({vbtotal}+1)];% \
	/def -t'Your wounds heal slightly as you score a gash on*' vsli=/set slight=$[({slight}+1)] %;/set vbtotal=$[({vbtotal}+1)];% \
	/def -t'A quick feint leaves an opening that you exploit for a deep thrust*' vfei=/set feint=$[({feint}+1)] %;/set vbtotal=$[({vbtotal}+1)];% \
	/def -t'You bring ([A-Za-z]*) around in a tight arc*' varc=/set arc=$[({arc}+1)] %;/set vbtotal=$[({vbtotal}+1)];% \
	/def -t'*a mighty blow with kukka,*' vmighty=/set mighty=$[({mighty}+1)] %;/set vbtotal=$[({vbtotal}+1)];% \
	/def -t'Bending reality around its sharp edge, ([A-Za-z]*) warps you right behind*' vbend=/set bend=$[({bend}+1)] %;/set vbtotal=$[({vbtotal}+1)];% \
	/def -t'A blanket of rage shuts out all but*' vrage=/set rage=$[({rage}+1)] %;/set vbtotal=$[({vbtotal}+1)];% \
	/def -t'Screaming hellishly, you HACK and HACK at*' hack=/set hack=$[({hack}+1)] %;/set vbtotal=$[({vbtotal}+1)];% \
	/def -mregexp -t'MASSIVE blows into ([A-Za-z]*) bloody body*' massiveeh=/set mas=$[({mas}+1)] %;/set vbtotal=$[({vbtotal}+1)];% \