* Added bard/dancer songs and duets to the nodispell list. (bugreport:4411)

* Applied Ai4rei's patch for the skill WE_CALLPARTNER (bugreport:4437)
* Lots of updates to monster stats/drops, all fairly minor.
* Updated the price and weight of a handful of etc items.
* Removed drops for quest-spawned Satan Morroc. (bugreport:4425)
* Changed weight on novice consumable items to 0 (bugreport:4442)
* Updated Sage quest skill quest with the file curtosy of 5511.
* Fixed the Pink Crystal being named Blue Crystal in Flavius.
* Touched up the archer tutorial, and phantasmic arrow quests.
* Fixed Turbo Track records for 8 and 16 normal saving as expert. (bugreport:4433)
* Corrected the positions for the arug castle 04 exterior flags. (bugreport:4436)


git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/trunk@14409 54d463be-8e91-2dee-dedb-b68131a5f0ec

1 files changed, 1109 insertions, 130 deletions

diff --git a/npc/quests/skills/sage_skills.txt b/npc/quests/skills/sage_skills.txt
index 04cef2937..3191bc600 100644
--- a/npc/quests/skills/sage_skills.txt
+++ b/npc/quests/skills/sage_skills.txt
@@ -3,11 +3,1117 @@
 //===== By: ================================================== 
 //= Lupus, Reddozen
 //===== Current Version: ===================================== 
-//= 1.3c
+//= 1.4
 //===== Compatible With: ===================================== 
-//= eAthena Revision 3800+
+//= eAthena SVN
 //===== Description: ========================================= 
-//= Temp quests for new skills for 2nd classes
+//= [Aegis 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]
@@ -20,130 +1126,3 @@
 //= 1.3b Splitted into different files [DracoRPG]
 //= 1.3c Fixed some typos [IVBela]
 //============================================================
-
-
-//============================================================
-// SAGE SKILL - CREATE CONVERTER + ELEMENTAL CHANGE
-//============================================================
-yuno_in03,176,24,3	script	Mischna	755,{
-	mes "[Mischna]";
-	if(BaseJob!=Job_Sage) goto L_sageno;
-	if(getskilllv("SA_CREATECON")) goto L_elemental;
-
-	mes "I can teach you a new skill";
-	mes "that I discovered, but you";
-	mes "will need to bring me a few";
-	mes "things to complete the";
-	mes "process.";
-	next;
-	
-	mes "[Mischna]";
-	mes "We will need:";	
-	mes "10 Scorpion Tails";
-	mes "7 Horns";
-	mes "12 Rainbow Shells";
-	mes "10 Snail Shells";
-	mes "4 Blank Scrolls";
-	next;
-	
-	mes "[Mischna]";
-	mes "Let me check your items.";
-	next;
-	
-	if(countitem(904)<10 || countitem(947)<7 || countitem(1013)<12 || countitem(946)<10 || countitem(7433)<4) goto L_noitems;//Items: Scorpion_Tail, Horn, Rainbow_Shell, Snail's_Shell, Blank_Scroll,
-	delitem 904, 10;//Items: Scorpion_Tail,
-	delitem 947, 7;//Items: Horn,
-	delitem 1013, 12;//Items: Rainbow_Shell,
-	delitem 946, 10;//Items: Snail's_Shell,
-	delitem 7433, 4;//Items: Blank_Scroll,
-	
-	mes "[Mischna]";
-	mes "I see you have what we need,";
-	mes "so I'll teach you this new";
-	mes "talent of mine!";
-	skill "SA_CREATECON",1,0;
-	next;
-	
-	mes "[Mischna]";
-	mes "Do you feel more in tune";
-	mes "with nature?";
-	close;
-
-L_noitems:
-	mes "[Mischna]";
-	mes "You don't have enough items.";
-	mes "Come back when you have all";
-	mes "the required items for me.";
-	close;
-	
-L_sageno:
-	mes "Hi I'm Mischna. How are you?";
-	mes "Please enjoy your stay here";
-	mes "within the walls of the great";
-	mes "Sage's guild.";
-	close;
-
-L_sagefail:
-	mes "[Mischna]";
-	mes "You don't have enough items.";
-	mes "Come back when you have all";
-	mes "the required items for me";
-	mes "to give you this power over";
-	mes "the elements.";
-	close;
-	
-L_alreadyhave:
-	mes "You are such a wonderful";
-	mes "student. It's too bad I have";
-	mes "nothing more to teach you.";
-	close;
-			
-L_elemental:
-	if(getskilllv("SA_ELEMENTWATER") || getskilllv("SA_ELEMENTGROUND") 
-		|| getskilllv("SA_ELEMENTFIRE") || getskilllv("SA_ELEMENTWIND")) goto L_alreadyhave;
-	
-	mes "I have one more skill that";
-	mes "I can teach you, but you";
-	mes "will need to bring me one of";
-	mes "these sets in return...";
-	next;
-	
-	mes "[Mischna]";
-	mes "I can only accept one set.";
-	mes "20 Red blood (fire)";
-	mes "20 Crystal Blue (water)";
-	mes "20 Wind of Verdure (Wind)";
-	mes "20 Green Live (Earth)";
-	next;
-	
-	mes "[Mischna]";
-	mes "Remember that I can only teach";
-	mes "you one, so choose carefully!";
-	next;
-	
-	menu "Elemental Change Water",sage_1, "Elemental Change Earth",sage_2, "Elemental Change Fire",sage_3, "Elemental Change Wind",sage_4;
-
-		sage_1:
-		if(countitem(991)<20)goto L_sagefail;//Items: Crystal_Blue,
-		delitem 991, 20;		//Items: Crystal_Blue,
-		skill "SA_ELEMENTWATER",1,0;
-		goto L_alreadyhave;
-
-		sage_2:
-		if(countitem(993)<20)goto L_sagefail;//Items: Green_Live,
-		delitem 993, 20;//Items: Green_Live,
-		skill "SA_ELEMENTGROUND",1,0;
-		goto L_alreadyhave;
-
-		sage_3:
-		if(countitem(990)<20)goto L_sagefail;//Items: Red_Blood,
-		delitem 990, 20;//Items: Red_Blood,
-		skill "SA_ELEMENTFIRE",1,0;
-		goto L_alreadyhave;
-
-		sage_4:
-		if(countitem(992)<20)goto L_sagefail;//Items: Wind_of_Verdure,
-		delitem 992, 20;//Items: Wind_of_Verdure,
-		skill "SA_ELEMENTWIND",1,0;
-		goto L_alreadyhave;
-}