[EVENTS e_horrific_beast]
ON=@SpellCast
IF (<ARGN1> != 106)
ACTION -1
RETURN 1
ENDIF

ON=@Death
BODY=<OBODY>
TAG0.BONUSHITSREGEN -= 20
	IF (<TAG0.BONUSHITSREGEN> == 0)
	TAG.BONUSHITSREGEN=
	ENDIF
TAG0.DAMINCREASE -= 25
	IF (<TAG0.DAMINCREASE> == 0)
	TAG.DAMINCREASE=
	ENDIF
EVENTS -e_horrific_beast

[Spell 106]
DEFNAME=s_Horrific_Beast
NAME=Horrific Beast
SOUND=0
RUNES=
CAST_TIME=2.0
RESOURCES=1 i_reag_batwing,1 i_reag_daemon_blood
RUNE_ITEM=0
SCROLL_ITEM=0
FLAGS=spellflag_playeronly
EFFECT_ID=
EFFECT=
DURATION=0.0
MANAUSE=11
SKILLREQ=SKILL_NECROMANCY 40.0
INTERRUPT=0.0,0.0

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

ON=@Effect
IF (<BODY> == c_fourarmed_daemon)
BODY=<OBODY>
TAG0.BONUSHITSREGEN -= 20
	IF (<TAG0.BONUSHITSREGEN> == 0)
	TAG.BONUSHITSREGEN=
	ENDIF
TAG0.DAMINCREASE -= 25
	IF (<TAG0.DAMINCREASE> == 0)
	TAG.DAMINCREASE=
	ENDIF
EVENTS -e_horrific_beast
ELIF (<ISHUMAN>)
EVENTS +e_horrific_beast
TAG0.BONUSHITSREGEN += 20
TAG0.DAMINCREASE += 25
BODY=c_fourarmed_daemon
ENDIF
UPDATE
SOUND=0165
EFFECT=3,03728,16,30,3,92

[EOF]