function RPGSpells(){
	// Get Spells For Your RPG Class
		if(GrabRPGSetting('Class',RPGData, 'None') == "None"){
		BuildRPGDisplay("Tienda de Hechizos", "Por favor actualice su perfil para poder usar los hechizos");
		} else {
		rpgClass = GrabRPGSetting('Class',RPGData, 'None')
		curMoney = GrabRPGSetting('Money',RPGData, '0')
		YourSpells = GrabRPGSetting('Spells', RPGData, '')


		// Display Inventory
		Content = "<div class='pformstrip'><center>Tu libro de Hechizos</center></div>"

		Content += "<table width='100%'>"

		Content += "<tr>"
		Content += "<td class='titlemedium' width='1%' align='center'><b>Imagen</b></td>"
		Content += "<td class='titlemedium' width='10%' align='center'><b>Nombre</b></td>"
		Content += "<td class='titlemedium' width='45%' align='center'><b>Descripción</b></td>"
		Content += "<td class='titlemedium' width='15%' align='center'><b>Level</b></td>"
		Content += "</tr>"
		
			if(YourSpells != ''){
			YourSpells = explode("|", YourSpells);
				for(i=0;i<YourSpells.length;i++){

					if(YourSpells[i].match(/(.*)_(\d+)/)){
					TheSpell = RegExp.$1
					SpellLevel = RegExp.$2
					}

				TheSpellName = TheSpell

					if(SPELL[TheSpell]){

					TheSpell = SPELL[TheSpell];



					Img = "<img src='"+TheSpell[3]+"' alt='"+TheSpell[0]+"' />"
					Content += "<tr>"
					Content += "<td class='row4' width='1%' align='center'>"+Img+"</td>"
					Content += "<td class='row3' width='20%' align='center'><b>"+TheSpell[0]+"</b></td>"
					Content += "<td class='row3' width='45%' align='center'>"+TheSpell[1]+"<br /><b>Una vez mejorado:</b> "+TheSpell[2]+"</td>"
					Content += "<td class='row3' width='15%' align='center'>"+SpellLevel+"<br /><a href='javascript:UpgradeSpell(\""+TheSpellName+"\");'>Mejorar</a><hr>Costo: "+(100 * SpellLevel)+"</td>"
					Content += "</tr>"
					}
				}

			} else {
			Content += "<tr>"
			Content += "<td class='row4' colspan='4'><b>Actualmente no tienes Hechizos en tu libro de hechizos.</b></td>"
			Content += "</tr>"
			}

		Content += "<tr>"
		Content += "<td class='row4' colspan='4'><b>Cantidad de  "+MoneyName+":</b> "+curMoney+"</td>"
		Content += "</tr>"

		Content += "</table><br /><br />"


		// Display Itemshop
		Content += "<div class='pformstrip'>Tienda de Hechizos - Hechizos disponibles para la Clase "+Class[rpgClass]+":</div>"

		Content += "<table width='100%'>"

		Content += "<tr>"
		Content += "<td class='titlemedium' width='1%' align='center'><b>Imagen</b></td>"
		Content += "<td class='titlemedium' width='10%' align='center'><b>Nombre</b></td>"
		Content += "<td class='titlemedium' width='45%' align='center'><b>Descripción</b></td>"
		Content += "<td class='titlemedium' width='15%' align='center'><b>Empezando en el nivel</b></td>"
		Content += "<td class='titlemedium' width='10%' align='center'><b>Aprender</b></td>"
		Content += "</tr>"

		itemsAvail = 0


			for(i=0;i<Spells.length;i++){
				if(Spells[i][0] == rpgClass){
				itemsAvail++
				TheSpellb = Spells[i]

					if(SPELL[TheSpellb[1]]){

					TheSpell = SPELL[TheSpellb[1]]

					Img = "<img src='"+TheSpell[3]+"' alt='"+TheSpell[0]+"' />"
					Content += "<tr>"
					Content += "<td class='row4' width='1%' align='center'>"+Img+"</td>"
					Content += "<td class='row3' width='10%' align='center'><b>"+TheSpell[0]+"</b></td>"
					Content += "<td class='row3' width='45%' align='center'>"+TheSpell[1]+"<br /><b>Una vez mejorado:</b> "+TheSpell[2]+"<br /><b>Costo de MP:</b> "+TheSpellb[3]+"</td>"
					Content += "<td class='row3' width='15%' align='center'>"+TheSpellb[4]+"</td>"
					Content += "<td class='row3' width='10%' align='center'><a href='javascript:LearnSpell("+i+");'>Aprender</a> <br />Costo: "+TheSpellb[2]+"</td>"
					Content += "</tr>"
					}
				}
			}

		if(itemsAvail == 0){
		Content += "<tr>"
		Content += "<td class='row4' colspan='5'><b>Lo sentimos pero actualmente no hay Hechizos disponibles para tu Clase. Por favor cheque de nuevo mas tarde.</b></td>"
		Content += "</tr>"
		} else {
		Content += "<tr>"
		Content += "<td class='row4' colspan='5'><b>Total de Hechizos disponibles:</b> "+itemsAvail+"</td>"
		Content += "</tr>"
		}

		Content += "</table>"

		BuildRPGDisplay("Tienda de Hechizos", Content);
		}
	}

	function CheckSpell(ID){
		if(!Spells[ID]){
		alert('Hechizo solicitado invalido')
		return false;
		}
		Spell = Spells[ID]
		rpgClass = GrabRPGSetting('Class',RPGData, 'None')
		curMoney = GrabRPGSetting('Money',RPGData, 0)
		Level = GrabRPGSetting('Level',RPGData, 0)
		YourSpells = GrabRPGSetting('Spells', RPGData, '')

		// Correct Class?
		if(rpgClass != Spell[0]){
		alert('Lo sentimos pero este Hechizo no esta disponible para la Clase '+Class[Item[0]]+'\'s')
		return false;
		}
			
		// Enough Money?
		if(parseInt(curMoney) < parseInt(Spell[2])){
		alert('Lo sentimos pero no tienes suficiente '+MoneyName+' para aprender este Hechizo.')
		return false;
		}



		// Already Bought?
		if(YourSpells != ''){
		Inven = explode("|", YourSpells)
		Own = 0
			for(i=0;i<Inven.length;i++){
				if(Inven[i].match(/(.*)_(\d+)/)){
				ThisSpell = RegExp.$1
					if(ThisSpell == Spell[1]){
					Own++
					}
				}
			}

			if(Own > 0){
			alert('Lo sentimos pero ya has aprendido este Hechizo.')
			return false;
			}
		}
	return true
	}

	function LearnSpell(ID){
		if(CheckSpell(ID) == true){

		// Uhm, buy, yay!
		newMoney = parseInt(curMoney - Spell[2])
		NewData = RPGData
		NewData = SwapRPGSetting('Money', NewData, newMoney)

			if(YourSpells == ''){
			YourSpells = ""+Spell[1]+"_"+Spell[4]+""
			} else {
			YourSpells = YourSpells+"|"+Spell[1]+"_"+Spell[4]+""
			}

		NewData = SwapRPGSetting('Spells', NewData, YourSpells)

		ReBuildData(NewData)
		}
	}

	

	function CheckUpgrade(TheSpell){


		curMoney = GrabRPGSetting('Money',RPGData, 0)
		YourSpells = GrabRPGSetting('Spells', RPGData, '')

		Own = 0
		// Already Bought?
		if(YourSpells != ''){
		Inven = explode("|", YourSpells)
			for(i=0;i<Inven.length;i++){
				if(Inven[i].match(/(.*)_(\d+)/)){
				ThisSpell = RegExp.$1
					if(ThisSpell == TheSpell){
					Own++
					TheSpellLevel = RegExp.$2
					}
				}
			}
		}

			if(Own == 0){
			alert('Lo sentimos pero no puedes aprender este Hechizo.')
			return false;
			}


		// Got enough money?
		UpgCost = (100 * TheSpellLevel)
		if(curMoney < UpgCost){
		alert("Lo sentimos pero no tienes suficiente "+MoneyName+" para mejorar este Hechizo.")
		return false
		}

	return true
	}

	function UpgradeSpell(TheSpell){
		if(CheckUpgrade(TheSpell) == true){

		// Uhm, upgrade, yay!
		newMoney = parseInt(curMoney - UpgCost)
		NewData = RPGData
		NewData = SwapRPGSetting('Money', NewData, newMoney)

		YourSpells = explode("|",YourSpells)
		NewSpells = []

			for(s=0;s<YourSpells.length;s++){
				if(YourSpells[s].match(/(.*)_(\d+)/)){
				ThisCurSpell = RegExp.$1
				ThisCurLevel = RegExp.$2
					if(ThisCurSpell == TheSpell){
					ThisCurLevel++
					}
				NewSpells[NewSpells.length] = ""+ThisCurSpell+"_"+ThisCurLevel+""
				}
			}

		NewSpells = implode("|",NewSpells)

		NewData = SwapRPGSetting('Spells', NewData, NewSpells)

		ReBuildData(NewData)
		} 
	}


RPGSpells()