//Cleric Book Script, v1.0
//By Rudenid.
//Parts taken from Taran's Necromancy system.

[FUNCTION cleric] 
IF ((<SRC.RESTEST i_SPELL_timer>)&&(<SRC.ISGM> == 0))
	SRC.SYSMESSAGE You cant use this ability yet! 
	RETURN 1 
ELSEIF <ARGN>>26 
	SRC.SYSMESSAGE THERE IS NO SPELL NUMBER <ARGN>! 
	RETURN 1 
ELSE 
	SRC.CONSUME=100 icleric_<argn> //So no memory items get left lying around...

	IF (<SRC.ISGM>==0)
		IF (<SRC.MANA> < 14)
			SYSMESSAGE You do not have enough mana to cast a cleric spell. You need at least 14.
			RETURN 1
		ENDIF

		SRC.MANA=<EVAL <SRC.MANA> + {-14 -10}>
	ENDIF

	IF ((<SRC.ISGM>==0)&&(<SRC.KARMA><0))
		SRC.SYSMESSAGE Because of your evil deeds, you are not able to touch this power.
		RETURN 1
	ENDIF

	SRC.NEWITEM=i_SPELL_timer 
	SRC.ACT.EQUIP
	IF (<EVAL <SRC.TAG.PALADIN>> != 0)
		DORAND 3
		SRC.ANIM 9
		SRC.ANIM 11
		SRC.ANIM 17
		ENDDO
	ELSE
		IF ((<SRC.ISGM> == 0)&&(<FINDLAYER(1)>))
			IF (<FINDLAYER(1).TYPE> != t_weapon_mace_staff)
				IF (<FINDLAYER(1).TYPE> != t_spellbook)
					IF (<FINDLAYER(1).TYPE> != t_wand)
						FINDLAYER(1).BOUNCE
					ENDIF
				ENDIF
			ENDIF
		ENDIF

		IF ((<SRC.ISGM> == 0)&&(<FINDLAYER(2)>))
			IF (<FINDLAYER(2).TYPE> != t_weapon_mace_staff)
				IF (<FINDLAYER(2).TYPE> != t_spellbook)
					IF (<FINDLAYER(1).TYPE> != t_wand)
						FINDLAYER(2).BOUNCE
					ENDIF
				ENDIF
			ENDIF
		ENDIF

		DORAND 2
		SRC.ANIM 16
		SRC.ANIM 17
		ENDDO
	ENDIF

	VAR.FACINGX=<SRC.DIR> 
	SRC.NEWITEM=icleric_<argn> 
	SRC.ACT.P=<SRC.P> 
	SRC.ACT.MOVE <EVAL RAND(7)-3> <EVAL RAND(7)-3> 
	SRC.ACT.ATTR=<SRC.ACT.ATTR>|attr_decay
	SRC.ACT.TIMER=5

	IF !((<SRC.ISGM>)&&(<SRC.FLAGS> & statf_insubstantial))
	SRC.SPELLEFFECT s_reveal, 100.0
	SRC.SAY <SRC.ACT.NAME> 
	ENDIF

	VAR.SPELLITEM=<SRC.ACT.UID> 
	UID.SPELLITEM.USE 
	UID.SPELLITEM.ATTR attr_invis|attr_decay
	UID.SPELLITEM.TIMER 5
	SRC.DIR=<VAR.FACINGX> 
	IF (<EVAL <SRC.TAG.CLERICOK>> = 0)
		IF !(<SRC.ISGM>)
			UID.SPELLITEM.REMOVE
			SRC.SYSMESSAGE The power rejects you, and your spell backfires!
			SRC.DAMAGE <EVAL {15 30}>
		ENDIF
	ENDIF

	SRC.UPDATE 
	RETURN 1 
ENDIF 

[DIALOG d_clericbook] 
0, 0 
PAGE 0 

gumppic 67 71 510 
text 110 270 0 81 
text 300 270 0 82 
text 110 300 0 83 

PAGE 1 
button 110 112 55 56 1 0 1 
button 110 132 55 56 1 0 2 
button 110 152 55 56 1 0 3 
button 110 172 55 56 1 0 4 
button 110 192 55 56 1 0 5 
button 110 212 55 56 1 0 6 
button 110 232 55 56 1 0 7 
button 110 252 55 56 1 0 8 
button 300 112 55 56 1 0 9 
button 300 132 55 56 1 0 10 
button 300 152 55 56 1 0 11 
button 300 172 55 56 1 0 12 
button 300 192 55 56 1 0 13 
button 300 212 55 56 1 0 14 
button 300 232 55 56 1 0 15 
button 300 252 55 56 1 0 16 
text 145 92 15 49 
text 130 110 50 0 
text 130 130 50 1 
text 130 150 50 2 
text 130 170 50 3 
text 130 190 50 4 
text 130 210 50 5 
text 130 230 50 6 
text 130 250 50 7 
text 335 92 15 50 
text 320 110 50 8 
text 320 130 50 9 
text 320 150 50 10 
text 320 170 50 11 
text 320 190 50 12 
text 320 210 50 13 
text 320 230 50 14 
text 320 250 50 15 
button 423 71 502 502 0 2 33 

PAGE 2 
button 110 112 55 56 1 0 17 
button 110 132 55 56 1 0 18 
button 110 152 55 56 1 0 19 
button 110 172 55 56 1 0 20 
button 110 192 55 56 1 0 21 
button 110 212 55 56 1 0 22 
button 110 232 55 56 1 0 23 
button 110 252 55 56 1 0 24 
button 300 112 55 56 1 0 25 
button 300 132 55 56 1 0 26 
button 300 152 55 56 1 0 27 
button 300 172 55 56 1 0 28 
button 300 192 55 56 1 0 29 
button 300 212 55 56 1 0 30 
button 300 232 55 56 1 0 31 
button 300 252 55 56 1 0 32 
text 145 92 15 51 
text 130 110 50 16 
text 130 130 50 17 
text 130 150 50 18 
text 130 170 50 19 
text 130 190 50 20 
text 130 210 50 21 
text 130 230 50 22 
text 130 250 50 23 
text 335 92 15 52 
text 320 110 50 24 
text 320 130 50 25 
text 320 150 50 26 
text 320 170 50 27 
text 320 190 50 28 
text 320 210 50 29 
text 320 230 50 30 
text 320 250 50 31 
button 67 70 501 501 0 1 33 
button 423 71 502 502 0 3 33 

PAGE 3 
button 67 70 501 501 0 2 33 
button 423 71 502 502 0 4 33 
text 145 92 15 53 // Page 
text 160 120 0 0 // Spell Name: Peace 
gumppic 100 125 2284 //Icon 

gumppic 110 175 57 //Bar 
gumppic 130 175 58 
gumppic 145 175 58 
gumppic 160 175 58 
gumppic 175 175 58 
gumppic 190 175 58 
gumppic 205 175 58 
gumppic 220 175 58 
gumppic 230 175 59 

text 110 190 5 48 //Reagents: 
text 110 205 0 32 //1st 
text 110 220 0 33 //2nd 

text 345 92 15 54 //Page 
text 360 120 0 1 //Spell Name: Greater Cure
text 360 133 0 79 
gumppic 300 125 2250 //Icon 

gumppic 300 175 57 //Bar 
gumppic 315 175 58 
gumppic 330 175 58 
gumppic 345 175 58 
gumppic 360 175 58 
gumppic 375 175 58 
gumppic 390 175 58 
gumppic 405 175 58 
gumppic 415 175 59 

text 300 190 5 48 //Reagents: 
text 300 205 0 34 //1st 
text 300 220 0 35 //2nd 

PAGE 4 
button 67 70 501 501 0 3 33 
button 423 71 502 502 0 5 33 
text 145 92 15 55 // Page 
text 160 120 0 2 // Spell Name: Remove Curse 
gumppic 100 125 2280 //Icon 

gumppic 110 175 57 //Bar 
gumppic 130 175 58 
gumppic 145 175 58 
gumppic 160 175 58 
gumppic 175 175 58 
gumppic 190 175 58 
gumppic 205 175 58 
gumppic 220 175 58 
gumppic 230 175 59 

