glife/locations/spellList.qsrc

# spellList
! Information pertaining to PC for each spell
!	spellKnown['spellname'] = 1 if the spell is known by the player
!	spellLearn['spellname'] = 0-100, percentage of study that has occured to learn this spell. 100+ will learn it.
!	spellListAvail['spellListArrayName'] = Number of spells that teacher will teach in the list
!
! MetaData for Each Spell
!	spellMana['spellname'] = Mana cost to cast this spell
!	spellTime['spellname'] = How much time will pass in the casting of the spell
!	spellDiff['spellname'] = Difficulty to learn and cast this spell
!	$spellName['spellname'] = Pretty name for the spell
!	$spellDesc['spellname'] = Description of what the spell does.
!	$spellTarget['spellname'] = Intended Target of Spell (e.g.: 'self', 'team', 'enemy').
!	$spellReq['spellname'] = Prerequisite Spell needed to learn this spell
!	$spellOptDesc['spellname'] = name of an array of Option Descriptions for this spell
!	$spellOptVal['spellname'] = name of an array of values to pass for Spell Options
!
! There are also defined lists of spells grouped together
!	$combatSpells = Spells that can be used in Combat
!	$nonComSpells = Non-Combat Spells, ones that can be executed in any location.
!	---
!	$basicSpells = basic spells that are taught by Tatiana
!	$healSpells = Healing Spells
!	$beautySpells = Beauty Spells
!	$librarySpells = Spells Researchable in the Library
!	$fireSpells = Fire-based spells
!	$electSpells = Electricity based spells
!	$earthSpells = Earth magic spells
!	$airSpells = Air based spells
!	$waterSpells = Water based spells
!
! To create a new spell...
!	1) fill out the meta-data as listed above, this describes stats abotu the spell, cost, difficulty, desc, etc.
!	2) Typically, a spell will be in one of $combatSpells or $nonComSpells (this picks how the spell is executed
!		by the user), andcalso in one other of the lists ($basicSpells, $fireSpells, etc.), which picks where you
!		learn the spells.
!	3) Then create a matching section in the "spell" location for it.  This function in "spell" describes what the
!		spell actually does in game mechanics


