/* Test dei backstab */

/* This is a medievia script and has to be launched once amimud is started,
   it does an infinite loop in which it searches for backstab triggers,
   if found the right variable is incremented.
 */

address 'AmiMUD.1'

'am_addmacro "backstatus" "#echo Backstab: $back_ok hit - $back_fail miss ($back_total total)\n"'

'am_addtrigger "ou lunge at" "#backstatus\n" REXXTRIGGER'

failed=TRIGGER

'am_addtrigger "ou plunge" "#backstatus\n" REXXTRIGGER'
hit=TRIGGER

'am_addtrigger "makes a strange" "#backstatus\n" REXXTRIGGER'
killed=TRIGGER

backstab_ok=0
backstab_failed=0

do forever
	'am_setvar back_fail ' backstab_failed
	'am_setvar back_ok ' backstab_ok
	'am_setvar back_total' backstab_ok+backstab_failed

	'am_waittriggers REXXONLY'

	if TRIGGER=killed then backstab_ok=backstab_ok+1

	if TRIGGER=hit then backstab_ok=backstab_ok+1

	if TRIGGER=failed then backstab_failed=backstab_failed+1

end