text 110 190 5 48 //Reagents: 
text 110 205 0 36 //1st 
text 110 220 0 37 //2nd 

text 345 92 15 56 //Page 
text 360 120 0 3 //Spell Name: Holy Light
gumppic 300 125 2281 //Icon 

gumppic 300 175 57 //Bar 
gumppic 315 175 58 
gumppic 330 175 58 
gumppic 345 175 58 
gumppic 360 175 58 
gumppic 375 175 58 
gumppic 390 175 58 
gumppic 405 175 58 
gumppic 415 175 59 

text 300 190 5 48 //Reagents: 
text 300 205 0 38 //1st 
text 300 220 0 39 //2nd 

PAGE 5 
button 67 70 501 501 0 4 33 
button 423 71 502 502 0 6 33 
text 145 92 15 57 // Page 
text 160 120 0 4 // Spell Name: True Strike
gumppic 100 125 2244 //Icon 

gumppic 110 175 57 //Bar 
gumppic 130 175 58 
gumppic 145 175 58 
gumppic 160 175 58 
gumppic 175 175 58 
gumppic 190 175 58 
gumppic 205 175 58 
gumppic 220 175 58 
gumppic 230 175 59 

text 110 190 5 48 //Reagents: 
text 110 205 0 40 //1st 
text 110 220 0 41 //2nd 

text 345 92 15 58 //Page 
text 360 120 0 5 //Spell Name: Elemental Shield
gumppic 300 125 2254 //Icon 

gumppic 300 175 57 //Bar 
gumppic 315 175 58 
gumppic 330 175 58 
gumppic 345 175 58 
gumppic 360 175 58 
gumppic 375 175 58 
gumppic 390 175 58 
gumppic 405 175 58 
gumppic 415 175 59 

text 300 190 5 48 //Reagents: 
text 300 205 0 42 //1st 
text 300 220 0 43 //2nd 

PAGE 6 
button 67 70 501 501 0 5 33 
button 423 71 502 502 0 7 33 
text 145 92 15 59 // Page 
text 160 120 0 6 // Spell Name: Summoner's Ward
gumppic 100 125 2279 //Icon 

gumppic 110 175 57 //Bar 
gumppic 130 175 58 
gumppic 145 175 58 
gumppic 160 175 58 
gumppic 175 175 58 
gumppic 190 175 58 
gumppic 205 175 58 
gumppic 220 175 58 
gumppic 230 175 59 

text 110 190 5 48 //Reagents: 
text 110 205 0 44 //1st 
text 110 220 0 45 //2nd 

text 345 92 15 60 //Page 
text 360 120 0 7 //Spell Name: Poison Ward
gumppic 300 125 2278 //Icon 

gumppic 300 175 57 //Bar 
gumppic 315 175 58 
gumppic 330 175 58 
gumppic 345 175 58 
gumppic 360 175 58 
gumppic 375 175 58 
gumppic 390 175 58 
gumppic 405 175 58 
gumppic 415 175 59 

text 300 190 5 48 //Reagents: 
text 300 205 0 46 //1st 
text 300 220 0 35 //2nd 

PAGE 7 
button 67 70 501 501 0 6 33 
button 423 71 502 502 0 8 33 
text 145 92 15 61 // Page 
text 160 120 0 8 // Spell Name: Magic Ward
gumppic 100 125 2273 //Icon 

gumppic 110 175 57 //Bar 
gumppic 130 175 58 
gumppic 145 175 58 
gumppic 160 175 58 
gumppic 175 175 58 
gumppic 190 175 58 
gumppic 205 175 58 
gumppic 220 175 58 
gumppic 230 175 59 

text 110 190 5 48 //Reagents: 
text 110 205 0 46 //1st 
text 110 220 0 47 //2nd 

text 345 92 15 62 //Page 
text 360 120 0 9 //Spell Name: Greatest Heal
gumppic 300 125 2268 //Icon 

gumppic 300 175 57 //Bar 
gumppic 315 175 58 
gumppic 330 175 58 
gumppic 345 175 58 
gumppic 360 175 58 
gumppic 375 175 58 
gumppic 390 175 58 
gumppic 405 175 58 
gumppic 415 175 59 

text 300 190 5 48 //Reagents: 
text 300 205 0 42 //1st 
text 300 220 0 41 //2nd 

PAGE 8 
button 67 70 501 501 0 7 33 
button 423 71 502 502 0 9 33 
text 145 92 15 63 // Page 
text 160 120 0 10 // Spell Name: Turn Undead
gumppic 100 125 2293 //Icon 

gumppic 110 175 57 //Bar 
gumppic 130 175 58 
gumppic 145 175 58 
gumppic 160 175 58 
gumppic 175 175 58 
gumppic 190 175 58 
gumppic 205 175 58 
gumppic 220 175 58 
gumppic 230 175 59 

text 110 190 5 48 //Reagents: 
text 110 205 0 36 //1st 
text 110 220 0 37 //2nd 

text 345 92 15 64 //Page 
text 360 120 0 11 //Spell Name: Refresh
gumppic 300 125 2241 //Icon 

gumppic 300 175 57 //Bar 
gumppic 315 175 58 
gumppic 330 175 58 
gumppic 345 175 58 
gumppic 360 175 58 
gumppic 375 175 58 
gumppic 390 175 58 
gumppic 405 175 58 
gumppic 415 175 59 

text 300 190 5 48 //Reagents: 
text 300 205 0 38 //1st 
text 300 220 0 39 //2nd 

PAGE 9 
button 67 70 501 501 0 8 33 
button 423 71 502 502 0 10 33 
text 145 92 15 65 // Page 
text 160 120 0 12 // Spell Name: Mass Heal
gumppic 100 125 2268 //Icon 

gumppic 110 175 57 //Bar 
gumppic 130 175 58 
gumppic 145 175 58 
gumppic 160 175 58 
gumppic 175 175 58 
gumppic 190 175 58 
gumppic 205 175 58 
gumppic 220 175 58 
gumppic 230 175 59 

text 110 190 5 48 //Reagents: 
text 110 205 0 40 //1st 
text 110 220 0 41 //2nd 

text 345 92 15 66 //Page 
text 360 120 0 13 //Spell Name: Mass Nightsight
gumppic 300 125 2245 //Icon 

gumppic 300 175 57 //Bar 
gumppic 315 175 58 
gumppic 330 175 58 
gumppic 345 175 58 
gumppic 360 175 58 
gumppic 375 175 58 
gumppic 390 175 58 
gumppic 405 175 58 
gumppic 415 175 59 

text 300 190 5 48 //Reagents: 
text 300 205 0 42 //1st 
text 300 220 0 43 //2nd 

PAGE 10 
button 67 70 501 501 0 9 33 
button 423 71 502 502 0 11 33 
text 145 92 15 67 // Page 
text 160 120 0 14 // Spell Name: Levitating Tackle
gumppic 100 125 2256 //Icon 

gumppic 110 175 57 //Bar 
gumppic 130 175 58 
gumppic 145 175 58 
gumppic 160 175 58 
gumppic 175 175 58 
gumppic 190 175 58 
gumppic 205 175 58 
gumppic 220 175 58 
gumppic 230 175 59 

text 110 190 5 48 //Reagents: 
text 110 205 0 44 //1st 
text 110 220 0 45 //2nd 

text 345 92 15 68 //Page 
text 360 120 0 15 //Spell Name: Greater Magic Reflection
text 360 133 0 80 
gumppic 300 125 2275 //Icon 

gumppic 300 175 57 //Bar 
gumppic 315 175 58 
gumppic 330 175 58 
gumppic 345 175 58 
gumppic 360 175 58 
gumppic 375 175 58 
gumppic 390 175 58 
gumppic 405 175 58 
gumppic 415 175 59 

text 300 190 5 48 //Reagents: 
text 300 205 0 46 //1st 
text 300 220 0 35 //2nd 

PAGE 11 
button 67 70 501 501 0 10 33 
button 423 71 502 502 0 12 33 
text 145 92 15 69 // Page 
text 160 120 0 16 // Spell Name: Friendship
gumppic 100 125 2292 //Icon 

