- Massive EOL normalization & 'svn:eol-style native' flag setting for all txt/conf/h/c files.

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

1 files changed, 2180 insertions, 2180 deletions

diff --git a/npc/jobs/2-2/sage.txt b/npc/jobs/2-2/sage.txt
index 02fa8300f..7e2bfdd5e 100644
--- a/npc/jobs/2-2/sage.txt
+++ b/npc/jobs/2-2/sage.txt
@@ -1,2180 +1,2180 @@
-//===== eAthena Script ======================================= 

-//= Sage Job Quest

-//===== By: ==================================================

-//= jAthena (0.9) - I guess

-//= Unknown Translator (1.0)

-//= Darkchild (1.2)

-//===== Current Version: ===================================== 

-//= 2.0a

-//===== Compatible With: ===================================== 

-//= eAthena 1.0 +

-//===== Description: ========================================= 

-//= Sage job quest based off of official servers.

-//===== Additional Comments: ================================= 

-//= Script mostly based on translated jA script

-//= Written test questions/answers weren't translated 100% corectly

-//= So a lot of those are based upon mRO site and my own info

-//= IF you by excident have (or can get) screenshots of these questions

-//= Then PLEASE send them to Darkchild

-//= 1.3 Baby class Support added [Lupus] 1.5 Fixed possible EXP abuse [Lupus]

-//= 1.6 Added a func which prevent advanced classes passing

-//= 2nd Job Quests again. It also guides adv classes where to go. [Lupus]

-//= 1.7 Fixed tuition fee. Fixed some answers, names & typos, added missing labels [Lupus]

-//= 1.7a Moved JFunc back in the main file, fixed typos [Lupus]

-//= 2.0 Changed numbers to constants. [Vicious]

-//= 2.0a Fixed double warp [KarLaeda] 

-//============================================================ 

-

-

-//==================================

-//Sage Castle

-//==================================

-yuno_in02.gat,38,61,4	script	Magic Academy Headmaster 	743,{

-	callfunc "F_BlockHigh",Job_Mage_High,"High Mage",Job_Professor,"Professor","Keiron";

-	if(BaseJob == Job_Sage) goto L_Menu3_3;

-	if(BaseJob != Job_Mage) goto L_Menu2_1;

-	if(SAGE_Q == 11) goto L_Menu3_1;

-	if(SAGE_Q >= 3) goto L_Menu2_2;

-	mes "[Keiron]";

-	mes "All who appreciate the fine art";

-	mes "of magic are welcome here.";

-	mes "How can I help you?";

-        next;

-	menu "Change class to Sage",L_Menu1_1,"About the Sage class",-,"Just looking around",L_Menu1_2;

-		mes "[Keiron]";

-		mes "So you're interested in being a Sage?";

-		mes "Well, I can't just make you one straight away.";

-		next;

-		mes "[Keiron]";

-		mes "In order to become a Sage, you'll need to file an application for entry into the Shubaichul Magic Academy and take the placement test.";

-		next;

-		mes "[Keiron]";

-		mes "Once you're placed, you'll need to complete coursework and finally write and defend a thesis.";

-		next;

-		mes "[Keiron]";

-		mes "If you successfully complete the requirements, you'll be granted a Sage license.";

-		next;

-		mes "[Keiron]";

-		mes "If you wish to apply, go see Mathias in the Shubaichul Magic Academy.";

-		mes "Tell him I sent you.";

-		close;

-L_Menu1_1:

-	mes "[Keiron]";

-	mes "A Sage?";

-	mes "Well...";

-	mes "In order to change you way of living, you have to change your way of thinking.";

-	next;

-	mes "[Keiron]";

-	mes "Sages actively contribute knowledge to the kingdom through rigorous research.";

-	mes "They also help society through its worst problems.";

-	mes "Just because you dress as a Sage doesn't mean you're a Sage.";

-	next;

-	mes "[Keiron]";

-	mes "To become a Sage, please apply for entry into the Shubaichul Magic Academy.";

-	mes "The admissions officer will explain the educational requirements.";

-	close;

-L_Menu1_2:

-	mes "[Keiron]";

-	mes "Excellent.  If you have some free time, why not peruse a a volume from our library?";

-	mes "Our library is truly a bastion of knowledge.";

-	next;

-	mes "[Keiron]";

-	mes "Of course, there is much that can't be learned from reading books, but it's a good start.";

-	close;

-L_Menu2_1:

-	mes "[Keiron]";

-	mes "We Sages do a lot of research about the world on our own,";

-	mes "but to maximize our knowledge,";

-	mes "we regularly form interdisciplinary research teams.";

-	next;

-	mes "[Keiron]";

-	mes "You should talk to our Sages and share any research you may have been doing within your own profession.";

-	close;

-L_Menu2_2:

-	mes "[Keiron]";

-	mes "The road to becoming a Sage isn't easy.";

-	mes "You need to have a strong dedication to mastering magic.";

-	next;

-	mes "[Keiron]";

-	mes "You need to keep plugging away at that thesis.";

-	mes "Good luck!";

-	close;

-L_Menu3_1:

-	if(countitem(1550) >= 1) goto L_Menu3_2;

-	mes "[Keiron]";

-	mes "Where's your thesis?";

-	mes "I'm eager to evaulate it.";

-	next;

-	mes "[Keiron]";

-	mes "Did you forget it?";

-	mes "In any case, please bring it post-haste.";

-	close;

-L_Menu3_2:

-	mes "[Keiron]";

-	mes "It looks like you have a thesis to present.  Let's have a look...";

-	next;

-	mes "[Keiron]";

-	mes "Hmmm...";

-	next;

-	mes "[Keiron]";

-	mes "Yes....";

-	next;

-	mes "[Keiron]";

-	mes "Interesting...";

-	next;

-	mes "[Keiron]";

-	mes "It's not stylistically";

-	mes "cohesive, but your zeal for research is amply proven by your thesis.  I approve.";

-	next;

-	if(SkillPoint == 0) goto LCHANGE;

-	mes "[Keiron]";

-	mes "Well you are all set for the jobchange except for 1 thing!";

-	mes "You have unused Skill Points!!!";

-	mes "Please use those first!";

-	close;

-		

-	LCHANGE:

-	callfunc "Job_Change",Job_Sage;

-	callfunc "F_ClearJobVar";

-	mes "[Keiron]";

-	mes "Congratulations!";

-	mes "You're a Sage now.";

-	mes "Don't let that passion for research ever be dampened.";

-	next;

-	mes "[Keiron]";

-	mes "Keep your thesis around, since it may be useful in a publish-or-perish environment later on.";

-	next;

-	mes "[Keiron]";

-	mes "Some day, you'll be a bastion of knowledge all by yourself!";

-	close;

-L_Menu3_3:

-	mes "[Keiron]";

-	mes "Hmmm?  What's up?";

-	mes "Just because you're a Sage doesn't mean you should quit your studies.";

-	next;

-	mes "[Keiron]";

-	mes "In order to maintain our role as the kingdom's gatherers and dissemenators of knowledge, we can never miss an opportunity to gather data.";

-	close;

-}

-

-//===============================

-//Biotech Lab

-//===============================

-yuno_in03.gat,244,31,3	script	Physics Professor	120,{

-	if(BaseJob == Job_Sage) goto L_Menu3_2;

-	if(BaseJob != Job_Mage) goto L_Menu1_1;

-	if(SAGE_Q == 11) goto L_Menu3_1;

-	if(SAGE_Q2 == 8) goto L_Menu2_1;

-	if(SAGE_Q2 == 9) goto L_Menu2_3;

-	if(SAGE_Q2 == 10) goto L_Menu2_5;

-	if(SAGE_Q2 == 11) goto L_ThesisStart1;

-	if(SAGE_Q == 9) goto L_Menu1_2;

-	mes "[Ebeshi]";

-	mes "What?";

-	next;

-	mes "[Ebeshi]";

-	mes "Did you come to study under my guidance?";

-	next;

-	mes "[Ebeshi]";

-	mes "Well, you need to enroll first.";

-	mes "Heheheheh...";

-	close;

-L_Menu1_1:

-	mes "[Ebeshi]";

-	mes "Eh???????????????????????????????";

-	next;

-	mes "[Ebeshi]";

-	mes "I don't think there's anything someone like you can learn from me.";

-	next;

-	mes "[Ebeshi]";

-	mes "Are you disappointed?";

-	mes "Hehehehe....";

-	close;

-L_Menu1_2:

-	set SAGE_Q2,8;

-	mes "[Ebeshi]";

-	mes "Well, I'm glad to meet another fine student such as yourself.";

-	next;

-	mes "[Ebeshi]";

-	mes "Aren't you excited that you're going to study under me?!";

-	mes "Hehehehe....";

-	next;

-	mes "[Ebeshi]";

-	mes "I hate to be intrusive, but could you get something for me before I start my class?";

-	next;

-	mes "[Ebeshi]";

-	mes "I need ^3051FD30x Stone^000000 as part of the class materials.";

-	mes "Can you get that?";

-	next;

-	mes "[Ebeshi]";

-	mes "If you really want to get stones quick,";

-	mes "you should look up a friendly thief to assist you!  Thanks for helping out.";

-	close;

-L_Menu2_1:

-	if(countitem(7049) >= 30) goto L_Menu2_2;

-		mes "[Ebeshi]";

-		mes "Hey, what are you up to?";

-		mes "Are you trying to slack off?";

-		mes "Come on, set your eyes on the goal.";

-		next;

-		mes "[Ebeshi]";

-		mes "I need ^3051FD30x Stone^000000 to proceed.";

-		mes "With all the stones lying around,";

-		mes "shouldn't they be easy to find?";

-		close;

-	L_Menu2_2:

-		mes "[Ebeshi]";

-		mes "Awesome!  You've got all the stones I need.";

-		mes "Now, watch this!";

-		next;

-		mes "[Ebeshi]";

-		mes "Abracadabra!!";

-		next;

-		mes "[Ebeshi]";

-		mes "Abracadabra!!";

-		next;

-		mes "[Ebeshi]";

-		mes "Abracadabra!!";

-		next;

-		delitem 7049,30;

-		set SAGE_Q2,9;

-		mes "[Ebeshi]";

-		mes "You see that?";

-		mes "I created three elemental stones!";

-		next;

-		mes "[Ebeshi]";

-		mes "Pretty cool, don't you think?";

-		mes "Have them for yourself!";

-		next;

-		getitem 991,1;

-		getitem 993,1;

-		getitem 992,1;

-		mes "[Ebeshi]";

-		mes "Now, for your next lesson, you need to synthesize some different kinds of arrows with those stones.";

-		next;

-		mes "[Ebeshi]";

-		mes "Specifically...";

-		mes "^3051FD50x Crystal Arrow^000000";

-		mes "^3051FD50x Stone Arrow^000000";

-		mes "^3051FD50x Wind Arrow^000000";

-		next;

-		mes "[Ebeshi]";

-		mes "An archer friend can help you make the arrows.";

-		mes "Give it a try!";

-		close;

-	L_Menu2_3:

-		if((countitem(1754) >= 50) && (countitem(1756) >= 50) && (countitem(1755) >= 50)) goto L_Menu2_4;

-		mes "[Ebeshi]";

-		mes "Hmmm?";

-		mes "What did you do with those stones I gave you?";

-		mes "You didn't sell them, I hope...";

-		next;

-		mes "[Ebeshi]";

-                mes "You need to use them to make";

-		mes "^3051FD50x Crystal Arrow^000000";

-		mes "^3051FD50x Stone Arrow^000000";

-		mes "^3051FD50x Wind Arrow^000000";

-		mes "An archer friend can help you make the arrows.";

-		close;

-	L_Menu2_4:

-		mes "[Ebeshi]";

-		mes "You made the arrows!  Good job.";

-		mes "Now, to continue with the lesson...";

-		next;

-		mes "[Ebeshi]";

-		mes "This lesson covers the Elemental Affinity chapter in your textbook.";

-		next;

-		mes "[Ebeshi]";

-		mes "The first affinity is really easy.";

-		mes "Water magic is very effective against fire.";

-		mes "It's easy to remember.";

-		mes "All you need to remember is water being splashed on fire.";

-		next;

-		mes "[Ebeshi]";

-		mes "Wind magic will decimate water-based monsters.";

-		mes "Observe what happens when a lake is struck by lightning.";

-		next;

-		mes "[Ebeshi]";

-		mes "Earth magic will crush wind-based monsters easily.";

-		mes "Don't you build a house on a strong foundation to keep the wind away?";

-		next;

-		mes "[Ebeshi]";

-		mes "Fire magic mercilessly scorches the earth.";

-		mes "Won't a tree burn if a fire breaks out?";

-		mes "Same with an earth-based monster.";

-		next;

-		mes "[Ebeshi]";

-		mes "Do you understand?";

-		mes "Here's some homework for next time...";

-		next;

-		delitem 1754,50;

-		delitem 1756,50;

-		delitem 1755,50;

-		set SAGE_Q2,10;

-		mes "[Ebeshi]";

-		mes "Next time you come, bring ^3051FD1x Holy Water^000000.";

-		mes "We'll need it for the lesson.";

-		mes "It will be easy to acquire if you have contacts in the church.";

-		close;

-	L_Menu2_5:

-		if(countitem(523) >= 1) goto L_Menu2_6;

-		mes "[Ebeshi]";

-		mes "Ooops!";

-		mes "Did you forget about the item I asked you to bring?";

-		next;

-		mes "[Ebeshi]";

-		mes "I need ^3051FD1x Holy Water^000000 for the lesson.";

-		mes "Ask an Acolyte to help you make it.";

-		mes "Hehehehe...";

-		close;

-	L_Menu2_6:

-		mes "[Ebeshi]";

-		mes "Alright, you have the Holy Water!";

-		mes "Let's continue the lesson!";

-		next;

-		mes "[Ebeshi]";

-		mes "Please take good notes about this part.";

-		mes "It will be on the test.";

-		next;

-		mes "[Ebeshi]";

-		mes "Water magic sucks against wind!";

-		mes "Would a lightning bolt care if it was frozen?";

-		mes "Heheheheh....";

-		next;

-		mes "[Ebeshi]";

-		mes "Wind magic is totally useless against the earth.";

-		mes "Will a tree suffer permanent damage if it's blown about?";

-		next;

-		mes "[Ebeshi]";

-		mes "Earth magic is ineffective against fire.";

-		mes "If you put some leaves on a fire, will the fire go out?";

-		mes "No, just the opposite will happen.";

-		next;

-		mes "[Ebeshi]";

-		mes "Fire won't do much against water.";

-		mes "If you heat water, doesn't it just become more dangerous?";

-		next;

-		mes "[Ebeshi]";

-		mes "That was a pretty informative lecture!";

-		mes "You think so too, right?";

-		next;

-		delitem 523,1;

-		set SAGE_Q2,11;

-		mes "[Ebeshi]";

-		mes "Now, you have enough knowledge to prepare a defensible thesis.";

-		mes "Hehehehehe!";

-		next;

-		mes "[Ebeshi]";

-		mes "To put the thesis together, you'll need:";

-		mes "^3051FD1x Feather of Birds^000000 for your writing instrument.";

-		mes "^3051FD1x Animal Skin^000000 for the pages.";

-		mes "^3051FD1x Trunk^000000 to bind the pages.";

-		mes "^3051FD1x Squid Ink^000000 for your ink.";

-		mes "^3051FD1x Empty Bottle^000000 to store your ink.";

-		next;

-		mes "[Ebeshi]";

-		mes "Come and see me once you've gotten all of these items together.";

-		close;

-	L_ThesisStart1:

-		if((countitem(916) >= 1) && (countitem(919) >= 1) && (countitem(1019) >= 1) && (countitem(1024) >= 1) && (countitem(713) >= 1)) goto L_ThesisStart2;

-		mes "[Ebeshi]";

-		mes "Hmmm?";

-		mes "You can't forget important things like this!";

-		next;

-		mes "[Ebeshi]";

-                mes "You need these items to start your thesis:";

-		mes "^3051FD1x Feather of Birds^000000 for your writing instrument.";

-		mes "^3051FD1x Animal Skin^000000 for the pages.";

-		mes "^3051FD1x Trunk^000000 to bind the pages.";

-		mes "^3051FD1x Squid Ink^000000 for your ink.";

-		mes "^3051FD1x Empty Bottle^000000 to store your ink.";

-		next;

-		mes "[Ebeshi]";

-		mes "Do you have some friends that might be able to help you gather the materials?";

-		mes "That will make it a simple task!";

-		close;

-	L_ThesisStart2:

-		delitem 916,1;

-		delitem 919,1;

-		delitem 1019,1;

-		delitem 1024,1;

-		delitem 713,1;

-		mes "[Ebeshi]";

-		mes "Alright...";

-		mes "You need to write this yourself.";

-		mes "I'm simply your research advisor!";

-		mes "Hehehehe...";

-		next;

-		mes "......";

-		next;

-		mes "......";

-		next;

-		mes "......";

-		next;

-		mes "Elemental magic is divided into four types...";

-			menu "...called Fire, Wind, Water, and Earth",L_ThesisMenu1_1,"...named Fire, Wind, Water, and Earth",L_ThesisMenu1_2,"...that oppose each other Fire, Wind, Water, and Earth",L_ThesisMenu1_3;

-		L_ThesisMenu1_1:

-			mes "...called Fire, Wind, Water, and Earth";

-			goto L_Thesis2;

-		L_ThesisMenu1_2:

-			mes "...named Fire, Wind, Water, and Earth";

-			goto L_Thesis2;

-		L_ThesisMenu1_3:

-			mes "...that oppose each other: Fire, Wind, Water, and Earth";

-			goto L_Thesis2;

-		L_Thesis2:

-			mes "Each attribute has certain properties.";

-			menu "Wind conquers water...",L_ThesisMenu2_1,"Water douses fire...",L_ThesisMenu2_2,"Fire scorches Earth...",L_ThesisMenu2_3;

-		L_ThesisMenu2_1:

-			mes "Wind conquers Water and Earth attacks Wind";

-			goto L_Thesis3;

-		L_ThesisMenu2_2:

-			mes "Water douses fire, while Wind zaps Water";

-			goto L_Thesis3;

-		L_ThesisMenu2_3:

-			mes "Fire scorches Earth, and Water douses Fire.";

-			goto L_Thesis3;

-		L_Thesis3:

-			menu "But weaknesses exist, too",L_ThesisMenu3_1,"You can customize your weapon element, also",L_ThesisMenu3_2,"Elemental affinity varies by monster type, also",L_ThesisMenu3_3;

-		L_ThesisMenu3_1:

-			mes "But weaknesses exist, too";

-			goto L_Thesis4;

-		L_ThesisMenu3_2:

-			mes "You can customize your weapon element, also";

-			goto L_Thesis4;

-		L_ThesisMenu3_3:

-			mes "Elemental affinity varies by monster type, also";

-			goto L_Thesis4;

-		L_Thesis4:

-			menu "You need to be circumspect when facing monsters...",L_ThesisMenu4_1,"So, you should customize your weapon to the situation",L_ThesisMenu4_2,"Red Potions have a delicious strawberry flavor",L_ThesisMenu4_3;

-		L_ThesisMenu4_1:

-			mes "You need to be circumspect when facing monster with an unfamiliar affinity.";

-			goto L_Thesis5;

-		L_ThesisMenu4_2:

-			mes "You should customize your weapon to the situation.";

-			goto L_Thesis5;

-		L_ThesisMenu4_3:

-			mes "Red Potions have a delicious strawberry flavor.";

-			goto L_Thesis5;

-		L_Thesis5:

-			next;

-			menu "Eimi of Prontera is hot",L_ThesisMenu5_1,"I wonder how Red Potions are made",L_ThesisMenu5_2,"The complexity of magic exceeds man's capacity to learn",L_ThesisMenu5_3;

-		L_ThesisMenu5_1:

-			mes "Eimi of Prontera is hot.";

-			goto L_Thesis6;

-		L_ThesisMenu5_2:

-			mes "I wonder how Red Potions are made.";

-			goto L_Thesis6;

-		L_ThesisMenu5_3:

-			mes "The complexity of magic exceeds man's capacity to learn.";

-			goto L_Thesis6;

-		L_Thesis6:

-			menu "The women in Morok are hot, too",L_ThesisMenu6_1,"Maybe it's a secret recipe",L_ThesisMenu6_2,"It's dangerous to depend on magic too much...",L_ThesisMenu6_3;

-		L_ThesisMenu6_1:

-			mes "The women in Morok are hot, too.";

-			goto L_Thesis7;

-		L_ThesisMenu6_2:

-			mes "Maybe it's a secret recipe.";

-			goto L_Thesis7;

-		L_ThesisMenu6_3:

-			mes "It's dangerous to depend on magic too much...";

-			goto L_Thesis7;

-		L_Thesis7:

-			menu "I wish I had a Bunny Band",L_ThesisMenu7_1,"That taste of a White potion...",L_ThesisMenu7_2,"...if you want to stay safe. power...",L_ThesisMenu7_3;

-		L_ThesisMenu7_1:

-			mes "I wish I had a Bunny Band.";

-			goto L_Thesis8;

-		L_ThesisMenu7_2:

-			mes "The taste of a White Potion...";

-			goto L_Thesis8;

-		L_ThesisMenu7_3:

-			mes "...if you want to stay safe. power...";

-			goto L_Thesis8;

-		L_Thesis8:

-			menu "That would make me happy",L_ThesisMenu8_1,"...is difficult to imagine",L_ThesisMenu8_2,"In the interest of a safe battle...",L_ThesisMenu8_3;

-		L_ThesisMenu8_1:

-			mes "That would make me happy.";

-			goto L_Thesis9;

-		L_ThesisMenu8_2:

-			mes "...is difficult to imagine";

-			goto L_Thesis9;

-		L_ThesisMenu8_3:

-			mes "In the interest of a safe battle...";

-			goto L_Thesis9;

-		L_Thesis9:

-			menu "Bunny Bands make great Acolyte accessories",L_ThesisMenu9_1,"It makes me wonder if...",L_ThesisMenu9_2,"...you should bring along friends",L_ThesisMenu9_3;

-		L_ThesisMenu9_1:

-			mes "Bunny Bands make great Acolyte accessories.";

-			goto L_Thesis10;

-		L_ThesisMenu9_2:

-			mes "It makes me wonder if...";

-			goto L_Thesis10;

-		L_ThesisMenu9_3:

-			mes "...you should bring along friends.";

-			goto L_Thesis10;

-		L_Thesis10:

-			menu "I wonder if a Knight could wear one, too",L_ThesisMenu10_1,"...people might drink them when they're not hurt",L_ThesisMenu10_2,"It's the responsible thing to do",L_ThesisMenu10_3;

-		L_ThesisMenu10_1:

-			mes "I wonder if a Knight could wear one, too.";

-			next;

-			goto L_ThesisEnd;

-		L_ThesisMenu10_2:

-			mes "...people might drink them when they're not hurt";

-			next;

-			goto L_ThesisEnd;

-		L_ThesisMenu10_3:

-			mes "It's the responsible thing to do.";

-			next;

-			goto L_ThesisEnd;

-	L_ThesisEnd:

-		mes "......";

-		next;

-		mes "......";

-		next;

-		mes "......";

-		next;

-		set SAGE_Q,11;

-		getitem 1550,1;

-		mes "[Ebeshi]";

-		mes "Alright!";

-		mes "You've finished!  It looks pretty good!";

-		next;

-		mes "[Ebeshi]";

-		mes "You should take that to the Headmaster!";

-		mes "He'll decide whether you graduate or not.";

-		mes "Hehehehehe....";

-		close;

-L_Menu3_1:

-	mes "[Ebeshi]";

-	mes "What's up?  Did you forget something?!";

-	next;

-	mes "[Ebeshi]";

-	mes "You should see the Headmaster and present your thesis so you can graduate!";

-	close;

-L_Menu3_2:

-	mes "[Ebeshi]";

-	mes "Good afternoon!";

-	mes "It's good to meet other Sages and exchange information.";

-	mes "Heheheheh!!";

-	next;

-	mes "[Ebeshi]";

-	mes "Even though company is good sometimes, I need to continue my magical research!";

-	next;

-	mes "[Ebeshi]";

-	mes "Do you want to continue your study here?";

-	mes "Please feel free to talk to the other professors and read the literature here.";

-	mes "Hehehehe!";

-	close;

-}

-

-//==================================

-//Monster Museum

-//==================================

