//===== rAthena Script ======================================= 
//= Sage Skills Quests
//===== By: ================================================== 
//= Lupus, Reddozen
//===== Current Version: ===================================== 
//= 1.4
//===== Compatible With: ===================================== 
//= rAthena SVN
//===== Description: ========================================= 
//= [Official Conversion]
//= Quests for skills: Create Converter, Elemental Change
//===== Additional Comments: ================================= 
//= 1.4 Rescripted to Aegis 10.3 standards. [5511]
//============================================================

yuno_in03,176,24,3	script	Mischna	755,{
	if(BaseJob == Job_Sage) {
		if(SAG_SK == 100) {
			if(getskilllv("SA_ELEMENTFIRE") == 0 && getskilllv("SA_ELEMENTGROUND") == 0 && getskilllv("SA_ELEMENTWIND") == 0 && getskilllv("SA_ELEMENTWATER") == 0 && getskilllv("SA_CREATECON") == 0) {
				mes "[Mishuna]";
				mes "Ah, you must have";
				mes "forgotten what I taught";
				mes "you somehow. Perhaps";
				mes "you lost your copy of the";
				mes "skill scroll I gave you? No";
				mes "matter, I'll help you remember.";
				next;
				mes "[Mishuna]";
				mes "You'll be given the chance to";
				mes "choose which kind of ^FF0000Elemental";
				mes "Change^000000 skill that you want, even one that you didn't previously";
				mes "learn, so long as you fulfill";
				mes "the skill's requirements.";
				next;
				mes "[Mishuna]";
				mes "Keep in mind that once";
				mes "you learn your Elemental";
				mes "Change skill, you won't be";
				mes "able to change it. Now, which";
				mes "skill would you like to learn?";
				next;
				while(1) {
					switch(select("Fire Elemental Change:Earth Elemental Change:Wind Elemental Change:Water Elemental Change")) {
					case 1:
						if (getskilllv("SA_FLAMELAUNCHER") == 0) {
							mes "[Mishuna]";
							mes "I'm sorry, but you haven't";
							mes "learned ^FF0000Endow Blaze^000000, the skill";
							mes "required for ^FF0000Fire Elemental";
							mes "Change^000000. You'll need to learn";
							mes "Endow Blaze or select another";
							mes "Elemental Change skill.";
							next;
						}
						else {
							mes "[Mishuna]";
							mes "Very well, I shall";
							mes "teach you the ^FF0000Fire";
							mes "Elemental Change^000000 skill";
							mes "and the ^FF0000Elemental Converter";
							mes "Creation skill^000000. Please remain";
							mes "still while I chant this spell.";
							next;
							mes "[Mishuna]";
							mes "%$#@!#$% Yap~~";
							specialeffect2 EF_RUWACH;
							next;
							mes "[Mishuna]";
							mes "Yap!";
							specialeffect2 EF_BRANDISHSPEAR;
							next;
							mes "^3355FFYou've successfully";
							mes "learned the Fire Elemental";
							mes "Change skill and the Elemental";
							mes "Converter Creation skill.^000000";
							skill "SA_ELEMENTFIRE",1,0;
							skill "SA_CREATECON",1,0;
							next;
							mes "[Mishuna]";
							mes "Ah, you've learned these";
							mes "skills as quickly as I thought";
							mes "you would. Very well then, ";
							mes "I hope you adeptly use these";
							mes "talents for the right purposes.";
							mes "Farewell for now, "+strcharinfo(0)+".";
							close;
						}
						break;
					case 2:
						if (getskilllv("SA_SEISMICWEAPON") == 0) {
							mes "[Mishuna]";
							mes "I'm sorry, but you haven't";
							mes "learned ^FF0000Endow Quake^000000, the skill";
							mes "required for ^FF0000Earth Elemental";
							mes "Change^000000. You'll need to learn";
							mes "Endow Quake or select another";
							mes "Elemental Change skill.";
							next;
						}
						else {
							mes "[Mishuna]";
							mes "Very well, I shall";
							mes "teach you the ^FF0000Earth";
							mes "Elemental Change^000000 skill";
							mes "and the ^FF0000Elemental Converter";
							mes "Creation skill^000000. Please remain";
							mes "still while I chant this spell.";
							next;
							mes "[Mishuna]";
							mes "%$#@!#$% Yap~~";
							specialeffect2 EF_RUWACH;
							next;
							mes "[Mishuna]";
							mes "Yap!";
							specialeffect2 EF_BRANDISHSPEAR;
							next;
							mes "^3355FFYou've successfully";
							mes "learned the Earth Elemental";
							mes "Change skill and the Elemental";
							mes "Converter Creation skill.^000000";
							skill "SA_ELEMENTGROUND",1,0;
							skill "SA_CREATECON",1,0;
							next;
							mes "[Mishuna]";
							mes "Ah, you've learned these";
							mes "skills as quickly as I thought";
							mes "you would. Very well then, ";
							mes "I hope you adeptly use these";
							mes "talents for the right purposes.";
							mes "Farewell for now, "+strcharinfo(0)+".";
							close;
						}
						break;
					case 3:
						if (getskilllv("SA_LIGHTNINGLOADER") == 0) {
							mes "[Mishuna]";
							mes "I'm sorry, but you haven't";
							mes "learned ^FF0000Endow Tornado^000000, the";
							mes "skill required for ^FF0000Wind Elemental Change^000000. You must learn Endow";
							mes "Tornado or select another";
							mes "Elemental Change skill.";
							next;
						}
						else {
							mes "[Mishuna]";
							mes "Very well, I shall";
							mes "teach you the ^FF0000Wind";
							mes "Elemental Change^000000 skill";
							mes "and the ^FF0000Elemental Converter";
							mes "Creation skill^000000. Please remain";
							mes "still while I chant this spell.";
							next;
							mes "[Mishuna]";
							mes "%$#@!#$% Yap~~";
							specialeffect2 EF_RUWACH;
							next;
							mes "[Mishuna]";
							mes "Yap!";
							specialeffect2 EF_BRANDISHSPEAR;
							next;
							mes "^3355FFYou've successfully";
							mes "learned the Wind Elemental";
							mes "Change skill and the Elemental";
							mes "Converter Creation skill.^000000";
							skill "SA_ELEMENTWIND",1,0;
							skill "SA_CREATECON",1,0;
							next;
							mes "[Mishuna]";
							mes "Ah, you've learned these";
							mes "skills as quickly as I thought";
							mes "you would. Very well then, ";
							mes "I hope you adeptly use these";
							mes "talents for the right purposes.";
							mes "Farewell for now, "+strcharinfo(0)+".";
							close;
						}
						break;
					case 4:
						if (getskilllv("SA_FROSTWEAPON") == 0) {
							mes "[Mishuna]";
							mes "I'm sorry, but you haven't";
							mes "learned ^FF0000Endow Tsunami^000000, the";
							mes "skill required for ^FF0000Water Elemental Change^000000. You must learn Endow";
							mes "Tsunami or select another";
							mes "Elemental Change skill.";
							next;
						}
						else {
							mes "[Mishuna]";
							mes "Very well, I shall";
							mes "teach you the ^FF0000Water";
							mes "Elemental Change^000000 skill";
							mes "and the ^FF0000Elemental Converter";
							mes "Creation skill^000000. Please remain";
							mes "still while I chant this spell.";
							next;
							mes "[Mishuna]";
							mes "%$#@!#$% Yap~~";
							specialeffect2 EF_RUWACH;
							next;
							mes "[Mishuna]";
							mes "Yap!";
							specialeffect2 EF_BRANDISHSPEAR;
							next;
							mes "^3355FFYou've successfully";
							mes "learned the Water Elemental";
							mes "Change skill and the Elemental";
							mes "Converter Creation skill.^000000";
							skill "SA_ELEMENTWATER",1,0;
							skill "SA_CREATECON",1,0;
							next;
							mes "[Mishuna]";
							mes "Ah, you've learned these";
							mes "skills as quickly as I thought";
							mes "you would. Very well then, ";
							mes "I hope you adeptly use these";
							mes "talents for the right purposes.";
							mes "Farewell for now, "+strcharinfo(0)+".";
							close;
						}
						break;
					}
				}
			}
			else if(getskilllv("SA_ELEMENTFIRE") == 0 && getskilllv("SA_ELEMENTGROUND") == 0 && getskilllv("SA_ELEMENTWIND") == 0 && getskilllv("SA_ELEMENTWATER") == 0) {
				mes "[Mishuna]";
				mes "Ah, you must have";
				mes "forgotten what I taught";
				mes "you somehow. Perhaps";
				mes "you lost your copy of the";
				mes "skill scroll I gave you? No";
				mes "matter, I'll help you remember.";
				next;
				mes "[Mishuna]";
				mes "You'll be given the chance to";
				mes "choose which kind of ^FF0000Elemental";
				mes "Change^000000 skill that you want, even one that you didn't previously";
				mes "learn, so long as you fulfill";
				mes "the skill's requirements.";
				next;
				mes "[Mishuna]";
				mes "Keep in mind that once";
				mes "you learn your Elemental";
				mes "Change skill, you won't be";
				mes "able to change it. Now, which";
				mes "skill would you like to learn?";
				next;
				while(1) {
					switch(select("Fire Elemental Change:Earth Elemental Change:Wind Elemental Change:Water Elemental Change")) {
					case 1:
						if (getskilllv("SA_FLAMELAUNCHER") == 0) {
							mes "[Mishuna]";
							mes "I'm sorry, but you haven't";
							mes "learned ^FF0000Endow Blaze^000000, the skill";
							mes "required for ^FF0000Fire Elemental";
							mes "Change^000000. You'll need to learn";
							mes "Endow Blaze or select another";
							mes "Elemental Change skill.";
							next;
						}
						else {
							mes "[Mishuna]";
							mes "Very well, I shall";
							mes "teach you the ^FF0000Fire";
							mes "Elemental Change^000000 skill";
							mes "and the ^FF0000Elemental Converter";
							mes "Creation skill^000000. Please remain";
							mes "still while I chant this spell.";
							next;
							mes "[Mishuna]";
							mes "%$#@!#$% Yap~~";
							specialeffect2 EF_RUWACH;
							next;
							mes "[Mishuna]";
							mes "Yap!";
							specialeffect2 EF_BRANDISHSPEAR;
							next;
							mes "^3355FFYou've successfully";
							mes "learned the Fire Elemental";
							mes "Change skill and the Elemental";
							mes "Converter Creation skill.^000000";
							skill "SA_ELEMENTFIRE",1,0;
							next;
							mes "[Mishuna]";
							mes "Ah, you've learned these";
							mes "skills as quickly as I thought";
							mes "you would. Very well then, ";
							mes "I hope you adeptly use these";
							mes "talents for the right purposes.";
							mes "Farewell for now, "+strcharinfo(0)+".";
							close;
						}
						break;
					case 2:
						if (getskilllv("SA_SEISMICWEAPON") == 0) {
							mes "[Mishuna]";
							mes "I'm sorry, but you haven't";
							mes "learned ^FF0000Endow Quake^000000, the skill";
							mes "required for ^FF0000Earth Elemental";
							mes "Change^000000. You'll need to learn";
							mes "Endow Quake or select another";
							mes "Elemental Change skill.";
							next;
						}
						else {
							mes "[Mishuna]";
							mes "Very well, I shall";
							mes "teach you the ^FF0000Earth";
							mes "Elemental Change^000000 skill";
							mes "and the ^FF0000Elemental Converter";
							mes "Creation skill^000000. Please remain";
							mes "still while I chant this spell.";
							next;
							mes "[Mishuna]";
							mes "%$#@!#$% Yap~~";
							specialeffect2 EF_RUWACH;
							next;
							mes "[Mishuna]";
							mes "Yap!";
							specialeffect2 EF_BRANDISHSPEAR;
							next;
							mes "^3355FFYou've successfully";
							mes "learned the Earth Elemental";
							mes "Change skill and the Elemental";
							mes "Converter Creation skill.^000000";
							skill "SA_ELEMENTGROUND",1,0;
							next;
							mes "[Mishuna]";
							mes "Ah, you've learned these";
							mes "skills as quickly as I thought";
							mes "you would. Very well then, ";
							mes "I hope you adeptly use these";
							mes "talents for the right purposes.";
							mes "Farewell for now, "+strcharinfo(0)+".";
							close;
						}
						break;
					case 3:
						if (getskilllv("SA_LIGHTNINGLOADER") == 0) {
							mes "[Mishuna]";
							mes "I'm sorry, but you haven't";
							mes "learned ^FF0000Endow Tornado^000000, the";
							mes "skill required for ^FF0000Wind Elemental Change^000000. You must learn Endow";
							mes "Tornado or select another";
							mes "Elemental Change skill.";
							next;
						}
						else {
							mes "[Mishuna]";
							mes "Very well, I shall";
							mes "teach you the ^FF0000Wind";
							mes "Elemental Change^000000 skill";
							mes "and the ^FF0000Elemental Converter";
							mes "Creation skill^000000. Please remain";
							mes "still while I chant this spell.";
							next;
							mes "[Mishuna]";
							mes "%$#@!#$% Yap~~";
							specialeffect2 EF_RUWACH;
							next;
							mes "[Mishuna]";
							mes "Yap!";
							specialeffect2 EF_BRANDISHSPEAR;
							next;
							mes "^3355FFYou've successfully";
							mes "learned the Wind Elemental";
							mes "Change skill and the Elemental";
							mes "Converter Creation skill.^000000";
							skill "SA_ELEMENTWIND",1,0;
							next;
							mes "[Mishuna]";
							mes "Ah, you've learned these";
							mes "skills as quickly as I thought";
							mes "you would. Very well then, ";
							mes "I hope you adeptly use these";
							mes "talents for the right purposes.";
							mes "Farewell for now, "+strcharinfo(0)+".";
							close;
						}
						break;
					case 4:
						if (getskilllv("SA_FROSTWEAPON") == 0) {
							mes "[Mishuna]";
							mes "I'm sorry, but you haven't";
							mes "learned ^FF0000Endow Tsunami^000000, the";
							mes "skill required for ^FF0000Water Elemental Change^000000. You must learn Endow";
							mes "Tsunami or select another";
							mes "Elemental Change skill.";
							next;
						}
						else {
							mes "[Mishuna]";
							mes "Very well, I shall";
							mes "teach you the ^FF0000Water";
							mes "Elemental Change^000000 skill";
							mes "and the ^FF0000Elemental Converter";
							mes "Creation skill^000000. Please remain";
							mes "still while I chant this spell.";
							next;
							mes "[Mishuna]";
							mes "%$#@!#$% Yap~~";
							specialeffect2 EF_RUWACH;
							next;
							mes "[Mishuna]";
							mes "Yap!";
							specialeffect2 EF_BRANDISHSPEAR;
							next;
							mes "^3355FFYou've successfully";
							mes "learned the Water Elemental";
							mes "Change skill and the Elemental";
							mes "Converter Creation skill.^000000";
							skill "SA_ELEMENTWATER",1,0;
							next;
							mes "[Mishuna]";
							mes "Ah, you've learned these";
							mes "skills as quickly as I thought";
							mes "you would. Very well then, ";
							mes "I hope you adeptly use these";
							mes "talents for the right purposes.";
							mes "Farewell for now, "+strcharinfo(0)+".";
							close;
						}
						break;
					}
				}
			}
			else if(getskilllv("SA_CREATECON") == 0) {
				mes "[Mishuna]";
				mes "Ah, you must have";
				mes "forgotten what I taught";
				mes "you somehow. Perhaps";
				mes "you lost your copy of the";
				mes "skill scroll I gave you? No";
				mes "matter, I'll help you remember.";
				next;
				mes "[Mishuna]";
				mes "Alright, I'm going";
				mes "to cast a spell that";
				mes "will help you remember";
				mes "the skills you forgot.";
				mes "Don't move, and try to";
				mes "stay as still as possible...";
				next;
				mes "[Mishuna]";
				mes "%$#@!#$% Yap~~";
				specialeffect2 EF_RUWACH;
				next;
				mes "[Mishuna]";
				mes "Yap!";
				specialeffect2 EF_BRANDISHSPEAR;
				next;
				mes "^3355FFYou successfully recalled";
				mes "the Elemental Coverter";
				mes "Creation skill and are";
				mes "able to use it again.^000000";
				skill "SA_CREATECON",1,0;
				next;
				mes "[Mishuna]";
				mes "Ah, you've learned these";
				mes "skills as quickly as I thought";
				mes "you would. Very well then, ";
				mes "I hope you adeptly use these";
				mes "talents for the right purposes.";
				mes "Farewell for now, "+strcharinfo(0)+".";
				close;
			}
			else {
				mes "[Mishuna]";
				mes "If you have any Sage or";
				mes "Scholar friends who haven't";
				mes "learned the skills from Sir";
				mes "Barmundt's scrolls, then";
				mes "please refer them to me.";
				next;
				mes "[Mishuna]";
				mes "I trust that you are";
				mes "finding that these";
				mes "element based skills";
				mes "are very useful in battle.";
				mes "Knowledge truly equates";
				mes "to power in the long run...";
				close;
			}
		}
		else if(SAG_SK == 0) {
			mes "[Mishuna]";
			mes "Good day, I'm Mishuna, one";
			mes "of the instructors here in the";
			mes "Schweicherbil Magic Academy.";
			mes "How may I be of service?";
			next;
			select("I seek new knowledge.");
			mes "[Mishuna]";
			mes "Ah, you must be "+strcharinfo(0)+".";
			mes "I've looked forward to meeting";
			mes "you. In the noble pursuit of";
			mes "knowledge, might I suggest";
			mes "reading the recently restored";
			mes "scrolls of Sir Barmundt?";
			next;
			mes "[Mishuna]";
			mes "Sir Barmundt's scrolls contain";
			mes "knowledge about the 4 elements,";
			mes "which are Fire, Water, Earth, and Wind. The knowledge of these";
			mes "scrolls can be applied in the";
			mes "use of 2 new Sage skills.";
			next;
			mes "[Mishuna]";
			mes "The first is called ^FF0000Elemental";
			mes "Change^000000, which enables you";
			mes "to change a monster's attribute";
			mes "according to the specific element^FFFFFF ^000000 of the Elemental Change skill";
			mes "that you have learned.";
			next;
			mes "[Mishuna]";
			mes "The second is called";
			mes "Elemental Converter Creation,";
			mes "which enables you to create";
			mes "converter items that are required^FFFFFF ^000000 to use the Elemental Change skill.";
			next;
			mes "[Mishuna]";
			mes "Although the knowledge of";
			mes "these two skills has been";
			mes "lost for years, we've finally";
			mes "been able to recover most";
			mes "of it. So, do you think you're";
			mes "ready to learn these skills?";
			next;
			if(select("Maybe later.:Yes, I am.") == 1) {
				mes "[Mishuna]";
				mes "Ah, you must be busy right";
				mes "now. No problem, just come";
				mes "back when you think you're";
				mes "ready to learn. Well then,";
				mes "farewell and have a good day~";
				close;
			}
			mes "[Mishuna]";
			mes "Very well, then. First, you";
			mes "must learn the Elemental";
			mes "Coverter Creation skill, which";
			mes "is essential to learning the";
			mes "Elemental Change skill.";
			next;
			mes "[Mishuna]";
			mes "Please bring the required";
			mes "materials so that we can";
			mes "construct a basic elemental";
			mes "converter in order for you to";
			mes "learn the skill. Let's see,";
			mes "you will need to bring...";
			next;
			mes "[Mishuna]";
			mes "^ff00007 Horns^000000,";
			mes "^ff000012 Rainbow Shells^000000,";
			mes "^ff000010 Snail's Shells^000000,";
			mes "^ff00004 Blank Scrolls^000000 and";
			mes "^ff000010 Scorpion Tails^000000.^000000";
			next;
			mes "[Mishuna]";
			mes "Alright, I shall be";
			mes "nexting here for your";
			mes "return. Remember that we";
			mes "need these items to create";
			mes "a converter so that you can^FFFFFF ^000000 learn the skill from my example...";
			set SAG_SK,1;
			close;
		}
		else if(SAG_SK == 1) {
			if (countitem(904) < 10 || countitem(947) < 7 || countitem(1013) < 12 || countitem(946) < 10 || countitem(7433) < 4) {
				mes "[Mishuna]";
				mes "Hm, you still haven't";
				mes "gathered all of the materials";
				mes "required to create an elemental";
				mes "coverter. Let me remind you";
				mes "what to bring so that you";
				mes "don't forget next time...";
				next;
				mes "[Mishuna]";
				mes "^ff00007 Horns^000000,";
				mes "^ff000012 Rainbow Shells^000000,";
				mes "^ff000010 Snail's Shells^000000,";
				mes "^ff00004 Blank Scrolls^000000 and";
				mes "^ff000010 Scorpion Tails^000000.^000000";
				next;
				mes "[Mishuna]";
				mes "Don't forget that we need";
				mes "all of these items to create";
				mes "a converter so that you can";
				mes "learn the Elemental Converter";
				mes "Creation skill by watching";
				mes "me demonstrate it for you.";
				close;
			}
			else {
				mes "[Mishuna]";
				mes "Great, you brought everything.";
				mes "Now, let me explain the skill.";
				mes "The skills you learn as a Sage";
				mes "determine what kind of elemental converters that you can craft.";
				next;
				mes "[Mishuna]";
				mes "The ^FF0000Endow Blaze^000000 skill enables";
				mes "you to create Fire elemental";
				mes "converters. The ^FF0000Endow Quake^000000";
				mes "skill enables the creation";
				mes "of Earth elemental converters.";
				next;
				mes "[Mishuna]";
				mes "^FF0000Endow Tornado^000000 enables";
				mes "the creation of Wind elemental";
				mes "converters, and ^FF0000Endow Tsunami^000000";
				mes "enables the creation of Water";
				mes "elemental converters. That";
				mes "all makes sense, right?";
				next;
				mes "[Mishuna]";
				mes "Now, your elemental coverter";
				mes "creation success rate depends";
				mes "on the level of the Endow Blaze, Endow Quake, Endow Tornado,";
				mes "or Endow Tsunami skills, and";
				mes "your abilities.";
				next;
				mes "[Mishuna]";
				mes "Now, please take this copy";
				mes "of Barmundt's scroll, and use";
				mes "it as a reference when you try";
				mes "to craft elemental converters";
				mes "when you use the Elemental";
				mes "Converter Creation skill.";
				next;
				mes "^3355FFYou have learned the";
				mes "Elemental Converter";
				mes "Creation skill by reviewing";
				mes "your copy of Barmundt's scroll.^000000";
				specialeffect2 EF_ABSORBSPIRITS;
				delitem 904,10; // Scorpion_Tail
				delitem 947,7; // Horn
				delitem 1013,12; // Rainbow_Shell
				delitem 946,10; // Snail's_Shell
				delitem 7433,4; // Blank_Scroll
				set SAG_SK,2;
				skill "SA_CREATECON",1,0;
				next;
				mes "[Mishuna]";
				mes "Wow, "+strcharinfo(0)+"!";
				mes "You learned that skill";
				mes "really quickly! No wonder";
				mes "people say that you're one";
				mes "of the best Sages around!";
				next;
				mes "[Mishuna]";
				mes "Now you're ready to";
				mes "learn the other skill,";
				mes "Elemental Change. Alright,";
				mes "I need to prepare a few things";
				mes "for this lesson, so we'll meet";
				mes "and discuss this later, okay?";
				close;
			}
		}
		else if(SAG_SK == 2) {
			if(getskilllv("SA_CREATECON") == 0) {
				skill "SA_CREATECON",1,0;
				mes "- I recalled ^ff0000Elemental Converter Creation skill^000000 While I talk to Mishuna! -";
				next;
			}
			mes "[Mishuna]";
			mes "You'll be given the chance to";
			mes "choose which kind of ^FF0000Elemental";
			mes "Change^000000 skill that you want, even one that you didn't previously";
			mes "learn, so long as you fulfill";
			mes "the skill's requirements.";
			next;
			mes "[Mishuna]";
			mes "Keep in mind that once";
			mes "you learn your Elemental";
			mes "Change skill, you won't be";
			mes "able to change it. Now, which";
			mes "skill would you like to learn?";
			next;
			while(1) {
				switch(select("Fire Elemental Change:Earth Elemental Change:Wind Elemental Change:Water Elemental Change")) {
				case 1:
					if(getskilllv("SA_FLAMELAUNCHER") == 0) {
						mes "[Mishuna]";
						mes "I'm sorry, but you have not";
						mes "learned ^FF0000Endow Blaze^000000, the skill";
						mes "required for the Fire Elemental Change skill. Please learn Endow";
						mes "Blaze or select another Elemental Change skill for me to teach you.";
						next;
					}
					else {
						mes "[Mishuna]";
						mes "Very well, then. Please";
						mes "bring the following items";
						mes "so that you can learn the";
						mes "Fire Elemental Change skill.";
						next;
						mes "[Mishuna]";
						mes "^FF000020 Red Bloods^000000,";
						mes "^FF00001 Payon Solution^000000 and";
						mes "^FF00001 Morroc Solution^000000. Please";
						mes "return to me once you have";
						mes "all the materials ready.";
						set SAG_SK,10;
						close;
					}
					break;
				case 2:
					if(getskilllv("SA_SEISMICWEAPON") == 0) {
						mes "[Mishuna]";
						mes "I'm sorry, but you have not";
						mes "learned ^FF0000Endow Quake^000000, the skill";
						mes "required for the Earth Elemental Change skill. Please learn Endow";
						mes "Quake or select another Elemental Change skill for me to teach you.";
						next;
					}
					else {
						mes "[Mishuna]";
						mes "Very well, then. Please";
						mes "bring the following items";
						mes "so that you can learn the";
						mes "Earth Elemental Change skill.";
						next;
						mes "[Mishuna]";
						mes "^ff000020 Green Lives^000000,";
						mes "^ff00001 Payon Solution^000000 and";
						mes "^ff00001 Morroc Solution^000000. Please";
						mes "return to me once you have";
						mes "all the materials ready.";
						set SAG_SK,20;
						close;
					}
					break;
				case 3:
					if(getskilllv("SA_LIGHTNINGLOADER") == 0) {
						mes "[Mishuna]";
						mes "I'm sorry, but you have not learned ^FF0000Endow Tornado^000000, the skill";
						mes "required for the Wind Elemental Change skill. Please learn Endow";
						mes "Tornado or pick another Elemental Change skill for me to teach you.";
						next;
					}
					else {
						mes "[Mishuna]";
						mes "Very well, then. Please";
						mes "bring the following items";
						mes "so that you can learn the";
						mes "Wind Elemental Change skill.";
						next;
						mes "[Mishuna]";
						mes "^ff000020 Winds of Verdure^000000,";
						mes "^ff00001 Payon Solution^000000 and";
						mes "^ff00001 Morroc Solution^000000. Please";
						mes "return to me once you have";
						mes "all the materials ready.";
						set SAG_SK,30;
						close;
					}
					break;
				case 4:
					if(getskilllv("SA_FROSTWEAPON") == 0) {
						mes "[Mishuna]";
						mes "I'm sorry, but you have not learned ^FF0000Endow Tsunami^000000, the skill";
						mes "required for the Water Elemental Change skill. Please learn Endow";
						mes "Tsunami or pick another Elemental Change skill for me to teach you.";
						next;
					}
					else {
						mes "[Mishuna]";
						mes "Very well, then. Please";
						mes "bring the following items";
						mes "so that you can learn the";
						mes "Water Elemental Change skill.";
						next;
						mes "[Mishuna]";
						mes "^ff000020 Crystal Blues^000000,";
						mes "^ff00001 Payon Solution^000000 and";
						mes "^ff00001 Morroc Solution^000000. Please";
						mes "return to me once you have";
						mes "all the materials ready.";
						set SAG_SK,40;
						close;
					}
					break;
				}
			}
		}
		else if(SAG_SK == 10) {
			if(getskilllv("SA_CREATECON") == 0) {
				skill "SA_CREATECON",1,0;
				mes "- I recalled ^ff0000Elemental Converter Creation skill^000000 While I talk to Mishuna! -";
				next;
			}
			if (countitem(990) < 20 || countitem(1089) < 1 || countitem(1088) < 1) {
				mes "[Mishuna]";
				mes "Are you having trouble";
				mes "gathering all the required";
				mes "items? Just in case, let me";
				mes "remind you of what you need";
				mes "to bring me to learn the Fire";
				mes "Elemental Change skill.";
				next;
				mes "[Mishuna]";
				mes "^ff000020 Red Bloods^000000,";
				mes "^ff00001 Payon Solution^000000 and";
				mes "^ff00001 Morroc Solution^000000. Please";
				mes "don't forget and have the";
				mes "materials ready for the next";
				mes "time you see me, alright?";
				close;
			}
			mes "[Mishuna]";
			mes "Ah, you're back. I can now";
			mes "finally teach you about the";
			mes "Fire Elemental Change skill.";
			mes "This skill has the chance to";
			mes "permanently change a targeted";
			mes "monster's attribute to ^FF0000Fire^000000.";
			next;
			mes "[Mishuna]";
			mes "Remember that you must";
			mes "use an elemental converter to";
			mes "cast this skill, and that it has^FFFFFF ^000000a success rate, similarly to the";
			mes "Elemental Converter Creation";
			mes "skill. So be aware of that.";
			next;
			mes "[Mishuna]";
			mes "Now, "+strcharinfo(0)+",";
			mes "I'm going to cast a spell";
			mes "that will help you memorize";
			mes "the Fire Elemental Change";
			mes "skill. Try to stay still...";
			next;
			mes "^3355FFMishuna begins to chant";
			mes "a strange incantation as";
			mes "a soft blue glow surrounds";
			mes "his body and slowly grows";
			mes "brighter and more intense.^000000";
			specialeffect2 EF_RUWACH;
			next;
			mes "[Mishuna]";
			mes "@#$%^~ Yap!";
			specialeffect2 EF_BRANDISHSPEAR;
			delitem 990,20; // Boody Red
			delitem 1089,1; // Payon Potion
			delitem 1088,1; // Morocc Potion
			set SAG_SK,100;
			skill "SA_ELEMENTFIRE",1,0;
			next;
			mes "[Mishuna]";
			mes ""+strcharinfo(0)+"...";
			mes "I'm happy to say that you've";
			mes "successfully memorized the";
			mes "Fire Elemental Change skill.";
			mes "I hope that it serves you well";
			mes "in battle. Farewell for now~";
			close;
		}
		else if(SAG_SK == 20) {
			if(getskilllv("SA_CREATECON") == 0) {
				skill "SA_CREATECON",1,0;
				mes "- I recalled ^ff0000Elemental Converter Creation skill^000000 While I talk to Mishuna! -";
				next;
			}
			if (countitem(993) < 20 || countitem(1089) < 1 || countitem(1088) < 1) {
				mes "[Mishuna]";
				mes "Are you having trouble";
				mes "gathering all the required";
				mes "items? Just in case, let me";
				mes "remind you of what you need";
				mes "to bring me to learn the Earth";
				mes "Elemental Change skill.";
				next;
				mes "[Mishuna]";
				mes "^ff000020 Green Lives^000000,";
				mes "^ff00001 Payon Solution^000000 and";
				mes "^ff00001 Morroc Solution^000000. Please";
				mes "don't forget and have the";
				mes "materials ready for the next";
				mes "time you see me, alright?";
				close;
			}
			mes "[Mishuna]";
			mes "Ah, you're back. I can now";
			mes "finally teach you about the";
			mes "Earth Elemental Change skill.";
			mes "This skill has the chance to";
			mes "permanently change a targeted";
			mes "monster's attribute to Earth.";
			next;
			mes "[Mishuna]";
			mes "Remember that you must";
			mes "use an elemental converter to";
			mes "cast this skill, and that it has^FFFFFF ^000000 a success rate, similarly to the";
			mes "Elemental Converter Creation";
			mes "skill. So be aware of that.";
			next;
			mes "[Mishuna]";
			mes "Now, "+strcharinfo(0)+",";
			mes "I'm going to cast a spell";
			mes "that will help you memorize";
			mes "the Earth Elemental Change";
			mes "skill. Try to stay still...";
			next;
			mes "^3355FFMishuna begins to chant";
			mes "a strange incantation as";
			mes "a soft blue glow surrounds";
			mes "his body and slowly grows";
			mes "brighter and more intense.^000000";
			specialeffect2 EF_RUWACH;
			next;
			mes "[Mishuna]";
			mes "@#$%^~ Yap!";
			specialeffect2 EF_BRANDISHSPEAR;
			delitem 993,20; // Yellow Live
			delitem 1089,1; // Payon Potion
			delitem 1088,1; // Morocc Potion
			set SAG_SK,100;
			skill "SA_ELEMENTGROUND",1,0;
			next;
			mes "[Mishuna]";
			mes ""+strcharinfo(0)+"...";
			mes "I'm happy to say that you've";
			mes "successfully memorized the";
			mes "Earth Elemental Change skill.";
			mes "I hope that it serves you well";
			mes "in battle. Farewell for now~";
			close;
		}
		else if(SAG_SK == 30) {
			if(getskilllv("SA_CREATECON") == 0) {
				skill "SA_CREATECON",1,0;
				mes "- I recalled ^ff0000Elemental Converter Creation skill^000000 While I talk to Mishuna! -";
				next;
			}
			if (countitem(992) < 20 || countitem(1089) < 1 || countitem(1088) < 1) {
				mes "[Mishuna]";
				mes "Are you having trouble";
				mes "gathering all the required";
				mes "items? Just in case, let me";
				mes "remind you of what you need";
				mes "to bring me to learn the Wind";
				mes "Elemental Change skill.";
				next;
				mes "[Mishuna]";
				mes "^ff000020 Winds of Verdure^000000,";
				mes "^ff00001 Payon Solution^000000 and";
				mes "^ff00001 Morroc Solution^000000. Please";
				mes "don't forget and have the";
				mes "materials ready for the next";
				mes "time you see me, alright?";
				close;
			}
			mes "[Mishuna]";
			mes "Ah, you're back. I can now";
			mes "finally teach you about the";
			mes "Wind Elemental Change skill.";
			mes "This skill has the chance to";
			mes "permanently change a targeted";
			mes "monster's attribute to Wind.";
			next;
			mes "[Mishuna]";
			mes "Remember that you must";
			mes "use an elemental converter to";
			mes "cast this skill, and that it has^FFFFFF ^000000 a success rate, similarly to the";
			mes "Elemental Converter Creation";
			mes "skill. So be aware of that.";
			next;
			mes "[Mishuna]";
			mes "Now, "+strcharinfo(0)+",";
			mes "I'm going to cast a spell";
			mes "that will help you memorize";
			mes "the Wind Elemental Change";
			mes "skill. Try to stay still...";
			next;
			mes "^3355FFMishuna begins to chant";
			mes "a strange incantation as";
			mes "a soft blue glow surrounds";
			mes "his body and slowly grows";
			mes "brighter and more intense.^000000";
			specialeffect2 EF_RUWACH;
			next;
			mes "[Mishuna]";
			mes "@#$%^~ Yap!";
			specialeffect2 EF_BRANDISHSPEAR;
			delitem 992,20; // Wind Of Verdure
			delitem 1089,1; // Payon Potion
			delitem 1088,1; // Morocc Potion
			set SAG_SK,100;
			skill "SA_ELEMENTWIND",1,0;
			next;
			mes "[Mishuna]";
			mes ""+strcharinfo(0)+"...";
			mes "I'm happy to say that you've";
			mes "successfully memorized the";
			mes "Wind Elemental Change skill.";
			mes "I hope that it serves you well";
			mes "in battle. Farewell for now~";
			close;
		}
		else if(SAG_SK == 40) {
			if(getskilllv("SA_CREATECON") == 0) {
				skill "SA_CREATECON",1,0;
				mes "- I recalled ^ff0000Elemental Converter Creation skill^000000 While I talk to Mishuna! -";
				next;
			}
			if (countitem(991) < 20 || countitem(1089) < 1 || countitem(1088) < 1) {
				mes "[Mishuna]";
				mes "Are you having trouble";
				mes "gathering all the required";
				mes "items? Just in case, let me";
				mes "remind you of what you need";
				mes "to bring me to learn the Water";
				mes "Elemental Change skill.";
				next;
				mes "[Mishuna]";
				mes "^ff000020 Crystal Blues^000000,";
				mes "^ff00001 Payon Solution^000000 and";
				mes "^ff00001 Morroc Solution^000000. Please";
				mes "don't forget and have the";
				mes "materials ready for the next";
				mes "time you see me, alright?";
				close;
			}
			mes "[Mishuna]";
			mes "Ah, you're back. I can now";
			mes "finally teach you about the";
			mes "Water Elemental Change skill.";
			mes "This skill has the chance to";
			mes "permanently change a targeted";
			mes "monster's attribute to Water.";
			next;
			mes "[Mishuna]";
			mes "Remember that you must";
			mes "use an elemental converter to";
			mes "cast this skill, and that it has^FFFFFF ^000000 a success rate, similarly to the";
			mes "Elemental Converter Creation";
			mes "skill. So be aware of that.";
			next;
			mes "[Mishuna]";
			mes "Now, "+strcharinfo(0)+",";
			mes "I'm going to cast a spell";
			mes "that will help you memorize";
			mes "the Water Elemental Change";
			mes "skill. Try to stay still...";
			next;
			mes "^3355FFMishuna begins to chant";
			mes "a strange incantation as";
			mes "a soft blue glow surrounds";
			mes "his body and slowly grows";
			mes "brighter and more intense.^000000";
			specialeffect2 EF_RUWACH;
			next;
			mes "[Mishuna]";
			mes "@#$%^~ Yap!";
			specialeffect2 EF_BRANDISHSPEAR;
			delitem 991,20; // Crystal Blue
			delitem 1089,1; // Payon Potion
			delitem 1088,1; // Morocc Potion
			set SAG_SK,100;
			skill "SA_ELEMENTWATER",1,0;
			next;
			mes "[Mishuna]";
			mes ""+strcharinfo(0)+"...";
			mes "I'm happy to say that you've";
			mes "successfully memorized the";
			mes "Water Elemental Change skill.";
			mes "I hope that it serves you well";
			mes "in battle. Farewell for now~";
			close;
		}
		else {
			mes "[Mishuna]";
			mes "If you have any Sage or";
			mes "Scholar friends who haven't";
			mes "learned the skills from Sir";
			mes "Barmundt's scrolls, then";
			mes "please refer them to me.";
			next;
			mes "[Mishuna]";
			mes "I trust that you are";
			mes "finding that these";
			mes "element based skills";
			mes "are very useful in battle.";
			mes "Knowledge truly equates";
			mes "to power in the long run...";
			close;
		}
	}
	else {
		mes "[Mishuna]";
		mes "Good day, I'm Mishuna, one";
		mes "of the instructors here in the";
		mes "Schweicherbil Magic Academy.";
		mes "By any chance, are you a Sage";
		mes "or Scholar? Oh... You're not?";
		next;
		mes "[Mishuna]";
		mes "Oh, that's too bad.";
		mes "My apologies. But if you";
		mes "happen to know any, or meet";
		mes "any in your journeys, please";
		mes "direct them to me if they haven't heard of the lessons I provide.";
		next;
		mes "[Mishuna]";
		mes "I'm sorry to bother";
		mes "you, and I thank you";
		mes "for your time. Good";
		mes "day to you, adventurer.";
		close;
	}
}

//============================================================ 
// Old changelog
//===== Additional Comments: ================================= 
//= 1.0 for fully working skills only [Lupus]
//= 1.1 Added more new skill quests for more classes [Lupus]
//= Somehow eA engine doesn't let you keep learn't skill V_V'
//= 1.2 Added to correct locations, correct NPC's, fixed
//= some of the items required and made them into real
//= quests. [Reddozen] 
//= 1.3 Fixed bugs and minor typos. Optimized [Lupus]
//= 1.3a fixed an item ID typo, thx 2Spiritual Kid
//= 1.3b Splitted into different files [DracoRPG]
//= 1.3c Fixed some typos [IVBela]
//============================================================
