[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