[Spell 209]
DEFNAME=s_Remove_Curse
NAME=Remove Curse
SOUND=
RUNES=
CAST_TIME=1.5
RESOURCES=
RUNE_ITEM=0
SCROLL_ITEM=0
FLAGS=spellflag_playeronly|spellflag_targ_char|spellflag_nofreezeoncast|spellflag_no_castanim
EFFECT_ID=
EFFECT=10
DURATION=0.0
MANAUSE=20
SKILLREQ=SKILL_CHIVALRY 5.0
INTERRUPT=0.0,0.0

ON=@Start
SAY @,,2 1060726

ON=@Effect
IF (<SRC.KARMA> < -5000)
LOCAL.CHANCE=0
ELIF (<SRC.KARMA> < 0)
LOCAL.CHANCE=<EVAL ((SQRT(20000+<SRC.KARMA>))-122)>
ELIF (<SRC.KARMA> < 5625)
LOCAL.CHANCE=<EVAL ((SQRT(<SRC.KARMA>))+25)>
ELSE
LOCAL.CHANCE=100
ENDIF
IF (<LOCAL.CHANCE> >= <R1,100>)
SOUND=0F6
SOUND=01F7
EFFECT 3,03709,1,30,,13
//SENDPACKET 0C7 00 D00 D00 W02255 W<HVAL <P.X>> W<HVAL <P.Y>> <HVAL <P.Z>-10> W<HVAL <P.X>> W<HVAL <P.Y>> <HVAL <P.Z>+50> 01 00 W00 00 00 D0D D03 W0251D W01 W00 D0c 00 W0100
SENDPACKET 0C7 00 D00 D00 W02255 W<HVAL <P.X>> W<HVAL <P.Y>> <HVAL <P.Z>-10> W<HVAL <P.X>> W<HVAL <P.Y>> <HVAL <P.Z>+50> 01 00 W00 00 00 D0c D03 W0251D W01 W00 D<HVAL 9501> 00 W0100
	IF (<FINDID.i_rune_weaken>)
	FINDID.i_rune_weaken.TIMERD=1
	ENDIF
	IF (<FINDID.i_rune_paralyze>)
	FINDID.i_rune_paralyze.TIMERD=1
	ENDIF
	IF (<FINDID.i_rune_clumsy>)
	FINDID.i_rune_clumsy.TIMERD=1
	ENDIF
	IF (<FINDID.i_rune_feeblemind>)
	FINDID.i_rune_feeblemind.TIMERD=1
	ENDIF
	IF (<FINDID.i_rune_curse>)
	FINDID.i_rune_curse.TIMERD=1
	ENDIF
	IF (<FINDID.i_strangle_effect>)
	FINDID.i_strangle_effect.MORE1=0
	FINDID.i_strangle_effect.TIMER
	ENDIF
ELSE
SOUND=01DF
ENDIF

[EOF]