[FUNCTION F_DIVINE_FURY_CALLBACK]
SOUND=0F8
TAG.DIVINEFURYEFFECT=
TAG0.DAMINCREASE -= 10
IF (<TAG0.DAMINCREASE> == 0)
TAG.DAMINCREASE=
ENDIF
TAG0.SWINGINCREASE -= 10
IF (<TAG0.SWINGINCREASE> == 0)
TAG.SWINGINCREASE=
ENDIF
TAG0.HITCHANCEINCREASE -= 10
IF (<TAG0.HITCHANCEINCREASE> == 0)
TAG.HITCHANCEINCREASE=
ENDIF
TAG0.HITCHANCEDECREASE += 20
IF (<TAG0.HITCHANCEDECREASE> == 0)
TAG.HITCHANCEDECREASE=
ENDIF
IF (<ISONLINE>) && (<ISPLAYER>)
REMOVEBUFF 1010
ENDIF

[Spell 205]
DEFNAME=s_Divine_Fury
NAME=Divine Fury
SOUND=020F
RUNES=
CAST_TIME=1.0
RESOURCES=
RUNE_ITEM=0
SCROLL_ITEM=0
FLAGS=spellflag_playeronly|spellflag_nofreezeoncast|spellflag_no_castanim
EFFECT_ID=0376A
EFFECT=10
DURATION=0.0
MANAUSE=15
SKILLREQ=SKILL_CHIVALRY 25.0
INTERRUPT=0.0,0.0

ON=@Start
SAY @,,2 1060722

ON=@Effect
IF (!(<TAG0.DIVINEFURYEFFECT>))
effect 3,0376A,1,18,0,1160,0
EFFECT 3,037C4,1,20,0,43,2
	IF (<BODY> == c_man) || (<BODY> == c_elf_male) || (<BODY> == c_man_gm)
	SOUND=044A
	ELSE
	SOUND=0338
	ENDIF
LOCAL.DELAY=<F_COMPUTE_POWERLEVEL 10>
	IF (<LOCAL.DELAY> < 7)
	LOCAL.DELAY=7
	ENDIF
	IF (<LOCAL.DELAY> > 27)
	LOCAL.DELAY=27
	ENDIF
STAM=<MAXSTAM>
TAG0.DAMINCREASE += 10
TAG0.SWINGINCREASE += 10
TAG0.HITCHANCEINCREASE += 10
TAG0.HITCHANCEDECREASE -= 20
TAG.DIVINEFURYEFFECT=1
	IF (<ISPLAYER>)
	ADDBUFF 1010 1060589 1075634 <dLOCAL.DELAY> oi
	ENDIF
TIMERF <dLOCAL.DELAY>,F_DIVINE_FURY_CALLBACK
ENDIF

[EOF]