[Spell 57]
DEFNAME=s_earthquake
NAME=Earthquake
SOUND=snd_SPELL_EARTHQUAKE
RUNES=IVP
CAST_TIME=2.2
RESOURCES=i_reag_blood_moss,i_reag_ginseng,i_reag_mandrake_root,i_reag_sulfur_ash
RUNE_ITEM=i_rune_EARTHQUAKE
SCROLL_ITEM=i_scroll_EARTHQUAKE
FLAGS=SPELLFLAG_HARM|spellflag_playeronly
EFFECT_ID=0
EFFECT=16,20
DURATION=30.0
MANAUSE=50
SKILLREQ=SKILL_MAGERY 95.0
INTERRUPT=0.0,0.0
// NOTE: does Earthquake use a duration?? IF so, no more then 30secs. This spell is more like an irradiating wave thus should have a set distance/time it can be effective

ON=@Effect
IF (<ISITEM>)
RETURN 1
ENDIF
IF !(<CANSEELOS>)
RETURN 1
ENDIF
IF !(<SRC.ISPLAYER>)
	IF !(<ISPLAYER>)
		IF !(<FLAGS>&statf_pet)
		RETURN 1
		ENDIF
	ENDIF
ENDIF
IF (<ISPLAYER>) && (<SRC.ISPLAYER>)
	IF (<SRC.ISINPARTY>) && (<ISINPARTY>)
		IF (<PARTY.ISSAMEPARTYOF <SRC>>)
		RETURN 1
		ENDIF
	ENDIF
ENDIF
LOCAL.DAMAGE=<EVAL <HITS>/3>
IF (<LOCAL.DAMAGE> < 10)
LOCAL.DAMAGE=10
ELIF (<LOCAL.DAMAGE> > 100)
LOCAL.DAMAGE=100
ENDIF
DAMAGE <LOCAL.DAMAGE> <DEF.DAM_MAGIC> <SRC>
RETURN 1

[Spell 58]
DEFNAME=s_energy_vortex
NAME=Energy Vortex
SOUND=snd_SPELL_ENERGY_VORTEX
RUNES=VCP
CAST_TIME=2.2
RESOURCES=i_reag_black_pearl,i_reag_blood_moss,i_reag_mandrake_root,i_reag_nightshade
RUNE_ITEM=i_rune_ENERGY_VORTEX
SCROLL_ITEM=i_scroll_ENERGY_VORTEX
FLAGS=SPELLFLAG_HARM|SPELLFLAG_SUMMON|SPELLFLAG_PLAYERONLY
EFFECT_ID=0
EFFECT=0
DURATION=60.0,100.0
MANAUSE=50
SKILLREQ=SKILL_MAGERY 80.0
INTERRUPT=0.0,0.0

ON=@Start
IF (<EVAL <CURFOLLOWER>+2> > <MAXFOLLOWER>)
SYSMESSAGELOC -1,1049645
ACTION -1
RETURN 1
ENDIF

ON=@Success
IF (<EVAL <CURFOLLOWER>+2> > <MAXFOLLOWER>)
SYSMESSAGELOC -1,1049645
ACTION -1
RETURN 1
ENDIF
LOCAL.CREATEOBJECT1=<DEF.c_m_energy_vortex>
CURFOLLOWER += 2

[Spell 59]
DEFNAME=s_resurrection
NAME=Resurrection
SOUND=snd_SPELL_RESURRECTION
RUNES=AC
CAST_TIME=2.2
RESOURCES=i_reag_blood_moss,i_reag_garlic,i_reag_ginseng
RUNE_ITEM=i_rune_RESURRECTION
SCROLL_ITEM=i_scroll_RESURRECTION
FLAGS=SPELLFLAG_TARG_CHAR|SPELLFLAG_GOOD|spellflag_playeronly
EFFECT_ID=0
EFFECT=0
DURATION=0.0
MANAUSE=50
SKILLREQ=SKILL_MAGERY 80.0
INTERRUPT=0.0,0.0