!teleport
spellMana['teleport'] = 1000
spellTime['teleport'] = 20
spellDiff['teleport'] = 20
$spellName['teleport'] = 'Teleport'
$spellDesc['teleport'] = 'You can move from one Fairy Circle to another.'
$spellTarget['teleport'] = 'self'
$spellOptDesc['teleport'] = '$treeCircName'
$spellOptVal['teleport'] = '$tpLocations'
!regenerate
spellMana['regenerate'] = 500
spellTime['regenerate'] = 1
spellDiff['regenerate'] = 5
$spellName['regenerate'] = 'Regenerate'
$spellDesc['regenerate'] = 'Slowly regain health over time.'
$spellTarget['regenerate'] = 'self'
!curedisease
spellMana['curedisease'] = 1000
spellTime['curedisease'] = 30
spellDiff['curedisease'] = 25
$spellName['curedisease'] = 'Cure Disease'
$spellDesc['curedisease'] = 'Your body will burn itself free of any diseases you may have.'
$spellTarget['teleport'] = 'self'
!curewounds
spellMana['curewounds'] = 1000
spellTime['curewounds'] = 30
spellDiff['curewounds'] = 25
$spellName['curewounds'] = 'Cure Wounds'
$spellDesc['curewounds'] = 'You feel your body''s wounds begin to heal.'
$spellTarget['curewounds'] = 'team'
!curewounds2
spellMana['curewounds2'] = 10000
spellTime['curewounds2'] = 60
spellDiff['curewounds2'] = 75
$spellName['curewounds2'] = 'Greater Cure Wounds'
$spellDesc['curewounds2'] = 'You feel your body heal to perfection.'
$spellReq['curewounds2'] = 'curewounds'
$spellTarget['curewounds2'] = 'team'
!painblock
spellMana['painblock'] = 1000
spellTime['painblock'] = 1
spellDiff['painblock'] = 8
$spellName['painblock'] = 'Pain Block'
$spellDesc['painblock'] = 'Block your pain for some time.'
$spellTarget['painblock'] = 'self'
!berserk
spellMana['berserk'] = 5000
spellTime['berserk'] = 1
spellDiff['berserk'] = 30
$spellName['berserk'] = 'Berserker Rage'
$spellDesc['berserk'] = 'Enrage yourself with supernatural strength, speed, and endurance.'
$spellTarget['berserk'] = 'self'
!shower
spellMana['shower'] = 500
spellTime['shower'] = 1
spellDiff['shower'] = 1
$spellName['shower'] = 'Shower'
$spellDesc['shower'] = 'Clean and refresh yourself as if you have taken a shower.'
$spellTarget['shower'] = 'self'
!makeup
spellMana['makeup'] = 100
spellTime['makeup'] = 5
spellDiff['makeup'] = 15
$spellName['makeup'] = 'Makeup'
$spellDesc['makeup'] = 'Apply Makeup to yourself magically.'
$spellTarget['makeup'] = 'self'
$spellOptDesc['makeup'] = '$MakeupSet'
$spellOptVal['makeup'] = '$MakeupSetVal'
if $makeup['routine_1'] + $makeup['routine_2'] + $makeup['routine_3'] + $makeup['routine_4'] = '':
	killvar '$MakeupSet'
	killvar '$MakeupSetVal'
	$MakeupSet[0] = 'No Makeup'
	$MakeupSetVal[0] = '000'
	$MakeupSet[1] = 'Light Makeup'
	$makeupSetVal[1] = '110'
	$MakeupSet[2] = 'Vibrant Makeup'
	$makeupSetVal[2] = '210'
	$MakeupSet[3] = 'Heavy Makeup'
	$makeupSetVal[3] = '310'
	$MakeupSet[4] = 'Bimbo Makeup'
	$makeupSetVal[4] = '510'
else
	killvar '$MakeupSet'
	killvar '$MakeupSetVal'
	$MakeupSet[0] = 'No Makeup'
	$MakeupSetVal[0] = '000'
	i=1
	if $makeup['routine_1'] ! '':
		$MakeupSet[i] = $makeup['routine_1_name']
		$MakeupSetVal[i] = $makeup['routine_1']
		i += 1
	end
	if $makeup['routine_2'] ! '':
		$MakeupSet[i] = $makeup['routine_2_name']
		$MakeupSetVal[i] = $makeup['routine_2']
		i += 1
	end
	if $makeup['routine_3'] ! '':
		$MakeupSet[i] = $makeup['routine_3_name']
		$MakeupSetVal[i] = $makeup['routine_3']
		i += 1
	end
	if $makeup['routine_4'] ! '':
		$MakeupSet[i] = $makeup['routine_4_name']
		$MakeupSetVal[i] = $makeup['routine_4']
		i += 1
	end
	killvar 'i'
end
!cosmetica
spellMana['cosmetica'] = 1000
spellTime['cosmetica'] = 5
spellDiff['cosmetica'] = 50
$spellName['cosmetica'] = 'Cosmetica'
$spellDesc['cosmetica'] = 'Clean and tidy yourself, completely beautifying yourself; hair, makeup, grooming of all kinds.'
$spellTarget['cosmetica'] = 'self'
$spellReq['cosmetica'] = 'makeup'
!glamour
spellMana['glamour'] = 500
spellTime['glamour'] = 1
spellDiff['glamour'] = 30
$spellName['glamour'] = 'Glamour'
$spellTarget['glamour'] = 'self'
$spellDesc['glamour'] = 'Become undefinably beautiful. Your eyes sparkle just so. Your hair has a perfect luster. Your curves are undefinably perfect.'
!glamour
spellMana['alterself'] = 500
spellTime['alterself'] = 1
spellDiff['alterself'] = 30
$spellName['alterself'] = 'Alter Self'
$spellTarget['alterself'] = 'self'
$spellDesc['alterself'] = 'Change your appearance to that of some other person.'
!bodymod
spellMana['bodymod'] = 40
spellTime['bodymod'] = 30
spellDiff['bodymod'] = 0
$spellName['bodymod'] = 'Body Modification'
$spellDesc['bodymod'] = 'Change your appearance.'
$spellTarget['bodymod'] = 'self'