gumppic 110 175 57 //Bar 
gumppic 130 175 58 
gumppic 145 175 58 
gumppic 160 175 58 
gumppic 175 175 58 
gumppic 190 175 58 
gumppic 205 175 58 
gumppic 220 175 58 
gumppic 230 175 59 

text 110 190 5 48 //Reagents: 
text 110 205 0 46 //1st 
text 110 220 0 47 //2nd 

text 345 92 15 70 //Page 
text 360 120 0 17 //Spell Name: Righteous Impulse
gumppic 300 125 2261 //Icon 

gumppic 300 175 57 //Bar 
gumppic 315 175 58 
gumppic 330 175 58 
gumppic 345 175 58 
gumppic 360 175 58 
gumppic 375 175 58 
gumppic 390 175 58 
gumppic 405 175 58 
gumppic 415 175 59 

text 300 190 5 48 //Reagents: 
text 300 205 0 46 //1st 
text 300 220 0 35 //2nd 

PAGE 12 
button 67 70 501 501 0 11 33 
button 423 71 502 502 0 13 33 
text 145 92 15 71 // Page 
text 160 120 0 18 // Spell Name: Righteous Fear 
gumppic 100 125 2249 //Icon 

gumppic 110 175 57 //Bar 
gumppic 130 175 58 
gumppic 145 175 58 
gumppic 160 175 58 
gumppic 175 175 58 
gumppic 190 175 58 
gumppic 205 175 58 
gumppic 220 175 58 
gumppic 230 175 59 

text 110 190 5 48 //Reagents: 
text 110 205 0 36 //1st 
text 110 220 0 37 //2nd 

text 345 92 15 72 //Page 
text 360 120 0 19 //Spell Name: Reactive Armor
gumppic 300 125 2246 //Icon 

gumppic 300 175 57 //Bar 
gumppic 315 175 58 
gumppic 330 175 58 
gumppic 345 175 58 
gumppic 360 175 58 
gumppic 375 175 58 
gumppic 390 175 58 
gumppic 405 175 58 
gumppic 415 175 59 

text 300 190 5 48 //Reagents: 
text 300 205 0 38 //1st 
text 300 220 0 39 //2nd 

PAGE 13 
button 67 70 501 501 0 12 33 
button 423 71 502 502 0 14 33 
text 145 92 15 73 // Page 
text 160 120 0 20 // Spell Name: Greater Resurrection
gumppic 100 125 2298 //Icon 

gumppic 110 175 57 //Bar 
gumppic 130 175 58 
gumppic 145 175 58 
gumppic 160 175 58 
gumppic 175 175 58 
gumppic 190 175 58 
gumppic 205 175 58 
gumppic 220 175 58 
gumppic 230 175 59 

text 110 190 5 48 //Reagents: 
text 110 205 0 40 //1st 
text 110 220 0 41 //2nd 

text 345 92 15 74 //Page 
text 360 120 0 21 //Spell Name: Mass Dispel
gumppic 300 125 2293 //Icon 

gumppic 300 175 57 //Bar 
gumppic 315 175 58 
gumppic 330 175 58 
gumppic 345 175 58 
gumppic 360 175 58 
gumppic 375 175 58 
gumppic 390 175 58 
gumppic 405 175 58 
gumppic 415 175 59 

text 300 190 5 48 //Reagents: 
text 300 205 0 42 //1st 
text 300 220 0 43 //2nd 

PAGE 14 
button 67 70 501 501 0 13 33 
button 423 71 502 502 0 15 33 
text 145 92 15 75 // Page 
text 160 120 0 22 // Spell Name: Regeneration
gumppic 100 125 2297 //Icon 

gumppic 110 175 57 //Bar 
gumppic 130 175 58 
gumppic 145 175 58 
gumppic 160 175 58 
gumppic 175 175 58 
gumppic 190 175 58 
gumppic 205 175 58 
gumppic 220 175 58 
gumppic 230 175 59 

text 110 190 5 48 //Reagents: 
text 110 205 0 40 //1st 
text 110 220 0 41 //2nd 

text 345 92 15 76 //Page 
text 360 120 0 23 //Spell Name: Virtuous Journey
gumppic 300 125 2271 //Icon 

gumppic 300 175 57 //Bar 
gumppic 315 175 58 
gumppic 330 175 58 
gumppic 345 175 58 
gumppic 360 175 58 
gumppic 375 175 58 
gumppic 390 175 58 
gumppic 405 175 58 
gumppic 415 175 59 

text 300 190 5 48 //Reagents: 
text 300 205 0 46 //1st 
text 300 220 0 35 //2nd 


PAGE 15 
button 67 70 501 501 0 14 33 
text 145 92 15 77 // Page 
text 160 120 0 23 // Spell Name: Dispel Chest
gumppic 100 125 2253 //Icon 

gumppic 110 175 57 //Bar 
gumppic 130 175 58 
gumppic 145 175 58 
gumppic 160 175 58 
gumppic 175 175 58 
gumppic 190 175 58 
gumppic 205 175 58 
gumppic 220 175 58 
gumppic 230 175 59 

text 110 190 5 48 //Reagents: 
text 110 205 0 46 //1st 
text 110 220 0 47 //2nd 

text 345 92 15 78 //Page 
text 360 120 0 24 //Spell Name: Cleanse by Fire
gumppic 300 125 2267 //Icon 

gumppic 300 175 57 //Bar 
gumppic 315 175 58 
gumppic 330 175 58 
gumppic 345 175 58 
gumppic 360 175 58 
gumppic 375 175 58 
gumppic 390 175 58 
gumppic 405 175 58 
gumppic 415 175 59 

text 300 190 5 48 //Reagents: 
text 300 205 0 41 //1st 
text 300 220 0 32 //2nd 

[DIALOG d_clericbook TEXT] 
<TAG.SPELL1>
<TAG.SPELL2>
<TAG.SPELL3>
<TAG.SPELL4>
<TAG.SPELL5>
<TAG.SPELL6>
<TAG.SPELL7>
<TAG.SPELL8>
<TAG.SPELL9>
<TAG.SPELL10>
<TAG.SPELL11>
<TAG.SPELL12>
<TAG.SPELL13>
<TAG.SPELL14>
<TAG.SPELL15>
<TAG.SPELL16>
<TAG.SPELL17>
<TAG.SPELL18>
<TAG.SPELL19>
<TAG.SPELL20>
<TAG.SPELL21>
<TAG.SPELL22>
<TAG.SPELL23>
<TAG.SPELL24>
<TAG.SPELL25>
<TAG.SPELL26>
<TAG.SPELL27>
<TAG.SPELL28>
<TAG.SPELL29>
<TAG.SPELL30>
<TAG.SPELL31>
<TAG.SPELL32>
Batwing //Line 32
Eye of Newt
Mandrake Root
Spider's Silk
Obsidian 
Pumice 
Volcanic Ash 
Ginseng
Sulphurous Ash
Pig Iron 
Black Pearl 
Serpent Scale 
Blackmoor 
Executioners Cap 
Fertile Dirt 
Brimstone 
Reagents: 
Page 1 
Page 2 
Page 3 
Page 4 
Page 5 
Page 6 
Page 7 
Page 8 
Page 9 
Page 10 
Page 11 
Page 12 
Page 13 
Page 14 
Page 15 
Page 16 
Page 17 
Page 18 
Page 19 
Page 20 
Page 21 
Page 22 
Page 23 
Page 24 
Page 25 
Page 26 
Page 27 
Page 28 
Page 29 
Page 30 
  
 
Your chivalry:
<SRC.Chivalry>
script

[DIALOG d_clericbook BUTTON]


[ITEMDEF icleric_1] 
// Peace
ID=i_memory 
NAME=Lum Mu
TYPE=t_eq_script 

ON=@Create 
MORE=3 

ON=@Dclick

MOREY={ 0 300 } 
SRC.SYSMESSAGE Bare minimum skill: 1%
SRC.SYSMESSAGE Mastery skill: 30%