-

-yuno_in03.gat,32,102,0	script	Biology Professor	755,{

-	if(BaseJob == Job_Sage) goto L_Menu5_4;

-	if(BaseJob != Job_Mage) goto L_Menu1_1;

-	if(SAGE_Q == 11) goto L_Menu5_3;

-	if((SAGE_Q2 >= 1) && (SAGE_Q2 <= 3)) goto L_Menu3_1;

-	if((SAGE_Q2 >= 4) && (SAGE_Q2 <= 6)) goto L_Menu4_1;

-	if(SAGE_Q2 == 7) goto L_Menu5_1;

-	if(SAGE_Q == 8) goto L_Menu2_1;

-	mes "[Lucias]";

-	mes "I have a headache...";

-	mes "I've got too many things going on at once!";

-	next;

-	mes "[Lucias]";

-	mes "Of course, I'll teach people about biology even with a headache!";

-	close;

-L_Menu1_1:

-	mes "[Lucias]";

-	mes "Hmmm?  Are you just poking around?";

-	next;

-	mes "[Lucias]";

-	mes "That's fine, but please don't touch anything.";

-	mes "We keep dangerous bioagents in here!";

-	next;

-	mes "[Lucias]";

-	mes "If you have information about rare monsters, we'll pay you handsomely.";

-	close;

-L_Menu2_1:

-	mes "[Lucias]";

-	mes "Oh, you've taken the placement test?";

-	mes "I'm Lucias, a preeminent researcher in the biological sciences.";

-	next;

-	mes "[Lucias]";

-	mes "What's your name, young one?";

-	next;

-	menu "I'm " + strcharinfo(0) + "!",-;

-	mes "[Lucias]";

-	mes "That's a nice name.";

-	mes "Now, let me explain about our research objectives.";

-	next;

-	mes "[Lucias]";

-	mes "My area of expertise is monsters.";

-	mes "I'm sure that you've encountered and defeated many monsters by now.";

-	mes "Am I right?";

-	next;

-		menu "You're quite right",-,"Well, not really...",L_Menu2_2;

-		mes "[Lucias]";

-		mes "Really?";

-		mes "I hope your background knowledge is diverse.";

-		mes "My class isn't a cakewalk by any means.";

-		next;

-		goto L_Menu2_3;

-	L_Menu2_2:

-//==================================

-//If you respond negatively

-		mes "[Lucias]";

-		mes "You might be at a disadvantage.";

-		mes "My coursework assumes a lot of background knowledge.";

-		mes "My class wasn't designed to be a cakewalk...";

-		next;

-//==================================

-L_Menu2_3:

-	mes "[Lucias]";

-	mes "So, shall we get started?";

-	mes "You'll learn a lot in this class if you're vigilant.";

-	next;

-		set @sagerand,0;

-		set @sagerand,rand(3);

-		mes "[Lucias]";

-		mes "So, first, you need to collect ";

-		if(@sagerand == 1) goto L_Menu2_4;

-		if(@sagerand == 2) goto L_Menu2_5;

-		set SAGE_Q2,1;

-		mes "^3051FD5x Tendons^000000";

-		mes "^3051FD5x Nippers^000000";

-		mes "^3051FD5x Sharp Scales^000000";

-		next;

-		goto L_Menu2_6;

-	L_Menu2_4:

-		set SAGE_Q2,2;

-//==================================

-//mes–¢‰ñŽû

-		mes "^3051FD5x Clam Flesh^000000";

-		mes "^3051FD5x Nippers^000000";

-		mes "^3051FD5x Heart of Mermaid^000000";

-		next;

-		goto L_Menu2_6;

-	L_Menu2_5:

-		set SAGE_Q2,3;

-		mes "^3051FD5x Single Cells^000000";

-		mes "^3051FD5x Tentacles^000000";

-		mes "^3051FD5x Fish Tails^000000";

-//==================================

-		next;

-	L_Menu2_6:

-		mes "[Lucias]";

-		mes "We'll continue once you've gathered those.";

-		close;

-L_Menu3_1:

-	if((countitem(1050) >= 5) && (countitem(960) >= 5) && (countitem(963) >= 5) && (SAGE_Q2 == 1)) goto L_Menu3_4;

-	if((countitem(966) >= 5) && (countitem(960) >= 5) && (countitem(950) >= 5) && (SAGE_Q2 == 2)) goto L_Menu3_4;

-	if((countitem(1052) >= 5) && (countitem(962) >= 5) && (countitem(1023) >= 5) && (SAGE_Q2 == 3)) goto L_Menu3_4;

-	mes "[Lucias]";

-	mes "You don't have the necessary items.";

-	mes "Let me repeat what you need:";

-	next;

-		mes "[Lucias]";

-		if(SAGE_Q2 == 2) goto L_Menu3_2;

-		if(SAGE_Q2 == 3) goto L_Menu3_3;

-		mes "^3051FD5x Tendon^000000";

-		mes "^3051FD5x Nipper^000000";

-		mes "^3051FD5x Sharp Scale^000000";

-		close;

-	L_Menu3_2:

-		mes "^3051FD5x Clam Flesh^000000";

-		mes "^3051FD5x Nipper^000000";

-		mes "^3051FD5x Heart of Mermaid^000000";

-		close;

-	L_Menu3_3:

-		mes "^3051FD5x Single Cell^000000";

-		mes "^3051FD5x Tentacle^000000";

-		mes "^3051FD5x Fish Tail^000000";

-		close;

-L_Menu3_4:

-	mes "[Lucias]";

-	mes "Well, you have the items, but I can't be sure if you bought them or collected them yourself.";

-	next;

-	mes "[Lucias]";

-	mes "There is a similarity in the characteristics of the monsters that drop those items.";

-	mes "Do you know what it is?";

-	next;

-		menu "Water element affinity",L_Menu3_5,"They're fish and shells",L_Menu3_6,"They were quite active",-,"They're monsters",-;

-//==================================

-		mes "[Lucias]";

-		mes "...I'm disappointed in you.";

-		mes "The correct answer is that all of the monsters have water element affinity.";

-		mes "Monsters that live in an aquatic environment have evolved bodies adapted to that environment.";

-//==================================

-		next;

-		goto L_Menu3_6;

-	L_Menu3_5:

-		mes "[Lucias]";

-		mes "Right!";

-		mes "Most aquatic monsters have water element affinity because they're adapted to their environment.";

-		mes "Fish and shells evolved in a logical way.";

-		next;

-	L_Menu3_6:

-		mes "[Lucias]";

-		mes "Not every fish and shell has water element affinity, but you can count on it as a general rule.";

-		mes "Now, which type of magic do you think would be most effective against them?";

-		next;

-		menu "Lightning Bolt",L_Menu3_7,"Firebolt",-,"Thunderstorm",L_Menu3_8,"Frost Nova",-;

-//==================================

-//mes–¢‰ñŽû

-		mes "[Lucias]";

-		mes "That's not correct.";

-		mes "You need to use magic like Lightning Bolt or Thunderstorm.";

-		mes "Check the elemental affinity matrix again.";

-		next;

-//==================================

-		goto L_Menu3_9;

-	L_Menu3_7:

-		mes "[Lucias]";

-		mes "Great!  That's right!";

-		mes "Using Lightning Bolt is an easy way to victory.";

-		next;

-		mes "[Lucias]";

-		mes "You need to be careful of monsters like the Penomena and Aster because their attribute is different.";

-		next;

-		goto L_Menu3_9;

-	L_Menu3_8:

-		mes "[Lucias]";

-		mes "Great!  That's right!";

-		mes "Using Thunderstorm is an easy way to victory.";

-		next;

-		mes "[Lucias]";

-		mes "You need to be careful of monsters like the Penomena and Aster because their attribute is different.";

-		next;

-	L_Menu3_9:

-		mes "[Lucias]";

-		mes "Next, let's turn our attention to insectoid monsters.";

-		next;

-		set @sagerand,rand(3);

-		mes "[Lucias]";

-		mes "Next, you need to collect ";

-		if(@sagerand == 1) goto L_Menu3_10;

-		if(@sagerand == 2) goto L_Menu3_11;

-		set SAGE_Q2,4;

-		mes "^3051FD5x Cobweb^000000";

-		mes "^3051FD5x Shell^000000";

-		mes "^3051FD5x Insect Feeler^000000";

-		next;

-		goto L_Menu2_6;

-	L_Menu3_10:

-		set SAGE_Q2,5;

-//==================================

-//mes–¢‰ñŽû

-		mes "^3051FD5x Moth Dust^000000";

-		mes "^3051FD5x Snail's Shell^000000";

-		mes "^3051FD5x Horn^000000";

-		next;

-		goto L_Menu2_6;

-	L_Menu3_11:

-		set SAGE_Q2,6;

-		mes "^3051FD5x Mantis Leg^000000";

-		mes "^3051FD5x Worm Peeling^000000";

-		mes "^3051FD5x Rainbow Shell^000000";

-//==================================

-		next;

-		goto L_Menu2_6;

-L_Menu4_1:

-	if((countitem(1025) >= 5) && (countitem(935) >= 5) && (countitem(928) >= 5) && (SAGE_Q2 == 4)) goto L_Menu4_4;

-	if((countitem(1057) >= 5) && (countitem(946) >= 5) && (countitem(947) >= 5) && (SAGE_Q2 == 5)) goto L_Menu4_4;

-	if((countitem(1031) >= 5) && (countitem(955) >= 5) && (countitem(1013) >= 5) && (SAGE_Q2 == 6)) goto L_Menu4_4;

-	mes "[Lucias]";

-	mes "You forgot what you're supposed to gather?";

-	mes "Listen carefully this time!  You need to gather:";

-	next;

-		mes "[Lucias]";

-		if(SAGE_Q2 == 5) goto L_Menu4_2;

-		if(SAGE_Q2 == 6) goto L_Menu4_3;

-		mes "^3051FD5x Cobweb^000000";

-		mes "^3051FD5x Shell^000000";

-		mes "^3051FD5x Insect Feeler^000000";

-		close;

-	L_Menu4_2:

-		mes "^3051FD5x Moth Dust^000000";

-		mes "^3051FD5x Snail's Shell^000000";

-		mes "^3051FD5x Horn^000000";

-		close;

-	L_Menu4_3:

-		mes "^3051FD5x Mantis Leg^000000";

-		mes "^3051FD5x Worm Peeling^000000";

-		mes "^3051FD5x Rainbow Shell^000000";

-		close;

-L_Menu4_4:

-	set SAGE_Q2,7;

-	mes "[Lucias]";

-	mes "Excellent.  You've done well.";

-	mes "I hope you were also dilligent in observing your surroundings when you collected the items.";

-	next;

-	mes "[Lucias]";

-	mes "With insects, you'll need to carefully consider which magic to use, since insects have affinity with a variety of elements.";

-	next;

-	mes "[Lucias]";

-	mes "You should also be aware that Thief hiding and Assassin cloaking aren't effective against some insects.";

-	next;

-	mes "[Lucias]";

-	mes "Insects can also act in groups.";

-	mes "Often the insect bosses will have considerable numbers of subordinates.";

-	next;

-	mes "[Lucias]";

-	mes "Ant Lord Maya...";

-	mes "Queen Bee Mistress...";

-	mes "Goblin Chief Goldfinger...";

-	next;

-	mes "[Lucias]";

-	mes "If you face a boss monster alone, you had best prepare to die.";

-	mes "You ought to take a group of friends to face these creatures down.";

-	next;

-	mes "[Lucias]";

-	mes "Well, you've studied quite a bit.";

-	mes "Now you need to write a thesis.";

-	mes "You need some materials before you can begin writing it, however.";

-	mes "They are:";

-	next;

-	mes "[Lucias]";

-	mes "^3051FD1x Feather of Birds^000000 for your writing instrument.";

-	mes "^3051FD1x Animal Skin^000000 for the pages.";

-	mes "^3051FD1x Trunk^000000 to bind the pages.";

-	mes "^3051FD1x Squid Ink^000000 for your ink.";

-	mes "^3051FD1x Empty Bottle^000000 to store your ink.";

-	next;

-	mes "[Lucias]";

-	mes "We can get started when you return.";

-	close;

-L_Menu5_1:

-	if((countitem(916) >= 1) && (countitem(919) >= 1) && (countitem(1019) >= 1) && (countitem(1024) >= 1) && (countitem(713) >= 1) && (SAGE_Q2 == 7)) goto L_Menu5_2;

-	mes "[Lucias]";

-	mes "You need to gather those items first.";

-	mes "They are:";

-	next;

-	mes "[Lucias]";

-	mes "^3051FD1x Feather of Birds^000000 for your writing instrument.";

-	mes "^3051FD1x Animal Skin^000000 for the pages.";

-	mes "^3051FD1x Trunk^000000 to bind the pages.";

-	mes "^3051FD1x Squid Ink^000000 for your ink.";

-	mes "^3051FD1x Empty Bottle^000000 to store your ink.";

-	next;

-	mes "[Lucias]";

-	mes "You've done great so far.";

-	mes "Just a little more and you can graduate.";

-	close;

-L_Menu5_2:

-	delitem 916,1;

-	delitem 919,1;

-	delitem 1019,1;

-	delitem 1024,1;

-	delitem 713,1;

-	mes "[Lucias]";

-	mes "Looks like you have everything.";

-	next;

-	mes "[Lucias]";

-	mes "Now, you need to write this yourself.";

-	mes "I'm only taking an advisory role.";

-	next;

-	mes "[Lucias]";

-	mes "Are you ready to begin?";

-	mes "Let's see if you've acquired enough knowledge to write a coherent thesis.";

-	next;

-	mes "......";

-	next;

-	mes "......";

-	next;

-	mes "......";

-	next;

-	menu "Monsters come in different types",-;

-	mes "Monsters come in different types.";

-	menu "They have different elemental affinities",-;

-	mes "They have different elemental affinities.";

-	menu "If you know the monster's element beforehand...",-;

-	mes "If you know the monster's element beforehand...";

-	menu "...you can optimize your battle experience",-;

-	mes "...you can optimize your battle experience";

-	menu "You should especially be careful of...",-;

-	mes "You should especially be careful of...";

-	menu "...monsters with Holy and Darkness affinity",-;

-	mes "...monsters with Holy and Darkness affinity";

-	next;

-	mes "......";

-	next;

-	mes "......";

-	next;

-	mes "......";

-	next;

-	set SAGE_Q,11;

-	getitem 1550,1;

-	mes "[Lucias]";

-	mes "This is pretty good!";

-	mes "I'm proud of you!";

-	next;

-	mes "[Lucias]";

-	mes "Show this to the Headmaster and you'll be sure to graduate.";

-	mes "Good luck.";

-	close;

-L_Menu5_3:

-	mes "[Lucias]";

-	mes "Hmmm?  What's the matter?";

-	mes "You need to show your thesis to the Headmaster.";

-	close;

-L_Menu5_4:

-	mes "[Lucias]";

-	mes "Are you confused about something?";

-	mes "I'm pretty busy, so you need to make an appointment a week in advance.";

-	next;

-	mes "[Lucias]";

-	mes "Hahaha...Once you've been a Sage for awhile, you'll be saying the same thing.";

-	next;

-	mes "[Lucias]";

-	mes "Also, if you have some spare time,";

-	mes "you should head over to the dungeon and lie down on the floor.";

-	mes "Look up and study the ceiling.";

-	mes "You might learn something.";

-	close;

-}

-

-//=================================

-//Academy Interior

-//=================================

-

-yuno_in03.gat,154,35,4	script	Academy Staff	742,{

-	callfunc "F_BlockHigh",26,"High Mage",40,"Professor","Mathias";

-

-	if(BaseJob == Job_Sage) goto L_Menu6_4;

-	if(BaseJob != Job_Mage) goto L_Menu1_1;

-	if(SAGE_Q == 11) goto L_Menu6_3;

-	if(SAGE_Q >= 4) goto L_Menu6_2;

-	if(SAGE_Q == 3) goto L_Menu6_1;

-	if(SAGE_Q == 2) goto L_Menu5_1;

-	mes "[Mathias]";

-	mes "Hello.";

-	mes "This is the Shubaichul Magic Academy?";

-	mes "You seem to be a Magician.";

-	mes "How can I help you?";

-	next;

-	menu "Sage class-change information",-,"I want to apply for admission to the Academy",L_Menu3_1,"Forget it",L_Menu2;

-		mes "[Mathias]";

-		mes "You want to change class to Sage?";

-		mes "I can't just change your class right here.";

-		next;

-		mes "[Mathias]";

-		mes "You need to complete a program of rigorous coursework and research.";

-		next;

-		mes "[Mathias]";

-		mes "Once you graduate from the academy,";

-		mes "you can change class.";

-		mes "In order to proceed, you need to pay tuition and take the placement test.";

-		next;

-		mes "[Mathias]";

-		mes "Only those who have an ^3051FDOld Magic Book^000000 and a ^3051FDNecklace Of Wisdom^000000 can have tuition waived.";

-		next;

-		mes "[Mathias]";

-		mes "Once you've paid the fee, you first take the placement test.";

-		mes "If you score highly enough to be placed in our program, you then perform research according to your placement.";

-		mes "Finally, you must prepare and defend a thesis.";

-		next;

-		mes "[Mathias]";

-		mes "The Headmaster decides whether or not the thesis meets standards for graduation.";

-		mes "If he approves, you can formally begin your career as a Sage.";

-		next;

-		mes "[Mathias]";

-		mes "If you're interested, you need only file an application to get started.";

-		mes "Have a good day.";

-		close;

-L_Menu2:

-	mes "[Mathias]";

-	mes "Oh?";

-	mes "Are you hesitant?";

-	mes "See you later, then.";

-	close;

-L_Menu1_1:

-	mes "[Mathias]";

-	mes "Welcome.";

-	mes "This is Shubaichul Magic Academy.";

-	next;

-	mes "[Mathias]";

-	mes "We do research on magic and monsters here.";

-	mes "We also train fledgling Sages.";

-	next;

-	mes "[Mathias]";

-	mes "Any Magician who is at or above class level 40 can apply for admission to the Academy.";

-	mes "Once you complete our prescribed process for degree acquisition, you can become a Sage.";

-	next;

-	mes "[Mathias]";

-	mes "Good bye.";

-	close;

-L_Menu3_1:

-	mes "[Mathias]";

-	mes "You want to apply?  Wonderful!";

-	next;

-	mes "[Mathias]";

-	mes "In order to enter the Academy,";

-	mes "you need to be a Magician of class level 40 or above.";

-	mes "You will also need to pay tuition to cover instruction and materials.";

-	next;

-	mes "[Mathias]";

-	mes "Tuition is 70,000Zeny.";

-	mes "If you have an ^3051FDOld Magic Book^000000 or a ^3051FDNecklace Of Wisdom^000000, the tuition fee will be waived.";

-	next;

-	mes "[Mathias]";

-	mes "So, you would like to apply for admission?";

-	next;

-	menu "Yes, I would",L_Menu5_5,"Tuition is too expensive!",-,"I'll try again later",L_Menu3_2;

-		mes "[Mathias]";

-		mes "Well...we need the tuition money to cover instruction and materials...";

-		next;

-		menu "Isn't there another way?",-,"I'll try again later.",L_Menu3_2;

-		set SAGE_Q,2;

-		mes "[Mathias]";

-		mes "Well...Perhaps there is.  I can lower the tuition to 30000 Zeny if you can bring us some materials we need for our research department:";

-		next;

-		mes "[Mathias]";

-		mes "Specifically, we need:";

-		mes "^3051FD50x Feather of Birds^000000";

-		mes "^3051FD50x Fluff^000000";

-		mes "^3051FD50x Clover^000000";

-		mes "^3051FD50x Feathers^000000";

-		next;

-		mes "[Mathias]";

-		mes "If you can get all that, I'll discount the fee to 30000 Zeny.";

-		mes "Please do your best to collect them.";

-		next;

-		mes "[Mathias]";

-		mes "Of course, you can also acquire 70000 Zeny instead of gathering the items if you wish.";

-		next;

-		mes "[Mathias]";

-		mes "Please do your best to collect the items.";

-		mes "See you later.";

-		close;

-	L_Menu3_2:

-		mes "[Mathias]";

-		mes "Oh, alright.";

-		mes "Take your time.";

-		mes "Thanks for stopping by.";

-		close;

-L_Menu5_1:

-	mes "[Mathias]";

-	mes "So, would you like to apply for admission?";

-	next;

-	if(JobLevel < 40) goto L_Menu5_9;

-	if(countitem(1006) > 0) goto L_Menu5_4;

-	if(countitem(1007) > 0) goto L_Menu5_4_;

-	if(Zeny < 70000) goto L_Menu5_2;

-		set Zeny,Zeny-70000;

-		set SAGE_Q,3;

-		mes "[Mathias]";

-		mes "I see you have 70000 Zeny.";

-		mes "I'll take that for tuition. You are now enrolled into the school.";

-		next;

-	L_Menu5_5:

-		if(JobLevel < 40) goto L_Menu5_9;

-		mes "[Mathias]";

-		mes "We need your signature on this form to proceed.";

-		mes "Please sign at the X.";

-		next;

-		menu "" + strcharinfo(0) + "",-;

-		mes "[Mathias]";

-		mes "Alright, so you're ";

-		mes "" + strcharinfo(0) + ".";

-		mes "That's a nice name.";

-		next;

-			if(JobLevel == 50) goto L_JobMax;

-			if(SAGE_Q == 3) goto L_Menu5_6;

-			if(countitem(1006) > 0) goto L_Menu5_7;

-			if(countitem(1007) > 0) goto L_Menu5_7_;

-			if(Zeny < 70000) goto L_Menu5_2;

-			set Zeny,Zeny-70000;

-			set SAGE_Q,3;

-

-			mes "[Mathias]";

-		        mes "I see you have 70000 Zeny.";

-		        mes "I'll take that for tuition.";

-			mes "You are now enrolled into the school.";

-			next;

-

-		L_Menu5_6:

-			mes "[Mathias]";

-			mes "First, you need to take the placement test from Professor Kreitos.";

-			next;

-			mes "[Mathias]";

-			mes "Professor Kreitos is in the Academy library.";

-			mes "It's on the far left side of the building.";

-			next;

-			mes "[Mathias]";

-			mes "Good luck on the test.";

-			close;

-		L_JobMax:

-			set SAGE_Q,3;

-			mes "[Mathias]";

-			mes "You've trained yourself up to the maximum class level for Magicians!";

-			mes "In that case, I'll give you a full scholarship!";

-			next;

-			mes "[Mathias]";

-			mes "Now, all you need to do is go take the placement test.";

-			next;

-			mes "[Mathias]";

-			mes "Go see Professor Kreitos in the library on the far left side of the building.";

-			close;

-	L_Menu5_2:

-		if(SAGE_Q != 2) goto L_Menu5_8;

-		if((countitem(916) >= 50) && (countitem(914) >= 50) && (countitem(949) >= 50) && (countitem(705) >= 50)) goto L_Menu5_3;

-		mes "[Mathias]";

-		mes "You don't seem to have the materials yet.";

-		next;

-		mes "[Mathias]";

-		mes "You need to gather:";

-		mes "^3051FD50x Feather of Birds^000000";

-		mes "^3051FD50x Fluff^000000";

-		mes "^3051FD50x Clover^000000";

-		mes "^3051FD50x Feathers^000000";

-		next;

-		mes "[Mathias]";

-		mes "If you can get all that, I'll discount the fee to 30000 Zeny.";

-		mes "Please do your best to collect them.";

-		close;

-	L_Menu5_3:

-//==================================

-		if(Zeny < 30000) goto L_Menu5_8;

-		delitem 916,50;

-		delitem 914,50;

-		delitem 705,50;

-		delitem 949,50;

-		set Zeny,Zeny-30000;

-		set SAGE_Q,3;

-		mes "[Mathias]";

-		mes "It seems like you have the materials I asked for and 30000 Zeny.";

-		mes "Congratulations.";

-		mes "You're now enrolled in the Academy.";

-		set SAGE_Q,3;

-		next;

-		goto L_Menu5_5;

-	L_Menu5_4:

-		delitem 1006,1;

-		set SAGE_Q,3;

-		mes "[Mathias]";

-		mes "Oh, you have a ^3051FDOld Magic Book^000000.";

-		mes "I'll accept it in lieu of tuition.";

-		next;

-		goto L_Menu5_5;

-	L_Menu5_4_:

-		delitem 1007,1;

-		set SAGE_Q,3;

-		mes "[Mathias]";

-		mes "Oh, you have a ^3051FDNecklace Of Wisdom^000000.";

-		mes "I'll accept it in lieu of tuition.";

-		next;

-		goto L_Menu5_5;

-	L_Menu5_7:

-		delitem 1006,1;

-		set SAGE_Q,3;

-		mes "[Mathias]";

-		mes "Oh, you have a ^3051FDOld Magic Book^000000.";

-		mes "I'll accept it in lieu of tuition.";

-		next;

-		goto L_Menu5_6;

-	L_Menu5_7_:

-		delitem 1007,1;

-		set SAGE_Q,3;

-		mes "[Mathias]";

-		mes "Oh, you have a ^3051FDNecklace Of Wisdom^000000.";

-		mes "I'll accept it in lieu of tuition.";

-		next;

-		goto L_Menu5_6;

-	L_Menu5_8:

-		mes "[Mathias]";

-		mes "You don't seem to have enough money.";

-		mes "Please earn some money and return here.";

-		close;

-	L_Menu5_9:

-		mes "[Mathias]";

-		mes "Your class level is too low.";

-		mes "Complete some more training and return here.";

-		close;

-//==================================

-L_Menu6_1:

-	mes "[Mathias]";

-	mes "Hmmm?  Did you forget what you need to do next?";

-	mes "Head over and see Professor Kreitos on the left side of the building.";

-	close;

-L_Menu6_2:

-	mes "[Mathias]";

-	mes "Oh, forgive me.  I have so much to do that I can't help you at the moment.";

-	mes "Again, I apologize...";

-	close;

-L_Menu6_3:

-	mes "[Mathias]";

-	mes "Oh!  Did you finish your thesis?";

-	mes "You need to see Headmaster Keiron so he can evaluate it.";

-	next;

-	mes "[Mathias]";

-	mes "If he approves, you can graduate!";

-	mes "Good luck.";

-	close;

-L_Menu6_4:

-	mes "[Mathias]";

-	mes "Welcome, colleague.";

-	mes "How is your research coming along?";

-	next;

-	mes "[Mathias]";

-	mes "In order to be a truly great researcher, you need to supplement your book-based research with encounters with real monsters.";

-	next;

-	mes "[Mathias]";

-	mes "If you know others with what it takes to become a Sage, please send them here.";

-	mes "Give my regards to my other colleagues, also.";

-	close;

-}