!fog
spellMana['fog'] = 10
spellTime['fog'] = 0
spellDiff['fog'] = 1
$spellName['fog'] = 'Fog'
$spellDesc['fog'] = 'Create a fog on the battlefield, obscuring the view of the enemy.'
$spellTarget['fog'] = 'self'
!clone
spellMana['clone'] = 15
spellTime['clone'] = 0
spellDiff['clone'] = 1
$spellName['clone'] = 'Create Clone'
$spellDesc['clone'] = 'You can create an exact clone of yourself and slip out of sight of the enemy.'
$spellTarget['clone'] = 'self'
!stun
spellMana['stun'] = 200
spellTime['stun'] = 0
spellDiff['stun'] = 50
$spellName['stun'] = 'Stun'
$spellDesc['stun'] = 'Paralyze the enemy with a touch.'
$spellTarget['stun'] = 'enemy'
!weapon
spellMana['weapon'] = 20
spellTime['weapon'] = 0
spellDiff['weapon'] = 0
$spellName['weapon'] = 'Empower Weapon'
$spellDesc['weapon'] = 'Magically empower a weapon, causing it to deal greater damage.'
$spellTarget['weapon'] = 'self'
!wind
spellMana['wind'] = 40
spellTime['wind'] = 0
spellDiff['wind'] = 2
$spellName['wind'] = 'Gust of Wind'
$spellDesc['wind'] = 'Summon a gust of wind that will clear away fog.'
$spellTarget['wind'] = 'enemy'
!multiclone
spellMana['multiclone'] = 45
spellTime['multiclone'] = 0
spellDiff['multiclone'] = 2
$spellName['multiclone'] = 'Multi-Clone'
$spellDesc['multiclone'] = 'Summon three clones of yourself and slip out of the enemy''s sight.'
$spellReq['multiclone'] = 'clone'
$spellTarget['multiclone'] = 'self'
!energo
spellMana['energo'] = 50
spellTime['energo'] = 0
spellDiff['energo'] = 3
$spellName['energo'] = 'Energy Shield'
$spellDesc['energo'] = 'Create an energy shield to absorb incoming damage. You gain 100 defense.'
$spellTarget['energo'] = 'self'
!haste
spellMana['haste'] = 60
spellTime['haste'] = 0
spellDiff['haste'] = 3
$spellName['haste'] = 'Haste'
$spellDesc['haste'] = 'Hasten your passage through time to gain reaction speed to seize the initiative.'
$spellTarget['haste'] = 'self'
!heal
spellMana['heal'] = 400
spellTime['heal'] = 0
spellDiff['heal'] = 4
$spellName['heal'] = 'Heal'
$spellDesc['heal'] = 'Exchange mana for health, healing your wounds and fortifying your body.'
$spellTarget['heal'] = 'team'
!hand
spellMana['hand'] = 100
spellTime['hand'] = 0
spellDiff['hand'] = 0
$spellName['hand'] = 'Quivering Palm'
$spellDesc['hand'] = 'Add energy from your mana to your hand for a devastating strike.'
$spellTarget['wind'] = 'enemy'
!scaldingtouch
spellMana['scaldingtouch'] = 10
spellTime['scaldingtouch'] = 0
spellDiff['scaldingtouch'] = 6
$spellName['scaldingtouch'] = 'Scalding Touch'
$spellDesc['scaldingtouch'] = 'Flames spring from your hands.'
$spellTarget['scaldingtouch'] = 'enemy'
!burninghands
spellMana['burninghands'] = 100
spellTime['burninghands'] = 0
spellDiff['burninghands'] = 7
$spellName['burninghands'] = 'Burning Hands'
$spellDesc['burninghands'] = 'A torrent of flames jets from your hands.'
$spellReq['burninghands'] = 'scaldingtouch'
$spellTarget['burninghands'] = 'enemy'
!firebarrier
spellMana['firebarrier'] = 150
spellTime['firebarrier'] = 0
spellDiff['firebarrier'] = 8
$spellName['firebarrier'] = 'Fire Barrier'
$spellDesc['firebarrier'] = 'You are shielded by a wall of flames. Adds 750 defense.'
$spellTarget['firebarrier'] = 'self'
!firestorm
spellMana['firestorm'] = 250
spellTime['firestorm'] = 0
spellDiff['firestorm'] = 9
$spellName['firestorm'] = 'Fire Storm'
$spellDesc['firestorm'] = 'Superheated embers rain down upon your enemies.'
$spellTarget['firestorm'] = 'enemy'
!flameshield
spellMana['flameshield'] = 500
spellTime['flameshield'] = 0
spellDiff['flameshield'] = 10
$spellName['flameshield'] = 'Flame Shield'
$spellDesc['flameshield'] = 'A Shield made of flames interposes itself between you and your enemy, absorbing 2500 damage to defend you.'
$spellTarget['flameshield'] = 'self'
!shock
spellMana['shock'] = 10
spellTime['shock'] = 0
spellDiff['shock'] = 6
$spellName['shock'] = 'Electric Shock'
$spellDesc['shock'] = 'An electric spark shoots from your hand.'
$spellTarget['shock'] = 'enemy'
!lightning
spellMana['lightning'] = 100
spellTime['lightning'] = 0
spellDiff['lightning'] = 7
$spellName['lightning'] = 'Lightning'
$spellDesc['lightning'] = 'A lightning bolt shoots from your hand.'
$spellTarget['lightning'] = 'enemy'
!electricbarrier
spellMana['electricbarrier'] = 150
spellTime['electricbarrier'] = 0
spellDiff['electricbarrier'] = 8
$spellName['electricbarrier'] = 'Electric Barrier'
$spellDesc['electricbarrier'] = 'A static electric field blocks incoming attacks from reaching you.'
$spellTarget['electricbarrier'] = 'self'
!1000birds
spellMana['1000birds'] = 250
spellTime['1000birds'] = 0
spellDiff['1000birds'] = 9
$spellName['1000birds'] = 'Dance of a Thousand Birds'
$spellDesc['1000birds'] = 'The air is filled with small lightning bolts leaping through the air with shrieks.'
$spellReq['1000birds'] = 'lightning'
$spellTarget['1000birds'] = 'enemy'
!dancingsphere
spellMana['dancingsphere'] = 500
spellTime['dancingsphere'] = 0
spellDiff['dancingsphere'] = 10
$spellName['dancingsphere'] = 'Dancing Sphere'
$spellDesc['dancingsphere'] = 'Lightning dances around you, blocking attacks coming toward you.'
$spellTarget['dancingsphere'] = 'self'
!quicksand
spellMana['quicksand'] = 10
spellTime['quicksand'] = 0
spellDiff['quicksand'] = 6
$spellName['quicksand'] = 'Quicksand'
$spellDesc['quicksand'] = 'Your opponent is caught in a quicksand trap.'
$spellTarget['quicksand'] = 'enemy'
!earthshield
spellMana['earthshield'] = 100
spellTime['earthshield'] = 0
spellDiff['earthshield'] = 7
$spellName['earthshield'] = 'Earth Shield'
$spellDesc['earthshield'] = 'Tendrils of earth reach up to defend you. Some of the damage it absorbs is captured as mana and given to you.'
$spellTarget['earthshield'] = 'self'
!abyss
spellMana['abyss'] = 150
spellTime['abyss'] = 0
spellDiff['abyss'] = 8
$spellName['abyss'] = 'Abyss'
$spellDesc['abyss'] = 'The Earth opens up beneath your opponent''s feet, slamming shut damaging him and depriving him of the ability to move.'
$spellTarget['abyss'] = 'enemy'
!earthguardian
spellMana['earthguardian'] = 250
spellTime['earthguardian'] = 0
spellDiff['earthguardian'] = 9
$spellName['earthguardian'] = 'Earth Guardian'
$spellDesc['earthguardian'] = 'The Earth itself comes alive defending you from attacks. It draws from the power of the land to regenerate itself every round.'
$spellTarget['earthguardian'] = 'self'
!sando
spellMana['sando'] = 500
spellTime['sando'] = 0
spellDiff['sando'] = 10
$spellName['sando'] = 'Sando'
$spellDesc['sando'] = 'Two huge plates of earth collapse together, crushing the enemy and depriving him of the ability to move.'
$spellTarget['sando'] = 'enemy'
!windgust
spellMana['windgust'] = 10
spellTime['windgust'] = 0
spellDiff['windgust'] = 6
$spellName['windgust'] = 'Wind Gust'
$spellDesc['windgust'] = 'a huge gust of wind rips past you, killing clones and removing fog.'
$spellTarget['windgust'] = 'enemy'
!pressure
spellMana['pressure'] = 100
spellTime['pressure'] = 0
spellDiff['pressure'] = 7
$spellName['pressure'] = 'Horrific Pressure'
$spellDesc['pressure'] = 'Enormous air pressure surrounds your enemy, causing damage as well as killing clones and removing fog.'
$spellTarget['pressure'] = 'enemy'
!vacuum
spellMana['vacuum'] = 150
spellTime['vacuum'] = 0
spellDiff['vacuum'] = 8
$spellName['vacuum'] = 'Vacuum Sphere'
$spellDesc['vacuum'] = 'A turbulent sphere of vacuum surrounds you, blocking incoming attacks.'
$spellTarget['vacuum'] = 'self'
!vacuumshells
spellMana['vacuumshells'] = 250
spellTime['vacuumshells'] = 0
spellDiff['vacuumshells'] = 9
$spellName['vacuumshells'] = 'Vacuum Shells'
$spellDesc['vacuumshells'] = 'Turbulent spheres of vacuum bombard your enemy, destroying clones and removing fog.'
$spellTarget['vacuumshells'] = 'enemy'
!devouringvacuum
spellMana['devouringvacuum'] = 500
spellTime['devouringvacuum'] = 0
spellDiff['devouringvacuum'] = 10
$spellName['devouringvacuum'] = 'Devouring Vacuum'
$spellDesc['devouringvacuum'] = 'A devouring vacuum sucks away your enemy''s defensive shields.'
$spellTarget['devouringvacuum'] = 'enemy'
!leechmana
spellMana['leechmana'] = 10
spellTime['leechmana'] = 0
spellDiff['leechmana'] = 6
$spellName['leechmana'] = 'Leech Mana'
$spellDesc['leechmana'] = 'Inflict 100 damage and absorb 100 mana from your foe.'
$spellTarget['leechmana'] = 'enemy'
!flood
spellMana['flood'] = 100
spellTime['flood'] = 0
spellDiff['flood'] = 7
$spellName['flood'] = 'Flood'
$spellDesc['flood'] = 'Inflict 1000 damage and absorb 500 mana from your foe.'
$spellTarget['flood'] = 'enemy'
!blister
spellMana['blister'] = 150
spellTime['blister'] = 0
spellDiff['blister'] = 8
$spellName['blister'] = 'Blister'
$spellDesc['blister'] = 'Create a protective sphere of water. Some of the damage absorbed is converted into mana for you.'
$spellTarget['blister'] = 'enemy'
!sharkrockets
spellMana['sharkrockets'] = 250
spellTime['sharkrockets'] = 0
spellDiff['sharkrockets'] = 9
$spellName['sharkrockets'] = 'Shark Rockets'
$spellDesc['sharkrockets'] = 'Blobs of Water shaped like sharks fly towards your enemies, striking them for 1500 damage and absorbing 2500 mana for you. Clones are destroyed.'
$spellTarget['sharkrockets'] = 'enemy'
!greatflood
spellMana['greatflood'] = 500
spellTime['greatflood'] = 0
spellDiff['greatflood'] = 10
$spellName['greatflood'] = 'Great Flood'
$spellDesc['greatflood'] = 'A huge flood of water fills the area, absorbing mana from the enemy and giving you additional protection.'
$spellTarget['greatflood'] = 'enemy'
!penisenvy
spellMana['penisenvy'] = 1000
spellTime['penisenvy'] = 1
spellDiff['penisenvy'] = 50
$spellName['penisenvy'] = 'Penis Envy'
$spellDesc['penisenvy'] = 'Temporarily animate a strapon dildo, the casters experiences sexual sensations from the dildo, as if it was a real penis.'
$spellTarget['penisenvy'] = 'self'