IF !(<SRC.ISGM>)
	IF (<MOREY>>=<SRC.Chivalry> ) 
		SRC.ANIM 17 
		SRC.SYSMESSAGE The spell fizzles. 
		SRC.SFX 005c 
		SRC.ChivalryGAIN 1.00
		REMOVE
		RETURN 1
	ELSEIF !(<SRC.RESTEST 1 i_reag_batwing> && <SRC.RESTEST 1 i_reag_eye_of_newt> )
		SRC.SOUND 011c 
		SRC.SYSMESSAGE You do not have enough regs! you need 1 Batwing and Eye of newt! 
		REMOVE
		RETURN 1 
	ENDIF
ENDIF

SRC.CONSUME=i_reag_batwing 
SRC.CONSUME=i_reag_eye_of_newt 
SRC.ChivalryGAIN 1.00
TARGET Select the creature. 
RETURN 1

ON=@Targon_char 
IF <SRC.TARG.BRAIN>>0 
	SRC.TARG.FLAGS=<SRC.TARG.FLAGS> &~ statf_war
	SRC.TARG.EMOTE calms down a bit
ENDIF 

REMOVE 
RETURN 1 

[ITEMDEF icleric_2] 
// Greater Cure
ID=i_memory 
NAME=Om Mu Cah
TYPE=t_eq_script 

ON=@Create 
MORE=3 

ON=@Dclick

MOREY={ 400 600 } 
SRC.SYSMESSAGE Bare minimum skill: 40%
SRC.SYSMESSAGE Mastery skill: 60%

IF !(<SRC.ISGM>)
	IF (<MOREY>>=<SRC.Chivalry> ) 
		SRC.ANIM 17 
		SRC.SYSMESSAGE The spell fizzles. 
		SRC.SFX 005c 
		SRC.ChivalryGAIN 1.00
		REMOVE
		RETURN 1
	ELSEIF !(<SRC.RESTEST 1 i_reag_mandrake_root> && <SRC.RESTEST 1 i_reag_spider_silk> )
		SRC.SOUND 011c 
		SRC.SYSMESSAGE You do not have enough regs! you need 1 Mandrake Root and Spider's Silk! 
		REMOVE
		RETURN 1 
	ENDIF
ENDIF

SRC.CONSUME=i_reag_mandrake_root 
SRC.CONSUME=i_reag_spider_silk
SRC.ChivalryGAIN 1.00
TARGET Target the person you wish to cure.
RETURN 1

ON=@Targon_char 
	IF (<SRC.TARG.FINDID.i_rune_poison>)
		TAG.POISONSTR=<EVAL <SRC.TARG.FINDID.i_rune_poison.MOREY> / 2>
	ELSE
		TAG.POISONSTR=<SRC.Chivalry>
	ENDIF


	IF ((<SRC.TARG.FLAGS> & statf_criminal)||(<SRC.TARG.KARMA> <= <SERV.PLAYERNEUTRAL>)||(<SRC.TARG.KILLS> > <SERV.MURDERMINCOUNT>))
		SRC.CRIMINAL 1
	ENDIF

	SRC.TARG.SPELLEFFECT s_cure, <EVAL <SRC.Chivalry>*2>

	IF !(<SRC.TARG.FLAGS> & statf_poisoned)
		IF (<SRC.TARG.UID> != <SRC.UID>)
			SRC.POISON <EVAL <TAG.POISONSTR>>
		ENDIF
	ENDIF

REMOVE 
RETURN 1 

[ITEMDEF icleric_3] 
// Remove Curse
ID=i_memory 
NAME=Cah Beh Mu
TYPE=t_eq_script 

ON=@Create 
MORE=3 

ON=@Dclick

MOREY={ 700 1010 } 
SRC.SYSMESSAGE Bare minimum skill: 70%
SRC.SYSMESSAGE Mastery skill: 101%

IF !(<SRC.ISGM>)
	IF (<MOREY>>=<SRC.Chivalry> ) 
		SRC.ANIM 17 
		SRC.SYSMESSAGE The spell fizzles. 
		SRC.SFX 005c 
		SRC.ChivalryGAIN 1.00
		REMOVE
		RETURN 1
	ELSEIF !(<SRC.RESTEST 1 i_reag_obsidian> && <SRC.RESTEST 1 i_reag_pumice> )
		SRC.SOUND 011c 
		SRC.SYSMESSAGE You do not have enough regs! you need 1 Obsidian and Pumice! 
		REMOVE
		RETURN 1 
	ENDIF
ENDIF

SRC.CONSUME=i_reag_obsidian
SRC.CONSUME=i_reag_pumice
SRC.ChivalryGAIN 1.00
TARGET Target the person you wish to remove the curse from.
RETURN 1

ON=@Targon_char 

IF (<SRC.TARG.FINDID.i_memory_bestow_curse>)

IF ((<SRC.TARG.FLAGS> & statf_criminal)||(<SRC.TARG.KARMA> <= <SERV.PLAYERNEUTRAL>)||(<SRC.TARG.KILLS> > <SERV.MURDERMINCOUNT>))
	SRC.CRIMINAL 1
ENDIF

SRC.TARG.SFX 580
SRC.TARG.EFFECT 3, i_fx_sparkle_2, 16, 16
SRC.TARG.SYSMESSAGE The curse has been lifted.
SRC.TARG.FINDID.i_memory_bestow_curse.REMOVE
ENDIF

REMOVE 
RETURN 1 


[ITEMDEF icleric_4] 
// Holy Light
ID=i_memory 
NAME=Beh Om Summ Ra
TYPE=t_eq_script 

ON=@Create 
MORE=3 

ON=@Dclick

MOREY={ 900 1200 } 
SRC.SYSMESSAGE Bare minimum skill: 90%
SRC.SYSMESSAGE Mastery skill: >100%

IF !(<SRC.ISGM>)
	IF (<MOREY>>=<SRC.Chivalry> ) 
		SRC.ANIM 17 
		SRC.SYSMESSAGE The spell fizzles. 
		SRC.SFX 005c 
		SRC.ChivalryGAIN 1.20
		REMOVE
		RETURN 1
	ELSEIF !(<SRC.RESTEST 5 i_reag_volcanic_ash> && <SRC.RESTEST 5 i_reag_ginseng> )
		SRC.SOUND 011c 
		SRC.SYSMESSAGE You do not have enough regs! you need 5 Volcanic Ash and Ginseng! 
		REMOVE
		RETURN 1 
	ENDIF

	IF (<SRC.MANA> < 45)
		SRC.SYSMESSAGE You need 60 mana to cast this spell.
		REMOVE
		RETURN 1
	ENDIF

	SRC.MANA=<EVAL <SRC.MANA> +(-45)>

ENDIF

SRC.CONSUME=5 i_reag_volcanic_ash
SRC.CONSUME=5 i_reag_ginseng
SRC.ChivalryGAIN 1.20
TARGETG Target the location to cast this spell upon.
RETURN 1

ON=@Targon_char
SRC.NEWITEM i_ankh
SRC.ACT.TYPE=t_eq_script
SRC.ACT.ATTR=attr_magic|attr_move_never
SRC.ACT.P=<SRC.TARG.P>
SRC.ACT.NUDGEUP 20
SRC.ACT.LINK=<SRC.UID>
TAG.LINKANKH=<EVAL <SRC.ACT.UID>>

SRC.NEWITEM i_ankh_cleric4
SRC.ACT.ATTR=attr_magic|attr_move_never
SRC.ACT.P=<SRC.TARG.P>
SRC.ACT.MOVE n
SRC.ACT.NUDGEUP 20
SRC.ACT.LINK=<EVAL <TAG.LINKANKH>>
SRC.ACT.TIMER=1

REMOVE 
RETURN 1 

ON=@Targon_Item
SRC.NEWITEM i_ankh
SRC.ACT.TYPE=t_eq_script
SRC.ACT.ATTR=attr_magic|attr_move_never
SRC.ACT.P=<SRC.TARG.P>
SRC.ACT.NUDGEUP 20
SRC.ACT.LINK=<SRC.UID>
TAG.LINKANKH=<EVAL <SRC.ACT.UID>>

SRC.NEWITEM i_ankh_cleric4
SRC.ACT.ATTR=attr_magic|attr_move_never
SRC.ACT.P=<SRC.TARG.P>
SRC.ACT.MOVE n
SRC.ACT.NUDGEUP 20
SRC.ACT.LINK=<EVAL <TAG.LINKANKH>>
SRC.ACT.TIMER=1