-

-yuno_in03.gat,169,180,4	script	Test Professor	755,{

-	if(BaseJob == Job_Sage) goto L_Menu4_5;

-	if(BaseJob != Job_Mage) goto L_Menu1_1;

-	if(SAGE_Q == 5) goto L_Menu2_1;

-	if(SAGE_Q == 6) goto L_Menu2_3;

-	if(SAGE_Q == 7) goto L_Menu3_1;

-	if(SAGE_Q == 8) goto L_Menu4_1;

-	if(SAGE_Q == 9) goto L_Menu4_2;

-	if(SAGE_Q == 11) goto L_Menu4_4;

-	mes "[Hermes]";

-	mes "Hello, I'm Hermes.  I am part of the skill testing staff.";

-	mes "Are you a Sage candidate?";

-	next;

-	if(SAGE_Q == 3) goto L_Menu1_2;

-	if(SAGE_Q >= 3) goto L_Menu1_2;

-	mes "[Hermes]";

-	mes "Oh, alright.";

-	mes "First you need to enroll and take the placement test.";

-	close;

-L_Menu1_1:

-	mes "[Hermes]";

-	mes "This is Shubaichul Magic Academy.";

-	next;

-	mes "[Hermes]";

-	mes "There are Sages that are less magicians than researchers.";

-	mes "Having a party supporting this kind of person is extremely important.";

-	next;

-	mes "[Hermes]";

-	mes "Keep supporting your party to the best of your ability.";

-	mes "That's all you need to do.";

-	close;

-L_Menu1_2:

-	mes "[Hermes]";

-	mes "You need to take the placement test from Kreitos before you can take my test.";

-	close;

-L_Menu2_1:

-	set SAGE_Q,6;

-	mes "[Hermes]";

-	mes "Oh?  You took and passed the placement test?";

-	mes "Now you need to take the skill test from me.";

-	next;

-	mes "[Hermes]";

-	mes "The rules for the skill test are simple.";

-	mes "You need to kill all the monsters within the prescribed time limit.";

-	next;

-	mes "[Hermes]";

-	mes "There's an old proverb that one experience is worth a hundred words, so why not try it once?";

-	next;

-	menu "Sounds good",-,"I'm not ready yet",L_Menu2_2;

-		mes "[Hermes]";

-		mes "Well, let's get started.";

-		mes "Do your best!";

-		close2;

-		warp "job_sage",50,154;

-		end;

-	L_Menu2_2:

-		mes "[Hermes]";

-		mes "Okay.";

-		mes "Please prepare quickly.";

-		close;

-L_Menu2_3:

-	mes "[Hermes]";

-	mes "Are you ready to take the skill test?";

-	mes "It's not too tough.";

-	next;

-	mes "[Hermes]";

-	mes "How about it?";

-	next;

-	menu "Sounds good",-,"I'm not ready yet",L_Menu2_2;

-		mes "[Hermes]";

-		mes "Well, let's get started.";

-		mes "Do your best!";

-		close2;

-		warp "job_sage",50,154;

-		end;

-L_Menu3_1:

-	mes "[Hermes]";

-	mes "Good job!  You passed";

-	mes "the skill test!  Now you can proceed to the research phase!";

-	next;

-	mes "[Hermes]";

-	mes "Before I decide your research concentration, let's look at your score on the placement test and the amount of time you spent in the skill test.";

-	next;

-	mes "[Hermes]";

-	mes "Hmmm...";

-	mes "Looking good.";

-	next;

-

-//It's not clear how the script decides

-

-	if(sagecheck >= 12) goto L_Menu3_2;

-	set SAGE_Q,8;

-	mes "[Hermes]";

-	mes "It looks like monster research would be your best bet.";

-	next;

-	mes "[Hermes]";

-	mes "In order to gain the necessary information to put together a coherent research paper,";

-	mes "you should take the biology course from Professor Lucias.";

-	next;

-	goto L_Menu3_4;

-L_Menu3_2:

-	set SAGE_Q,9;

-	mes "[Hermes]";

-	mes "It looks like we have a budding elemental magic researcher here.";

-	mes "This field is fundamental to the advancement of magical knowledge.";

-	next;

-	mes "[Hermes]";

-	mes "You need to take a course from Professor Ebeshi in the biotech lab to gain a deeper understanding of elemental magic.";

-	next;

-L_Menu3_4:

-	mes "[Hermes]";

-	mes "I hope the coursework goes well.";

-	close;

-L_Menu4_1:

-	mes "[Hermes]";

-	mes "Weren't you listening?";

-	mes "You need to see Professor Lucias so you can begin your study of monster biology.";

-	close;

-L_Menu4_2:

-	mes "[Hermes]";

-	mes "Weren't you listening?";

-	mes "You need to see Professor Ebeshi so you can begin your study of elemental magic.";

-	close;

-L_Menu4_4:

-	mes "[Hermes]";

-	mes "Great job on completing your thesis, but you need to show it to the Headmaster.";

-	mes "He's the one who will judge whether or not you graduate.";

-	close;

-L_Menu4_5:

-	mes "[Hermes]";

-	mes "How are you?";

-	mes "Your face reveals that you've endured a lot of stress lately.";

-	next;

-	mes "[Hermes]";

-	mes "As stressful as hands-on research is,";

-	mes "it is still fundamentally different from research using abstract concepts.";

-	next;

-	mes "[Hermes]";

-	mes "Of course, if you go to difficult dungeons,";

-	mes "there's no shame in bringing a friend or five to help you out.";

-	close;

-}

-

-yuno_in03.gat,62,176,3	script	History Professor	109,{

-	if(BaseJob == Job_Sage) goto L_Menu2_2;

-	if(BaseJob != Job_Mage) goto L_Menu1_1;

-	if(SAGE_Q == 11) goto L_Menu2_1;

-	mes "[Sapien]";

-	mes "You don't seem sure of your intended direction of study.";

-	mes "Perhaps you should consider it...";

-	close;

-L_Menu1_1:

-	mes "[Sapien]";

-	mes "Yes, I teach history.";

-	next;

-	mes "[Sapien]";

-	mes "As the present fades into memory, it becomes the past.";

-	mes "The kwoledge we have acquired in the past is the bridge between the present and the future.";

-	next;

-	mes "[Sapien]";

-	mes "You should study your own past, too.";

-	mes "By understanding what's happened to you already,";

-	mes "you can blaze a trail into the future unhindered by unresolved problems.";

-	close;

-L_Menu2_1:

-	mes "[Sapien]";

-	mes "What are you doing?";

-	mes "Hurry up and show the Headmaster your thesis before you lose it!";

-	close;

-L_Menu2_2:

-	mes "[Sapien]";

-	mes "Yes...?";

-	mes "Ah, it's a former student here.";

-	mes "Congratulations on graduating.";

-	next;

-	mes "[Sapien]";

-	mes "The present can only be understood by understanding the past.";

-	mes "Such understanding allows us to envision our future.";

-	next;

-	mes "[Sapien]";

-	mes "You should study your own past, too.";

-	mes "By understanding what's happened to you already,";

-	mes "you can blaze a trail into the future unhindered by unresolved problems.";

-	close;

-}

-

-yuno_in03.gat,105,177,4	script	Placement Test Professor	754,{

-	if(BaseJob == Job_Sage) goto L_Menu3_4;

-	if(BaseJob != Job_Mage) goto L_Menu1_1;

-	if(SAGE_Q == 11) goto L_Menu3_3;

-	if(SAGE_Q >= 6) goto L_Menu3_2;

-	if(SAGE_Q == 3) goto L_Menu1_2;

-	if(SAGE_Q == 4) goto L_Menu2_1;

-	if(SAGE_Q == 5) goto L_Menu3_1;

-	mes "[Kreitos]";

-	mes "You have that look in your eye...";

-	mes "You want to be a Sage, I take it.";

-	next;

-	mes "[Kreitos]";

-	mes "You need to formally enroll in the Academy before I can help you any further.";

-	close;

-L_Menu1_1:

-	mes "[Kreitos]";

-	mes "Oh, you're not interested in our brand of magic?";

-	mes "That's alright...";

-	next;

-	mes "[Kreitos]";

-	mes "Anyone who teaches others and has a good heart is of value to society.";

-	mes "Please keep that in mind.";

-	close;

-L_Menu1_2:

-	set SAGE_Q,4;

-	set sagecheck,10;

-	mes "[Kreitos]";

-	mes "It looks like you've enrolled in the Shubaichul Magic Academy.";

-	mes "Is that right?";

-	next;

-	mes "[Kreitos]";

-	mes "So, let me find your paperwork...";

-	mes "You're " + strcharinfo(0) + ",";

-	mes "right?";

-	mes "Let's start the placement test.";

-	next;

-		mes "[Kreitos]";

-		mes "This test consists of twenty questions concerning the entire world.";

-		mes "If you score at least 80 points, you'll be placed in our program.";

-		mes "Each correct answer is worth 5 points.";

-		next;

-		mes "[Kreitos]";

-		mes "If you cancel, you'll have to start over, so be careful.";

-		next;

-		goto L_Menu2_2;

-	L_Menu2_1:

-		mes "[Kreitos]";

-		mes "Are you ready to try again?";

-		mes "Have you studied hard?";

-		next;

-		mes "[Kreitos]";

-		mes "The passing grade is as before.";

-		mes "You need to score 80 points, with each question being worth 5 points.";

-		next;

-		mes "[Kreitos]";

-		mes "So, let's get started.";

-		mes "Give it your best effort.";

-		mes "As before, if you cancel,";

-		mes "you'll have to start over.";

-		next;

-	L_Menu2_2:

-

-		set @sage_test2,0;

-		set @sage_test1,rand(3);

-		if (@sage_test1 == 1) goto L_Test2_1;

-		if (@sage_test1 == 2) goto L_Test3_1;

-

-//==================================

-//Written Test: Route 1.

-//==================================

-			mes "1. Which one isn't sold in Morocc's jewel shop?";

-			next;

-			menu "Topaz",L_Test1_1,"Garnet",-,"Diamond",L_Test1_1,"Sapphire",L_Test1_1;

-			set @sage_test2,@sage_test2+5;

-			goto L_Test1_1;

-		L_Test1_1:

-			mes "2. In which town can you not buy monster food?";

-			next;

-			menu "Prontera",L_Test1_2,"Morocc",L_Test1_2,"Aldebaran",-,"Alberta",L_Test1_2;

-			set @sage_test2,@sage_test2+5;

-		L_Test1_2:

-			mes "3. Which town is closest to the forest maze?";

-			next;

-			menu "Prontera",-,"Morocc",L_Test1_3,"Geffen",L_Test1_3,"Payon",L_Test1_3;

-			set @sage_test2,@sage_test2+5;

-		L_Test1_3:

-			mes "4. Which of these monsters is of a different race than the other three?";

-			next;

-			menu "Muka",L_Test1_4,"Drops",L_Test1_4,"Plankton",L_Test1_4,"Penomena",-;

-			set @sage_test2,@sage_test2+5;

-		L_Test1_4:

-			mes "5.  All these monsters except one have the same elemental affinity.";

-			mes "Which one has the different affinity?";

-			next;

-			menu "Dokebi",L_Test1_5,"Isis",L_Test1_5,"Giearth",-,"Deviruchi",L_Test1_5;

-			set @sage_test2,@sage_test2+5;

-		L_Test1_5:

-			mes "6. Which one differs in approximate size from the others?";

-			next;

-			menu "Male Thief Bug",L_Test1_6,"Horn",L_Test1_6,"Metaller",L_Test1_6,"Argos",-;

-			set @sage_test2,@sage_test2+5;

-		L_Test1_6:

-			mes "7.  Which of these monsters doesn't drop the Iggydrasil leaf?";

-			next;

-			menu "Marduk",-,"Baphomet Jr.",L_Test1_7,"Angeling",L_Test1_7,"Wander Man",L_Test1_7;

-			set @sage_test2,@sage_test2+5;

-		L_Test1_7:

-			mes "8.  Which of these people isn't related to someone who can perform a class change to priest?";

-			next;

-			menu "Peter S. Alberto",-,"Thomas Bishop",L_Test1_8,"Windser Banedict",L_Test1_8,"Sesil Magrita",L_Test1_8;

-			set @sage_test2,@sage_test2+5;

-		L_Test1_8:

-			mes "9. Which doesn't live in Morocc?";

-			next;

-			menu "Muda Armani",L_Test1_9,"Aragham",L_Test1_9,"Antonio",-,"Abldul",L_Test1_9;

-			set @sage_test2,@sage_test2+5;

-		L_Test1_9:

-			mes "10.  Which Kapra has the pretty blue hair?";

-			next;

-			menu "Pavianne",-,"Debril",L_Test1_10,"Claris",L_Test1_10,"Tayelin",L_Test1_10;

-			set @sage_test2,@sage_test2+5;

-		L_Test1_10:

-			mes "11.  Which one isn't necessary to unlock the Fire Wall skill?";

-			next;

-			menu "Firebolt Lv4",L_Test1_11,"Napalm Beat Lv4",-,"Fireball Lv5",L_Test1_11,"Sight Lv1",L_Test1_11;

-			set @sage_test2,@sage_test2+5;

-		L_Test1_11:

-			mes "12.  When the skill 'SP Restoration Lv6' is active, how much SP does the skill restore every ten seconds?";

-			next;

-			menu "14 sp",L_Test1_12,"16 sp",L_Test1_12,"18 sp",-,"21 sp",L_Test1_12;

-			set @sage_test2,@sage_test2+5;

-		L_Test1_12:

-			mes "13. If you are a magician with job lv. 33, how many additional stat points will you get for int?";

-			next;

-			menu "7",L_Test1_13,"6",L_Test1_13,"5",L_Test1_13,"4",-;

-			set @sage_test2,@sage_test2+5;

-		L_Test1_13:

-			mes "14.  If the Archer skill 'Concentration Up Lv5' is active, how much SP will it consume?";

-			next;

-			menu "45 / 140sec",-,"50 / 140sec",L_Test1_14,"45 / 150sec",L_Test1_14,"50 / 150sec",L_Test1_14;

-			set @sage_test2,@sage_test2+5;

-		L_Test1_14:

-			mes "15. Which one isn't necessary to unlock the Blacksmith skill 'Maximize Power'?";

-			next;

-			menu "Hilt Bending",L_Test1_15,"Skin Tempering",-,"Hammer Fall",L_Test1_15,"Weapon Perfection",L_Test1_15;

-			set @sage_test2,@sage_test2+5;

-		L_Test1_15:

-			mes "16. What is the defense power and supplemental ability of a Ribbon?";

-			next;

-			menu "0 / SP +20",L_Test1_16,"0 / SP +30",L_Test1_16,"1 / SP +20",-,"1 / SP +30",L_Test1_16;

-			set @sage_test2,@sage_test2+5;

-		L_Test1_16:

-			mes "17. Which class can't equip a Saint Robe?";

-			next;

-		//Swordsmen can't equip it either as of this writing.

-			menu "Swordsman",-,"Merchant",L_Test1_17,"Thief",-,"Acolyte",L_Test1_17;

-			set @sage_test2,@sage_test2+5;

-		L_Test1_17:

-			mes "18. Which status ailment can't be removed with a Green Potion?";

-			next;

-			menu "Mute",L_Test1_18,"Poison",L_Test1_18,"Blind",L_Test1_18,"Cursed",-;

-			set @sage_test2,@sage_test2+5;

-		L_Test1_18:

-			mes "19. What is the name of the ancient kingdom from which Geffen descends?";

-			next;

-			menu "Gefin",L_Test1_19,"Geffenia",-,"Gefdoria",L_Test1_19,"Gefria",L_Test1_19;

-			set @sage_test2,@sage_test2+5;

-		L_Test1_19:

-			mes "20. Which tree is said to be the world's root?";

-			next;

-			menu "Igg Drasil",-,"Idrasil",L_Menu2_3,"Master",L_Menu2_3,"Old Tree",L_Menu2_3;

-			set @sage_test2,@sage_test2+5;

-			goto L_Menu2_3;

-	//==================================

-	//Written Test: Route 2.

-	//==================================

-		L_Test2_1:

-			mes "1. Which isn't sold in Geffen's magic shop?";

-			next;

-			menu "Mantle",-,"Wand",L_Test2_2,"Circlet",L_Test2_2,"Silver Robe",L_Test2_2;

-			set @sage_test2,@sage_test2+5;

-		L_Test2_2:

-			mes "2. Which town doesn't sell blades?";

-			next;

-			menu "Prontera",L_Test2_3,"Izlude",L_Test2_3,"Aldebaran",-,"payon",L_Test2_3;

-			set @sage_test2,@sage_test2+5;

-		L_Test2_3:

-			mes "3. Which town is nearest to Glast Heim?";

-			next;

-			menu "Prontera",L_Test2_4,"Geffen",-,"Morocc",L_Test2_4,"Payon",L_Test2_4;

-			set @sage_test2,@sage_test2+5;

-		L_Test2_4:

-			mes "4.  Which monster's type differs from the other three?";

-			next;

-			menu "Aster",L_Test2_5,"Marc",L_Test2_5,"Marse",L_Test2_5,"Marin",-;

-			set @sage_test2,@sage_test2+5;

-		L_Test2_5:

-			mes "5. Which monster's elemental affinity is different from the others?";

-			next;

-			menu "Desert Wolf Babe",L_Test2_6,"Smokie",-,"Picky",L_Test2_6,"Choco",L_Test2_6;

-			set @sage_test2,@sage_test2+5;

-		L_Test2_6:

-			mes "6. Which monster is in a different size class than the others?";

-			next;

-			menu "Drake",-,"Wraith",L_Test2_7,"Evil Druid",L_Test2_7,"Khalitzburg",L_Test2_7;

-			set @sage_test2,@sage_test2+5;

-		L_Test2_7:

-			mes "7. Which monster doesn't drop Phracon?";

-			next;

-			menu "Pupa",L_Test2_8,"Condor",-,"Savage Baby",L_Test2_8,"Desert Wolf Babe",L_Test2_8;

-			set @sage_test2,@sage_test2+5;

-		L_Test2_8:

-			mes "8. Who isn't involved in the Blacksmith class change?";

-			next;

-// =========================

-// Acording To mRO Site And eAthena Blacksmith Script the following ppl looking like ppl listed here are:

-// - Baisulitst - looks like some1 listed by mRO

-// - Wickebine - mRO has him as option listed

-// - Gromgast - mRO has him as option listed

-// - Mitmayer - translator has him listed as option

-// == Conclusion == I took the following:

-// =========================

-			menu "Baisulitst",L_Test2_9,"Wickebine",L_Test2_9,"Barkdale",-,"Mitmayer",L_Test2_9;

-			set @sage_test2,@sage_test2+5;

-		L_Test2_9:

-			mes "9.  Who doesn't live in Aldebaran?";

-			next;

-			menu "RS125",L_Test2_10,"Maasaru",-,"Munster",L_Test2_10,"Isenberg",L_Test2_10;

-			set @sage_test2,@sage_test2+5;

-		L_Test2_10:

-			mes "10. Who is the youngest person in the Kapra organization?";

-			next;

-			menu "Deflute",L_Test2_11,"Claris",L_Test2_11,"Tayelin",L_Test2_11,"Curly Sue",-;

-			set @sage_test2,@sage_test2+5;

-		L_Test2_11:

-			mes "11. When you use the skill 'Safety Wall Lv6', how much SP is consumed and how many attacks will it block?";

-			next;

-			menu "SP 40, 6bl",L_Test2_12,"SP 35, 6bl",L_Test2_12,"SP 35, 7bl",L_Test2_12,"SP 40, 7bl",-;

-			set @sage_test2,@sage_test2+5;

-		L_Test2_12:

-			mes "12. When you use 'Napalm Beat Lv6', what is the attack power relative to MATK?";

-			next;

-			menu "1.2x MATK",L_Test2_13,"1.3x MATK",-,"1.4x MATK",L_Test2_13,"1.5x MATK",L_Test2_13;

-			set @sage_test2,@sage_test2+5;

-		L_Test2_13:

-			mes "13. Which one catalyzes the reaction of Liquid #4 during the Magician class change test?";

-			next;

-			menu "Blue Gemstone",L_Test2_14,"Red Gemstone",L_Test2_14,"Orange Gemstone",L_Test2_14,"Carat Diamond",-;

-			set @sage_test2,@sage_test2+5;

-		L_Test2_14:

-			mes "14. What is the damage multiplier and SP consumption for 'Bash Lv6'?";

-			next;

-			menu "250% / 8",L_Test2_15,"280% / 8",L_Test2_15,"280% / 15",-,"310% / 15",L_Test2_15;

-			set @sage_test2,@sage_test2+5;

-		L_Test2_15:

-			mes "15.  Which isn't necessary to unlock the Hunter skill 'Claymore Trap'?";

-			next;

-			menu "Remove Trap",-,"Land Mine",L_Test2_16,"Ankle Snare",L_Test2_16,"Flash",L_Test2_16;

-			set @sage_test2,@sage_test2+5;

-		L_Test2_16:

-			mes "16. What is the defense power and supplemental ability of a Veil?";

-			next;

-			menu "0 / MDEF +3",L_Test2_17,"0 / MDEF +5",-,"1 / MDEF +3",L_Test2_17,"1 / MDEF +5",L_Test2_17;

-			set @sage_test2,@sage_test2+5;

-		L_Test2_17:

-			mes "17.  Which class can't equip a Coat?";

-			next;

-			menu "Swordsman",L_Test2_18,"Magician",L_Test2_18,"Thief",L_Test2_18,"Novice",-;

-			set @sage_test2,@sage_test2+5;

-		L_Test2_18:

-			mes "18. Which item isn't blue in color?";

-			next;

-			menu "Alcohol",L_Test2_19,"Detrimindexta",-,"Karvodailnirol",L_Test2_19,"Blue Herb",L_Test2_19;

-			set @sage_test2,@sage_test2+5;

-		L_Test2_19:

-			mes "19. Which item did the god Odin use to create the world?";

-			next;

-//			menu "Yomir's Heart",L_Test2_20,"Yomir's Nail",-,"Yomir's Tooth",L_Test2_20,"Yomir's Stuff",L_Test2_20;

-// All answers correct untill i know the real answer, only Stuff is wrong cause that NOT it

-			menu "Yomir's Heart",-,"Yomir's Nail",-,"Yomir's Tooth",-,"Yomir's Stuff",L_Test2_20;

-			set @sage_test2,@sage_test2+5;

-		L_Test2_20:

-			mes "20. Which metal can change the fate of the world?";

-			next;

-			menu "Envertacon",L_Menu2_3,"Emperium",-,"Enbera",L_Menu2_3,"Phracon",L_Menu2_3;

-			set @sage_test2,@sage_test2+5;

-			goto L_Menu2_3;

-//==================================

-//Written Test: Route 3.

-//==================================

-		L_Test3_1:

-			mes "1.Which of these items isn't sold at Prontera's knicknack shop?";

-			next;

-			menu "White Plate",L_Test3_2,"Red Frame",L_Test3_2,"Flower",-,"Glass Ball",L_Test3_2;

-			set @sage_test2,@sage_test2+5;

-		L_Test3_2:

-			mes "2. Which town doesn't sell stilettos?";

-			next;

-			menu "Prontera",-,"Morocc",L_Test3_3,"Gefen",L_Test3_3,"Lutie",L_Test3_3;

-			set @sage_test2,@sage_test2+5;

-		L_Test3_3:

-			mes "3. Which town is closest to Turtle Island?";

-			next;

-			menu "Aldebaran",L_Test3_4,"Alberta",-,"Comodo",L_Test3_4,"Izlude",L_Test3_4;

-			set @sage_test2,@sage_test2+5;

-		L_Test3_4:

-			mes "4. Which monster is of a different monster race than the other three?";

-			next;

-			menu "Raggler",L_Test3_5,"Pest",L_Test3_5,"Frilldora",L_Test3_5,"Aster",-;

-			set @sage_test2,@sage_test2+5;

-		L_Test3_5:

-			mes "5. Which monster has a different elemental affinity than the other three?";

-			next;

-			menu "Mantis",L_Test3_6,"Metaller",-,"Rokker",L_Test3_6,"Horn",L_Test3_6;

-			set @sage_test2,@sage_test2+5;

-		L_Test3_6:

-			mes "6. Which monster is in a different size class than the others?";

-			next;

-			menu "Raydric",-,"Raydric Archer",L_Test3_7,"Wander Man",L_Test3_7,"Dark Flame",L_Test3_7;

-			set @sage_test2,@sage_test2+5;

-		L_Test3_7:

-			mes "7. Which monster doesn't drop alcohol?";

-			next;

-			menu "Horn",L_Test3_8,"Plankton",L_Test3_8,"Poison Spore",-,"Toad",L_Test3_8;

-			set @sage_test2,@sage_test2+5;

-		L_Test3_8:

-			mes "8. Which isn't involved in the Knight class change?";

-			next;

-// =========================

-// Acording To mRO Site And eAthena Knight Script the following ppl looking like ppl listed here

-// =========================

-			menu "James Syracuse",L_Test3_9,"Thomas Bishop",-,"Amy Veattris",L_Test3_9,"Edmond Groster",L_Test3_9;

-			set @sage_test2,@sage_test2+5;

-		L_Test3_9:

-			mes "9. Which of these people doesn't live in Prontera?";

-			next;

-			menu "Nami",L_Test3_10,"Aldefun",-,"Thomas",L_Test3_10,"Hollengrhen",L_Test3_10;

-			set @sage_test2,@sage_test2+5;

-		L_Test3_10:

-			mes "10. Which Kapra wears glasses?";

-			next;

-			menu "Deflute",L_Test3_11,"Tayelin",L_Test3_11,"Leilah",-,"Debril",L_Test3_11;

-			set @sage_test2,@sage_test2+5;

-		L_Test3_11:

-			mes "11. How much SP does it cost to use 'Thunderstorm Lv7'?";

-			next;

-			menu "49",L_Test3_12,"59",-,"69",L_Test3_12,"74",L_Test3_12;

-			set @sage_test2,@sage_test2+5;

-		L_Test3_12:

-			mes "12. If you have 50% of your SP left, how much damage will 'Energy Coat' block and how much SP will be consumed?";

-			next;

-			menu "24% blocked SP1.5% consumed",L_Test3_13,"24% blocked SP2% consumed",L_Test3_13,"18% blocked SP1.5% consumed",L_Test3_13,"18% blocked SP2% consumed",-;

-			set @sage_test2,@sage_test2+5;

-		L_Test3_13:

-			mes "13. Which element cannot be used in bolt form by a Magician?";

-			next;

-			menu "Water",L_Test3_14,"Earth",-,"Fire",L_Test3_14,"Wind",L_Test3_14;

-			set @sage_test2,@sage_test2+5;

-		L_Test3_14:

-			mes "14. When a thief has the skill 'Double Attack Lv7', what is the trigger probability and attack power multiplier?";

-			next;

-			menu "35% / 120%",L_Test3_15,"35% / 140%",-,"40% / 120%",L_Test3_15,"40% / 140%",L_Test3_15;

-			set @sage_test2,@sage_test2+5;

-		L_Test3_15:

-			mes "15. Which of these isn't necessary to unlock the Priest skill 'Magnus Exorcism'?";

-			next;

-			menu "Divine Protection",-,"Heal",L_Test3_16,"Revive",L_Test3_16,"Aqua Benedicta",L_Test3_16;

-			set @sage_test2,@sage_test2+5;

-		L_Test3_16:

-			mes "16. What is the defense power and supplemental ability of a Bunny Band?";

-			next;

-			menu "1 / LUK +2",L_Test3_17,"1 / LUK +5",L_Test3_17,"2 / LUK +2",-,"2 / LUK +5",L_Test3_17;

-			set @sage_test2,@sage_test2+5;

-		L_Test3_17:

-			mes "17. Which class can't equip armor?";

-			next;

-			menu "Swordsman",L_Test3_18,"Merchant",L_Test3_18,"Thief",L_Test3_18,"Archer",-;

-			set @sage_test2,@sage_test2+5;

-		L_Test3_18:

-			mes "18. Which item completely restores HP and SP?";

-			next;

-			menu "Royal Jelly",L_Test3_19,"Ig Drasil Seed",L_Test3_19,"Ig Drasil Fruit",-,"Master Fruit",L_Test3_19;

-			set @sage_test2,@sage_test2+5;

-		L_Test3_19:

-			mes "19. What's the name of the king of Rune-Midgard?";

-			next;

-			menu "Trisdan III",L_Test3_20,"Tristan III",-,"Traisda III",L_Test3_20,"Trist III",L_Test3_20;

-			set @sage_test2,@sage_test2+5;

-		L_Test3_20:

-			mes "20. Which god do Crusaders serve?";

-			next;

-			menu "Odin",-,"Loki",L_Menu2_3,"Tooru",L_Menu2_3,"Aragamsaree",L_Menu2_3;

-			set @sage_test2,@sage_test2+5;

-

-		L_Menu2_3:

-			mes "[Kreitos]";

-			mes "Are you finished?";

-			mes "Alright, then I'll grade the test.";

-			next;

-			mes "[Kreitos]";

-			mes "Hmmm...";

-			mes "Yes....";

-			next;

-			if (@sage_test2 >= 100) goto L_Menu2_5;

-			if (@sage_test2 < 80) goto L_Menu2_4;

-			mes "[Kreitos]";

-			mes "All done.";

-			mes "You scored " + @sage_test2 + " points.";

-			mes "Looking good.";

-			mes "You've scored highly enough to pass.";

-			next;

-			goto L_Menu2_6;

-		L_Menu2_4:

-			set sagecheck,sagecheck-1;

-			mes "[Kreitos]";

-			mes "All done.";

-			mes "You scored " + @sage_test2 + " points.";

-			mes "......";

-			mes "Sorry, that's not good enough.";

-			next;

-			mes "[Kreitos]";

-			mes "We exepect our students to have command of much information about the world.";

-			mes "Learn some more and come back.";

-                        mes "You can take the test again then.";

-			close;

- 		L_Menu2_5:

-			mes "[Kreitos]";

-			mes "All done.";

-			mes "You scored " + @sage_test2 + " points.";

-			mes "Amazing.  You did wonderfully.";

-			mes "There is no doubt you'll make a great Sage.";

-			next;

-		L_Menu2_6:

-			set SAGE_Q,5;

-			mes "[Kreitos]";

-			mes "Alright.";

-			mes "You've completed the placement test.";

-			mes "Now you need to take the skill test from Professor Hermes.";

-			close;

-L_Menu3_1:

-	mes "[Kreitos]";

-	mes "Heh?";

-	mes "Do you love tests so much that you want to take the placement test again?";

-	next;

-	mes "[Kreitos]";

-	mes "Go see Professor Hermes and take the skill test.";

-	mes "Future Sages can't be slacking off.";

-	close;

-L_Menu3_2:

-	mes "[Kreitos]";

-	mes "I'm busy grading other students' exams at the moment.";

-	mes "If you need something, please see me later.";

-	close;

-L_Menu3_3:

-	mes "[Kreitos]";

-	mes "It's great that you finished your thesis, but I don't grade those.";

-	next;

-	mes "[Kreitos]";

-	mes "Show that to Headmaster Keiron.";

-	mes "He'll judge whether or not it's quality warrants your graduation.";

-	close;

-L_Menu3_4:

-	mes "[Kreitos]";

-	mes "You've graduated already?";

-	mes "Do you want to take more classes?";

-	next;

-	mes "[Kreitos]";

-	mes "I know it feels great to have graduated, but you've got to keep learning.";

-	mes "You might burn out if you become complacent and never venture out of the library once in a while.";

-	mes "Danger is exhilerating.";

-	next;

-	mes "[Kreitos]";

-	mes "Don't forget to keep notes about your journies.";

-	mes "They can come in handy when you want to teach others about a subject you've studied.";

-	close;

-}