!-------------------------------------------------------------------------------------------
! Pick Execution points for the spells

! List Combat Spells for use in fight scenerios
$combatSpells[0] = 'fog'
$combatSpells[1] = 'clone'
$combatSpells[2] = 'stun'
$combatSpells[3] = 'weapon'
$combatSpells[4] = 'wind'
$combatSpells[5] = 'multiclone'
$combatSpells[6] = 'energo'
$combatSpells[7] = 'haste'
$combatSpells[8] = 'heal'
$combatSpells[9] = 'hand'
$combatSpells[10] = 'scaldingtouch'
$combatSpells[11] = 'burninghands'
$combatSpells[12] = 'firebarrier'
$combatSpells[13] = 'firestorm'
$combatSpells[14] = 'flameshield'
$combatSpells[15] = 'shock'
$combatSpells[16] = 'lightning'
$combatSpells[17] = 'electricbarrier'
$combatSpells[18] = '1000birds'
$combatSpells[19] = 'dancingsphere'
$combatSpells[20] = 'quicksand'
$combatSpells[21] = 'earthshield'
$combatSpells[22] = 'abyss'
$combatSpells[23] = 'earthguardian'
$combatSpells[24] = 'sando'
$combatSpells[25] = 'windgust'
$combatSpells[26] = 'pressure'
$combatSpells[27] = 'vacuum'
$combatSpells[28] = 'vacuumshells'
$combatSpells[29] = 'devouringvacuum'
$combatSpells[30] = 'leechmana'
$combatSpells[31] = 'flood'
$combatSpells[32] = 'blister'
$combatSpells[33] = 'sharkrockets'
$combatSpells[34] = 'greatflood'