REMOVE
RETURN 1

ON=@Targon_Ground
SRC.NEWITEM i_ankh
SRC.ACT.TYPE=t_eq_script
SRC.ACT.ATTR=attr_magic|attr_move_never
SRC.ACT.P=<SRC.TARGP>
SRC.ACT.NUDGEUP 20
SRC.ACT.LINK=<SRC.UID>
TAG.LINKANKH=<EVAL <SRC.ACT.UID>>

SRC.NEWITEM i_ankh_cleric4
SRC.ACT.ATTR=attr_magic|attr_move_never
SRC.ACT.P=<SRC.TARGP>
SRC.ACT.MOVE n
SRC.ACT.NUDGEUP 20
SRC.ACT.LINK=<EVAL <TAG.LINKANKH>>
SRC.ACT.TIMER=1

REMOVE
RETURN 1

[ITEMDEF i_ankh_cleric4]
ID=03
TYPE=t_eq_script
NAME=ankh

ON=@Create
MORE1=49

ON=@Timer
DORAND 5
COLOR=colors_yellow
COLOR=color_o_silver
COLOR=<EVAL { 0483 0489 } >
COLOR=05ad
COLOR=05ae
ENDDO

LINK.COLOR=<COLOR>
LINK.LINK.NEWNPC c_storm_man
LINK.LINK.ACT.FLAGS=<LINK.LINK.ACT.FLAGS>|statf_conjured
LINK.LINK.ACT.P=<P>
LINK.LINK.ACT.MOVE <EVAL {-10, 10}>, <EVAL {-10, 10}>
LINK.LINK.ACT.EFFECT 1,1

LINK.LINK.NEWITEM i_fx_explode
LINK.LINK.ACT.TYPE=t_explosion
LINK.LINK.ACT.MOREX=15
LINK.LINK.ACT.MOREY=094
LINK.LINK.ACT.MOREZ=5
LINK.LINK.ACT.LINK=<LINK.LINK.UID>
LINK.LINK.ACT.ATTR=attr_move_never
LINK.LINK.ACT.P=<P>
LINK.LINK.ACT.Z=<EVAL <Z>+(-20)>
LINK.LINK.ACT.MOVE <EVAL {-2, 2}>, <EVAL {-2, 2}>
LINK.LINK.ACT.TIMERd=1

MORE1=<EVAL <MORE1> +(-1)>

IF (<MORE1> < 1)
	LINK.REMOVE
	REMOVE
ELSE
	TIMERd=2
ENDIF

RETURN 1

[ITEMDEF icleric_5] 
// True Strike
ID=i_memory 
NAME=Beh Summ Ra
TYPE=t_eq_script 

ON=@Create 
MORE=3 

ON=@Dclick

MOREY={ 200 500 } 
SRC.SYSMESSAGE Bare minimum skill: 20%
SRC.SYSMESSAGE Mastery skill: 50%

IF !(<SRC.ISGM>)
	IF (<MOREY>>=<SRC.Chivalry> ) 
		SRC.ANIM 17 
		SRC.SYSMESSAGE The spell fizzles. 
		SRC.SFX 005c 
		SRC.ChivalryGAIN 1.00
		REMOVE
		RETURN 1
	ELSEIF !(<SRC.RESTEST i_reag_sulfur_ash> && <SRC.RESTEST i_reag_pig_iron> )
		SRC.SOUND 011c 
		SRC.SYSMESSAGE You do not have enough regs! You need 1 Sulphurous Ash and Pig Iron! 
		REMOVE
		RETURN 1 
	ENDIF
ENDIF

SRC.CONSUME=i_reag_sulfur_ash
SRC.CONSUME=i_reag_pig_iron
SRC.ChivalryGAIN 1.00
TARGET Target the creature to cast this spell upon.
RETURN 1

ON=@Targon_char

IF (<SRC.TARG.FLAGS>&statf_reflection)
SRC.TARG.EFFECT 3, i_fx_bless_effect, 1, 19
SRC.TARG.FLAGS=<SRC.TARG.FLAGS>-000000200
SRC.TARG.SYSMESSAGE <SRC.NAME>'s spell bounces off of your magic reflect!
SRC.SYSMESSAGE The reflected spell bounces back at you!
SRC.TARG=<SRC.SERIAL>
ENDIF

IF ((!<SRC.TARG.FLAGS> & statf_criminal)&&(<SRC.TARG.KARMA> > <SERV.PLAYERNEUTRAL>)&&(<SRC.TARG.KILLS> <= <SERV.MURDERMINCOUNT>)&&(<SRC.TARG.UID> != <SRC.UID>))
	SRC.KARMA=<EVAL <SRC.KARMA> +(-200)>
	SRC.CRIMINAL 1
	SRC.SYSMESSAGE You have lost huge amounts of karma.
ENDIF

IF (<SRC.TARG.ISEVENT.e_undead>) 
	SRC.TARG.EFFECT 1,1
	SRC.TARG.DAMAGE <EVAL {20 30}> 044 <SRC.UID>
ENDIF

SRC.TARG.SFX 489
SRC.TARG.EFFECT 0, i_belt_gold, 0, 0, 1
SRC.TARG.EFFECT 0, i_belt_gold, 1, 1, 1
SRC.TARG.DAMAGE <EVAL {20 30}> 044 <SRC.UID>
REMOVE
RETURN 1

ON=@Targon_Item
REMOVE
RETURN 0

[ITEMDEF icleric_6] 
// Elemental Shield
ID=i_memory 
NAME=Beh Ahm Mu
TYPE=t_eq_script 

ON=@Create 
MORE=3 

ON=@Dclick

MOREY={ 400 800 } 
SRC.SYSMESSAGE Bare minimum skill: 40%
SRC.SYSMESSAGE Mastery skill: 80%

IF !(<SRC.ISGM>)
	IF (<MOREY>>=<SRC.Chivalry> ) 
		SRC.ANIM 17 
		SRC.SYSMESSAGE The spell fizzles. 
		SRC.SFX 005c 
		SRC.ChivalryGAIN 1.00
		REMOVE
		RETURN 1
	ELSEIF !(<SRC.RESTEST i_reag_black_pearl> && <SRC.RESTEST i_reag_serpent_scale> )
		SRC.SOUND 011c 
		SRC.SYSMESSAGE You do not have enough regs! You need 1 Black Pearl and Serpent's Scale! 
		REMOVE
		RETURN 1 
	ENDIF
ENDIF

SRC.CONSUME=i_reag_black_pearl
SRC.CONSUME=i_reag_serpent_scale
SRC.ChivalryGAIN 1.00
EQUIP
MORE1=0
TIMER=3
RETURN 1

ON=@Timer
IF (<MORE1> = 0)
	MOREX={0 3}
	CONT.EVENTS=+e_elementalshield
	DOSWITCH (<MOREX>)
		BEGIN
			CONT.SFX 011d
			CONT.EFFECT 3, 2281, 40, 40
		END
		BEGIN
			CONT.SFX 520
			CONT.EFFECT 3, i_fire_column, 40, 40
		END
		BEGIN
			CONT.SFX 21
			CONT.EFFECT 3, i_fx_sparkle, 40, 40
		END
		BEGIN
			CONT.SFX 18
			CONT.EFFECT 3, i_fx_sparkle_2, 40, 40
		END
	ENDDO

	MORE1=1
	TIMER=<EVAL <CONT.Chivalry> / 30>
ELSE
	CONT.EVENTS=-e_elementalshield
	CONT.SFX 470
	CONT.SYSMESSAGE Your elemental shield has worn off.

	REMOVE
ENDIF

RETURN 1