-

-//==================================

-//Skill Test Room

-//==================================

-

-job_sage.gat,50,165,4	script	Skill Test Coordinator::jobsage_wroom	700,{

-	mes "[Skill Test Coordinator]";

-	mes "Welcome to the Sage skill test.";

-	mes "Please go to the waiting area if you want to take the test.";

-	next;

-	mes "[Skill Test Coordinator]";

-	mes "Others are being tested at the moment.";

-	mes "When it's time for you to be tested, we'll call your name.";

-	next;

-	mes "[Skill Test Coordinator]";

-	mes "It takes around 5-10 minutes to test one person.";

-	close;

-OnInit:

-	waitingroom "Test Waiting Area",10,"jobsage_wroom::OnStart",1;

-	end;

-OnStart:

-	disablewaitingroomevent;

-	warpwaitingpc "job_sage.gat",118,99;

-	set $@jobsage_pid,$@warpwaitingpc[0];

-	if( attachrid($@jobsage_pid)==0 ) goto L_Error;

-		set $@jobsage_pname$,strcharinfo(0);

-		donpcevent "jobsage_1st::OnStart";

-		end;

-L_Error:

-	enablewaitingroomevent;

-	end;

-OnEnable:

-	enablewaitingroomevent;

-	end;

-}

-

-//======== Test Step 1

-job_sage.gat,1,1,1	script	jobsage_1st	-1,{

-	end;

-OnStart:

-	set $@jobsage_m,16;

-	monster "job_sage.gat",115,106,"Unit",1183,1,"jobsage_1st::OnKilled";

-	monster "job_sage.gat",120,102,"Unit",1183,1,"jobsage_1st::OnKilled";

-	monster "job_sage.gat",124,98,"Unit",1183,1,"jobsage_1st::OnKilled";

-	monster "job_sage.gat",120,93,"Unit",1183,1,"jobsage_1st::OnKilled";

-	monster "job_sage.gat",115,90,"Unit",1183,1,"jobsage_1st::OnKilled";

-	monster "job_sage.gat",111,93,"Unit",1183,1,"jobsage_1st::OnKilled";

-	monster "job_sage.gat",107,98,"Unit",1183,1,"jobsage_1st::OnKilled";

-	monster "job_sage.gat",111,102,"Unit",1183,1,"jobsage_1st::OnKilled";

-	monster "job_sage.gat",128,110,"Unit",1184,1,"jobsage_1st::OnKilled";

-	monster "job_sage.gat",124,106,"Unit",1184,1,"jobsage_1st::OnKilled";

-	monster "job_sage.gat",124,89,"Unit",1184,1,"jobsage_1st::OnKilled";

-	monster "job_sage.gat",128,85,"Unit",1184,1,"jobsage_1st::OnKilled";

-	monster "job_sage.gat",107,89,"Unit",1184,1,"jobsage_1st::OnKilled";

-	monster "job_sage.gat",103,85,"Unit",1184,1,"jobsage_1st::OnKilled";

-	monster "job_sage.gat",107,106,"Unit",1184,1,"jobsage_1st::OnKilled";

-	monster "job_sage.gat",103,110,"Unit",1184,1,"jobsage_1st::OnKilled";

-	initnpctimer;

-	end;

-OnReset:

-	killmonster "job_sage.gat","All";

-	end;

-OnKilled:

-	set $@jobsage_m,$@jobsage_m-1;

-	if( $@jobsage_m > 0 )goto L_NotWin;

-	if(getnpctimer(0) < 60000 ) set sagecheck,sagecheck+1;

-	if((getnpctimer(0) >= 120000 ) && (getnpctimer(0) <= 170000 )) set sagecheck,sagecheck-1;

-	if(getnpctimer(0) > 170000 ) set sagecheck,sagecheck-2;

-		stopnpctimer;

-		mapannounce "job_sage.gat","Examiner: " + $@jobsage_pname$ + " killed all the monsters!",8;

-		donpcevent "jobsage_2nd::OnStart";

-	L_NotWin:

-	end;

-OnTimer1000:

-	mapannounce "job_sage.gat","Examiner: The skill test begins now.",8;

-	end;

-OnTimer2500:

-	mapannounce "job_sage.gat","Examiner: The time limit for this portion of the test is 3 minutes.",8;

-	end;

-OnTimer4000:

-	mapannounce "job_sage.gat","Examiner: You must kill all the monsters within that time period.",8;

-	end;

-OnTimer30000:

-	mapannounce "job_sage.gat","Examiner: 2 minutes, 30 seconds remaining.",8;

-	end;

-OnTimer60000:

-	mapannounce "job_sage.gat","Examiner: 2 minutes remaining.",8;

-	end;

-OnTimer90000:

-	mapannounce "job_sage.gat","Examiner: 1 minute, 30 seconds remaining.",8;

-	end;

-OnTimer120000:

-	mapannounce "job_sage.gat","Examiner: 1 minute remaining.",8;

-	end;

-OnTimer150000:

-	mapannounce "job_sage.gat","Examiner: 30 seconds remaining.",8;

-	end;

-OnTimer170000:

-	mapannounce "job_sage.gat","Examiner: 10 seconds remaining.",8;

-	end;

-OnTimer180000:

-	donpcevent "jobsage_1st::OnReset";

-	mapannounce "job_sage.gat","Examiner: Time has expired.",8;

-	end;

-OnTimer181500:

-	mapannounce "job_sage.gat","Examiner:" + $@jobsage_pname$ + "failed the test.",8;

-	areawarp "job_sage.gat",100,82,131,113,"yuno.gat",324,258;

-	end;

-OnTimer183000:

-	mapannounce "job_sage.gat","Next candidate, please step forward.",8;

-	end;

-OnTimer184000:

-	donpcevent "jobsage_wroom::OnEnable";

-	stopnpctimer;

-	end;

-}

-

-//======== Test Step 2

-job_sage.gat,1,1,1	script	jobsage_2nd	-1,{

-	end;

-OnStart:

-	donpcevent "jobsage_2nd::OnReset";

-	set $@jobsage_m,24;

-	monster "job_sage.gat",120,102,"GeographyInfo",1063,1,"jobsage_2nd::OnKilled";

-	monster "job_sage.gat",120,102,"StatisticsInfo",1063,1,"jobsage_2nd::OnKilled";

-	monster "job_sage.gat",120,102,"MeteorologyInfo",1063,1,"jobsage_2nd::OnKilled";

-	monster "job_sage.gat",120,102,"AstronomyInfo",1063,1,"jobsage_2nd::OnKilled";

-	monster "job_sage.gat",120,102,"LinguisticsInfo",1063,1,"jobsage_2nd::OnKilled";

-	monster "job_sage.gat",120,102,"CityLifeInfo",1063,1,"jobsage_2nd::OnKilled";

-	monster "job_sage.gat",124,98,"ForestryInfo",1063,1,"jobsage_2nd::OnKilled";

-	monster "job_sage.gat",124,98,"HealthInfo",1063,1,"jobsage_2nd::OnKilled";

-	monster "job_sage.gat",124,98,"PsychologyInfo",1063,1,"jobsage_2nd::OnKilled";

-	monster "job_sage.gat",120,93,"AnthropologyInfo",1063,1,"jobsage_2nd::OnKilled";

-	monster "job_sage.gat",120,93,"BiologyInfo",1063,1,"jobsage_2nd::OnKilled";

-	monster "job_sage.gat",120,93,"EthicsInfo",1063,1,"jobsage_2nd::OnKilled";

-	monster "job_sage.gat",111,93,"ArchitectureInfo",1063,1,"jobsage_2nd::OnKilled";

-	monster "job_sage.gat",111,93,"PlasticsInfo",1063,1,"jobsage_2nd::OnKilled";

-	monster "job_sage.gat",111,93,"NutritionInfo",1063,1,"jobsage_2nd::OnKilled";

-	monster "job_sage.gat",111,93,"FoodInfo",1063,1,"jobsage_2nd::OnKilled";

-	monster "job_sage.gat",111,93,"ManagementInfo",1063,1,"jobsage_2nd::OnKilled";

-	monster "job_sage.gat",111,93,"SociologyInfo",1063,1,"jobsage_2nd::OnKilled";

-	monster "job_sage.gat",107,98,"EconomicsInfo",1063,1,"jobsage_2nd::OnKilled";

-	monster "job_sage.gat",107,98,"MagicInfo",1063,1,"jobsage_2nd::OnKilled";

-	monster "job_sage.gat",107,98,"PoliSciInfo",1063,1,"jobsage_2nd::OnKilled";

-	monster "job_sage.gat",111,102,"MathInfo",1063,1,"jobsage_2nd::OnKilled";

-	monster "job_sage.gat",111,102,"HistoryInfo",1063,1,"jobsage_2nd::OnKilled";

-	monster "job_sage.gat",111,102,"PhysicsInfo",1063,1,"jobsage_2nd::OnKilled";

-	initnpctimer;

-	end;

-OnReset:

-	killmonster "job_sage.gat","All";

-	end;

-OnKilled:

-	set $@jobsage_m,$@jobsage_m-1;

-	if( $@jobsage_m > 0 )goto L_NotWin;

-		stopnpctimer;

-		if(getnpctimer(0) < 60000 ) set sagecheck,sagecheck+1;

-		if((getnpctimer(0) >= 120000 ) && (getnpctimer(0) <= 170000 )) set sagecheck,sagecheck-1;

-		if(getnpctimer(0) > 170000 ) set sagecheck,sagecheck-2;

-		mapannounce "job_sage.gat","Examiner: " + $@jobsage_pname$ + " killed all the monsters!",8;

-		donpcevent "jobsage_3rd::OnStart";

-	L_NotWin:

-	end;

-OnTimer1500:

-	mapannounce "job_sage.gat","Examiner: The time limit for this portion of the test is 3 minutes.",8;

-	end;

-OnTimer3000:

-	mapannounce "job_sage.gat","Examiner: You must kill all the monsters within that time period.",8;

-	end;

-OnTimer30000:

-	mapannounce "job_sage.gat","Examiner: 2 minutes, 30 seconds remaining.",8;

-	end;

-OnTimer60000:

-	mapannounce "job_sage.gat","Examiner: 2 minutes remaining.",8;

-	end;

-OnTimer90000:

-	mapannounce "job_sage.gat","Examiner: 1 minute, 30 seconds remaining.",8;

-	end;

-OnTimer120000:

-	mapannounce "job_sage.gat","Examiner: 1 minute remaining.",8;

-	end;

-OnTimer150000:

-	mapannounce "job_sage.gat","Examiner: 30 seconds remaining.",8;

-	end;

-OnTimer170000:

-	mapannounce "job_sage.gat","Examiner: 10 seconds remaining.",8;

-	end;

-OnTimer180000:

-	donpcevent "jobsage_2nd::OnReset";

-	mapannounce "job_sage.gat","Examiner: Time has expired.",8;

-	end;

-OnTimer181500:

-	mapannounce "job_sage.gat","Examiner: " + $@jobsage_pname$ + "has failed the test.",8;

-	areawarp "job_sage.gat",100,82,131,113,"yuno.gat",324,258;

-	end;

-OnTimer183000:

-	mapannounce "job_sage.gat","Next candidate, please step forward.",8;

-	end;

-OnTimer184000:

-	donpcevent "jobsage_wroom::OnEnable";

-	stopnpctimer;

-	end;

-}

-

-

-//======== Test Step 3

-job_sage.gat,1,1,1	script	jobsage_3rd	-1,{

-	end;

-OnStart:

-	donpcevent "jobsage_3rd::OnReset";

-	set $@jobsage_m,1;

-	monster "job_sage.gat",116,98,"Bachelor",1179,1,"jobsage_3rd::OnKilled";

-	monster "job_sage.gat",124,106,"Tardy",1185,1;

-	monster "job_sage.gat",124,89,"Loaner",1185,1;

-	monster "job_sage.gat",107,89,"Cheater",1185,1;

-	monster "job_sage.gat",107,106,"Absentee",1185,1;

-	initnpctimer;

-	end;

-OnReset:

-	end;

-OnKilled:

-	set $@jobsage_m,$@jobsage_m-1;

-	if( $@jobsage_m > 0 )goto L_NotWin;

-		stopnpctimer;

-		killmonster "job_sage.gat","All";

-		set SAGE_Q,7;

-		if(getnpctimer(0) < 20000 ) set sagecheck,sagecheck+1;

-		if((getnpctimer(0) >= 30000 ) && (getnpctimer(0) <= 50000 )) set sagecheck,sagecheck-1;

-		if(getnpctimer(0) > 50000 ) set sagecheck,sagecheck-2;

-		mapannounce "job_sage.gat","Examiner: Congratulations. " + $@jobsage_pname$ + "passed the test!",8;

-		donpcevent "jobsage_success::OnSuccess";

-	L_NotWin:

-	end;

-OnTimer1500:

-	mapannounce "job_sage.gat","Examiner: 1 minute remaining.",8;

-	end;

-OnTimer30000:

-	mapannounce "job_sage.gat","Examiner: 30 seconds remaining.",8;

-	end;

-OnTimer50000:

-	mapannounce "job_sage.gat","Examiner: 10 seconds remaining.",8;

-	end;

-OnTimer60000:

-	donpcevent "jobsage_3rd::OnReset";

-	mapannounce "job_sage.gat","Examiner: Time has expired.",8;

-	end;

-OnTimer61500:

-	mapannounce "job_sage.gat","Examiner: " + $@jobsage_pname$ + "failed the test.",8;

-	areawarp "job_sage.gat",100,82,131,113,"yuno.gat",324,258;

-	end;

-OnTimer63000:

-	mapannounce "job_sage.gat","Examiner: This concludes the test.  Next candidate, please step forward.",8;

-	end;

-OnTimer64000:

-	donpcevent "jobsage_wroom::OnEnable";

-	stopnpctimer;

-	end;

-}

-

-//======== Successful

-job_sage.gat,1,7,1	script	jobsage_success	66,{

-OnSuccess:

-	killmonster "job_sage.gat","All";

-	initnpctimer;

-	end;

-OnTimer3000:

-	mapannounce "job_sage.gat","Examiner: Please allow me to guide you out.",8;

-	end;

-OnTimer6000:

-	mapannounce "job_sage.gat","Next candidate, please step forward.",8;

-	areawarp "job_sage.gat",100,82,131,113,"yuno_in03.gat",163,180;

-	end;

-OnTimer7000:

-	donpcevent "jobsage_wroom::OnEnable";

-	stopnpctimer;

-	end;

-}

-

-//==============================================================================

-// mapflag

-//==============================================================================

-job_sage.gat	mapflag	nomemo

-job_sage.gat	mapflag	noteleport