! List of Non-Combat Spells for use in Menu
$nonComSpells[0] = 'heal'
$nonComSpells[1] = 'regenerate'
$nonComSpells[2] = 'curedisease'
$nonComSpells[3] = 'curewounds'
$nonComSpells[4] = 'curewounds2'
$nonComSpells[5] = 'painblock'
$nonComSpells[6] = 'berserk'
$nonComSpells[7] = 'shower'
$nonComSpells[8] = 'makeup'
$nonComSpells[9] = 'cosmetica'
$nonComSpells[10] = 'glamour'
!$nonComSpells[11] = 'alterself'

!-------------------------------------------------------------------------------------
! Pick Learning Location for Spells

! Basic Spells
$basicSpells[0] = 'fog'
$basicSpells[1] = 'clone'
$basicSpells[2] = 'stun'
$basicSpells[3] = 'wind'
$basicSpells[4] = 'multiclone'
$basicSpells[5] = 'energo'
$basicSpells[6] = 'haste'
$basicSpells[7] = 'berserk'

!Healing Spells
$healSpells[0] = 'painblock'
$healSpells[1] = 'curewounds'
$healSpells[2] = 'curewounds2'
$healSpells[3] = 'curedisease'
$healSpells[4] = 'heal'
$healSpells[5] = 'regenerate'

