#READ spellrep.tt
#READ path.tt
#READ travel.tt
#READ search.tt
#READ return.tt
#READ autoassist.tt
#READ condcall.tt
#READ glance.tt

#VAR {bag} {wondrous}
#VAR {bag2} {silvery}
#VAR {pbag} {doors}
#VAR {book} {tome}
#VAR {myname} {Ersil}

#ACT {You receive your share of experience.} {
	#IF {$docast == 1} {dco};
	#IF {$autoassist == 1} {#var assist 1};
	#VAR checkcast 0
}

#SUB {You have finished memorizing %0.} { <100>(<130>+<030>.. <070>%0 <030>..<130>+<100>)<090>}

#ALIAS {srm} {rest;#IF {$expmode == 1} {dopri};mem}
#ALIAS {dopri} {}
#ALIAS {scrib} {rem $h1;rem $h2;g quill;hold $book; hold quill;rest}
#ALIAS {dscrib} {rem quill;rem $book;p quill;hold $h1;hold $h2;st}

#ALIAS drnk {g ale;drink ale;drink ale;p ale}

#NOP =========================================
#NOP  Spirit Elk
#NOP =========================================

#ALIAS rm {order elemental resc $myname}
#ALIAS off {order elemental flee}
#ALIAS ofke {order elemental kill $enemy}
#ALIAS r {order elemental resc %1}
#ALIAS of {order elemental %0}

#NOP =========================================
#NOP  Haste Tracker
#NOP =========================================

#ACT {%1 starts to move with uncanny speed!} 
{
	#if {"$hasteList" == "*@lowercase{%1}*"} {
		#var thetime {@gettime{}};
		#logline comms.txt {<100>$thetime <090>%1 : <110>HASTED<090>}
	}
}

#NOP =========================================
#NOP  Docast, repeats single spell
#NOP =========================================

#ALIAS dc {
	#var docast 1;
	#var tocast %0;
	$tocast;
}

#ALIAS dco {#var docast 0;#unvar tocast}
#ALIAS dca {#var docast 0;abort;#unvar tocast}

#NOP =========================================
#NOP  Cast Practice
#NOP =========================================

#VAR {cpr_auto} {0}
#VAR {topractarget} {0}
#VAR {toprac} {0}

#ALIAS {tcpr} {
        #IF {$cpr_auto == 1} {
                #VAR cpr_auto 0;
                #ECHO {%c%h} {{red} { SPELL PRACTICE $toprac off }}
                } {
                #VAR cpr_auto 1;
		#VAR toprac %1;
		#VAR topractarget %2;
                #ECHO {%c%h} {{green} { SPELL PRACTICE - %1 %2 }}
        }
}

#ACT {You don't have that spell memorized.} {
	#IF {$cpr_auto == 1} {
		srm;
	};
	#IF {$docast == 1} {
		#unvar tocast;
		#var docast 0;
	}
}

#NOP =========================================
#NOP  Auto Stone
#NOP =========================================

#VAR {expmode} {0}
#VAR {inmem} {0}

#ALIAS {texp} {
	 #IF {$expmode == 1} {
                #VAR expmode 0;
                #ECHO {%c%h} {{red} { EXPING MODE off }}
                } {
                #VAR expmode 1;
                #ECHO {%c%h} {{green} { EXPING MODE on }}
                }
}

#ACT {Your studies are complete.} {
	#IF {$expmode == 1} {
		st;ret;aa;#VAR checkcast 0;#VAR icasted 0;#VAR inmem 0;
        	#IF {$stonewhenback == 1} {
        	sst;};
	}
	{st};
	#IF {$cpr_auto == 1} {
		st;
		#delay {2} {$toprac $topractarget}
	}
}

#ACT {You can't do this sitting!} {st}
#ACT {You stumble, but manage to avoid falling!} {
	#IF {$stonewhenback == 1} {
		#IF {$incombat != 1} {#DELAY {12} {aa}}
	} {#IF {$incombat != 1} {aa}}
}
#ACT {You can't concentrate with all the racket!} {#IF {$expmode == 1} {st;ret;aa;#VAR inmem 0}}

#ACT { EC: awful } {#IF {$expmode == 1} {#VAR checkcast 1}}

#ACT {$tank group-says '$ssot'} {
	#VAR stonetank 1;
	#IF {$expmode == 1} {
		#IF {$inmem == 1 || $checkcast == 1 || $incombat == 0} {#VAR stonewhenback 1} {
		sst
		}; 
	}
} {4}