[EVENTS e_elementalshield]
ON=@GetHit
IF ((<ARGN2> & 02)&&(<SRC.DISTANCE> < 3))
	VAR.DODAMAGE=<EVAL <ARGN> * (<CHIVALRY> - <SRC.Chivalry>) / 1000>
		
	IF (<EVAL <VAR.DODAMAGE>> > 25)
		VAR.DODAMAGE=25
	ENDIF

	DOSWITCH (<FINDID.icleric_6.MOREX>)
		BEGIN
			SRC.DAMAGE <EVAL <VAR.DODAMAGE>> 084 <UID>
			SRC.EFFECT 3, 2281, 15, 15
			SRC.SFX 011d
		END
		BEGIN
			SRC.DAMAGE <EVAL <VAR.DODAMAGE>> 014 <UID>
			SRC.EFFECT 3, i_fire_column, 15, 15
			SRC.SFX 520
		END
		BEGIN
			SRC.DAMAGE <EVAL <VAR.DODAMAGE>> 024 <UID>
			SRC.SFX 21
			SRC.EFFECT 3, i_fx_sparkle, 15, 15
		END
		BEGIN
			SRC.DAMAGE <EVAL <VAR.DODAMAGE>> 0204 <UID>
			SRC.SFX 18
			SRC.EFFECT 3, i_fx_sparkle_2, 15, 15
		END
	ENDDO
ENDIF


[ITEMDEF icleric_7] 
// Summoner's Ward
ID=i_memory 
NAME=Ahm Beh Om
TYPE=t_eq_script 

ON=@Create 
MORE=3 

ON=@Dclick

MOREY={ 400 900 } 
SRC.SYSMESSAGE Bare minimum skill: 40%
SRC.SYSMESSAGE Mastery skill: 90%

IF !(<SRC.ISGM>)
	IF (<MOREY>>=<SRC.Chivalry> ) 
		SRC.ANIM 17 
		SRC.SYSMESSAGE The spell fizzles. 
		SRC.SFX 005c 
		SRC.ChivalryGAIN 1.00
		REMOVE
		RETURN 1
	ELSEIF !(<SRC.RESTEST i_reag_blackmoor> && <SRC.RESTEST i_reag_executioners_cap> )
		SRC.SOUND 011c 
		SRC.SYSMESSAGE You do not have enough regs! You need 1 Blackmoor and Executioner's Cap! 
		REMOVE
		RETURN 1 
	ENDIF
ENDIF

SRC.CONSUME=i_reag_blackmoor
SRC.CONSUME=i_reag_executioners_cap
SRC.ChivalryGAIN 1.00

EQUIP
MORE1=0
TIMER=3

ON=@Timer
IF (<MORE1> = 0)
	CONT.EFFECT 3, i_fx_bless_effect, 1, 19
	CONT.SFX 491
	CONT.EVENTS=+e_summonersward
	MORE1=1
	TIMER=<EVAL <CONT.CHIVALRY> / 22>
	RETURN 1
ELSEIF (<MORE1> = 1)
	CONT.SFX 470
	CONT.SYSMESSAGE Your summoner's ward has worn off.
	CONT.EVENTS=-e_summonersward
	REMOVE
	RETURN 1
ENDIF

[EVENTS e_summonersward]
ON=@GetHit

IF (<SRC.FLAGS> & statf_conjured)
	SRC.SPELLEFFECT 41, 100.0
	RETURN 1
ENDIF

ON=@SpellEffect
IF (<SRC.FLAGS> & statf_conjured)
	SRC.SPELLEFFECT 41, 100.0
	RETURN 1
ENDIF


[ITEMDEF icleric_8] 
// Poison Ward
ID=i_memory 
NAME=Cah Beh Om
TYPE=t_eq_script 

ON=@Create 
MORE=3 

ON=@Dclick

MOREY={ 300 900 } 
SRC.SYSMESSAGE Bare minimum skill: 30%
SRC.SYSMESSAGE Mastery skill: 90%

IF !(<SRC.ISGM>)
	IF (<SRC.FLAGS> & statf_poisoned)
		SYSMESSAGE You cannot cast this while you are already poisoned.
		REMOVE
		RETURN 1
	ENDIF

	IF (<MOREY>>=<SRC.Chivalry> ) 
		SRC.ANIM 17 
		SRC.SYSMESSAGE The spell fizzles. 
		SRC.SFX 005c 
		SRC.ChivalryGAIN 1.00
		REMOVE
		RETURN 1
	ELSEIF !(<SRC.RESTEST i_reag_spider_silk> && <SRC.RESTEST i_reag_fertile_dirt> )
		SRC.SOUND 011c 
		SRC.SYSMESSAGE You do not have enough regs! You need 1 Spider's Silk and Fertile Dirt! 
		REMOVE
		RETURN 1 
	ENDIF
ENDIF

SRC.CONSUME=i_reag_spider_silk
SRC.CONSUME=i_reag_fertile_dirt
SRC.ChivalryGAIN 1.00

EQUIP
MORE1=0
TIMER=3

ON=@Timer
IF (<MORE1> = 0)
	CONT.EFFECT 3, i_fx_bless_effect, 1, 19
	CONT.SFX 491
	CONT.EVENTS=+e_nopoison
	MORE1=1
	TIMER=<EVAL <CONT.CHIVALRY> / 22>
	RETURN 1
ELSEIF (<MORE1> = 1)
	CONT.SFX 470
	CONT.SYSMESSAGE Your poison ward has worn off.
	CONT.EVENTS=-e_nopoison
	REMOVE
	RETURN 1
ENDIF

[ITEMDEF icleric_9] 
// Magic Ward
ID=i_memory 
NAME=Lum Beh Om
TYPE=t_eq_script 

ON=@Create 
MORE=3 

ON=@Dclick

MOREY={ 400 1100 } 
SRC.SYSMESSAGE Bare minimum skill: 40%
SRC.SYSMESSAGE Mastery skill: 110%

IF !(<SRC.ISGM>)
	IF (<MOREY>>=<SRC.Chivalry> ) 
		SRC.ANIM 17 
		SRC.SYSMESSAGE The spell fizzles. 
		SRC.SFX 005c 
		SRC.ChivalryGAIN 1.00
		REMOVE
		RETURN 1
	ELSEIF !(<SRC.RESTEST 1 i_reag_brimstone> && <SRC.RESTEST 1 i_reag_fertile_dirt> )
		SRC.SOUND 011c 
		SRC.SYSMESSAGE You do not have enough regs! You need 1 Brimstone and Fertile Dirt! 
		REMOVE
		RETURN 1 
	ENDIF
ENDIF

SRC.CONSUME=1 i_reag_fertile_dirt
SRC.CONSUME=1 i_reag_brimstone
SRC.ChivalryGAIN 1.05

EQUIP
MORE1=0
TIMER=3

ON=@Timer
IF (<MORE1> = 0)
	CONT.EFFECT 3, i_fx_bless_effect, 1, 19
	CONT.SFX 503
	TAG.OLDRESIST=<CONT.MAGICRESISTANCE>
	CONT.MAGICRESISTANCE=<EVAL <CONT.MAGICRESISTANCE> * (<EVAL <CONT.CHIVALRY> / 20.0> + -2)>
	MORE1=1
	TIMER=<EVAL <CONT.CHIVALRY> / 22>
	RETURN 1
ELSEIF (<MORE1> = 1)
	CONT.SFX 470
	CONT.SYSMESSAGE Your magic ward has worn off.
	CONT.MAGICRESISTANCE=<EVAL <TAG.OLDRESIST>>
	TAG.OLDRESIST=
	REMOVE
	RETURN 1
ENDIF

[ITEMDEF icleric_10] 
// Greatest Heal
ID=i_memory 
NAME=In Vas Mu Mani
TYPE=t_eq_script 

ON=@Create 
MORE=3 

ON=@Dclick

MOREY={ 250 1000 } 
SRC.SYSMESSAGE Bare minimum skill: 25%
SRC.SYSMESSAGE Mastery skill: 100%

IF !(<SRC.ISGM>)
	IF (<MOREY>>=<SRC.Chivalry> ) 
		SRC.ANIM 17 
		SRC.SYSMESSAGE The spell fizzles. 
		SRC.SFX 005c 
		SRC.ChivalryGAIN 1.00
		REMOVE
		RETURN 1
	ELSEIF !(<SRC.RESTEST i_reag_black_pearl> && <SRC.RESTEST i_reag_pig_iron> )
		SRC.SOUND 011c 
		SRC.SYSMESSAGE You do not have enough regs! You need 2 Black Pearl and Pig Iron! 
		REMOVE
		RETURN 1 
	ENDIF