! Beauty Spells
$beautySpells[0] = 'shower'
$beautySpells[1] = 'makeup'
$beautySpells[2] = 'cosmetica'


! Researchable Spells
$librarySpells[0] = 'painblock'
$librarySpells[1] = 'shower'
$librarySpells[2] = 'makeup'
$librarySpells[3] = 'cosmetica'
$librarySpells[4] = 'glamour'
$librarySpells[5] = 'penisenvy'
!$librarySpells[6] = 'alterself'


! Elemental Spell Groups
$fireSpells[0] = 'scaldingtouch'
$fireSpells[1] = 'burninghands'
$fireSpells[2] = 'firebarrier'
$fireSpells[3] = 'firestorm'
$fireSpells[4] = 'flameshield'

$electSpells[0] = 'shock'
$electSpells[1] = 'lightning'
$electSpells[2] = 'electricbarrier'
$electSpells[3] = '1000birds'
$electSpells[4] = 'dancingsphere'

$earthSpells[0] = 'quicksand'
$earthSpells[1] = 'earthshield'
$earthSpells[2] = 'abyss'
$earthSpells[3] = 'earthguardian'
$earthSpells[4] = 'sando'

$airSpells[0] = 'windgust'
$airSpells[1] = 'pressure'
$airSpells[2] = 'vacuum'
$airSpells[3] = 'vacuumshells'
$airSpells[4] = 'devouringvacuum'