#ACT {$tank's skin seems to turn to stone.} {
	#IF {$expmode == 1} {
		#VAR stonewhenback 0;
		#VAR stonetank 0;
	}
}

#ALIAS {sso} {#VAR {ssot} {%0}}
#ALIAS {sst} {#IF {$checkcast == 1} {#VAR stonewhenback 1} {ds $tank}}

#ACT {You're busy spellcasting!} {
	#IF {$expmode == 1} {
		#IF {$stonetank == 1} {#VAR stonewhenback 1};
	}
} {3}

#ACT {You complete your spell...} {
	#IF {$docast == 1} {
		$tocast;
	};
	#IF {$expmode == 1} {
        #var icasted {$icasted + 1}
 	};       
	#VAR lastspell 0;
	#IF {$cpr_auto == 1} {
		$toprac $topractarget;
	}
}

#ACT {You abort your spell} {
	#IF {$autocast == 1} {
		#VAR icasted {$icasted + 1}
	};
	#ECHO {%c%h} {{red} { SPELL ABORTED }}
}

#NOP =========================================
#NOP  Spell Aliases
#NOP =========================================

#ALIAS {pwb} {c 'power word blind' %1;#var pwbtarg %1}
#ACT {^%0 is temporarily blinded by your word!} {gsay %0 ($pwbtarg) is temporarily blind!}
#ACT {^%0 won't be seeing much in the near future..} {gsay %0 ($pwbtarg) has been permanently blinded!}
#ALIAS {hst} {c 'haste' %1;#if {"$hasteList" != "*%1*"} {#list hasteList ins 1 %1}}

#ALIAS {gate} {c 'gate' %1}
#ALIAS {relo} {c 'relocate' %1}
#ALIAS {dm} {c 'detect magic' %1}
#ALIAS {mm} {c 'earth darts' %1}
#ALIAS {mf} {c 'mage flame' %1}
#ALIAS {mc} {c 'minor crea' %1}
#ALIAS {di} {c 'detect invis' %1}
#ALIAS {dd} {c 'dimension door' %1}
#ALIAS {eb} {c 'earthblood' %1}
#ALIAS {clair} {c 'clair' %1}
#ALIAS {feeb} {c 'feeblemind' %1}
#ALIAS {loc} {c 'locate object' %0}
#ALIAS {ss} {c 'stone' %1}
#ALIAS {tele} {c 'teleport' %1}
#ALIAS {invis} {c 'invisib' %1}
#ALIAS {dispel} {c 'dispel magic' %1}
#ALIAS {cone} {c 'cone of cold' %1}
#ALIAS {ray} {c 'ray of enfeeb' %1}
#ALIAS {sleep} {c 'sleep' %1}
#ALIAS {lev} {c 'levitate' %1}
#ALIAS {csh} {c 'coldshi'}

#ALIAS {spear} {c 'ice spear' %1}
#ALIAS {blast} {c 'air blast' %1}
#ALIAS {kin} {c 'summon elem kin' %1}
#ALIAS {fb} {c 'fireball' %1}
#ALIAS {ce} {c 'conjure elem' %1}
#ALIAS {dust} {c 'glitterdust'}
#ALIAS {lance} {c 'thunder lanc' %1}
#ALIAS {stone} {c 'earth stones' %1}
#ALIAS {bliz} {c 'blizzard sphere'}
#ALIAS {layer} {c 'ice layer' %1}
#ALIAS {wemb} {c 'elemental water embod' %1}
#ALIAS {sil} {c 'ice tongue' %1}
#ALIAS {fwave} {c 'firewave'}
#ALIAS {iwave} {c 'icewave'}
#ALIAS {pws} {c 'power word stun' %1}
#ALIAS {ww} {c 'whirlwind'}
#ALIAS {aemb} {c 'elemental air embod' %1}
#ALIAS {efog} {c 'earth fog' %1}
#ALIAS {ffog} {c 'fire fog' %1}
#ALIAS {eemb} {c 'elemental earth embod' %1}
#ALIAS {femb} {c 'elemental fire embod' %1}
#ALIAS {lava} {c 'lava burst'}
#ALIAS {ward} {c 'elemental ward' %1}

#ALIAS {sss} {ss me}

#showme __ ENCHANTER.tt