[EVENTS e_vampiric_form]
ON=@GetHit
IF (<SRC.ISCHAR>)
	IF (!(<ISEMPTY <SRC.TAG.SLAYERGROUP>>))
		IF (STRMATCH(<SRC.TAG.SLAYERGROUP>,Undead))
		ARGN1 *= 2
		ENDIF
	ENDIF
ENDIF

ON=@SpellEffect
IF (STRMATCH(*garlic*,<SERV.SPELL.<ARGN1>.RESOURCES>))
DAMAGE <R17,23> <DEF.DAM_MAGIC> <SRC>
ENDIF

ON=@SpellCast
IF (STRMATCH(*garlic*,<SERV.SPELL.<ARGN1>.RESOURCES>))
DAMAGE <R17,23> <DEF.DAM_MAGIC> <SRC>
ACTION -1
RETURN 1
ENDIF

ON=@Death
BODY=<OBODY>
TAG0.LIFELEECH += 20
	IF (<TAG0.LIFELEECH> == 0)
	TAG.LIFELEECH=
	ENDIF
MODAR += 10
EVENTS -e_vampiric_form

[Spell 113]
DEFNAME=s_Vampiric_Embrace
NAME=Vampiric Embrace
SOUND=0
RUNES=
CAST_TIME=2.0
RESOURCES=1 i_reag_nox_crystal,1 i_reag_batwing,1 i_reag_pig_iron
RUNE_ITEM=0
SCROLL_ITEM=0
FLAGS=spellflag_playeronly
EFFECT_ID=
EFFECT=
DURATION=0.0
MANAUSE=23
SKILLREQ=SKILL_NECROMANCY 99.0
INTERRUPT=0.0,0.0

ON=@Start
IF (<ISPLAYER>)
SAY @,3,1 Rel Xen An Sanct
ENDIF

ON=@Effect
IF (<BODY> == c_vampire_bat)
BODY=<OBODY>
TAG0.LIFELEECH -= 20
	IF (<TAG0.LIFELEECH> == 0)
	TAG.LIFELEECH=
	ENDIF
MODAR += 10
EVENTS -e_vampiric_form
UPDATE
ELIF (<ISHUMAN>)
EVENTS +e_vampiric_form
TAG0.LIFELEECH += 20
MODAR -= 10
BODY=c_vampire_bat
UPDATE
ENDIF
SOUND=04B1
effect 3,0373A,1,22,0,1108,7
effect 3,0376A,1,22,0,67,7

[EOF]