-job_sage.gat	mapflag	nosave	SavePoint

-job_sage.gat	mapflag	nopenalty

-job_sage.gat	mapflag	nobranch

-job_sage.gat	mapflag	noexp

-job_sage.gat	mapflag	noloot

+//===== eAthena Script ======================================= 
+//= Sage Job Quest
+//===== By: ==================================================
+//= jAthena (0.9) - I guess
+//= Unknown Translator (1.0)
+//= Darkchild (1.2)
+//===== Current Version: ===================================== 
+//= 2.0a
+//===== Compatible With: ===================================== 
+//= eAthena 1.0 +
+//===== Description: ========================================= 
+//= Sage job quest based off of official servers.
+//===== Additional Comments: ================================= 
+//= Script mostly based on translated jA script
+//= Written test questions/answers weren't translated 100% corectly
+//= So a lot of those are based upon mRO site and my own info
+//= IF you by excident have (or can get) screenshots of these questions
+//= Then PLEASE send them to Darkchild
+//= 1.3 Baby class Support added [Lupus] 1.5 Fixed possible EXP abuse [Lupus]
+//= 1.6 Added a func which prevent advanced classes passing
+//= 2nd Job Quests again. It also guides adv classes where to go. [Lupus]
+//= 1.7 Fixed tuition fee. Fixed some answers, names & typos, added missing labels [Lupus]
+//= 1.7a Moved JFunc back in the main file, fixed typos [Lupus]
+//= 2.0 Changed numbers to constants. [Vicious]
+//= 2.0a Fixed double warp [KarLaeda] 
+//============================================================ 
+
+
+//==================================
+//Sage Castle
+//==================================
+yuno_in02.gat,38,61,4	script	Magic Academy Headmaster 	743,{
+	callfunc "F_BlockHigh",Job_Mage_High,"High Mage",Job_Professor,"Professor","Keiron";
+	if(BaseJob == Job_Sage) goto L_Menu3_3;
+	if(BaseJob != Job_Mage) goto L_Menu2_1;
+	if(SAGE_Q == 11) goto L_Menu3_1;
+	if(SAGE_Q >= 3) goto L_Menu2_2;
+	mes "[Keiron]";
+	mes "All who appreciate the fine art";
+	mes "of magic are welcome here.";
+	mes "How can I help you?";
+        next;
+	menu "Change class to Sage",L_Menu1_1,"About the Sage class",-,"Just looking around",L_Menu1_2;
+		mes "[Keiron]";
+		mes "So you're interested in being a Sage?";
+		mes "Well, I can't just make you one straight away.";
+		next;
+		mes "[Keiron]";
+		mes "In order to become a Sage, you'll need to file an application for entry into the Shubaichul Magic Academy and take the placement test.";
+		next;
+		mes "[Keiron]";
+		mes "Once you're placed, you'll need to complete coursework and finally write and defend a thesis.";
+		next;
+		mes "[Keiron]";
+		mes "If you successfully complete the requirements, you'll be granted a Sage license.";
+		next;
+		mes "[Keiron]";
+		mes "If you wish to apply, go see Mathias in the Shubaichul Magic Academy.";
+		mes "Tell him I sent you.";
+		close;
+L_Menu1_1:
+	mes "[Keiron]";
+	mes "A Sage?";
+	mes "Well...";
+	mes "In order to change you way of living, you have to change your way of thinking.";
+	next;
+	mes "[Keiron]";
+	mes "Sages actively contribute knowledge to the kingdom through rigorous research.";
+	mes "They also help society through its worst problems.";
+	mes "Just because you dress as a Sage doesn't mean you're a Sage.";
+	next;
+	mes "[Keiron]";
+	mes "To become a Sage, please apply for entry into the Shubaichul Magic Academy.";
+	mes "The admissions officer will explain the educational requirements.";
+	close;
+L_Menu1_2:
+	mes "[Keiron]";
+	mes "Excellent.  If you have some free time, why not peruse a a volume from our library?";
+	mes "Our library is truly a bastion of knowledge.";
+	next;
+	mes "[Keiron]";
+	mes "Of course, there is much that can't be learned from reading books, but it's a good start.";
+	close;
+L_Menu2_1:
+	mes "[Keiron]";
+	mes "We Sages do a lot of research about the world on our own,";
+	mes "but to maximize our knowledge,";
+	mes "we regularly form interdisciplinary research teams.";
+	next;
+	mes "[Keiron]";
+	mes "You should talk to our Sages and share any research you may have been doing within your own profession.";
+	close;
+L_Menu2_2:
+	mes "[Keiron]";
+	mes "The road to becoming a Sage isn't easy.";
+	mes "You need to have a strong dedication to mastering magic.";
+	next;
+	mes "[Keiron]";
+	mes "You need to keep plugging away at that thesis.";
+	mes "Good luck!";
+	close;
+L_Menu3_1:
+	if(countitem(1550) >= 1) goto L_Menu3_2;
+	mes "[Keiron]";
+	mes "Where's your thesis?";
+	mes "I'm eager to evaulate it.";
+	next;
+	mes "[Keiron]";
+	mes "Did you forget it?";
+	mes "In any case, please bring it post-haste.";
+	close;
+L_Menu3_2:
+	mes "[Keiron]";
+	mes "It looks like you have a thesis to present.  Let's have a look...";
+	next;
+	mes "[Keiron]";
+	mes "Hmmm...";
+	next;
+	mes "[Keiron]";
+	mes "Yes....";
+	next;
+	mes "[Keiron]";
+	mes "Interesting...";
+	next;
+	mes "[Keiron]";
+	mes "It's not stylistically";
+	mes "cohesive, but your zeal for research is amply proven by your thesis.  I approve.";
+	next;
+	if(SkillPoint == 0) goto LCHANGE;
+	mes "[Keiron]";
+	mes "Well you are all set for the jobchange except for 1 thing!";
+	mes "You have unused Skill Points!!!";
+	mes "Please use those first!";
+	close;
+		
+	LCHANGE:
+	callfunc "Job_Change",Job_Sage;
+	callfunc "F_ClearJobVar";
+	mes "[Keiron]";
+	mes "Congratulations!";
+	mes "You're a Sage now.";
+	mes "Don't let that passion for research ever be dampened.";
+	next;
+	mes "[Keiron]";
+	mes "Keep your thesis around, since it may be useful in a publish-or-perish environment later on.";
+	next;
+	mes "[Keiron]";
+	mes "Some day, you'll be a bastion of knowledge all by yourself!";
+	close;
+L_Menu3_3:
+	mes "[Keiron]";
+	mes "Hmmm?  What's up?";
+	mes "Just because you're a Sage doesn't mean you should quit your studies.";
+	next;
+	mes "[Keiron]";
+	mes "In order to maintain our role as the kingdom's gatherers and dissemenators of knowledge, we can never miss an opportunity to gather data.";
+	close;
+}
+
+//===============================
+//Biotech Lab
+//===============================
+yuno_in03.gat,244,31,3	script	Physics Professor	120,{
+	if(BaseJob == Job_Sage) goto L_Menu3_2;
+	if(BaseJob != Job_Mage) goto L_Menu1_1;
+	if(SAGE_Q == 11) goto L_Menu3_1;
+	if(SAGE_Q2 == 8) goto L_Menu2_1;
+	if(SAGE_Q2 == 9) goto L_Menu2_3;
+	if(SAGE_Q2 == 10) goto L_Menu2_5;
+	if(SAGE_Q2 == 11) goto L_ThesisStart1;
+	if(SAGE_Q == 9) goto L_Menu1_2;
+	mes "[Ebeshi]";
+	mes "What?";
+	next;
+	mes "[Ebeshi]";
+	mes "Did you come to study under my guidance?";
+	next;
+	mes "[Ebeshi]";
+	mes "Well, you need to enroll first.";
+	mes "Heheheheh...";
+	close;
+L_Menu1_1:
+	mes "[Ebeshi]";
+	mes "Eh???????????????????????????????";
+	next;
+	mes "[Ebeshi]";
+	mes "I don't think there's anything someone like you can learn from me.";
+	next;
+	mes "[Ebeshi]";
+	mes "Are you disappointed?";
+	mes "Hehehehe....";
+	close;
+L_Menu1_2:
+	set SAGE_Q2,8;
+	mes "[Ebeshi]";
+	mes "Well, I'm glad to meet another fine student such as yourself.";
+	next;
+	mes "[Ebeshi]";
+	mes "Aren't you excited that you're going to study under me?!";
+	mes "Hehehehe....";
+	next;
+	mes "[Ebeshi]";
+	mes "I hate to be intrusive, but could you get something for me before I start my class?";
+	next;
+	mes "[Ebeshi]";
+	mes "I need ^3051FD30x Stone^000000 as part of the class materials.";
+	mes "Can you get that?";
+	next;
+	mes "[Ebeshi]";
+	mes "If you really want to get stones quick,";
+	mes "you should look up a friendly thief to assist you!  Thanks for helping out.";
+	close;
+L_Menu2_1:
+	if(countitem(7049) >= 30) goto L_Menu2_2;
+		mes "[Ebeshi]";
+		mes "Hey, what are you up to?";
+		mes "Are you trying to slack off?";
+		mes "Come on, set your eyes on the goal.";
+		next;
+		mes "[Ebeshi]";
+		mes "I need ^3051FD30x Stone^000000 to proceed.";
+		mes "With all the stones lying around,";
+		mes "shouldn't they be easy to find?";
+		close;
+	L_Menu2_2:
+		mes "[Ebeshi]";
+		mes "Awesome!  You've got all the stones I need.";
+		mes "Now, watch this!";
+		next;
+		mes "[Ebeshi]";
+		mes "Abracadabra!!";
+		next;
+		mes "[Ebeshi]";
+		mes "Abracadabra!!";
+		next;
+		mes "[Ebeshi]";
+		mes "Abracadabra!!";
+		next;
+		delitem 7049,30;
+		set SAGE_Q2,9;
+		mes "[Ebeshi]";
+		mes "You see that?";
+		mes "I created three elemental stones!";
+		next;
+		mes "[Ebeshi]";
+		mes "Pretty cool, don't you think?";
+		mes "Have them for yourself!";
+		next;
+		getitem 991,1;
+		getitem 993,1;
+		getitem 992,1;
+		mes "[Ebeshi]";
+		mes "Now, for your next lesson, you need to synthesize some different kinds of arrows with those stones.";
+		next;
+		mes "[Ebeshi]";
+		mes "Specifically...";
+		mes "^3051FD50x Crystal Arrow^000000";
+		mes "^3051FD50x Stone Arrow^000000";
+		mes "^3051FD50x Wind Arrow^000000";
+		next;
+		mes "[Ebeshi]";
+		mes "An archer friend can help you make the arrows.";
+		mes "Give it a try!";
+		close;
+	L_Menu2_3:
+		if((countitem(1754) >= 50) && (countitem(1756) >= 50) && (countitem(1755) >= 50)) goto L_Menu2_4;
+		mes "[Ebeshi]";
+		mes "Hmmm?";
+		mes "What did you do with those stones I gave you?";
+		mes "You didn't sell them, I hope...";
+		next;
+		mes "[Ebeshi]";
+                mes "You need to use them to make";
+		mes "^3051FD50x Crystal Arrow^000000";
+		mes "^3051FD50x Stone Arrow^000000";
+		mes "^3051FD50x Wind Arrow^000000";
+		mes "An archer friend can help you make the arrows.";
+		close;
+	L_Menu2_4:
+		mes "[Ebeshi]";
+		mes "You made the arrows!  Good job.";
+		mes "Now, to continue with the lesson...";
+		next;
+		mes "[Ebeshi]";
+		mes "This lesson covers the Elemental Affinity chapter in your textbook.";
+		next;
+		mes "[Ebeshi]";
+		mes "The first affinity is really easy.";
+		mes "Water magic is very effective against fire.";
+		mes "It's easy to remember.";
+		mes "All you need to remember is water being splashed on fire.";
+		next;
+		mes "[Ebeshi]";
+		mes "Wind magic will decimate water-based monsters.";
+		mes "Observe what happens when a lake is struck by lightning.";
+		next;
+		mes "[Ebeshi]";
+		mes "Earth magic will crush wind-based monsters easily.";
+		mes "Don't you build a house on a strong foundation to keep the wind away?";
+		next;
+		mes "[Ebeshi]";
+		mes "Fire magic mercilessly scorches the earth.";
+		mes "Won't a tree burn if a fire breaks out?";
+		mes "Same with an earth-based monster.";
+		next;
+		mes "[Ebeshi]";
+		mes "Do you understand?";
+		mes "Here's some homework for next time...";
+		next;
+		delitem 1754,50;
+		delitem 1756,50;
+		delitem 1755,50;
+		set SAGE_Q2,10;
+		mes "[Ebeshi]";
+		mes "Next time you come, bring ^3051FD1x Holy Water^000000.";
+		mes "We'll need it for the lesson.";
+		mes "It will be easy to acquire if you have contacts in the church.";
+		close;
+	L_Menu2_5:
+		if(countitem(523) >= 1) goto L_Menu2_6;
+		mes "[Ebeshi]";
+		mes "Ooops!";
+		mes "Did you forget about the item I asked you to bring?";
+		next;
+		mes "[Ebeshi]";
+		mes "I need ^3051FD1x Holy Water^000000 for the lesson.";
+		mes "Ask an Acolyte to help you make it.";
+		mes "Hehehehe...";
+		close;
+	L_Menu2_6:
+		mes "[Ebeshi]";
+		mes "Alright, you have the Holy Water!";
+		mes "Let's continue the lesson!";
+		next;
+		mes "[Ebeshi]";
+		mes "Please take good notes about this part.";
+		mes "It will be on the test.";
+		next;
+		mes "[Ebeshi]";
+		mes "Water magic sucks against wind!";
+		mes "Would a lightning bolt care if it was frozen?";
+		mes "Heheheheh....";
+		next;
+		mes "[Ebeshi]";
+		mes "Wind magic is totally useless against the earth.";
+		mes "Will a tree suffer permanent damage if it's blown about?";
+		next;
+		mes "[Ebeshi]";
+		mes "Earth magic is ineffective against fire.";
+		mes "If you put some leaves on a fire, will the fire go out?";
+		mes "No, just the opposite will happen.";
+		next;
+		mes "[Ebeshi]";
+		mes "Fire won't do much against water.";
+		mes "If you heat water, doesn't it just become more dangerous?";
+		next;
+		mes "[Ebeshi]";
+		mes "That was a pretty informative lecture!";
+		mes "You think so too, right?";
+		next;
+		delitem 523,1;
+		set SAGE_Q2,11;
+		mes "[Ebeshi]";
+		mes "Now, you have enough knowledge to prepare a defensible thesis.";
+		mes "Hehehehehe!";
+		next;
+		mes "[Ebeshi]";
+		mes "To put the thesis together, you'll need:";
+		mes "^3051FD1x Feather of Birds^000000 for your writing instrument.";
+		mes "^3051FD1x Animal Skin^000000 for the pages.";
+		mes "^3051FD1x Trunk^000000 to bind the pages.";
+		mes "^3051FD1x Squid Ink^000000 for your ink.";
+		mes "^3051FD1x Empty Bottle^000000 to store your ink.";
+		next;
+		mes "[Ebeshi]";
+		mes "Come and see me once you've gotten all of these items together.";
+		close;
+	L_ThesisStart1:
+		if((countitem(916) >= 1) && (countitem(919) >= 1) && (countitem(1019) >= 1) && (countitem(1024) >= 1) && (countitem(713) >= 1)) goto L_ThesisStart2;
+		mes "[Ebeshi]";
+		mes "Hmmm?";
+		mes "You can't forget important things like this!";
+		next;
+		mes "[Ebeshi]";
+                mes "You need these items to start your thesis:";
+		mes "^3051FD1x Feather of Birds^000000 for your writing instrument.";
+		mes "^3051FD1x Animal Skin^000000 for the pages.";
+		mes "^3051FD1x Trunk^000000 to bind the pages.";
+		mes "^3051FD1x Squid Ink^000000 for your ink.";
+		mes "^3051FD1x Empty Bottle^000000 to store your ink.";
+		next;
+		mes "[Ebeshi]";
+		mes "Do you have some friends that might be able to help you gather the materials?";
+		mes "That will make it a simple task!";
+		close;
+	L_ThesisStart2:
+		delitem 916,1;
+		delitem 919,1;
+		delitem 1019,1;
+		delitem 1024,1;
+		delitem 713,1;
+		mes "[Ebeshi]";
+		mes "Alright...";
+		mes "You need to write this yourself.";
+		mes "I'm simply your research advisor!";
+		mes "Hehehehe...";
+		next;
+		mes "......";
+		next;
+		mes "......";
+		next;
+		mes "......";
+		next;
+		mes "Elemental magic is divided into four types...";
+			menu "...called Fire, Wind, Water, and Earth",L_ThesisMenu1_1,"...named Fire, Wind, Water, and Earth",L_ThesisMenu1_2,"...that oppose each other Fire, Wind, Water, and Earth",L_ThesisMenu1_3;
+		L_ThesisMenu1_1:
+			mes "...called Fire, Wind, Water, and Earth";
+			goto L_Thesis2;
+		L_ThesisMenu1_2:
+			mes "...named Fire, Wind, Water, and Earth";
+			goto L_Thesis2;
+		L_ThesisMenu1_3:
+			mes "...that oppose each other: Fire, Wind, Water, and Earth";
+			goto L_Thesis2;
+		L_Thesis2:
+			mes "Each attribute has certain properties.";
+			menu "Wind conquers water...",L_ThesisMenu2_1,"Water douses fire...",L_ThesisMenu2_2,"Fire scorches Earth...",L_ThesisMenu2_3;
+		L_ThesisMenu2_1:
+			mes "Wind conquers Water and Earth attacks Wind";
+			goto L_Thesis3;
+		L_ThesisMenu2_2:
+			mes "Water douses fire, while Wind zaps Water";
+			goto L_Thesis3;
+		L_ThesisMenu2_3:
+			mes "Fire scorches Earth, and Water douses Fire.";
+			goto L_Thesis3;
+		L_Thesis3:
+			menu "But weaknesses exist, too",L_ThesisMenu3_1,"You can customize your weapon element, also",L_ThesisMenu3_2,"Elemental affinity varies by monster type, also",L_ThesisMenu3_3;
+		L_ThesisMenu3_1:
+			mes "But weaknesses exist, too";
+			goto L_Thesis4;
+		L_ThesisMenu3_2:
+			mes "You can customize your weapon element, also";
+			goto L_Thesis4;
+		L_ThesisMenu3_3:
+			mes "Elemental affinity varies by monster type, also";
+			goto L_Thesis4;
+		L_Thesis4:
+			menu "You need to be circumspect when facing monsters...",L_ThesisMenu4_1,"So, you should customize your weapon to the situation",L_ThesisMenu4_2,"Red Potions have a delicious strawberry flavor",L_ThesisMenu4_3;
+		L_ThesisMenu4_1:
+			mes "You need to be circumspect when facing monster with an unfamiliar affinity.";
+			goto L_Thesis5;
+		L_ThesisMenu4_2:
+			mes "You should customize your weapon to the situation.";
+			goto L_Thesis5;
+		L_ThesisMenu4_3:
+			mes "Red Potions have a delicious strawberry flavor.";
+			goto L_Thesis5;
+		L_Thesis5:
+			next;
+			menu "Eimi of Prontera is hot",L_ThesisMenu5_1,"I wonder how Red Potions are made",L_ThesisMenu5_2,"The complexity of magic exceeds man's capacity to learn",L_ThesisMenu5_3;
+		L_ThesisMenu5_1:
+			mes "Eimi of Prontera is hot.";
+			goto L_Thesis6;
+		L_ThesisMenu5_2:
+			mes "I wonder how Red Potions are made.";
+			goto L_Thesis6;
+		L_ThesisMenu5_3:
+			mes "The complexity of magic exceeds man's capacity to learn.";
+			goto L_Thesis6;
+		L_Thesis6:
+			menu "The women in Morok are hot, too",L_ThesisMenu6_1,"Maybe it's a secret recipe",L_ThesisMenu6_2,"It's dangerous to depend on magic too much...",L_ThesisMenu6_3;
+		L_ThesisMenu6_1:
+			mes "The women in Morok are hot, too.";
+			goto L_Thesis7;
+		L_ThesisMenu6_2:
+			mes "Maybe it's a secret recipe.";
+			goto L_Thesis7;
+		L_ThesisMenu6_3:
+			mes "It's dangerous to depend on magic too much...";
+			goto L_Thesis7;
+		L_Thesis7:
+			menu "I wish I had a Bunny Band",L_ThesisMenu7_1,"That taste of a White potion...",L_ThesisMenu7_2,"...if you want to stay safe. power...",L_ThesisMenu7_3;
+		L_ThesisMenu7_1:
+			mes "I wish I had a Bunny Band.";
+			goto L_Thesis8;
+		L_ThesisMenu7_2:
+			mes "The taste of a White Potion...";
+			goto L_Thesis8;
+		L_ThesisMenu7_3:
+			mes "...if you want to stay safe. power...";
+			goto L_Thesis8;
+		L_Thesis8:
+			menu "That would make me happy",L_ThesisMenu8_1,"...is difficult to imagine",L_ThesisMenu8_2,"In the interest of a safe battle...",L_ThesisMenu8_3;
+		L_ThesisMenu8_1:
+			mes "That would make me happy.";
+			goto L_Thesis9;
+		L_ThesisMenu8_2:
+			mes "...is difficult to imagine";
+			goto L_Thesis9;
+		L_ThesisMenu8_3:
+			mes "In the interest of a safe battle...";
+			goto L_Thesis9;
+		L_Thesis9:
+			menu "Bunny Bands make great Acolyte accessories",L_ThesisMenu9_1,"It makes me wonder if...",L_ThesisMenu9_2,"...you should bring along friends",L_ThesisMenu9_3;
+		L_ThesisMenu9_1:
+			mes "Bunny Bands make great Acolyte accessories.";
+			goto L_Thesis10;
+		L_ThesisMenu9_2:
+			mes "It makes me wonder if...";
+			goto L_Thesis10;
+		L_ThesisMenu9_3:
+			mes "...you should bring along friends.";
+			goto L_Thesis10;
+		L_Thesis10:
+			menu "I wonder if a Knight could wear one, too",L_ThesisMenu10_1,"...people might drink them when they're not hurt",L_ThesisMenu10_2,"It's the responsible thing to do",L_ThesisMenu10_3;
+		L_ThesisMenu10_1:
+			mes "I wonder if a Knight could wear one, too.";
+			next;
+			goto L_ThesisEnd;
+		L_ThesisMenu10_2:
+			mes "...people might drink them when they're not hurt";
+			next;
+			goto L_ThesisEnd;
+		L_ThesisMenu10_3:
+			mes "It's the responsible thing to do.";
+			next;
+			goto L_ThesisEnd;
+	L_ThesisEnd:
+		mes "......";
+		next;
+		mes "......";
+		next;
+		mes "......";
+		next;
+		set SAGE_Q,11;
+		getitem 1550,1;
+		mes "[Ebeshi]";
+		mes "Alright!";
+		mes "You've finished!  It looks pretty good!";
+		next;
+		mes "[Ebeshi]";
+		mes "You should take that to the Headmaster!";
+		mes "He'll decide whether you graduate or not.";
+		mes "Hehehehehe....";
+		close;
+L_Menu3_1:
+	mes "[Ebeshi]";
+	mes "What's up?  Did you forget something?!";
+	next;
+	mes "[Ebeshi]";
+	mes "You should see the Headmaster and present your thesis so you can graduate!";
+	close;
+L_Menu3_2:
+	mes "[Ebeshi]";
+	mes "Good afternoon!";
+	mes "It's good to meet other Sages and exchange information.";
+	mes "Heheheheh!!";
+	next;
+	mes "[Ebeshi]";
+	mes "Even though company is good sometimes, I need to continue my magical research!";
+	next;
+	mes "[Ebeshi]";
+	mes "Do you want to continue your study here?";
+	mes "Please feel free to talk to the other professors and read the literature here.";
+	mes "Hehehehe!";
+	close;
+}
+
+//==================================
+//Monster Museum
+//==================================
+
+yuno_in03.gat,32,102,0	script	Biology Professor	755,{
+	if(BaseJob == Job_Sage) goto L_Menu5_4;
+	if(BaseJob != Job_Mage) goto L_Menu1_1;
+	if(SAGE_Q == 11) goto L_Menu5_3;
+	if((SAGE_Q2 >= 1) && (SAGE_Q2 <= 3)) goto L_Menu3_1;
+	if((SAGE_Q2 >= 4) && (SAGE_Q2 <= 6)) goto L_Menu4_1;
+	if(SAGE_Q2 == 7) goto L_Menu5_1;
+	if(SAGE_Q == 8) goto L_Menu2_1;
+	mes "[Lucias]";
+	mes "I have a headache...";
+	mes "I've got too many things going on at once!";
+	next;
+	mes "[Lucias]";
+	mes "Of course, I'll teach people about biology even with a headache!";
+	close;
+L_Menu1_1:
+	mes "[Lucias]";
+	mes "Hmmm?  Are you just poking around?";
+	next;
+	mes "[Lucias]";
+	mes "That's fine, but please don't touch anything.";
+	mes "We keep dangerous bioagents in here!";
+	next;
+	mes "[Lucias]";
+	mes "If you have information about rare monsters, we'll pay you handsomely.";
+	close;
+L_Menu2_1:
+	mes "[Lucias]";
+	mes "Oh, you've taken the placement test?";
+	mes "I'm Lucias, a preeminent researcher in the biological sciences.";
+	next;
+	mes "[Lucias]";
+	mes "What's your name, young one?";
+	next;
+	menu "I'm " + strcharinfo(0) + "!",-;
+	mes "[Lucias]";
+	mes "That's a nice name.";
+	mes "Now, let me explain about our research objectives.";
+	next;
+	mes "[Lucias]";
+	mes "My area of expertise is monsters.";
+	mes "I'm sure that you've encountered and defeated many monsters by now.";
+	mes "Am I right?";
+	next;
+		menu "You're quite right",-,"Well, not really...",L_Menu2_2;
+		mes "[Lucias]";
+		mes "Really?";
+		mes "I hope your background knowledge is diverse.";
+		mes "My class isn't a cakewalk by any means.";
+		next;
+		goto L_Menu2_3;
+	L_Menu2_2:
+//==================================
+//If you respond negatively
+		mes "[Lucias]";
+		mes "You might be at a disadvantage.";
+		mes "My coursework assumes a lot of background knowledge.";
+		mes "My class wasn't designed to be a cakewalk...";
+		next;
+//==================================
+L_Menu2_3:
+	mes "[Lucias]";
+	mes "So, shall we get started?";
+	mes "You'll learn a lot in this class if you're vigilant.";
+	next;
+		set @sagerand,0;
+		set @sagerand,rand(3);
+		mes "[Lucias]";
+		mes "So, first, you need to collect ";
+		if(@sagerand == 1) goto L_Menu2_4;
+		if(@sagerand == 2) goto L_Menu2_5;
+		set SAGE_Q2,1;
+		mes "^3051FD5x Tendons^000000";
+		mes "^3051FD5x Nippers^000000";
+		mes "^3051FD5x Sharp Scales^000000";
+		next;
+		goto L_Menu2_6;
+	L_Menu2_4:
+		set SAGE_Q2,2;
+//==================================
+//mes–¢‰ñŽû
+		mes "^3051FD5x Clam Flesh^000000";
+		mes "^3051FD5x Nippers^000000";
+		mes "^3051FD5x Heart of Mermaid^000000";
+		next;
+		goto L_Menu2_6;
+	L_Menu2_5:
+		set SAGE_Q2,3;
+		mes "^3051FD5x Single Cells^000000";
+		mes "^3051FD5x Tentacles^000000";
+		mes "^3051FD5x Fish Tails^000000";
+//==================================
+		next;
+	L_Menu2_6:
+		mes "[Lucias]";
+		mes "We'll continue once you've gathered those.";
+		close;
+L_Menu3_1:
+	if((countitem(1050) >= 5) && (countitem(960) >= 5) && (countitem(963) >= 5) && (SAGE_Q2 == 1)) goto L_Menu3_4;
+	if((countitem(966) >= 5) && (countitem(960) >= 5) && (countitem(950) >= 5) && (SAGE_Q2 == 2)) goto L_Menu3_4;
+	if((countitem(1052) >= 5) && (countitem(962) >= 5) && (countitem(1023) >= 5) && (SAGE_Q2 == 3)) goto L_Menu3_4;
+	mes "[Lucias]";
+	mes "You don't have the necessary items.";
+	mes "Let me repeat what you need:";
+	next;
+		mes "[Lucias]";
+		if(SAGE_Q2 == 2) goto L_Menu3_2;
+		if(SAGE_Q2 == 3) goto L_Menu3_3;
+		mes "^3051FD5x Tendon^000000";
+		mes "^3051FD5x Nipper^000000";
+		mes "^3051FD5x Sharp Scale^000000";
+		close;
+	L_Menu3_2:
+		mes "^3051FD5x Clam Flesh^000000";
+		mes "^3051FD5x Nipper^000000";
+		mes "^3051FD5x Heart of Mermaid^000000";
+		close;
+	L_Menu3_3:
+		mes "^3051FD5x Single Cell^000000";
+		mes "^3051FD5x Tentacle^000000";
+		mes "^3051FD5x Fish Tail^000000";
+		close;
+L_Menu3_4:
+	mes "[Lucias]";
+	mes "Well, you have the items, but I can't be sure if you bought them or collected them yourself.";
+	next;
+	mes "[Lucias]";
+	mes "There is a similarity in the characteristics of the monsters that drop those items.";
+	mes "Do you know what it is?";
+	next;
+		menu "Water element affinity",L_Menu3_5,"They're fish and shells",L_Menu3_6,"They were quite active",-,"They're monsters",-;
+//==================================
+		mes "[Lucias]";
+		mes "...I'm disappointed in you.";
+		mes "The correct answer is that all of the monsters have water element affinity.";
+		mes "Monsters that live in an aquatic environment have evolved bodies adapted to that environment.";
+//==================================
+		next;
+		goto L_Menu3_6;
+	L_Menu3_5:
+		mes "[Lucias]";
+		mes "Right!";
+		mes "Most aquatic monsters have water element affinity because they're adapted to their environment.";
+		mes "Fish and shells evolved in a logical way.";
+		next;
+	L_Menu3_6:
+		mes "[Lucias]";
+		mes "Not every fish and shell has water element affinity, but you can count on it as a general rule.";
+		mes "Now, which type of magic do you think would be most effective against them?";
+		next;
+		menu "Lightning Bolt",L_Menu3_7,"Firebolt",-,"Thunderstorm",L_Menu3_8,"Frost Nova",-;
+//==================================
+//mes–¢‰ñŽû
+		mes "[Lucias]";
+		mes "That's not correct.";
+		mes "You need to use magic like Lightning Bolt or Thunderstorm.";
+		mes "Check the elemental affinity matrix again.";
+		next;
+//==================================
+		goto L_Menu3_9;
+	L_Menu3_7:
+		mes "[Lucias]";
+		mes "Great!  That's right!";
+		mes "Using Lightning Bolt is an easy way to victory.";
+		next;
+		mes "[Lucias]";
+		mes "You need to be careful of monsters like the Penomena and Aster because their attribute is different.";
+		next;
+		goto L_Menu3_9;
+	L_Menu3_8:
+		mes "[Lucias]";
+		mes "Great!  That's right!";
+		mes "Using Thunderstorm is an easy way to victory.";
+		next;
+		mes "[Lucias]";
+		mes "You need to be careful of monsters like the Penomena and Aster because their attribute is different.";
+		next;
+	L_Menu3_9:
+		mes "[Lucias]";
+		mes "Next, let's turn our attention to insectoid monsters.";
+		next;
+		set @sagerand,rand(3);
+		mes "[Lucias]";
+		mes "Next, you need to collect ";
+		if(@sagerand == 1) goto L_Menu3_10;
+		if(@sagerand == 2) goto L_Menu3_11;
+		set SAGE_Q2,4;
+		mes "^3051FD5x Cobweb^000000";
+		mes "^3051FD5x Shell^000000";
+		mes "^3051FD5x Insect Feeler^000000";
+		next;
+		goto L_Menu2_6;
+	L_Menu3_10:
+		set SAGE_Q2,5;
+//==================================
+//mes–¢‰ñŽû
+		mes "^3051FD5x Moth Dust^000000";
+		mes "^3051FD5x Snail's Shell^000000";
+		mes "^3051FD5x Horn^000000";
+		next;
+		goto L_Menu2_6;
+	L_Menu3_11:
+		set SAGE_Q2,6;
+		mes "^3051FD5x Mantis Leg^000000";
+		mes "^3051FD5x Worm Peeling^000000";
+		mes "^3051FD5x Rainbow Shell^000000";
+//==================================
+		next;
+		goto L_Menu2_6;
+L_Menu4_1:
+	if((countitem(1025) >= 5) && (countitem(935) >= 5) && (countitem(928) >= 5) && (SAGE_Q2 == 4)) goto L_Menu4_4;
+	if((countitem(1057) >= 5) && (countitem(946) >= 5) && (countitem(947) >= 5) && (SAGE_Q2 == 5)) goto L_Menu4_4;
+	if((countitem(1031) >= 5) && (countitem(955) >= 5) && (countitem(1013) >= 5) && (SAGE_Q2 == 6)) goto L_Menu4_4;
+	mes "[Lucias]";
+	mes "You forgot what you're supposed to gather?";
+	mes "Listen carefully this time!  You need to gather:";
+	next;
+		mes "[Lucias]";
+		if(SAGE_Q2 == 5) goto L_Menu4_2;
+		if(SAGE_Q2 == 6) goto L_Menu4_3;
+		mes "^3051FD5x Cobweb^000000";
+		mes "^3051FD5x Shell^000000";
+		mes "^3051FD5x Insect Feeler^000000";
+		close;
+	L_Menu4_2:
+		mes "^3051FD5x Moth Dust^000000";
+		mes "^3051FD5x Snail's Shell^000000";
+		mes "^3051FD5x Horn^000000";
+		close;
+	L_Menu4_3:
+		mes "^3051FD5x Mantis Leg^000000";
+		mes "^3051FD5x Worm Peeling^000000";
+		mes "^3051FD5x Rainbow Shell^000000";
+		close;
+L_Menu4_4:
+	set SAGE_Q2,7;
+	mes "[Lucias]";
+	mes "Excellent.  You've done well.";
+	mes "I hope you were also dilligent in observing your surroundings when you collected the items.";
+	next;
+	mes "[Lucias]";
+	mes "With insects, you'll need to carefully consider which magic to use, since insects have affinity with a variety of elements.";
+	next;
+	mes "[Lucias]";
+	mes "You should also be aware that Thief hiding and Assassin cloaking aren't effective against some insects.";
+	next;
+	mes "[Lucias]";
+	mes "Insects can also act in groups.";
+	mes "Often the insect bosses will have considerable numbers of subordinates.";
+	next;
+	mes "[Lucias]";
+	mes "Ant Lord Maya...";
+	mes "Queen Bee Mistress...";
+	mes "Goblin Chief Goldfinger...";
+	next;
+	mes "[Lucias]";
+	mes "If you face a boss monster alone, you had best prepare to die.";
+	mes "You ought to take a group of friends to face these creatures down.";
+	next;
+	mes "[Lucias]";
+	mes "Well, you've studied quite a bit.";
+	mes "Now you need to write a thesis.";
+	mes "You need some materials before you can begin writing it, however.";
+	mes "They are:";
+	next;
+	mes "[Lucias]";
+	mes "^3051FD1x Feather of Birds^000000 for your writing instrument.";
+	mes "^3051FD1x Animal Skin^000000 for the pages.";
+	mes "^3051FD1x Trunk^000000 to bind the pages.";
+	mes "^3051FD1x Squid Ink^000000 for your ink.";
+	mes "^3051FD1x Empty Bottle^000000 to store your ink.";
+	next;
+	mes "[Lucias]";
+	mes "We can get started when you return.";
+	close;
+L_Menu5_1:
+	if((countitem(916) >= 1) && (countitem(919) >= 1) && (countitem(1019) >= 1) && (countitem(1024) >= 1) && (countitem(713) >= 1) && (SAGE_Q2 == 7)) goto L_Menu5_2;
+	mes "[Lucias]";
+	mes "You need to gather those items first.";
+	mes "They are:";
+	next;
+	mes "[Lucias]";
+	mes "^3051FD1x Feather of Birds^000000 for your writing instrument.";
+	mes "^3051FD1x Animal Skin^000000 for the pages.";
+	mes "^3051FD1x Trunk^000000 to bind the pages.";
+	mes "^3051FD1x Squid Ink^000000 for your ink.";
+	mes "^3051FD1x Empty Bottle^000000 to store your ink.";
+	next;
+	mes "[Lucias]";
+	mes "You've done great so far.";
+	mes "Just a little more and you can graduate.";
+	close;
+L_Menu5_2:
+	delitem 916,1;
+	delitem 919,1;
+	delitem 1019,1;
+	delitem 1024,1;
+	delitem 713,1;
+	mes "[Lucias]";
+	mes "Looks like you have everything.";
+	next;
+	mes "[Lucias]";
+	mes "Now, you need to write this yourself.";
+	mes "I'm only taking an advisory role.";
+	next;
+	mes "[Lucias]";
+	mes "Are you ready to begin?";
+	mes "Let's see if you've acquired enough knowledge to write a coherent thesis.";
+	next;
+	mes "......";
+	next;
+	mes "......";
+	next;
+	mes "......";
+	next;
+	menu "Monsters come in different types",-;
+	mes "Monsters come in different types.";
+	menu "They have different elemental affinities",-;
+	mes "They have different elemental affinities.";
+	menu "If you know the monster's element beforehand...",-;
+	mes "If you know the monster's element beforehand...";
+	menu "...you can optimize your battle experience",-;
+	mes "...you can optimize your battle experience";
+	menu "You should especially be careful of...",-;
+	mes "You should especially be careful of...";
+	menu "...monsters with Holy and Darkness affinity",-;
+	mes "...monsters with Holy and Darkness affinity";
+	next;
+	mes "......";
+	next;
+	mes "......";
+	next;
+	mes "......";
+	next;
+	set SAGE_Q,11;
+	getitem 1550,1;
+	mes "[Lucias]";
+	mes "This is pretty good!";
+	mes "I'm proud of you!";
+	next;
+	mes "[Lucias]";
+	mes "Show this to the Headmaster and you'll be sure to graduate.";
+	mes "Good luck.";
+	close;
+L_Menu5_3:
+	mes "[Lucias]";
+	mes "Hmmm?  What's the matter?";
+	mes "You need to show your thesis to the Headmaster.";
+	close;
+L_Menu5_4:
+	mes "[Lucias]";
+	mes "Are you confused about something?";
+	mes "I'm pretty busy, so you need to make an appointment a week in advance.";
+	next;
+	mes "[Lucias]";
+	mes "Hahaha...Once you've been a Sage for awhile, you'll be saying the same thing.";
+	next;
+	mes "[Lucias]";
+	mes "Also, if you have some spare time,";
+	mes "you should head over to the dungeon and lie down on the floor.";
+	mes "Look up and study the ceiling.";
+	mes "You might learn something.";
+	close;
+}
+
+//=================================
+//Academy Interior
+//=================================
+
+yuno_in03.gat,154,35,4	script	Academy Staff	742,{
+	callfunc "F_BlockHigh",26,"High Mage",40,"Professor","Mathias";
+
+	if(BaseJob == Job_Sage) goto L_Menu6_4;
+	if(BaseJob != Job_Mage) goto L_Menu1_1;
+	if(SAGE_Q == 11) goto L_Menu6_3;
+	if(SAGE_Q >= 4) goto L_Menu6_2;
+	if(SAGE_Q == 3) goto L_Menu6_1;
+	if(SAGE_Q == 2) goto L_Menu5_1;
+	mes "[Mathias]";
+	mes "Hello.";
+	mes "This is the Shubaichul Magic Academy?";
+	mes "You seem to be a Magician.";
+	mes "How can I help you?";
+	next;
+	menu "Sage class-change information",-,"I want to apply for admission to the Academy",L_Menu3_1,"Forget it",L_Menu2;
+		mes "[Mathias]";
+		mes "You want to change class to Sage?";
+		mes "I can't just change your class right here.";
+		next;
+		mes "[Mathias]";
+		mes "You need to complete a program of rigorous coursework and research.";
+		next;
+		mes "[Mathias]";
+		mes "Once you graduate from the academy,";
+		mes "you can change class.";
+		mes "In order to proceed, you need to pay tuition and take the placement test.";
+		next;
+		mes "[Mathias]";
+		mes "Only those who have an ^3051FDOld Magic Book^000000 and a ^3051FDNecklace Of Wisdom^000000 can have tuition waived.";
+		next;
+		mes "[Mathias]";
+		mes "Once you've paid the fee, you first take the placement test.";
+		mes "If you score highly enough to be placed in our program, you then perform research according to your placement.";
+		mes "Finally, you must prepare and defend a thesis.";
+		next;
+		mes "[Mathias]";
+		mes "The Headmaster decides whether or not the thesis meets standards for graduation.";
+		mes "If he approves, you can formally begin your career as a Sage.";
+		next;
+		mes "[Mathias]";
+		mes "If you're interested, you need only file an application to get started.";
+		mes "Have a good day.";
+		close;
+L_Menu2:
+	mes "[Mathias]";
+	mes "Oh?";
+	mes "Are you hesitant?";
+	mes "See you later, then.";
+	close;
+L_Menu1_1:
+	mes "[Mathias]";
+	mes "Welcome.";
+	mes "This is Shubaichul Magic Academy.";
+	next;
+	mes "[Mathias]";
+	mes "We do research on magic and monsters here.";
+	mes "We also train fledgling Sages.";
+	next;
+	mes "[Mathias]";
+	mes "Any Magician who is at or above class level 40 can apply for admission to the Academy.";
+	mes "Once you complete our prescribed process for degree acquisition, you can become a Sage.";
+	next;
+	mes "[Mathias]";
+	mes "Good bye.";
+	close;
+L_Menu3_1:
+	mes "[Mathias]";
+	mes "You want to apply?  Wonderful!";
+	next;
+	mes "[Mathias]";
+	mes "In order to enter the Academy,";
+	mes "you need to be a Magician of class level 40 or above.";
+	mes "You will also need to pay tuition to cover instruction and materials.";
+	next;
+	mes "[Mathias]";
+	mes "Tuition is 70,000Zeny.";
+	mes "If you have an ^3051FDOld Magic Book^000000 or a ^3051FDNecklace Of Wisdom^000000, the tuition fee will be waived.";
+	next;
+	mes "[Mathias]";
+	mes "So, you would like to apply for admission?";
+	next;
+	menu "Yes, I would",L_Menu5_5,"Tuition is too expensive!",-,"I'll try again later",L_Menu3_2;
+		mes "[Mathias]";
+		mes "Well...we need the tuition money to cover instruction and materials...";
+		next;
+		menu "Isn't there another way?",-,"I'll try again later.",L_Menu3_2;
+		set SAGE_Q,2;
+		mes "[Mathias]";
+		mes "Well...Perhaps there is.  I can lower the tuition to 30000 Zeny if you can bring us some materials we need for our research department:";
+		next;
+		mes "[Mathias]";
+		mes "Specifically, we need:";
+		mes "^3051FD50x Feather of Birds^000000";
+		mes "^3051FD50x Fluff^000000";
+		mes "^3051FD50x Clover^000000";
+		mes "^3051FD50x Feathers^000000";
+		next;
+		mes "[Mathias]";
+		mes "If you can get all that, I'll discount the fee to 30000 Zeny.";
+		mes "Please do your best to collect them.";
+		next;
+		mes "[Mathias]";
+		mes "Of course, you can also acquire 70000 Zeny instead of gathering the items if you wish.";
+		next;
+		mes "[Mathias]";
+		mes "Please do your best to collect the items.";
+		mes "See you later.";
+		close;
+	L_Menu3_2:
+		mes "[Mathias]";
+		mes "Oh, alright.";
+		mes "Take your time.";
+		mes "Thanks for stopping by.";
+		close;
+L_Menu5_1:
+	mes "[Mathias]";
+	mes "So, would you like to apply for admission?";
+	next;
+	if(JobLevel < 40) goto L_Menu5_9;
+	if(countitem(1006) > 0) goto L_Menu5_4;
+	if(countitem(1007) > 0) goto L_Menu5_4_;
+	if(Zeny < 70000) goto L_Menu5_2;
+		set Zeny,Zeny-70000;
+		set SAGE_Q,3;
+		mes "[Mathias]";
+		mes "I see you have 70000 Zeny.";
+		mes "I'll take that for tuition. You are now enrolled into the school.";
+		next;
+	L_Menu5_5:
+		if(JobLevel < 40) goto L_Menu5_9;
+		mes "[Mathias]";
+		mes "We need your signature on this form to proceed.";
+		mes "Please sign at the X.";
+		next;
+		menu "" + strcharinfo(0) + "",-;
+		mes "[Mathias]";
+		mes "Alright, so you're ";
+		mes "" + strcharinfo(0) + ".";
+		mes "That's a nice name.";
+		next;
+			if(JobLevel == 50) goto L_JobMax;
+			if(SAGE_Q == 3) goto L_Menu5_6;
+			if(countitem(1006) > 0) goto L_Menu5_7;
+			if(countitem(1007) > 0) goto L_Menu5_7_;
+			if(Zeny < 70000) goto L_Menu5_2;
+			set Zeny,Zeny-70000;
+			set SAGE_Q,3;
+
+			mes "[Mathias]";
+		        mes "I see you have 70000 Zeny.";
+		        mes "I'll take that for tuition.";
+			mes "You are now enrolled into the school.";
+			next;
+
+		L_Menu5_6:
+			mes "[Mathias]";
+			mes "First, you need to take the placement test from Professor Kreitos.";
+			next;
+			mes "[Mathias]";
+			mes "Professor Kreitos is in the Academy library.";
+			mes "It's on the far left side of the building.";
+			next;
+			mes "[Mathias]";
+			mes "Good luck on the test.";
+			close;
+		L_JobMax:
+			set SAGE_Q,3;
+			mes "[Mathias]";
+			mes "You've trained yourself up to the maximum class level for Magicians!";
+			mes "In that case, I'll give you a full scholarship!";
+			next;
+			mes "[Mathias]";
+			mes "Now, all you need to do is go take the placement test.";
+			next;
+			mes "[Mathias]";
+			mes "Go see Professor Kreitos in the library on the far left side of the building.";
+			close;
+	L_Menu5_2:
+		if(SAGE_Q != 2) goto L_Menu5_8;
+		if((countitem(916) >= 50) && (countitem(914) >= 50) && (countitem(949) >= 50) && (countitem(705) >= 50)) goto L_Menu5_3;
+		mes "[Mathias]";
+		mes "You don't seem to have the materials yet.";
+		next;
+		mes "[Mathias]";
+		mes "You need to gather:";
+		mes "^3051FD50x Feather of Birds^000000";
+		mes "^3051FD50x Fluff^000000";
+		mes "^3051FD50x Clover^000000";
+		mes "^3051FD50x Feathers^000000";
+		next;
+		mes "[Mathias]";
+		mes "If you can get all that, I'll discount the fee to 30000 Zeny.";
+		mes "Please do your best to collect them.";
+		close;
+	L_Menu5_3:
+//==================================
+		if(Zeny < 30000) goto L_Menu5_8;
+		delitem 916,50;
+		delitem 914,50;
+		delitem 705,50;
+		delitem 949,50;
+		set Zeny,Zeny-30000;
+		set SAGE_Q,3;
+		mes "[Mathias]";
+		mes "It seems like you have the materials I asked for and 30000 Zeny.";
+		mes "Congratulations.";
+		mes "You're now enrolled in the Academy.";
+		set SAGE_Q,3;
+		next;
+		goto L_Menu5_5;
+	L_Menu5_4:
+		delitem 1006,1;
+		set SAGE_Q,3;
+		mes "[Mathias]";
+		mes "Oh, you have a ^3051FDOld Magic Book^000000.";
+		mes "I'll accept it in lieu of tuition.";
+		next;
+		goto L_Menu5_5;
+	L_Menu5_4_:
+		delitem 1007,1;
+		set SAGE_Q,3;
+		mes "[Mathias]";
+		mes "Oh, you have a ^3051FDNecklace Of Wisdom^000000.";
+		mes "I'll accept it in lieu of tuition.";
+		next;
+		goto L_Menu5_5;
+	L_Menu5_7:
+		delitem 1006,1;
+		set SAGE_Q,3;
+		mes "[Mathias]";
+		mes "Oh, you have a ^3051FDOld Magic Book^000000.";
+		mes "I'll accept it in lieu of tuition.";
+		next;
+		goto L_Menu5_6;
+	L_Menu5_7_:
+		delitem 1007,1;
+		set SAGE_Q,3;
+		mes "[Mathias]";
+		mes "Oh, you have a ^3051FDNecklace Of Wisdom^000000.";
+		mes "I'll accept it in lieu of tuition.";
+		next;
+		goto L_Menu5_6;
+	L_Menu5_8:
+		mes "[Mathias]";
+		mes "You don't seem to have enough money.";
+		mes "Please earn some money and return here.";
+		close;
+	L_Menu5_9:
+		mes "[Mathias]";
+		mes "Your class level is too low.";
+		mes "Complete some more training and return here.";
+		close;
+//==================================
+L_Menu6_1:
+	mes "[Mathias]";
+	mes "Hmmm?  Did you forget what you need to do next?";
+	mes "Head over and see Professor Kreitos on the left side of the building.";
+	close;
+L_Menu6_2:
+	mes "[Mathias]";
+	mes "Oh, forgive me.  I have so much to do that I can't help you at the moment.";
+	mes "Again, I apologize...";
+	close;
+L_Menu6_3:
+	mes "[Mathias]";
+	mes "Oh!  Did you finish your thesis?";
+	mes "You need to see Headmaster Keiron so he can evaluate it.";
+	next;
+	mes "[Mathias]";
+	mes "If he approves, you can graduate!";
+	mes "Good luck.";
+	close;
+L_Menu6_4:
+	mes "[Mathias]";
+	mes "Welcome, colleague.";
+	mes "How is your research coming along?";
+	next;
+	mes "[Mathias]";
+	mes "In order to be a truly great researcher, you need to supplement your book-based research with encounters with real monsters.";
+	next;
+	mes "[Mathias]";
+	mes "If you know others with what it takes to become a Sage, please send them here.";
+	mes "Give my regards to my other colleagues, also.";
+	close;
+}
+
+yuno_in03.gat,169,180,4	script	Test Professor	755,{
+	if(BaseJob == Job_Sage) goto L_Menu4_5;
+	if(BaseJob != Job_Mage) goto L_Menu1_1;
+	if(SAGE_Q == 5) goto L_Menu2_1;
+	if(SAGE_Q == 6) goto L_Menu2_3;
+	if(SAGE_Q == 7) goto L_Menu3_1;
+	if(SAGE_Q == 8) goto L_Menu4_1;
+	if(SAGE_Q == 9) goto L_Menu4_2;
+	if(SAGE_Q == 11) goto L_Menu4_4;
+	mes "[Hermes]";
+	mes "Hello, I'm Hermes.  I am part of the skill testing staff.";
+	mes "Are you a Sage candidate?";
+	next;
+	if(SAGE_Q == 3) goto L_Menu1_2;
+	if(SAGE_Q >= 3) goto L_Menu1_2;
+	mes "[Hermes]";
+	mes "Oh, alright.";
+	mes "First you need to enroll and take the placement test.";
+	close;
+L_Menu1_1:
+	mes "[Hermes]";
+	mes "This is Shubaichul Magic Academy.";
+	next;
+	mes "[Hermes]";
+	mes "There are Sages that are less magicians than researchers.";
+	mes "Having a party supporting this kind of person is extremely important.";
+	next;
+	mes "[Hermes]";
+	mes "Keep supporting your party to the best of your ability.";
+	mes "That's all you need to do.";
+	close;
+L_Menu1_2:
+	mes "[Hermes]";
+	mes "You need to take the placement test from Kreitos before you can take my test.";
+	close;
+L_Menu2_1:
+	set SAGE_Q,6;
+	mes "[Hermes]";
+	mes "Oh?  You took and passed the placement test?";
+	mes "Now you need to take the skill test from me.";
+	next;
+	mes "[Hermes]";
+	mes "The rules for the skill test are simple.";
+	mes "You need to kill all the monsters within the prescribed time limit.";
+	next;
+	mes "[Hermes]";
+	mes "There's an old proverb that one experience is worth a hundred words, so why not try it once?";
+	next;
+	menu "Sounds good",-,"I'm not ready yet",L_Menu2_2;
+		mes "[Hermes]";
+		mes "Well, let's get started.";
+		mes "Do your best!";
+		close2;
+		warp "job_sage",50,154;
+		end;
+	L_Menu2_2:
+		mes "[Hermes]";
+		mes "Okay.";
+		mes "Please prepare quickly.";
+		close;
+L_Menu2_3:
+	mes "[Hermes]";
+	mes "Are you ready to take the skill test?";
+	mes "It's not too tough.";
+	next;
+	mes "[Hermes]";
+	mes "How about it?";
+	next;
+	menu "Sounds good",-,"I'm not ready yet",L_Menu2_2;
+		mes "[Hermes]";
+		mes "Well, let's get started.";
+		mes "Do your best!";
+		close2;
+		warp "job_sage",50,154;
+		end;
+L_Menu3_1:
+	mes "[Hermes]";
+	mes "Good job!  You passed";
+	mes "the skill test!  Now you can proceed to the research phase!";
+	next;
+	mes "[Hermes]";
+	mes "Before I decide your research concentration, let's look at your score on the placement test and the amount of time you spent in the skill test.";
+	next;
+	mes "[Hermes]";
+	mes "Hmmm...";
+	mes "Looking good.";
+	next;
+
+//It's not clear how the script decides
+
+	if(sagecheck >= 12) goto L_Menu3_2;
+	set SAGE_Q,8;
+	mes "[Hermes]";
+	mes "It looks like monster research would be your best bet.";
+	next;
+	mes "[Hermes]";
+	mes "In order to gain the necessary information to put together a coherent research paper,";
+	mes "you should take the biology course from Professor Lucias.";
+	next;
+	goto L_Menu3_4;
+L_Menu3_2:
+	set SAGE_Q,9;
+	mes "[Hermes]";
+	mes "It looks like we have a budding elemental magic researcher here.";
+	mes "This field is fundamental to the advancement of magical knowledge.";
+	next;
+	mes "[Hermes]";
+	mes "You need to take a course from Professor Ebeshi in the biotech lab to gain a deeper understanding of elemental magic.";
+	next;
+L_Menu3_4:
+	mes "[Hermes]";
+	mes "I hope the coursework goes well.";
+	close;
+L_Menu4_1:
+	mes "[Hermes]";
+	mes "Weren't you listening?";
+	mes "You need to see Professor Lucias so you can begin your study of monster biology.";
+	close;
+L_Menu4_2:
+	mes "[Hermes]";
+	mes "Weren't you listening?";
+	mes "You need to see Professor Ebeshi so you can begin your study of elemental magic.";
+	close;
+L_Menu4_4:
+	mes "[Hermes]";
+	mes "Great job on completing your thesis, but you need to show it to the Headmaster.";
+	mes "He's the one who will judge whether or not you graduate.";
+	close;
+L_Menu4_5:
+	mes "[Hermes]";
+	mes "How are you?";
+	mes "Your face reveals that you've endured a lot of stress lately.";
+	next;
+	mes "[Hermes]";
+	mes "As stressful as hands-on research is,";
+	mes "it is still fundamentally different from research using abstract concepts.";
+	next;
+	mes "[Hermes]";
+	mes "Of course, if you go to difficult dungeons,";
+	mes "there's no shame in bringing a friend or five to help you out.";
+	close;
+}
+
+yuno_in03.gat,62,176,3	script	History Professor	109,{
+	if(BaseJob == Job_Sage) goto L_Menu2_2;
+	if(BaseJob != Job_Mage) goto L_Menu1_1;
+	if(SAGE_Q == 11) goto L_Menu2_1;
+	mes "[Sapien]";
+	mes "You don't seem sure of your intended direction of study.";
+	mes "Perhaps you should consider it...";
+	close;
+L_Menu1_1:
+	mes "[Sapien]";
+	mes "Yes, I teach history.";
+	next;
+	mes "[Sapien]";
+	mes "As the present fades into memory, it becomes the past.";
+	mes "The kwoledge we have acquired in the past is the bridge between the present and the future.";
+	next;
+	mes "[Sapien]";
+	mes "You should study your own past, too.";
+	mes "By understanding what's happened to you already,";
+	mes "you can blaze a trail into the future unhindered by unresolved problems.";
+	close;
+L_Menu2_1:
+	mes "[Sapien]";
+	mes "What are you doing?";
+	mes "Hurry up and show the Headmaster your thesis before you lose it!";
+	close;
+L_Menu2_2:
+	mes "[Sapien]";
+	mes "Yes...?";
+	mes "Ah, it's a former student here.";
+	mes "Congratulations on graduating.";
+	next;
+	mes "[Sapien]";
+	mes "The present can only be understood by understanding the past.";
+	mes "Such understanding allows us to envision our future.";
+	next;
+	mes "[Sapien]";
+	mes "You should study your own past, too.";
+	mes "By understanding what's happened to you already,";
+	mes "you can blaze a trail into the future unhindered by unresolved problems.";
+	close;
+}
+
+yuno_in03.gat,105,177,4	script	Placement Test Professor	754,{
+	if(BaseJob == Job_Sage) goto L_Menu3_4;
+	if(BaseJob != Job_Mage) goto L_Menu1_1;
+	if(SAGE_Q == 11) goto L_Menu3_3;
+	if(SAGE_Q >= 6) goto L_Menu3_2;
+	if(SAGE_Q == 3) goto L_Menu1_2;
+	if(SAGE_Q == 4) goto L_Menu2_1;
+	if(SAGE_Q == 5) goto L_Menu3_1;
+	mes "[Kreitos]";
+	mes "You have that look in your eye...";
+	mes "You want to be a Sage, I take it.";
+	next;
+	mes "[Kreitos]";
+	mes "You need to formally enroll in the Academy before I can help you any further.";
+	close;
+L_Menu1_1:
+	mes "[Kreitos]";
+	mes "Oh, you're not interested in our brand of magic?";
+	mes "That's alright...";
+	next;
+	mes "[Kreitos]";
+	mes "Anyone who teaches others and has a good heart is of value to society.";
+	mes "Please keep that in mind.";
+	close;
+L_Menu1_2:
+	set SAGE_Q,4;
+	set sagecheck,10;
+	mes "[Kreitos]";
+	mes "It looks like you've enrolled in the Shubaichul Magic Academy.";
+	mes "Is that right?";
+	next;
+	mes "[Kreitos]";
+	mes "So, let me find your paperwork...";
+	mes "You're " + strcharinfo(0) + ",";
+	mes "right?";
+	mes "Let's start the placement test.";
+	next;
+		mes "[Kreitos]";
+		mes "This test consists of twenty questions concerning the entire world.";
+		mes "If you score at least 80 points, you'll be placed in our program.";
+		mes "Each correct answer is worth 5 points.";
+		next;
+		mes "[Kreitos]";
+		mes "If you cancel, you'll have to start over, so be careful.";
+		next;
+		goto L_Menu2_2;
+	L_Menu2_1:
+		mes "[Kreitos]";
+		mes "Are you ready to try again?";
+		mes "Have you studied hard?";
+		next;
+		mes "[Kreitos]";
+		mes "The passing grade is as before.";
+		mes "You need to score 80 points, with each question being worth 5 points.";
+		next;
+		mes "[Kreitos]";
+		mes "So, let's get started.";
+		mes "Give it your best effort.";
+		mes "As before, if you cancel,";
+		mes "you'll have to start over.";
+		next;
+	L_Menu2_2:
+
+		set @sage_test2,0;
+		set @sage_test1,rand(3);
+		if (@sage_test1 == 1) goto L_Test2_1;
+		if (@sage_test1 == 2) goto L_Test3_1;
+
+//==================================
+//Written Test: Route 1.
+//==================================
+			mes "1. Which one isn't sold in Morocc's jewel shop?";
+			next;
+			menu "Topaz",L_Test1_1,"Garnet",-,"Diamond",L_Test1_1,"Sapphire",L_Test1_1;
+			set @sage_test2,@sage_test2+5;
+			goto L_Test1_1;
+		L_Test1_1:
+			mes "2. In which town can you not buy monster food?";
+			next;
+			menu "Prontera",L_Test1_2,"Morocc",L_Test1_2,"Aldebaran",-,"Alberta",L_Test1_2;
+			set @sage_test2,@sage_test2+5;
+		L_Test1_2:
+			mes "3. Which town is closest to the forest maze?";
+			next;
+			menu "Prontera",-,"Morocc",L_Test1_3,"Geffen",L_Test1_3,"Payon",L_Test1_3;
+			set @sage_test2,@sage_test2+5;
+		L_Test1_3:
+			mes "4. Which of these monsters is of a different race than the other three?";
+			next;
+			menu "Muka",L_Test1_4,"Drops",L_Test1_4,"Plankton",L_Test1_4,"Penomena",-;
+			set @sage_test2,@sage_test2+5;
+		L_Test1_4:
+			mes "5.  All these monsters except one have the same elemental affinity.";
+			mes "Which one has the different affinity?";
+			next;
+			menu "Dokebi",L_Test1_5,"Isis",L_Test1_5,"Giearth",-,"Deviruchi",L_Test1_5;
+			set @sage_test2,@sage_test2+5;
+		L_Test1_5:
+			mes "6. Which one differs in approximate size from the others?";
+			next;
+			menu "Male Thief Bug",L_Test1_6,"Horn",L_Test1_6,"Metaller",L_Test1_6,"Argos",-;
+			set @sage_test2,@sage_test2+5;
+		L_Test1_6:
+			mes "7.  Which of these monsters doesn't drop the Iggydrasil leaf?";
+			next;
+			menu "Marduk",-,"Baphomet Jr.",L_Test1_7,"Angeling",L_Test1_7,"Wander Man",L_Test1_7;
+			set @sage_test2,@sage_test2+5;
+		L_Test1_7:
+			mes "8.  Which of these people isn't related to someone who can perform a class change to priest?";
+			next;
+			menu "Peter S. Alberto",-,"Thomas Bishop",L_Test1_8,"Windser Banedict",L_Test1_8,"Sesil Magrita",L_Test1_8;
+			set @sage_test2,@sage_test2+5;
+		L_Test1_8:
+			mes "9. Which doesn't live in Morocc?";
+			next;
+			menu "Muda Armani",L_Test1_9,"Aragham",L_Test1_9,"Antonio",-,"Abldul",L_Test1_9;
+			set @sage_test2,@sage_test2+5;
+		L_Test1_9:
+			mes "10.  Which Kapra has the pretty blue hair?";
+			next;
+			menu "Pavianne",-,"Debril",L_Test1_10,"Claris",L_Test1_10,"Tayelin",L_Test1_10;
+			set @sage_test2,@sage_test2+5;
+		L_Test1_10:
+			mes "11.  Which one isn't necessary to unlock the Fire Wall skill?";
+			next;
+			menu "Firebolt Lv4",L_Test1_11,"Napalm Beat Lv4",-,"Fireball Lv5",L_Test1_11,"Sight Lv1",L_Test1_11;
+			set @sage_test2,@sage_test2+5;
+		L_Test1_11:
+			mes "12.  When the skill 'SP Restoration Lv6' is active, how much SP does the skill restore every ten seconds?";
+			next;
+			menu "14 sp",L_Test1_12,"16 sp",L_Test1_12,"18 sp",-,"21 sp",L_Test1_12;
+			set @sage_test2,@sage_test2+5;
+		L_Test1_12:
+			mes "13. If you are a magician with job lv. 33, how many additional stat points will you get for int?";
+			next;
+			menu "7",L_Test1_13,"6",L_Test1_13,"5",L_Test1_13,"4",-;
+			set @sage_test2,@sage_test2+5;
+		L_Test1_13:
+			mes "14.  If the Archer skill 'Concentration Up Lv5' is active, how much SP will it consume?";
+			next;
+			menu "45 / 140sec",-,"50 / 140sec",L_Test1_14,"45 / 150sec",L_Test1_14,"50 / 150sec",L_Test1_14;
+			set @sage_test2,@sage_test2+5;
+		L_Test1_14:
+			mes "15. Which one isn't necessary to unlock the Blacksmith skill 'Maximize Power'?";
+			next;
+			menu "Hilt Bending",L_Test1_15,"Skin Tempering",-,"Hammer Fall",L_Test1_15,"Weapon Perfection",L_Test1_15;
+			set @sage_test2,@sage_test2+5;
+		L_Test1_15:
+			mes "16. What is the defense power and supplemental ability of a Ribbon?";
+			next;
+			menu "0 / SP +20",L_Test1_16,"0 / SP +30",L_Test1_16,"1 / SP +20",-,"1 / SP +30",L_Test1_16;
+			set @sage_test2,@sage_test2+5;
+		L_Test1_16:
+			mes "17. Which class can't equip a Saint Robe?";
+			next;
+		//Swordsmen can't equip it either as of this writing.
+			menu "Swordsman",-,"Merchant",L_Test1_17,"Thief",-,"Acolyte",L_Test1_17;
+			set @sage_test2,@sage_test2+5;
+		L_Test1_17:
+			mes "18. Which status ailment can't be removed with a Green Potion?";
+			next;
+			menu "Mute",L_Test1_18,"Poison",L_Test1_18,"Blind",L_Test1_18,"Cursed",-;
+			set @sage_test2,@sage_test2+5;
+		L_Test1_18:
+			mes "19. What is the name of the ancient kingdom from which Geffen descends?";
+			next;
+			menu "Gefin",L_Test1_19,"Geffenia",-,"Gefdoria",L_Test1_19,"Gefria",L_Test1_19;
+			set @sage_test2,@sage_test2+5;
+		L_Test1_19:
+			mes "20. Which tree is said to be the world's root?";
+			next;
+			menu "Igg Drasil",-,"Idrasil",L_Menu2_3,"Master",L_Menu2_3,"Old Tree",L_Menu2_3;
+			set @sage_test2,@sage_test2+5;
+			goto L_Menu2_3;
+	//==================================
+	//Written Test: Route 2.
+	//==================================
+		L_Test2_1:
+			mes "1. Which isn't sold in Geffen's magic shop?";
+			next;
+			menu "Mantle",-,"Wand",L_Test2_2,"Circlet",L_Test2_2,"Silver Robe",L_Test2_2;
+			set @sage_test2,@sage_test2+5;
+		L_Test2_2:
+			mes "2. Which town doesn't sell blades?";
+			next;
+			menu "Prontera",L_Test2_3,"Izlude",L_Test2_3,"Aldebaran",-,"payon",L_Test2_3;
+			set @sage_test2,@sage_test2+5;
+		L_Test2_3:
+			mes "3. Which town is nearest to Glast Heim?";
+			next;
+			menu "Prontera",L_Test2_4,"Geffen",-,"Morocc",L_Test2_4,"Payon",L_Test2_4;
+			set @sage_test2,@sage_test2+5;
+		L_Test2_4:
+			mes "4.  Which monster's type differs from the other three?";
+			next;
+			menu "Aster",L_Test2_5,"Marc",L_Test2_5,"Marse",L_Test2_5,"Marin",-;
+			set @sage_test2,@sage_test2+5;
+		L_Test2_5:
+			mes "5. Which monster's elemental affinity is different from the others?";
+			next;
+			menu "Desert Wolf Babe",L_Test2_6,"Smokie",-,"Picky",L_Test2_6,"Choco",L_Test2_6;
+			set @sage_test2,@sage_test2+5;
+		L_Test2_6:
+			mes "6. Which monster is in a different size class than the others?";
+			next;
+			menu "Drake",-,"Wraith",L_Test2_7,"Evil Druid",L_Test2_7,"Khalitzburg",L_Test2_7;
+			set @sage_test2,@sage_test2+5;
+		L_Test2_7:
+			mes "7. Which monster doesn't drop Phracon?";
+			next;
+			menu "Pupa",L_Test2_8,"Condor",-,"Savage Baby",L_Test2_8,"Desert Wolf Babe",L_Test2_8;
+			set @sage_test2,@sage_test2+5;
+		L_Test2_8:
+			mes "8. Who isn't involved in the Blacksmith class change?";
+			next;
+// =========================
+// Acording To mRO Site And eAthena Blacksmith Script the following ppl looking like ppl listed here are:
+// - Baisulitst - looks like some1 listed by mRO
+// - Wickebine - mRO has him as option listed
+// - Gromgast - mRO has him as option listed
+// - Mitmayer - translator has him listed as option
+// == Conclusion == I took the following:
+// =========================
+			menu "Baisulitst",L_Test2_9,"Wickebine",L_Test2_9,"Barkdale",-,"Mitmayer",L_Test2_9;
+			set @sage_test2,@sage_test2+5;
+		L_Test2_9:
+			mes "9.  Who doesn't live in Aldebaran?";
+			next;
+			menu "RS125",L_Test2_10,"Maasaru",-,"Munster",L_Test2_10,"Isenberg",L_Test2_10;
+			set @sage_test2,@sage_test2+5;
+		L_Test2_10:
+			mes "10. Who is the youngest person in the Kapra organization?";
+			next;
+			menu "Deflute",L_Test2_11,"Claris",L_Test2_11,"Tayelin",L_Test2_11,"Curly Sue",-;
+			set @sage_test2,@sage_test2+5;
+		L_Test2_11:
+			mes "11. When you use the skill 'Safety Wall Lv6', how much SP is consumed and how many attacks will it block?";
+			next;
+			menu "SP 40, 6bl",L_Test2_12,"SP 35, 6bl",L_Test2_12,"SP 35, 7bl",L_Test2_12,"SP 40, 7bl",-;
+			set @sage_test2,@sage_test2+5;
+		L_Test2_12:
+			mes "12. When you use 'Napalm Beat Lv6', what is the attack power relative to MATK?";
+			next;
+			menu "1.2x MATK",L_Test2_13,"1.3x MATK",-,"1.4x MATK",L_Test2_13,"1.5x MATK",L_Test2_13;
+			set @sage_test2,@sage_test2+5;
+		L_Test2_13:
+			mes "13. Which one catalyzes the reaction of Liquid #4 during the Magician class change test?";
+			next;
+			menu "Blue Gemstone",L_Test2_14,"Red Gemstone",L_Test2_14,"Orange Gemstone",L_Test2_14,"Carat Diamond",-;
+			set @sage_test2,@sage_test2+5;
+		L_Test2_14:
+			mes "14. What is the damage multiplier and SP consumption for 'Bash Lv6'?";
+			next;
+			menu "250% / 8",L_Test2_15,"280% / 8",L_Test2_15,"280% / 15",-,"310% / 15",L_Test2_15;
+			set @sage_test2,@sage_test2+5;
+		L_Test2_15:
+			mes "15.  Which isn't necessary to unlock the Hunter skill 'Claymore Trap'?";
+			next;
+			menu "Remove Trap",-,"Land Mine",L_Test2_16,"Ankle Snare",L_Test2_16,"Flash",L_Test2_16;
+			set @sage_test2,@sage_test2+5;
+		L_Test2_16:
+			mes "16. What is the defense power and supplemental ability of a Veil?";
+			next;
+			menu "0 / MDEF +3",L_Test2_17,"0 / MDEF +5",-,"1 / MDEF +3",L_Test2_17,"1 / MDEF +5",L_Test2_17;
+			set @sage_test2,@sage_test2+5;
+		L_Test2_17:
+			mes "17.  Which class can't equip a Coat?";
+			next;
+			menu "Swordsman",L_Test2_18,"Magician",L_Test2_18,"Thief",L_Test2_18,"Novice",-;
+			set @sage_test2,@sage_test2+5;
+		L_Test2_18:
+			mes "18. Which item isn't blue in color?";
+			next;
+			menu "Alcohol",L_Test2_19,"Detrimindexta",-,"Karvodailnirol",L_Test2_19,"Blue Herb",L_Test2_19;
+			set @sage_test2,@sage_test2+5;
+		L_Test2_19:
+			mes "19. Which item did the god Odin use to create the world?";
+			next;
+//			menu "Yomir's Heart",L_Test2_20,"Yomir's Nail",-,"Yomir's Tooth",L_Test2_20,"Yomir's Stuff",L_Test2_20;
+// All answers correct untill i know the real answer, only Stuff is wrong cause that NOT it
+			menu "Yomir's Heart",-,"Yomir's Nail",-,"Yomir's Tooth",-,"Yomir's Stuff",L_Test2_20;
+			set @sage_test2,@sage_test2+5;
+		L_Test2_20:
+			mes "20. Which metal can change the fate of the world?";
+			next;
+			menu "Envertacon",L_Menu2_3,"Emperium",-,"Enbera",L_Menu2_3,"Phracon",L_Menu2_3;
+			set @sage_test2,@sage_test2+5;
+			goto L_Menu2_3;
+//==================================
+//Written Test: Route 3.
+//==================================
+		L_Test3_1:
+			mes "1.Which of these items isn't sold at Prontera's knicknack shop?";
+			next;
+			menu "White Plate",L_Test3_2,"Red Frame",L_Test3_2,"Flower",-,"Glass Ball",L_Test3_2;
+			set @sage_test2,@sage_test2+5;
+		L_Test3_2:
+			mes "2. Which town doesn't sell stilettos?";
+			next;
+			menu "Prontera",-,"Morocc",L_Test3_3,"Gefen",L_Test3_3,"Lutie",L_Test3_3;
+			set @sage_test2,@sage_test2+5;
+		L_Test3_3:
+			mes "3. Which town is closest to Turtle Island?";
+			next;
+			menu "Aldebaran",L_Test3_4,"Alberta",-,"Comodo",L_Test3_4,"Izlude",L_Test3_4;
+			set @sage_test2,@sage_test2+5;
+		L_Test3_4:
+			mes "4. Which monster is of a different monster race than the other three?";
+			next;
+			menu "Raggler",L_Test3_5,"Pest",L_Test3_5,"Frilldora",L_Test3_5,"Aster",-;
+			set @sage_test2,@sage_test2+5;
+		L_Test3_5:
+			mes "5. Which monster has a different elemental affinity than the other three?";
+			next;
+			menu "Mantis",L_Test3_6,"Metaller",-,"Rokker",L_Test3_6,"Horn",L_Test3_6;
+			set @sage_test2,@sage_test2+5;
+		L_Test3_6:
+			mes "6. Which monster is in a different size class than the others?";
+			next;
+			menu "Raydric",-,"Raydric Archer",L_Test3_7,"Wander Man",L_Test3_7,"Dark Flame",L_Test3_7;
+			set @sage_test2,@sage_test2+5;
+		L_Test3_7:
+			mes "7. Which monster doesn't drop alcohol?";
+			next;
+			menu "Horn",L_Test3_8,"Plankton",L_Test3_8,"Poison Spore",-,"Toad",L_Test3_8;
+			set @sage_test2,@sage_test2+5;
+		L_Test3_8:
+			mes "8. Which isn't involved in the Knight class change?";
+			next;
+// =========================
+// Acording To mRO Site And eAthena Knight Script the following ppl looking like ppl listed here
+// =========================
+			menu "James Syracuse",L_Test3_9,"Thomas Bishop",-,"Amy Veattris",L_Test3_9,"Edmond Groster",L_Test3_9;
+			set @sage_test2,@sage_test2+5;
+		L_Test3_9:
+			mes "9. Which of these people doesn't live in Prontera?";
+			next;
+			menu "Nami",L_Test3_10,"Aldefun",-,"Thomas",L_Test3_10,"Hollengrhen",L_Test3_10;
+			set @sage_test2,@sage_test2+5;
+		L_Test3_10:
+			mes "10. Which Kapra wears glasses?";
+			next;
+			menu "Deflute",L_Test3_11,"Tayelin",L_Test3_11,"Leilah",-,"Debril",L_Test3_11;
+			set @sage_test2,@sage_test2+5;
+		L_Test3_11:
+			mes "11. How much SP does it cost to use 'Thunderstorm Lv7'?";
+			next;
+			menu "49",L_Test3_12,"59",-,"69",L_Test3_12,"74",L_Test3_12;
+			set @sage_test2,@sage_test2+5;
+		L_Test3_12:
+			mes "12. If you have 50% of your SP left, how much damage will 'Energy Coat' block and how much SP will be consumed?";
+			next;
+			menu "24% blocked SP1.5% consumed",L_Test3_13,"24% blocked SP2% consumed",L_Test3_13,"18% blocked SP1.5% consumed",L_Test3_13,"18% blocked SP2% consumed",-;
+			set @sage_test2,@sage_test2+5;
+		L_Test3_13:
+			mes "13. Which element cannot be used in bolt form by a Magician?";
+			next;
+			menu "Water",L_Test3_14,"Earth",-,"Fire",L_Test3_14,"Wind",L_Test3_14;
+			set @sage_test2,@sage_test2+5;
+		L_Test3_14:
+			mes "14. When a thief has the skill 'Double Attack Lv7', what is the trigger probability and attack power multiplier?";
+			next;
+			menu "35% / 120%",L_Test3_15,"35% / 140%",-,"40% / 120%",L_Test3_15,"40% / 140%",L_Test3_15;
+			set @sage_test2,@sage_test2+5;
+		L_Test3_15:
+			mes "15. Which of these isn't necessary to unlock the Priest skill 'Magnus Exorcism'?";
+			next;
+			menu "Divine Protection",-,"Heal",L_Test3_16,"Revive",L_Test3_16,"Aqua Benedicta",L_Test3_16;
+			set @sage_test2,@sage_test2+5;
+		L_Test3_16:
+			mes "16. What is the defense power and supplemental ability of a Bunny Band?";
+			next;
+			menu "1 / LUK +2",L_Test3_17,"1 / LUK +5",L_Test3_17,"2 / LUK +2",-,"2 / LUK +5",L_Test3_17;
+			set @sage_test2,@sage_test2+5;
+		L_Test3_17:
+			mes "17. Which class can't equip armor?";
+			next;
+			menu "Swordsman",L_Test3_18,"Merchant",L_Test3_18,"Thief",L_Test3_18,"Archer",-;
+			set @sage_test2,@sage_test2+5;
+		L_Test3_18:
+			mes "18. Which item completely restores HP and SP?";
+			next;
+			menu "Royal Jelly",L_Test3_19,"Ig Drasil Seed",L_Test3_19,"Ig Drasil Fruit",-,"Master Fruit",L_Test3_19;
+			set @sage_test2,@sage_test2+5;
+		L_Test3_19:
+			mes "19. What's the name of the king of Rune-Midgard?";
+			next;
+			menu "Trisdan III",L_Test3_20,"Tristan III",-,"Traisda III",L_Test3_20,"Trist III",L_Test3_20;
+			set @sage_test2,@sage_test2+5;
+		L_Test3_20:
+			mes "20. Which god do Crusaders serve?";
+			next;
+			menu "Odin",-,"Loki",L_Menu2_3,"Tooru",L_Menu2_3,"Aragamsaree",L_Menu2_3;
+			set @sage_test2,@sage_test2+5;
+
+		L_Menu2_3:
+			mes "[Kreitos]";
+			mes "Are you finished?";
+			mes "Alright, then I'll grade the test.";
+			next;
+			mes "[Kreitos]";
+			mes "Hmmm...";
+			mes "Yes....";
+			next;
+			if (@sage_test2 >= 100) goto L_Menu2_5;
+			if (@sage_test2 < 80) goto L_Menu2_4;
+			mes "[Kreitos]";
+			mes "All done.";
+			mes "You scored " + @sage_test2 + " points.";
+			mes "Looking good.";
+			mes "You've scored highly enough to pass.";
+			next;
+			goto L_Menu2_6;
+		L_Menu2_4:
+			set sagecheck,sagecheck-1;
+			mes "[Kreitos]";
+			mes "All done.";
+			mes "You scored " + @sage_test2 + " points.";
+			mes "......";
+			mes "Sorry, that's not good enough.";
+			next;
+			mes "[Kreitos]";
+			mes "We exepect our students to have command of much information about the world.";
+			mes "Learn some more and come back.";
+                        mes "You can take the test again then.";
+			close;
+ 		L_Menu2_5:
+			mes "[Kreitos]";
+			mes "All done.";
+			mes "You scored " + @sage_test2 + " points.";
+			mes "Amazing.  You did wonderfully.";
+			mes "There is no doubt you'll make a great Sage.";
+			next;
+		L_Menu2_6:
+			set SAGE_Q,5;
+			mes "[Kreitos]";
+			mes "Alright.";
+			mes "You've completed the placement test.";
+			mes "Now you need to take the skill test from Professor Hermes.";
+			close;
+L_Menu3_1:
+	mes "[Kreitos]";
+	mes "Heh?";
+	mes "Do you love tests so much that you want to take the placement test again?";
+	next;
+	mes "[Kreitos]";
+	mes "Go see Professor Hermes and take the skill test.";
+	mes "Future Sages can't be slacking off.";
+	close;
+L_Menu3_2:
+	mes "[Kreitos]";
+	mes "I'm busy grading other students' exams at the moment.";
+	mes "If you need something, please see me later.";
+	close;
+L_Menu3_3:
+	mes "[Kreitos]";
+	mes "It's great that you finished your thesis, but I don't grade those.";
+	next;
+	mes "[Kreitos]";
+	mes "Show that to Headmaster Keiron.";
+	mes "He'll judge whether or not it's quality warrants your graduation.";
+	close;
+L_Menu3_4:
+	mes "[Kreitos]";
+	mes "You've graduated already?";
+	mes "Do you want to take more classes?";
+	next;
+	mes "[Kreitos]";
+	mes "I know it feels great to have graduated, but you've got to keep learning.";
+	mes "You might burn out if you become complacent and never venture out of the library once in a while.";
+	mes "Danger is exhilerating.";
+	next;
+	mes "[Kreitos]";
+	mes "Don't forget to keep notes about your journies.";
+	mes "They can come in handy when you want to teach others about a subject you've studied.";
+	close;
+}
+
+//==================================
+//Skill Test Room
+//==================================
+
+job_sage.gat,50,165,4	script	Skill Test Coordinator::jobsage_wroom	700,{
+	mes "[Skill Test Coordinator]";
+	mes "Welcome to the Sage skill test.";
+	mes "Please go to the waiting area if you want to take the test.";
+	next;
+	mes "[Skill Test Coordinator]";
+	mes "Others are being tested at the moment.";
+	mes "When it's time for you to be tested, we'll call your name.";
+	next;
+	mes "[Skill Test Coordinator]";
+	mes "It takes around 5-10 minutes to test one person.";
+	close;
+OnInit:
+	waitingroom "Test Waiting Area",10,"jobsage_wroom::OnStart",1;
+	end;
+OnStart:
+	disablewaitingroomevent;
+	warpwaitingpc "job_sage.gat",118,99;
+	set $@jobsage_pid,$@warpwaitingpc[0];
+	if( attachrid($@jobsage_pid)==0 ) goto L_Error;
+		set $@jobsage_pname$,strcharinfo(0);
+		donpcevent "jobsage_1st::OnStart";
+		end;
+L_Error:
+	enablewaitingroomevent;
+	end;
+OnEnable:
+	enablewaitingroomevent;
+	end;
+}
+
+//======== Test Step 1
+job_sage.gat,1,1,1	script	jobsage_1st	-1,{
+	end;
+OnStart:
+	set $@jobsage_m,16;
+	monster "job_sage.gat",115,106,"Unit",1183,1,"jobsage_1st::OnKilled";
+	monster "job_sage.gat",120,102,"Unit",1183,1,"jobsage_1st::OnKilled";
+	monster "job_sage.gat",124,98,"Unit",1183,1,"jobsage_1st::OnKilled";
+	monster "job_sage.gat",120,93,"Unit",1183,1,"jobsage_1st::OnKilled";
+	monster "job_sage.gat",115,90,"Unit",1183,1,"jobsage_1st::OnKilled";
+	monster "job_sage.gat",111,93,"Unit",1183,1,"jobsage_1st::OnKilled";
+	monster "job_sage.gat",107,98,"Unit",1183,1,"jobsage_1st::OnKilled";
+	monster "job_sage.gat",111,102,"Unit",1183,1,"jobsage_1st::OnKilled";
+	monster "job_sage.gat",128,110,"Unit",1184,1,"jobsage_1st::OnKilled";
+	monster "job_sage.gat",124,106,"Unit",1184,1,"jobsage_1st::OnKilled";
+	monster "job_sage.gat",124,89,"Unit",1184,1,"jobsage_1st::OnKilled";
+	monster "job_sage.gat",128,85,"Unit",1184,1,"jobsage_1st::OnKilled";
+	monster "job_sage.gat",107,89,"Unit",1184,1,"jobsage_1st::OnKilled";
+	monster "job_sage.gat",103,85,"Unit",1184,1,"jobsage_1st::OnKilled";
+	monster "job_sage.gat",107,106,"Unit",1184,1,"jobsage_1st::OnKilled";
+	monster "job_sage.gat",103,110,"Unit",1184,1,"jobsage_1st::OnKilled";
+	initnpctimer;
+	end;
+OnReset:
+	killmonster "job_sage.gat","All";
+	end;
+OnKilled:
+	set $@jobsage_m,$@jobsage_m-1;
+	if( $@jobsage_m > 0 )goto L_NotWin;
+	if(getnpctimer(0) < 60000 ) set sagecheck,sagecheck+1;
+	if((getnpctimer(0) >= 120000 ) && (getnpctimer(0) <= 170000 )) set sagecheck,sagecheck-1;
+	if(getnpctimer(0) > 170000 ) set sagecheck,sagecheck-2;
+		stopnpctimer;
+		mapannounce "job_sage.gat","Examiner: " + $@jobsage_pname$ + " killed all the monsters!",8;
+		donpcevent "jobsage_2nd::OnStart";
+	L_NotWin:
+	end;
+OnTimer1000:
+	mapannounce "job_sage.gat","Examiner: The skill test begins now.",8;
+	end;
+OnTimer2500:
+	mapannounce "job_sage.gat","Examiner: The time limit for this portion of the test is 3 minutes.",8;
+	end;
+OnTimer4000:
+	mapannounce "job_sage.gat","Examiner: You must kill all the monsters within that time period.",8;
+	end;
+OnTimer30000:
+	mapannounce "job_sage.gat","Examiner: 2 minutes, 30 seconds remaining.",8;
+	end;
+OnTimer60000:
+	mapannounce "job_sage.gat","Examiner: 2 minutes remaining.",8;
+	end;
+OnTimer90000:
+	mapannounce "job_sage.gat","Examiner: 1 minute, 30 seconds remaining.",8;
+	end;
+OnTimer120000:
+	mapannounce "job_sage.gat","Examiner: 1 minute remaining.",8;
+	end;
+OnTimer150000:
+	mapannounce "job_sage.gat","Examiner: 30 seconds remaining.",8;
+	end;
+OnTimer170000:
+	mapannounce "job_sage.gat","Examiner: 10 seconds remaining.",8;
+	end;
+OnTimer180000:
+	donpcevent "jobsage_1st::OnReset";
+	mapannounce "job_sage.gat","Examiner: Time has expired.",8;
+	end;
+OnTimer181500:
+	mapannounce "job_sage.gat","Examiner:" + $@jobsage_pname$ + "failed the test.",8;
+	areawarp "job_sage.gat",100,82,131,113,"yuno.gat",324,258;
+	end;
+OnTimer183000:
+	mapannounce "job_sage.gat","Next candidate, please step forward.",8;
+	end;
+OnTimer184000:
+	donpcevent "jobsage_wroom::OnEnable";
+	stopnpctimer;
+	end;
+}
+
+//======== Test Step 2
+job_sage.gat,1,1,1	script	jobsage_2nd	-1,{
+	end;
+OnStart:
+	donpcevent "jobsage_2nd::OnReset";
+	set $@jobsage_m,24;
+	monster "job_sage.gat",120,102,"GeographyInfo",1063,1,"jobsage_2nd::OnKilled";
+	monster "job_sage.gat",120,102,"StatisticsInfo",1063,1,"jobsage_2nd::OnKilled";
+	monster "job_sage.gat",120,102,"MeteorologyInfo",1063,1,"jobsage_2nd::OnKilled";
+	monster "job_sage.gat",120,102,"AstronomyInfo",1063,1,"jobsage_2nd::OnKilled";
+	monster "job_sage.gat",120,102,"LinguisticsInfo",1063,1,"jobsage_2nd::OnKilled";
+	monster "job_sage.gat",120,102,"CityLifeInfo",1063,1,"jobsage_2nd::OnKilled";
+	monster "job_sage.gat",124,98,"ForestryInfo",1063,1,"jobsage_2nd::OnKilled";
+	monster "job_sage.gat",124,98,"HealthInfo",1063,1,"jobsage_2nd::OnKilled";
+	monster "job_sage.gat",124,98,"PsychologyInfo",1063,1,"jobsage_2nd::OnKilled";
+	monster "job_sage.gat",120,93,"AnthropologyInfo",1063,1,"jobsage_2nd::OnKilled";
+	monster "job_sage.gat",120,93,"BiologyInfo",1063,1,"jobsage_2nd::OnKilled";
+	monster "job_sage.gat",120,93,"EthicsInfo",1063,1,"jobsage_2nd::OnKilled";
+	monster "job_sage.gat",111,93,"ArchitectureInfo",1063,1,"jobsage_2nd::OnKilled";
+	monster "job_sage.gat",111,93,"PlasticsInfo",1063,1,"jobsage_2nd::OnKilled";
+	monster "job_sage.gat",111,93,"NutritionInfo",1063,1,"jobsage_2nd::OnKilled";
+	monster "job_sage.gat",111,93,"FoodInfo",1063,1,"jobsage_2nd::OnKilled";
+	monster "job_sage.gat",111,93,"ManagementInfo",1063,1,"jobsage_2nd::OnKilled";
+	monster "job_sage.gat",111,93,"SociologyInfo",1063,1,"jobsage_2nd::OnKilled";
+	monster "job_sage.gat",107,98,"EconomicsInfo",1063,1,"jobsage_2nd::OnKilled";
+	monster "job_sage.gat",107,98,"MagicInfo",1063,1,"jobsage_2nd::OnKilled";
+	monster "job_sage.gat",107,98,"PoliSciInfo",1063,1,"jobsage_2nd::OnKilled";
+	monster "job_sage.gat",111,102,"MathInfo",1063,1,"jobsage_2nd::OnKilled";
+	monster "job_sage.gat",111,102,"HistoryInfo",1063,1,"jobsage_2nd::OnKilled";
+	monster "job_sage.gat",111,102,"PhysicsInfo",1063,1,"jobsage_2nd::OnKilled";
+	initnpctimer;
+	end;
+OnReset:
+	killmonster "job_sage.gat","All";
+	end;
+OnKilled:
+	set $@jobsage_m,$@jobsage_m-1;
+	if( $@jobsage_m > 0 )goto L_NotWin;
+		stopnpctimer;
+		if(getnpctimer(0) < 60000 ) set sagecheck,sagecheck+1;
+		if((getnpctimer(0) >= 120000 ) && (getnpctimer(0) <= 170000 )) set sagecheck,sagecheck-1;
+		if(getnpctimer(0) > 170000 ) set sagecheck,sagecheck-2;
+		mapannounce "job_sage.gat","Examiner: " + $@jobsage_pname$ + " killed all the monsters!",8;
+		donpcevent "jobsage_3rd::OnStart";
+	L_NotWin:
+	end;
+OnTimer1500:
+	mapannounce "job_sage.gat","Examiner: The time limit for this portion of the test is 3 minutes.",8;
+	end;
+OnTimer3000:
+	mapannounce "job_sage.gat","Examiner: You must kill all the monsters within that time period.",8;
+	end;
+OnTimer30000:
+	mapannounce "job_sage.gat","Examiner: 2 minutes, 30 seconds remaining.",8;
+	end;
+OnTimer60000:
+	mapannounce "job_sage.gat","Examiner: 2 minutes remaining.",8;
+	end;
+OnTimer90000:
+	mapannounce "job_sage.gat","Examiner: 1 minute, 30 seconds remaining.",8;
+	end;
+OnTimer120000:
+	mapannounce "job_sage.gat","Examiner: 1 minute remaining.",8;
+	end;
+OnTimer150000:
+	mapannounce "job_sage.gat","Examiner: 30 seconds remaining.",8;
+	end;
+OnTimer170000:
+	mapannounce "job_sage.gat","Examiner: 10 seconds remaining.",8;
+	end;
+OnTimer180000:
+	donpcevent "jobsage_2nd::OnReset";
+	mapannounce "job_sage.gat","Examiner: Time has expired.",8;
+	end;
+OnTimer181500:
+	mapannounce "job_sage.gat","Examiner: " + $@jobsage_pname$ + "has failed the test.",8;
+	areawarp "job_sage.gat",100,82,131,113,"yuno.gat",324,258;
+	end;
+OnTimer183000:
+	mapannounce "job_sage.gat","Next candidate, please step forward.",8;
+	end;
+OnTimer184000:
+	donpcevent "jobsage_wroom::OnEnable";
+	stopnpctimer;
+	end;
+}
+
+
+//======== Test Step 3
+job_sage.gat,1,1,1	script	jobsage_3rd	-1,{
+	end;
+OnStart:
+	donpcevent "jobsage_3rd::OnReset";
+	set $@jobsage_m,1;
+	monster "job_sage.gat",116,98,"Bachelor",1179,1,"jobsage_3rd::OnKilled";
+	monster "job_sage.gat",124,106,"Tardy",1185,1;
+	monster "job_sage.gat",124,89,"Loaner",1185,1;
+	monster "job_sage.gat",107,89,"Cheater",1185,1;
+	monster "job_sage.gat",107,106,"Absentee",1185,1;
+	initnpctimer;
+	end;
+OnReset:
+	end;
+OnKilled:
+	set $@jobsage_m,$@jobsage_m-1;
+	if( $@jobsage_m > 0 )goto L_NotWin;
+		stopnpctimer;
+		killmonster "job_sage.gat","All";
+		set SAGE_Q,7;
+		if(getnpctimer(0) < 20000 ) set sagecheck,sagecheck+1;
+		if((getnpctimer(0) >= 30000 ) && (getnpctimer(0) <= 50000 )) set sagecheck,sagecheck-1;
+		if(getnpctimer(0) > 50000 ) set sagecheck,sagecheck-2;
+		mapannounce "job_sage.gat","Examiner: Congratulations. " + $@jobsage_pname$ + "passed the test!",8;
+		donpcevent "jobsage_success::OnSuccess";
+	L_NotWin:
+	end;
+OnTimer1500:
+	mapannounce "job_sage.gat","Examiner: 1 minute remaining.",8;
+	end;
+OnTimer30000:
+	mapannounce "job_sage.gat","Examiner: 30 seconds remaining.",8;
+	end;
+OnTimer50000:
+	mapannounce "job_sage.gat","Examiner: 10 seconds remaining.",8;
+	end;
+OnTimer60000:
+	donpcevent "jobsage_3rd::OnReset";
+	mapannounce "job_sage.gat","Examiner: Time has expired.",8;
+	end;
+OnTimer61500:
+	mapannounce "job_sage.gat","Examiner: " + $@jobsage_pname$ + "failed the test.",8;
+	areawarp "job_sage.gat",100,82,131,113,"yuno.gat",324,258;
+	end;
+OnTimer63000:
+	mapannounce "job_sage.gat","Examiner: This concludes the test.  Next candidate, please step forward.",8;
+	end;
+OnTimer64000:
+	donpcevent "jobsage_wroom::OnEnable";
+	stopnpctimer;
+	end;
+}
+
+//======== Successful
+job_sage.gat,1,7,1	script	jobsage_success	66,{
+OnSuccess:
+	killmonster "job_sage.gat","All";
+	initnpctimer;
+	end;
+OnTimer3000:
+	mapannounce "job_sage.gat","Examiner: Please allow me to guide you out.",8;
+	end;
+OnTimer6000:
+	mapannounce "job_sage.gat","Next candidate, please step forward.",8;
+	areawarp "job_sage.gat",100,82,131,113,"yuno_in03.gat",163,180;
+	end;
+OnTimer7000:
+	donpcevent "jobsage_wroom::OnEnable";
+	stopnpctimer;
+	end;
+}
+
+//==============================================================================
+// mapflag
+//==============================================================================
+job_sage.gat	mapflag	nomemo
+job_sage.gat	mapflag	noteleport
+job_sage.gat	mapflag	nosave	SavePoint
+job_sage.gat	mapflag	nopenalty
+job_sage.gat	mapflag	nobranch
+job_sage.gat	mapflag	noexp
+job_sage.gat	mapflag	noloot