ENDIF

SRC.CONSUME=2 i_reag_black_pearl
SRC.CONSUME=2 i_reag_pig_iron
SRC.ChivalryGAIN 1.00
TARGET Target the creature to cast this spell upon.
RETURN 1

ON=@Targon_char

IF ((<SRC.TARG.FLAGS> & statf_criminal)||(<SRC.TARG.KARMA> < <SERV.PLAYERNEUTRAL>)||(<SRC.TARG.KILLS> > <SERV.MURDERMINCOUNT>))
	SRC.CRIMINAL 1
ENDIF

SRC.TARG.SPELLEFFECT s_greater_heal, <EVAL { <EVAL <SRC.CHIVALRY> * 2> <EVAL <SRC.CHIVALRY> * 10> }>
REMOVE
RETURN 1

ON=@Targon_Item
REMOVE
RETURN 0

[ITEMDEF icleric_11]
// Turn Undead
ID=i_memory 
NAME=An Xen Corp
TYPE=t_eq_script 

ON=@Create 
MORE=3 

ON=@Dclick

MOREY={ 250 600 } 
SRC.SYSMESSAGE Bare minimum skill: 25%
SRC.SYSMESSAGE Mastery skill: 60%

IF !(<SRC.ISGM>)
	IF (<MOREY> >= <SRC.Chivalry> ) 
		SRC.ANIM 17 
		SRC.SYSMESSAGE The spell fizzles. 
		SRC.SFX 005c 
		SRC.ChivalryGAIN 1.00
		REMOVE
		RETURN 1
	ELSEIF !(<SRC.RESTEST i_reag_obsidian> && <SRC.RESTEST i_reag_pumice> )
		SRC.SOUND 011c 
		SRC.SYSMESSAGE You do not have enough regs! You need 1 Obsidian and Pumice! 
		REMOVE
		RETURN 1 
	ENDIF
ENDIF

SRC.CONSUME=i_reag_obsidian
SRC.CONSUME=i_reag_pumice
SRC.ChivalryGAIN 1.00
TARGETG Target a single undead to destroy or the ground to turn all nearby undead.
RETURN 1

ON=@Targon_char
IF !(<SRC.TARG.ISEVENT.e_undead>)
	SRC.SYSMESSAGE This is not undead.
	SRC.TARGETG Target a single undead to destroy or the ground to turn all nearby undead.
	RETURN 1
ENDIF

SRC.TARG.KILL
REMOVE
RETURN 1

ON=@Targon_Item
REMOVE
RETURN 0

ON=@Targon_Ground
SFX 489
SRC.NEWITEM=i_nuke_node
SRC.ACT.P=<SRC.TARGP>
SRC.ACT.MOVE nw <EVAL <SRC.CHIVALRY> / 5.0>
SRC.NUKECHAR TURN_UNDEAD
SRC.LAST
SRC.ACT.MOVE se <EVAL (<SRC.CHIVALRY> / 5.0) * 2>
SRC.LAST
SRC.ACT.REMOVE
REMOVE
RETURN 1

[FUNCTION turn_undead]
IF (<ISEVENT.e_undead>)
	DAMAGE <EVAL <SRC.CHIVALRY> / 10.0> 084 <SRC.UID>
	SPELLEFFECT s_lightning, <EVAL <SRC.CHIVALRY> * 2>
	SPELLEFFECT s_explosion, <EVAL <SRC.CHIVALRY> * 2>
	FLEE <EVAL <SRC.CHIVALRY> / 2>
	EMOTE is turned
ENDIF

[ITEMDEF icleric_12]
// Refresh
ID=i_memory 
NAME=In Mani Por
TYPE=t_eq_script 

ON=@Create 
MORE=3

ON=@Dclick

MOREY={ 100 400 } 
SRC.SYSMESSAGE Bare minimum skill: 10%
SRC.SYSMESSAGE Mastery skill: 40%

IF !(<SRC.ISGM>)
	IF (<MOREY> >= <SRC.Chivalry> ) 
		SRC.ANIM 17 
		SRC.SYSMESSAGE The spell fizzles. 
		SRC.SFX 005c 
		SRC.ChivalryGAIN 1.00
		REMOVE
		RETURN 1
	ELSEIF !(<SRC.RESTEST i_reag_volcanic_ash> && <SRC.RESTEST i_reag_dragon_blood> )
		SRC.SOUND 011c 
		SRC.SYSMESSAGE You do not have enough regs! You need 1 Volcanic Ash and Dragon's Blood! 
		REMOVE
		RETURN 1 
	ENDIF
ENDIF

SRC.CONSUME=i_reag_volcanic_ash
SRC.CONSUME=i_reag_dragon_blood
SRC.ChivalryGAIN 1.00
TARGET Target the character to refresh
RETURN 1

ON=@Targon_char
IF ((<SRC.TARG.FLAGS> & statf_criminal)||(<SRC.TARG.KARMA> <= <SERV.PLAYERNEUTRAL>)||(<SRC.TARG.KILLS> > <SERV.MURDERMINCOUNT>))
	SRC.CRIMINAL 1
ENDIF

SRC.TARG.SPELLEFFECT s_refresh, <SRC.CHIVALRY>
REMOVE
RETURN 1

ON=@Targon_Item
REMOVE
RETURN 0

[ITEMDEF icleric_13]
// Mass Heal
ID=i_memory 
NAME=In Mani Hur
TYPE=t_eq_script 

ON=@Create 
MORE=3

ON=@Dclick

MOREY={ 600 900 } 
SRC.SYSMESSAGE Bare minimum skill: 60%
SRC.SYSMESSAGE Mastery skill: 90%

IF !(<SRC.ISGM>)
	IF (<MOREY> >= <SRC.Chivalry> ) 
		SRC.ANIM 17 
		SRC.SYSMESSAGE The spell fizzles. 
		SRC.SFX 005c 
		SRC.ChivalryGAIN 1.10
		REMOVE
		RETURN 1
	ELSEIF !(<SRC.RESTEST i_reag_bone> && <SRC.RESTEST i_reag_pig_iron> )
		SRC.SOUND 011c 
		SRC.SYSMESSAGE You do not have enough regs! You need 1 Bone and Pig Iron! 
		REMOVE
		RETURN 1 
	ENDIF
ENDIF

SRC.SFX 503

SRC.CONSUME=i_reag_bone
SRC.CONSUME=i_reag_pig_iron
SRC.ChivalryGAIN 1.10

SRC.NEWITEM=i_nuke_node
SRC.ACT.P=<SRC.P>
SRC.ACT.MOVE nw <EVAL <SRC.CHIVALRY> / 5.0>
SRC.NUKECHAR SPELLEFFECT s_greater_heal, <EVAL <SRC.CHIVALRY> * 2>
SRC.LAST
SRC.ACT.MOVE se <EVAL (<SRC.CHIVALRY> / 5.0) * 2>
SRC.LAST
SRC.ACT.REMOVE
SRC.HEALWIND <EVAL <SRC.CHIVALRY> * 2>

REMOVE
RETURN 1

[ITEMDEF icleric_14]
// Mass Nightsight
ID=i_memory 
NAME=In Lor Summ Hur
TYPE=t_eq_script

ON=@Create 
MORE=3

ON=@Dclick

MOREY={ 300 600 } 
SRC.SYSMESSAGE Bare minimum skill: 30%
SRC.SYSMESSAGE Mastery skill: 60%

IF !(<SRC.ISGM>)
	IF (<MOREY> >= <SRC.Chivalry> ) 
		SRC.ANIM 17 
		SRC.SYSMESSAGE The spell fizzles. 
		SRC.SFX 005c 
		SRC.ChivalryGAIN 1.00
		REMOVE
		RETURN 1
	ELSEIF !(<SRC.RESTEST i_reag_blood_spawn> && <SRC.RESTEST i_reag_serpent_scale> )
		SRC.SOUND 011c 
		SRC.SYSMESSAGE You do not have enough regs! You need 1 Blood Spawn and Serpent's Scale! 
		REMOVE
		RETURN 1 
	ENDIF