$waterSpells[0] = 'leechmana'
$waterSpells[1] = 'flood'
$waterSpells[2] = 'blister'
$waterSpells[3] = 'sharkrockets'
$waterSpells[4] = 'greatflood'

!! Spell Sets for Combat algorithms
!Healing Spells
$comHealSpells[0] = 'heal'
!Shield Spells
$comShldSpells[0] = 'flameshield'
$comShldSpells[1] = 'firebarrier'
$comShldSpells[2] = 'dancingsphere'
$comShldSpells[3] = 'electricbarrier'
$comShldSpells[4] = 'earthguardian'
$comShldSpells[5] = 'earthshield'
$comShldSpells[6] = 'vacuum'
$comShldSpells[7] = 'blister'
$comShldSpells[8] = 'energo'
!Buff Spells
$comBuffSpells[] = 'haste'
$comBuffSpells[] = 'hand'
!Attack Spells
$comAtkSpells[0] = 'firestorm'
$comAtkSpells[1] = 'burninghands'
$comAtkSpells[2] = 'scaldingtouch'
$comAtkSpells[3] = '1000birds'
$comAtkSpells[4] = 'lightning'
$comAtkSpells[5] = 'shock'
$comAtkSpells[6] = 'sando'
$comAtkSpells[7] = 'abyss'
$comAtkSpells[8] = 'devouringvacuum'
$comAtkSpells[9] = 'vacuumshells'
$comAtkSpells[10] = 'quicksand'
$comAtkSpells[11] = 'pressure'
$comAtkSpells[12] = 'windgust'
$comAtkSpells[13] = 'greatflood'
$comAtkSpells[14] = 'sharkrockets'
$comAtkSpells[15] = 'flood'
$comAtkSpells[16] = 'leechmana'
$comAtkSpells[17] = 'stun'
$comAtkSpells[18] = 'weapon'

!-------------------------------------------------------------------------------------------
! Helper procedure to build Action bar for Learning Spells.

if $ARGS[0] = 'teacherActions':
	! Make Actions for learning spells
	!	$ARGS[1] = the name of the array of spells
	!	$ARGS[2] = Exit Location
	!	$ARGS[3] = Arg for exit location
	! Example:
	!	gs 'spellList', 'teacherActions', '$fireSpells', 'kakuzu', 'mansion1'

	$ThisArrayName = $replace($ARGS[1],'$')
	$ExitLocation = $ARGS[2]
	$ExitLocation2 = $ARGS[3]

	ThisArraySize = dyneval("result=arrsize('$<<$ThisArrayName>>')")
	MaxAvailable = spellListAvail[$ThisArrayName]
	i = 0
	:LearnSpellLoop
	$ThisSpellName = dyneval("$result = $<<$ThisArrayName>>[<<i>>]")
	spellDifficulty = Max(spellDiff[$ThisSpellName],1)
	if i < ThisArraySize and i < MaxAvailable:
		if spellKnown[$ThisSpellName] = 0 and ($spellReq[$ThisSpellName] = '' or (spellKnown[$spellReq[$ThisSpellName]] = 1)):
			if pcs_magik >= spellDifficulty:
				dynamic "act 'Practice <<$spellName[$ThisSpellName]>> (1:00) (Magic level  <<pcs_magik>> / Level required <<spellDifficulty>>)':	gt 'spellList', 'act learn', '<<$ThisSpellName>>','<<$ExitLocation>>','<<$ExitLocation2>>'"
			else
				act '<font color="red">Practice <<$spellName[$ThisSpellName]>> (Magic level  <<pcs_magik>> / Level required <<spellDifficulty>>)</font>': '<br><font color="red">Your Magic level isn''t high enough to develop this spell.</font>'
			end
		end
		i += 1
		jump 'LearnSpellLoop'
	end
	killvar 'i'
	killvar 'ThisArraySize'
	killvar 'MaxAvailable'
	killvar '$ThisArrayName'
