[events e_bonus]
on=@itemequip
if (strmatch('<strsub 0 8 <act.baseid>>','i_katana'))
events +e_bleeding
elif (strmatch('<strsub 0 7 <act.baseid>>','i_sword'))
events +e_bleeding
elif (strmatch('<strsub 0 10 <act.baseid>>','i_scimitar'))
events +e_bleeding
elif (strmatch('<strsub 0 9 <act.baseid>>','i_cutlass'))
events +e_bleeding
elif (strmatch('<strsub 0 7 <act.baseid>>','i_spear'))
events +e_spear
elif (strmatch('<strsub 0 9 <act.baseid>>','i_halberd'))
events +e_dismount
elif (strmatch('<strsub 0 11 <act.baseid>>','i_pitchfork'))
events +e_dismount
elif (<act.type> == t_weapon_axe)
events +e_axer
endif

on=@itemunequip
if (strmatch('<strsub 0 8 <act.baseid>>','i_katana'))
events -e_bleeding
elif (strmatch('<strsub 0 7 <act.baseid>>','i_sword'))
events -e_bleeding
elif (strmatch('<strsub 0 10 <act.baseid>>','i_scimitar'))
events -e_bleeding
elif (strmatch('<strsub 0 9 <act.baseid>>','i_cutlass'))
events -e_bleeding
elif (strmatch('<strsub 0 7 <act.baseid>>','i_spear'))
events -e_spear
elif (strmatch('<strsub 0 9 <act.baseid>>','i_halberd'))
events -e_dismount
elif (strmatch('<strsub 0 11 <act.baseid>>','i_pitchfork'))
events -e_dismount
elif (<act.type> == t_weapon_axe)
events -e_axer
endif