ENDIF

SRC.SFX 501

SRC.CONSUME=i_reag_blood_spawn
SRC.CONSUME=i_reag_serpent_scale
SRC.ChivalryGAIN 1.00

SRC.SECTOR.ALLCLIENTS SPELLEFFECT s_nightsight, <SRC.CHIVALRY>

REMOVE
RETURN 1

[ITEMDEF icleric_15]
// Levitating Tackle
ID=i_memory 
NAME=Uus Xen Lum
TYPE=t_eq_script

ON=@Create 
MORE=3

ON=@Dclick

MOREY={ 700 1000 } 
SRC.SYSMESSAGE Bare minimum skill: 70%
SRC.SYSMESSAGE Mastery skill: 100%

IF !(<SRC.ISGM>)
	IF (<MOREY> >= <SRC.Chivalry> ) 
		SRC.ANIM 17 
		SRC.SYSMESSAGE The spell fizzles. 
		SRC.SFX 005c 
		SRC.ChivalryGAIN 1.10
		REMOVE
		RETURN 1
	ELSEIF !(<SRC.RESTEST 2 i_reag_blackmoor> && <SRC.RESTEST 2 i_reag_executioners_cap> )
		SRC.SOUND 011c 
		SRC.SYSMESSAGE You do not have enough regs! You need 2 Blackmoor and Executioner's Cap! 
		REMOVE
		RETURN 1 
	ENDIF
ENDIF

SRC.SFX 501

SRC.CONSUME=2 i_reag_blackmoor
SRC.CONSUME=2 i_reag_executioners_cap
SRC.ChivalryGAIN 1.10

TARGET Target the creature to attack

RETURN 1

ON=@Targon_Char
SRC.TARG.SFX 516

IF !((<SRC.TARG.FLAGS> & statf_criminal)||(<SRC.TARG.KARMA> <= <SERV.PLAYERNEUTRAL>)||(<SRC.TARG.KILLS> > <SERV.MURDERMINCOUNT>))
	SRC.CRIMINAL 1
ENDIF

SRC.TARG.EVENTS=+e_fallondeath
SRC.TARG.TAG.ORIGZ=<SRC.TARG.Z>

SRC.NEWITEM i_levtackle
SRC.ACT.LINK=<SRC.TARG.UID>
SRC.ACT.TAG.SOURCE=<SRC.UID>
SRC.ACT.MOREX=<EVAL (<SRC.CHIVALRY> / 100) + RAND(<SRC.CHIVALRY> / 10)>
SRC.ACT.MOREY=<SRC.CHIVALRY>
SRC.ACT.MORE1=<SRC.TARG.Z>
SRC.ACT.P=<SRC.P>

REMOVE
RETURN 1

[EVENTS e_fallondeath]
ON=@Death
IF (<EVAL 0<TAG.ORIGZ>> > 0)
	Z=<EVAL <TAG.ORIGZ>>
	TAG.ORIGZ=
ENDIF

EVENTS=-e_fallondeath
RETURN 0

[ITEMDEF i_levtackle]
ID=i_worldgem_bit
NAME=Levitation Tackle
TYPE=t_eq_script

ON=@Create
ATTR=attr_invis|attr_move_never
MORE2=0
TIMERd=1

ON=@Timer
MORE2=<EVAL <MORE2>+1>
IF (<MORE2> >= <MOREX>)
	LINK.SFX 543

	//How far do we fall?
	LINK.Z=<MORE1>
	LINK.FLAGS=<LINK.FLAGS> &~ statf_freeze
	LINK.EVENTS=-e_fallondeath
	LINK.TAG.ORIGZ=
	LINK.DAMAGE <EVAL <MORE2>+(-<MORE1>) / 2>, 082, <TAG.SOURCE>

	REMOVE
ELSE
	LINK.SFX 330
	LINK.DAMAGE <EVAL { 1 (<MOREY>/100) }>, 086, <TAG.SOURCE>

	IF (<MORE2> < <EVAL <MOREX> / 2>)
		LINK.Z=<EVAL <MORE1> + (2*<MORE2>)>
	ELSE
		IF (<MOREM> == 0)
			MOREZ=<EVAL <MOREZ>+1>
			IF (<MOREZ> == 4)
				MOREM=1
			ENDIF
		ELSE
			MOREZ=<EVAL <MOREZ>+(-1)>
			IF (<MOREZ> == 0)
				MOREM=0
			ENDIF
		ENDIF

		LINK.Z=<EVAL <MORE1> + (<MOREX> / 1) + <MOREZ>>
	ENDIF

	LINK.FLAGS=<LINK.FLAGS>|statf_freeze
ENDIF

TIMERd=1
RETURN 1

[ITEMDEF icleric_16]
// Greater Magic Reflection
ID=i_memory 
NAME=In Jux Vas Sanct
TYPE=t_eq_script

ON=@Create 
MORE=3

ON=@Dclick

MOREY={ 750 1200 } 
SRC.SYSMESSAGE Bare minimum skill: 75%
SRC.SYSMESSAGE Mastery skill: 120%

IF !(<SRC.ISGM>)
	IF (<MOREY> >= <SRC.Chivalry> ) 
		SRC.ANIM 17 
		SRC.SYSMESSAGE The spell fizzles. 
		SRC.SFX 005c 
		SRC.ChivalryGAIN 1.10
		REMOVE
		RETURN 1
	ELSEIF !(<SRC.RESTEST 2 i_reag_fertile_dirt> && <SRC.RESTEST 2 i_reag_blood_vial> )
		SRC.SOUND 011c 
		SRC.SYSMESSAGE You do not have enough regs! You need 2 Fertile Dirt and Blood Vial! 
		REMOVE
		RETURN 1 
	ENDIF
ENDIF

SRC.CONSUME=2 i_reag_fertile_dirt
SRC.CONSUME=2 i_reag_blood_vial
SRC.ChivalryGAIN 1.10

TARGET Select a creature.

RETURN 1

ON=@Targon_Char
SRC.TARG.SFX snd_spell_magic_reflection

IF ((<SRC.TARG.FLAGS> & statf_criminal)||(<SRC.TARG.KARMA> <= <SERV.PLAYERNEUTRAL>)||(<SRC.TARG.KILLS> > <SERV.MURDERMINCOUNT>))
	SRC.CRIMINAL 1
ENDIF

SRC.NEWITEM i_memory_greater_magic_reflection
SRC.ACT.LINK=<SRC.UID>
SRC.TARG.EQUIP <SRC.ACT.UID>
SRC.ACT.TIMER=<EVAL 60 + RAND(<SRC.CHIVALRY> / 10)>
SRC.SAY <SRC.ACT.TIMER>

REMOVE
RETURN 1

[ITEMDEF i_memory_greater_magic_reflection]
ID=i_memory
TYPE=t_eq_script
NAME=Greater Magic Reflection

ON=@Create
ATTR=attr_decay|attr_move_never|attr_invis

ON=@Equip
IF (<SRC.ISEVENT.e_magehunter>)
	LINK.SYSMESSAGE The target already has greater magic reflection.
	REMOVE
	RETURN 1
ENDIF

SRC.EFFECT 3,0373a,16,16,0

SRC.EVENTS=+e_magehunter
SRC.SYSMESSAGE A reflective shield surrounds you.

ON=@Unequip
SRC.EVENTS=-e_magehunter
SRC.SYSMESSAGE The reflective shield dissipates.

ON=@Timer
REMOVE
RETURN 1

[FUNCTION chivalrygain]

IF (<ARGN> = 0)
	//Divide by zero is bad.
	ARGN=1.00
ENDIF

IF (<CHIVALRY><1000) 
	IF RAND(<EVAL <EVAL <CHIVALRY>/<ARGN>>+1>) == 1 
		CHIVALRY=<CHIVALRY>+<eval {1 20 2 1}> 
		SYSMESSAGE You have gained more knowledge of Chivalry. 
		SYSMESSAGE Your skill in Chivalry is now <CHIVALRY>. 
		IF (<CHIVALRY>>1000) 
			CHIVALRY=1000 
		ENDIF 
	ENDIF 
ENDIF 

[EOF]