end

if $ARGS[0] = 'act learn':
	cla
	$ThisSpellName = $ARGS[1]
	$ExitLocation = $ARGS[2]
	$ExitLocation2 = $ARGS[3]
	spellDifficulty = Max(spellDiff[$ThisSpellName],1)
	if pcs_mana >= 1000:
		pcs_mana -= 1000
		minut += 60
		!Added "* (pcs_splcstng/spellDifficulty)" - if Sveta already mastered Spellcasting skill, learning new spells should be easier, and the opposite
		if (pcs_splcstng/spellDifficulty) > 0:
			spellLearn[$ThisSpellName] += rand(1, 100/spellDifficulty) * (pcs_splcstng/spellDifficulty)
		else
			spellLearn[$ThisSpellName] += rand(1, 100/spellDifficulty)
		end

		if spellLearn[$ThisSpellName] < 100:
			'You diligently study the spell for an hour, but cannot grasp it.'
		else
			spellKnown[$ThisSpellName] = 1
			'Finally, you are able to grasp and learn the spell.'
			*nl
			'<<$spellName[$ThisSpellName]>>: <<$spellDesc[$ThisSpellName]>>'
		end
	else
		*pl 'You don''t have enough mana to learn this spell.'
	end
	act 'Move away': gt $ExitLocation, $ExitLocation2
end





if $ARGS[0] = 'numAvailableSpells':
	! Function that returns if the number of spells left to learn from this spell list
	!	$ARGS[1] = spelllist arrayname
	! Example:
	!	if func('spellList','numAvailableSpells','librarySpells') > 0: !do stuff to earn next spell

	$ThisArrayName = $replace($ARGS[1],'$')

	ThisArraySize = dyneval("result=arrsize('$<<$ThisArrayName>>') - spellListAvail['<<$ThisArrayName>>']")

	result = ThisArraySize

	killvar 'ThisArraySize'
	killvar '$ThisArrayName'
end

if $ARGS[0] = 'addAvailableSpells':
	! Increases Spell Available to be taught by this instructor by a given amount, default 1
	!	$ARGS[1] = spelllist arrayname
	!	 ARGS[2] = number of spells to add to avaiable list for learning
	! Example:
	!	!This adds one more spell to the list of library spells
	!	gs 'spellList','addAvailableSpells','librarySpells'
	!	!This adds 3 more spells
	!	gs 'spellList','addAvailableSpells','librarySpells', 3

	$ThisArrayName = $replace($ARGS[1],'$')
	ThisNumToAdd = ARGS[2]
	if ThisNumToAdd = 0:
		ThisNumToAdd = 1
	end

	ThisArraySize = dyneval("result=arrsize('$<<$ThisArrayName>>')")

	if ThisArraySize - ThisNumToAdd - spellListAvail[$ThisArrayName] < 0:
		! This mean that we are trying to add more spells than are avaiable in the list
		spellListAvail[$ThisArrayName] = ThisArraySize
	else
		! Else we just add the requested number
		spellListAvail[$ThisArrayName] += ThisNumToAdd
	end

	killvar 'ThisNumToAdd'
	killvar 'ThisArraySize'
	killvar '$ThisArrayName'
end

--- spellList ---------------------------------