ON=@Effect
IF (<ISPLAYER>)
	IF (<FLAGS>&STATF_DEAD)
		IF (<SRC> != <UID>)
			IF ((!(<CTAG0.RESSER>)) || (<ISDIALOGOPEN D_RESURRECT_CONFIRM>))
			CTAG.RESSER=<SRC>
			DIALOG_UP D_RESURRECT_CONFIRM
			RETURN 1
			ENDIF
		ENDIF
		IF (<SRC.TAG0.VIRTUDES>&<DEF.COMPASSION_L3>)
		LOCAL.HABILIDADECOMP=1
		TIMERF 1,HITS=<EVAL (<MAXHITS>*80)/100>
		ELIF (<SRC.TAG0.VIRTUDES>&<DEF.COMPASSION_L2>)
		LOCAL.HABILIDADECOMP=1
		TIMERF 1,HITS=<EVAL (<MAXHITS>*40)/100>
		ELIF (<SRC.TAG0.VIRTUDES>&<DEF.COMPASSION_L1>)
		LOCAL.HABILIDADECOMP=1
		TIMERF 1,HITS=<EVAL (<MAXHITS>*20)/100>
		ENDIF
	ENDIF
ENDIF
IF !(<LOCAL.HABILIDADECOMP>)
	IF (<TAG0.VIRTUDES>&<DEF.SPIRITUALITY_L3>)
	TIMERF 1,HITS=<MAXHITS>
	ELIF (<TAG0.VIRTUDES>&<DEF.SPIRITUALITY_L2>)
	TIMERF 1,HITS=<EVAL (<MAXHITS>*80)/100>
	ELIF (<TAG0.VIRTUDES>&<DEF.SPIRITUALITY_L1>)
	TIMERF 1,HITS=<EVAL (<MAXHITS>*50)/100>
	ENDIF
ENDIF
TIMERF 1,STAM=<MAXSTAM>

[Spell 60]
DEFNAME=s_summon_elem_air
NAME=Air Elemental
SOUND=snd_SPELL_SUMMON_elem_air
RUNES=KVXH
CAST_TIME=2.2
RESOURCES=i_reag_blood_moss,i_reag_mandrake_root,i_reag_spider_silk
RUNE_ITEM=i_rune_SUMMON_elem_air
SCROLL_ITEM=i_scroll_SUMMON_elem_air
FLAGS=SPELLFLAG_SUMMON|spellflag_playeronly
EFFECT_ID=0
EFFECT=0
DURATION=2*60.0,3*60.0
MANAUSE=50
SKILLREQ=SKILL_MAGERY 80.0
INTERRUPT=0.0,0.0

ON=@Start
IF (<EVAL <CURFOLLOWER>+2> > <MAXFOLLOWER>)
SYSMESSAGELOC -1,1049645
ACTION -1
RETURN 1
ENDIF

ON=@Success
IF (<EVAL <CURFOLLOWER>+2> > <MAXFOLLOWER>)
SYSMESSAGELOC -1,1049645
ACTION -1
RETURN 1
ENDIF
LOCAL.CREATEOBJECT1=<DEF.c_summoned_elem_air>
CURFOLLOWER += 2

[Spell 61]
DEFNAME=s_summon_daemon
NAME=Daemon
SOUND=snd_SPELL_SUMMON_DAEMON
RUNES=KVXC
CAST_TIME=2.2
RESOURCES=i_reag_blood_moss,i_reag_mandrake_root,i_reag_spider_silk,i_reag_sulfur_ash
RUNE_ITEM=i_rune_SUMMON_DAEMON
SCROLL_ITEM=i_scroll_SUMMON_DAEMON
FLAGS=SPELLFLAG_SUMMON|spellflag_playeronly
EFFECT_ID=0
EFFECT=0
DURATION=2*60.0,3*60.0
MANAUSE=50
SKILLREQ=SKILL_MAGERY 80.0

ON=@Start
IF (<EVAL <CURFOLLOWER>+4> > <MAXFOLLOWER>)
SYSMESSAGELOC -1,1049645
ACTION -1
RETURN 1
ENDIF

ON=@Success
IF (<EVAL <CURFOLLOWER>+4> > <MAXFOLLOWER>)
SYSMESSAGELOC -1,1049645
ACTION -1
RETURN 1
ENDIF
LOCAL.CREATEOBJECT1=<DEF.c_summoned_daemon>
CURFOLLOWER += 4

[Spell 62]
DEFNAME=s_summon_elem_earth
NAME=Earth Elemental
SOUND=snd_SPELL_SUMMON_elem_earth
RUNES=KVXY
CAST_TIME=2.2
RESOURCES=i_reag_blood_moss,i_reag_mandrake_root,i_reag_spider_silk
RUNE_ITEM=i_rune_SUMMON_elem_earth
SCROLL_ITEM=i_scroll_SUMMON_elem_earth
FLAGS=SPELLFLAG_SUMMON|SPELLFLAG_PLAYERONLY
EFFECT_ID=0
EFFECT=0
DURATION=3*60.0,4*60.0
MANAUSE=50
SKILLREQ=SKILL_MAGERY 80.0
INTERRUPT=0.0,0.0

ON=@Start
IF (<EVAL <CURFOLLOWER>+2> > <MAXFOLLOWER>)
SYSMESSAGELOC -1,1049645
ACTION -1
RETURN 1
ENDIF

ON=@Success
IF (<EVAL <CURFOLLOWER>+2> > <MAXFOLLOWER>)
SYSMESSAGELOC -1,1049645
ACTION -1
RETURN 1
ENDIF
LOCAL.CREATEOBJECT1=<DEF.c_summoned_elem_earth>
CURFOLLOWER += 2

[Spell 63]
DEFNAME=s_summon_elem_fire
NAME=Fire Elemental
SOUND=snd_SPELL_SUMMON_elem_fire
RUNES=KVXF
CAST_TIME=2.2
RESOURCES=i_reag_blood_moss,i_reag_mandrake_root,i_reag_spider_silk,i_reag_sulfur_ash
RUNE_ITEM=i_rune_SUMMON_elem_fire
SCROLL_ITEM=i_scroll_SUMMON_elem_fire
FLAGS=SPELLFLAG_SUMMON|SPELLFLAG_PLAYERONLY
EFFECT_ID=0
EFFECT=0
DURATION=2*60.0,3*60.0
MANAUSE=50
SKILLREQ=SKILL_MAGERY 80.0
INTERRUPT=0.0,0.0

ON=@Start
IF (<EVAL <CURFOLLOWER>+2> > <MAXFOLLOWER>)
SYSMESSAGELOC -1,1049645
ACTION -1
RETURN 1
ENDIF

ON=@Success
IF (<EVAL <CURFOLLOWER>+2> > <MAXFOLLOWER>)
SYSMESSAGELOC -1,1049645
ACTION -1
RETURN 1
ENDIF
LOCAL.CREATEOBJECT1=<DEF.c_summoned_elem_fire>
CURFOLLOWER += 2

[Spell 64]
DEFNAME=s_summon_elem_water
NAME=Water Elemental
SOUND=snd_SPELL_SUMMON_elem_water
RUNES=KVXAF
CAST_TIME=2.2
RESOURCES=i_reag_blood_moss,i_reag_mandrake_root,i_reag_spider_silk
RUNE_ITEM=i_rune_SUMMON_elem_water
SCROLL_ITEM=i_scroll_SUMMON_elem_water
FLAGS=SPELLFLAG_SUMMON|spellflag_playeronly
EFFECT_ID=0
EFFECT=0
DURATION=3*60.0,4*60.0
MANAUSE=50
SKILLREQ=SKILL_MAGERY 80.0
INTERRUPT=0.0,0.0

ON=@Start
IF (<EVAL <CURFOLLOWER>+2> > <MAXFOLLOWER>)
SYSMESSAGELOC -1,1049645
ACTION -1
RETURN 1
ENDIF

ON=@Success
IF (<EVAL <CURFOLLOWER>+2> > <MAXFOLLOWER>)
SYSMESSAGELOC -1,1049645
ACTION -1
RETURN 1
ENDIF
LOCAL.CREATEOBJECT1=<DEF.c_summoned_elem_water>
CURFOLLOWER += 2

[EOF]