Context Navigation

sage.txt @ 1

Revision 1, 103.9 kB (checked in by jinshiro, 17 years ago)

Rev	Line
[1]	1	//===== eAthena Script =======================================
	2	//= Sage Job Quest
	3	//===== By: ==================================================
	4	//= jAthena (0.9) - I guess
	5	//= Unknown Translator (1.0)
	6	//= Darkchild (1.2)
	7	//===== Current Version: =====================================
	8	//= 2.5a
	9	//===== Compatible With: =====================================
	10	//= eAthena SVN
	11	//===== Description: =========================================
	12	//= [Aegis Conversion]
	13	//= Job quest for Sage classes
	14	//===== Additional Comments: =================================
	15	//= 2.1 Rescripted to Aegis 10.3 stadards. [L0ne_W0lf]
	16	//= No longer uses function "F_BlockHigh"
	17	//= 2.2 Small bug fix (== -> !=) thanks to Saithis. [L0ne_W0lf]
	18	//= 2.2b ANotehr smaLL bugfix, pointed out by Cara. [L0ne_W0lf]
	19	//= 2.3 Corrected NPC names to fall within proper restrictions. [L0ne_W0lf]
	20	//= 2.4 Fixes bug with first room monsters not being reset. [L0ne_W0lf]
	21	//= 2.4a Deleted unused variables. [Samuray22]
	22	//= 2.5 Updated waiting room. (Removes global var) [L0ne_W0lf]
	23	//= 2.5a Corrected some "mes"s without the getitemname. (bugreport:1564) [Samuray22]
	24	// -Changed an incorrect "!=" to "==". (bugreport:1572)
	25	// -And Small Typo Error
	26	//============================================================
	27
	28	yuno_in02,38,61,5 script Dean of the Academy#sa 743,{
	29	cutin "job_sage_kayron",2;
	30	mes "[Kayron Grik]";
	31	if (Upper == 1) {
	32	mes "Haha, I have seen many people";
	33	mes "but it seems you possess special power and abilities.";
	34	next;
	35	mes "[Kayron Grik]";
	36	mes "You'd better leave and increase your reputation.";
	37	mes "Never forget that once you also used to be a novice.";
	38	close2;
	39	cutin "job_sage_kayron",255;
	40	end;
	41	}
	42	if (BaseJob != Job_Mage) {
	43	if (BaseJob == Job_Sage) {
	44	mes "What brings you here? Is there anything bothering you recently?";
	45	mes "Although you're already a Sage, that doesn't mean you can stop studying.";
	46	next;
	47	mes "[Kayron Grik]";
	48	mes "Our knowledge is the mainspring of activity which helps the kingdom to be developed faster.";
	49	mes "Please keep this in mind: you must study and record everything you've discovered so that all in the kingdom may benefit.";
	50	}
	51	else if (BaseJob == Job_Novice) {
	52	mes "Hahah, so my little Novice, what brings you this way? ...I guess you're on a sightseeing trip?";
	53	mes "You must have had a really hard time to reach this place. I must say, you seem interested in the Sage class.";
	54	next;
	55	mes "[Kayron Grik]";
	56	mes "If you aspire to become a Sage, you must first live life as a Mage. Only then shall you have a chance.";
	57	mes "I am looking forward seeing you again.";
	58	}
	59	else {
	60	mes "Chuckle Although we've been studying this world for a long time, I know that studying in itself will fulfill all the needs of the people.";
	61	mes "Other classes are just as important to the welfare of Rune-Midgarts...";
	62	next;
	63	mes "[Kayron Grik]";
	64	mes "However, if you happen to meet a Sage down the road, I hope you will lend him your assistance.";
	65	mes "And if you do, he shall repay you in kind...";
	66	}
	67	close;
	68	}
	69	if (SAGE_Q == 0) {
	70	cutin "job_sage_kayron",2;
	71	mes "[Kayron Grik]";
	72	mes "Welcome, young one. I can see that you're intrigued by the wonders of magic.";
	73	mes "So what kind of business brings you to me?";
	74	next;
	75	switch(select("I would like to be a Sage.:Let me know about the Sage job change.:Nothing.")) {
	76	case 1:
	77	mes "[Kayron Grik]";
	78	mes "Hm? Do you wish to become a Sage?";
	79	mes "Well then, I would like to suggest a few things that are required of a Sage.";
	80	next;
	81	mes "[Kayron Grik]";
	82	mes "Sages are those who promote the development of this continent through the endless studying and recording of all knowledge related to this world.";
	83	mes "Becoming a Sage is more than just a costume change: It's an important job where you must be always aware of your duty and responsibility to the people.";
	84	next;
	85	mes "[Kayron Grik]";
	86	mes "You may want to enter an enrollment application to the Schweicherbil Magic Academy.";
	87	mes "I believe they can explain in detail what you need to become a Sage.";
	88	break;
	89	case 2:
	90	mes "[Kayron Grik]";
	91	mes "Sage job change...hmm...an interesting turn of phrase, I must say.";
	92	mes "Although that is what we say, it is very inappropriate to think of becoming a Sage as merely changing a job.";
	93	next;
	94	mes "[Kayron Grik]";
	95	mes "In order to be a Sage, you must enter an application to the Schweicherbil Magic Academy.";
	96	mes "You will then take the entrance examination.";
	97	next;
	98	mes "[Kayron Grik]";
	99	mes "After the examination, you will be assigned to study a specific subject...";
	100	mes "and finally, you will submit your dissertation to the university.";
	101	next;
	102	mes "[Kayron Grik]";
	103	mes "I am the one who evaluates your dissertation.";
	104	mes "When you pass all the courses, you will become a Sage.";
	105	next;
	106	mes "[Kayron Grik]";
	107	mes "Please visit the Schweicherbil Magic Academy.";
	108	mes "A young Sage named Metheus Sylphe will accept your application.";
	109	break;
	110	case 3:
	111	mes "[Kayron Grik]";
	112	mes "I see...Well, seeing as you have leisure time to spare, I encourage you to peruse as many books as you can.";
	113	mes "You can find and research every worldly matter within their pages.";
	114	next;
	115	mes "[Kayron Grik]";
	116	mes "Ah yes, you can not become the most intelligent person merely by reading all the books around you...";
	117	mes "However, for a Sage such as myself, the knowledge found in books is most important.";
	118	}
	119	close2;
	120	cutin "job_sage_kayron",255;
	121	end;
	122	}
	123	else if (SAGE_Q == 15) {
	124	if (countitem(1550) > 0) {
	125	if (JobLevel < 40) {
	126	set SAGE_Q,0;
	127	mes "You don't seem to be qualified yet.";
	128	mes "Remember, you must reach at least job level 40 to become a Sage.";
	129	close2;
	130	cutin "job_sage_kayron",255;
	131	end;
	132	}
	133	if (SkillPoint) {
	134	mes "You possess remaining skill points...";
	135	mes "Before you submit your dissertation, please take care this matter first.";
	136	close2;
	137	cutin "job_sage_kayron",255;
	138	end;
	139	}
	140	mes "Ho~ So? Did you finally complete your dissertation? Well done.";
	141	mes "Let me see.";
	142	next;
	143	mes "[Kayron Grik]";
	144	mes "Hmm...";
	145	next;
	146	mes "[Kayron Grik]";
	147	mes "Huh...";
	148	next;
	149	mes "[Kayron Grik]";
	150	mes "Interesting...";
	151	next;
	152	mes "[Kayron Grik]";
	153	mes "Although it's roughly written, it's well done for a beginner.";
	154	mes "Ah yes...you seem to be proficient in studying.";
	155	next;
	156	callfunc "Job_Change",Job_Sage;
	157	callfunc "F_ClearJobVar";
	158	mes "[Kayron Grik]";
	159	mes "Congratulations! You have now become a Sage.";
	160	mes "Always remember to keep a studious and analytical mindset.";
	161	next;
	162	mes "[Kayron Grik]";
	163	mes "Also, keep this dissertation and treat it with care, since it is one and only book you have written.";
	164	mes "You may have need of it one of these days. And it shall forever remind of this grandiose moment.";
	165	next;
	166	mes "[Kayron Grik]";
	167	mes "Well then...May God fill your path with knowledge.";
	168	mes "Study with diligence!!";
	169	}
	170	else {
	171	mes "Hmm? What has happened to you? Where did you leave your dissertation?";
	172	mes "Please bring it to me so that you may pass the test.";
	173	next;
	174	mes "[Kayron Grik]";
	175	mes "Wait...you didn't lose it, did you?";
	176	mes "Well...that's your business. It is regrettable that you won't be able to get a chance to write a book anymore.";
	177	}
	178	}
	179	else {
	180	mes "Chuckle Becoming a Sage isn't as simple as you may have assumed.";
	181	mes "You cannot become a Sage because your magic skills are inadequate...";
	182	next;
	183	mes "[Kayron Grik]";
	184	mes "Study diligently, and return when you finish your dissertation.";
	185	mes "Until then, farewell!";
	186	}
	187	close2;
	188	cutin "",255;
	189	end;
	190	}
	191
	192	yuno_in03,154,35,4 script Staff of the Academy#a 742,{
	193	mes "[Metheus Sylphe]";
	194	if (Upper == 1) {
	195	mes "Welcome to the";
	196	mes "Schweicherbil Magic";
	197	mes "Academy. W-wait a second...";
	198	mes "Do I know you from somewhere?";
	199	next;
	200	mes "[Metheus Sylphe]";
	201	mes "We've met before, haven't";
	202	mes "we? Oh gosh, I must sound";
	203	mes "pretty crazy. I'm sorry, I guess it's because I haven't been";
	204	mes "sleeping too well? Oh well,";
	205	mes "have a good day, adventurer~";
	206	close;
	207	}
	208	if (BaseJob != Job_Mage) {
	209	if (BaseJob == Job_Sage) {
	210	mes "Oh nice to meet you again, long time no see.";
	211	mes "So how's it going with the studying?";
	212	next;
	213	mes "[Metheus Sylphe]";
	214	mes "It's okay to study books and magic scrolls all day, ";
	215	mes "but you must go outside and fight with monsters as much as you can in order to be a well experienced Sage.";
	216	next;
	217	mes "[Metheus Sylphe]";
	218	mes "If you know any Sage candidates, please give them some advice...";
	219	mes "Also, please give my regards to your colleagues as well.";
	220	}
	221	else if (BaseJob == Job_Novice) {
	222	mes "Welcome to the Schweicherbil Magic Academy.";
	223	next;
	224	mes "[Metheus Sylphe]";
	225	mes "This place is specialized in Sage class training. Mostly, what we do is study about monsters and magic spells.";
	226	mes "We always welcome new students.";
	227	next;
	228	mes "[Metheus Sylphe]";
	229	mes "People who are at job jevel 40 as Mage class are qualified to apply for enrollment.";
	230	mes "By passing selected courses, we will then approve them as Sages.";
	231	next;
	232	mes "[Metheus Sylphe]";
	233	mes "If you're interested in the Sage class, please come again.";
	234	mes "And have a good day.";
	235	}
	236	else {
	237	mes "Welcome to the Schweicherbil Magic Academy.";
	238	next;
	239	mes "[Metheus Sylphe]";
	240	mes "This place is specialized in Sage class training. What we do is study about monsters and magic spells.";
	241	mes "People who are at job jevel 40 as Mage class are qualified to apply for enrollment.";
	242	next;
	243	mes "[Metheus Sylphe]";
	244	mes "If you have any Mage friends, please let them know about this academy.";
	245	mes "Have a good day.";
	246	}
	247	close;
	248	}
	249	if (SAGE_Q == 0) {
	250	mes "Welcome to the Schweicherbil Magic Academy.";
	251	mes "Oh, You're a Mage. How may I assist you?";
	252	next;
	253	switch(select("Let me know about the Sage job change.:I want to enroll in the school.:Nothing.")) {
	254	case 1:
	255	mes "[Metheus Sylphe]";
	256	mes "I see. Do you wish to become a Sage?";
	257	mes "Unfortunately, we are not in charge of changing your job to the Sage class.";
	258	next;
	259	mes "[Metheus Sylphe]";
	260	mes "After you enter this academy and pass certain courses...";
	261	mes "you will receive official approval to conduct studies as a Sage.";
	262	next;
	263	mes "[Metheus Sylphe]";
	264	mes "For this reason, we do not speak of this proccess as a job change, but as graduation.";
	265	mes "Anyway, if you enter your application for this academy, I will inform you about the registration fee and will let you take the test.";
	266	next;
	267	mes "[Metheus Sylphe]";
	268	mes "For your information, if you bring ^3355FFOld Magicbook^000000 and ^3355FFNecklace of Wisdom^000000, ";
	269	mes "you don't have to pay for the Registration Fee to enroll in the school.";
	270	next;
	271	mes "[Metheus Sylphe]";
	272	mes "After you register, you will be able to take the entrance test.";
	273	mes "If you pass the test, you will write a thesis for a given subject.";
	274	next;
	275	mes "[Metheus Sylphe]";
	276	mes "The Dean of the academy will decide whether or not you are qualified.";
	277	mes "If you're granted admission, you will be able to join in study and research activities as a Sage.";
	278	next;
	279	mes "[Metheus Sylphe]";
	280	mes "You're always welcome to join us.";
	281	mes "Have a good day.";
	282	close;
	283	case 2:
	284	mes "[Metheus Sylphe]";
	285	mes "I see, you want to join the academy. Once again, welcome to the Schweicherbil Magic Academy.";
	286	next;
	287	mes "[Metheus Sylphe]";
	288	mes "People who have already met the basic requirement by reaching at Mage job level 40 are qualified for enrollment.";
	289	mes "A small registration fee will also be required.";
	290	next;
	291	mes "[Metheus Sylphe]";
	292	mes "The registration fee is 70,000 zeny.";
	293	mes "However, if you bring ^3355FFOld Magicbook^000000 and ^3355FFNecklace of Wisdom^000000, you will be exempt from this fee.";
	294	next;
	295	mes "[Metheus Sylphe]";
	296	mes "So, do you wish to apply immediately?";
	297	next;
	298	switch(select("Yes, I do.:The fee is much too expensive.:I will come back later.")) {
	299	case 1:
	300	if (JobLevel < 40) {
	301	mes "[Metheus Sylphe]";
	302	mes "I'm sorry, but you haven't met the basic requirements yet.";
	303	mes "Please go study more and reach Mage job level 40 first.";
	304	close;
	305	}
	306	if (SkillPoint) {
	307	mes "[Metheus Sylphe]";
	308	mes "You have unused skill points left. Please go learn all those skills you've been planning to learn.";
	309	mes "We do not accept any ambiguous candidates.";
	310	close;
	311	}
	312	mes "[Metheus Sylphe]";
	313	mes "Very well. Let's complete your application form.";
	314	mes "Please put your signature here.";
	315	next;
	316	select(strcharinfo(0));
	317	mes "[Metheus Sylphe]";
	318	mes "Your name is ... " + strcharinfo(0) + ". It's a very nice name.";
	319	next;
	320	if (JobLevel == 50) {
	321	mes "[Metheus Sylphe]";
	322	mes "Oh, you've mastered the Mage job! You're great!! Clap Clap Clap";
	323	mes "In reward for your great effort, you will be exempt from the registration fee!";
	324	next;
	325	mes "[Metheus Sylphe]";
	326	mes "Yes, everything's ready.";
	327	mes "Next, you will take an entrance test.";
	328	set SAGE_Q,4;
	329	next;
	330	mes "[Metheus Sylphe]";
	331	mes "Please visit Professor Claytos.";
	332	mes "He's in the left room.";
	333	close;
	334	}
	335	mes "[Metheus Sylphe]";
	336	mes "Will you pay the registration fee with 70,000 zeny?";
	337	mes "Or will you give me ^3355FFOld Magicbook^000000 and ^3355FFNecklace of Wisdom^000000?";
	338	next;
	339	if (select("Pay 70,000 zeny.:Give him Old Magicbook and Necklace of Wisdom.") == 1) {
	340	if (Zeny > 69999) {
	341	set zeny,zeny-70000;
	342	mes "[Metheus Sylphe]";
	343	mes "Thank you, your application has been accepted.";
	344	mes "Next, you will take an entrance test.";
	345	set SAGE_Q,4;
	346	next;
	347	mes "[Metheus Sylphe]";
	348	mes "Please visit Professor Claytos.";
	349	mes "He's in the left room.";
	350	close;
	351	}
	352	mes "[Metheus Sylphe]";
	353	mes "What a shame! It seems you didn't bring enough money for tuition.";
	354	mes "Please make sure you have at least 70,000 zeny to enroll in classes.";
	355	close;
	356	}
	357	if (countitem(1006) > 0 && countitem(1007) > 0) {
	358	delitem 1006,1; //Old_Magic_Book
	359	delitem 1007,1; //Penetration
	360	mes "[Metheus Sylphe]";
	361	mes "Thank you, your application has been accepted.";
	362	mes "Next, you will take the entrance test.";
	363	set SAGE_Q,4;
	364	next;
	365	mes "[Metheus Sylphe]";
	366	mes "Please visit Professor Claytos.";
	367	mes "He's in the left room.";
	368	close;
	369	}
	370	mes "[Metheus Sylphe]";
	371	mes "Umm...It seems you didn't bring any of those?";
	372	mes "I suppose you left them somewhere behind. Please go get them, and then come back.";
	373	close;
	374	case 2:
	375	if (JobLevel < 40) {
	376	mes "[Metheus Sylphe]";
	377	mes "Before we talk about the registration fee, it seems you haven't met the basic requirement yet, Mage job level 40.";
	378	mes "Please go study more, and then come back to enroll.";
	379	close;
	380	}
	381	if (JobLevel == 50) {
	382	mes "[Metheus Sylphe]";
	383	mes "Well, I can't help you with that issue. If you don't have the fee, you are not allowed to enter the academy.";
	384	mes "Even if you might think it's absurdly expensive, it's a justifiable price to pay in order to become a Sage.";
	385	next;
	386	mes "[Metheus Sylphe]";
	387	mes "Anyway... oh! You mastered the Mage job! You're truly exemplary!! Clap Clap Clap.";
	388	mes "As a reward for your great effort, you will be exempt from the registration fee!";
	389	next;
	390	mes "[Metheus Sylphe]";
	391	mes "Okay, let's complete the application form.";
	392	mes "Please put your signature here.";
	393	next;
	394	select(strcharinfo(0));
	395	mes "[Metheus Sylphe]";
	396	mes "Your name is ... " + strcharinfo(0) + ". It's a very nice name.";
	397	next;
	398	mes "[Metheus Sylphe]";
	399	mes "Yes, everything's ready.";
	400	mes "Next, you will take the entrance test.";
	401	set SAGE_Q,4;
	402	next;
	403	mes "[Metheus Sylphe]";
	404	mes "Please visit professor Claytos.";
	405	mes "He's in the left room.";
	406	close;
	407	}
	408	if (Zeny > 43210) {
	409	mes "[Metheus Sylphe]";
	410	mes "Well, I can't help you with that issue. If you don't have the fee, you are not allowed to enter the academy.";
	411	mes "Even if you may think it's absurdly expensive, it's a justifiable price to pay in order to become a Sage.";
	412	next;
	413	mes "[Metheus Sylphe]";
	414	mes "Alternatively, you could try to find ^3355FFOld Magicbook^000000 and ^3355FFNecklace of Wisdom^000000.";
	415	mes "If you don't wish to do that, you must save some money for the registration fee.";
	416	next;
	417	mes "[Metheus Sylphe]";
	418	mes "Goodbye, and have a good day.";
	419	close;
	420	}
	421	else {
	422	mes "[Metheus Sylphe]";
	423	mes "Oh, I guess you don't have enough money?";
	424	mes "Under the existing provisions, you must pay 70,000 zeny for the application...";
	425	next;
	426	if (select("Please...is there any way?:Ok, I will come back later.") == 1) {
	427	mes "[Metheus Sylphe]";
	428	mes "Hmmm...then I shall offer a special option!";
	429	mes "You will pay 30,000 zeny and bring some items as compensation for the tuition discount.";
	430	next;
	431	switch(rand(1,3)) {
	432	case 1:
	433	set SAGE_Q,1;
	434	mes "[Metheus Sylphe]";
	435	mes "Please gather the following items.";
	436	mes "50 ^3355FFFeather of Birds^000000";
	437	mes "50 ^3355FFFluff^000000";
	438	mes "25 ^3355FFIron Ore^000000";
	439	next;
	440	mes "[Metheus Sylphe]";
	441	mes "If you bring those items, your tuition will be 30,000 zeny, in lieu of the original 70,000 zeny fee.";
	442	break;
	443	case 2:
	444	set SAGE_Q,2;
	445	mes "[Metheus Sylphe]";
	446	mes "Please gather the following items.";
	447	mes "50 ^3355FFClover^000000";
	448	mes "50 ^3355FFFeather^000000";
	449	mes "25 ^3355FFSquid Ink^000000";
	450	next;
	451	mes "[Metheus Sylphe]";
	452	mes "If you bring the aforementioned items, the tuition fee will be 30,000 zeny, rather than the original 70,000 zeny fee.";
	453	break;
	454	case 3:
	455	set SAGE_Q,3;
	456	mes "[Metheus Sylphe]";
	457	mes "Please gather the following items.";
	458	mes "50 ^3355FFFeather of Birds^000000";
	459	mes "50 ^3355FFFluff^000000";
	460	mes "50 ^3355FFClover^000000";
	461	mes "50 ^3355FFFeather^000000";
	462	next;
	463	mes "[Metheus Sylphe]";
	464	mes "If you bring those items, your tuition will only be 30,000 zeny, instead of the original 70,000 zeny fee.";
	465	}
	466	mes "I am sure it's a very reasonable option for you.";
	467	next;
	468	mes "[Metheus Sylphe]";
	469	mes "Ah yes, before gathering all of those items, if you happen to have 70,000 zeny, I will be more than happy to receive the full payment.";
	470	mes "That is, after all, our original policy.";
	471	next;
	472	mes "[Metheus Sylphe]";
	473	mes "Alternatively, you can bring me ^3355FFOld Magicbook^000000 and ^3355FFNecklace of Wisdom^000000.";
	474	mes "Goodbye, and have a good day.";
	475	close;
	476	}
	477	mes "[Metheus Sylphe]";
	478	mes "Ah yes, take your time...";
	479	mes "Goodbye, and have a good day.";
	480	close;
	481	}
	482	case 3:
	483	mes "[Metheus Sylphe]";
	484	mes "Ah yes, take your time...";
	485	mes "Goodbye, and have a good day.";
	486	close;
	487	}
	488	case 3:
	489	mes "[Metheus Sylphe]";
	490	mes "I see, take your time. You can also take a look around.";
	491	mes "Goodbye, and have a good day.";
	492	close;
	493	}
	494	}
	495	else if (SAGE_Q >= 1 && SAGE_Q <= 3) {
	496	mes "Welcome, once again.";
	497	next;
	498	if (countitem(1006) > 0 && countitem(1007) > 0) {
	499	delitem 1006,1; //Old_Magic_Book
	500	delitem 1007,1; //Penetration
	501	mes "[Metheus Sylphe]";
	502	mes "Well done. Let me proceed with your application request.";
	503	set SAGE_Q,4;
	504	next;
	505	}
	506	else if (Zeny > 69999) {
	507	set zeny,zeny-70000;
	508	mes "[Metheus Sylphe]";
	509	mes "Well done. Let me proceed with your application request.";
	510	set SAGE_Q,4;
	511	next;
	512	}
	513	else {
	514	switch (SAGE_Q) {
	515	case 1:
	516	//Feather_Of_Bird, Fluff, Iron_Ore
	517	setarray .@item[0], 916,914,1002;
	518	setarray .@count[0], 50,50,25;
	519	break;
	520	case 2:
	521	//Clover, Feather, Chinese_Ink
	522	setarray .@item[0], 705,949,1024;
	523	setarray .@count[0], 50,50,25;
	524	break;
	525	case 3:
	526	//Feather_Of_Bird, Fluff, Clover, Feather
	527	setarray .@item[0], 916,914,705,949;
	528	setarray .@count[0], 50,50,50,50;
	529	break;
	530	}
	531	set .@size, (getarraysize(.@item)-1);
	532	for( set .@i,0 ; .@i < .@size && countitem(.@item[.@i]) >= .@count[.@i] ; set .@i,.@i+1 );
	533	if(.@i == .@size) {
	534	if (Zeny > 29999) {
	535	for (set .@i, 0; .@i < .@size ; set .@i, .@i+1)
	536	delitem .@item[.@i], .@count[.@i];
	537	set zeny,zeny-30000;
	538	mes "[Metheus Sylphe]";
	539	mes "Well done. Let me proceed with your application request.";
	540	set .@SAGE_Q_T,SAGE_Q;
	541	set SAGE_Q,4;
	542	next;
	543	}
	544	mes "[Metheus Sylphe]";
	545	mes "I am sorry to say that you are not ready yet.";
	546	mes "Although you brought all of the items, the money you have now is less than 30,000 zeny.";
	547	next;
	548	mes "[Metheus Sylphe]";
	549	mes "As I told you before, you must bring all of those items, as well as the 30,000 zeny together.";
	550	mes "Please make sure that you have the required items and money.";
	551	close;
	552	}
	553	else {
	554	mes "[Metheus Sylphe]";
	555	mes "I am sorry to say that it seems you didn't bring all of the required items.";
	556	mes "I shall remind you what to bring, in case you have forgotten.";
	557	next;
	558	mes "[Metheus Sylphe]";
	559	mes "Please bring the following items to me.";
	560	mes .@count[0]+" ^3355FF"+getitemname(.@item[0])+"^000000";
	561	mes .@count[1]+" ^3355FF"+getitemname(.@item[1])+"^000000";
	562	mes .@count[2]+" ^3355FF"+getitemname(.@item[2])+"^000000";
	563	if (SAGE_Q == 3) mes .@count[3]+" ^3355FF"+getitemname(.@item[3])+"^000000";
	564	next;
	565	mes "[Metheus Sylphe]";
	566	mes "If you bring all of these items, your tuition fee will be reduced from 70,000 zeny to 30,000 zeny.";
	567	mes "Good luck.";
	568	close;
	569	}
	570	}
	571	mes "[Metheus Sylphe]";
	572	mes "Let's complete the application form.";
	573	mes "Please put your signature here.";
	574	next;
	575	select(strcharinfo(0));
	576	mes "[Metheus Sylphe]";
	577	switch (.@SAGE_Q_T) {
	578	case 1: mes "Your name is ... " + strcharinfo(0) + ". It's a very nice name."; break;
	579	case 2: mes "Your name is ... " + strcharinfo(0) + ". It sounds very sagacious."; break;
	580	case 3: mes "Your name is ... " + strcharinfo(0) + ". Interesting name."; break;
	581	}
	582	next;
	583	mes "[Metheus Sylphe]";
	584	mes "Ah yes, everything is in readiness.";
	585	mes "Next, you will take an entrance test.";
	586	set SAGE_Q,4;
	587	next;
	588	mes "[Metheus Sylphe]";
	589	mes "Please visit Professor Claytos.";
	590	mes "He's in the left room.";
	591	close;
	592	}
	593	else if (SAGE_Q == 4) {
	594	mes "Huh? What are you doing here? You're supposed to be taking the entrance test by now.";
	595	mes "Please visit Professor Claytos in the left room.";
	596	close;
	597	}
	598	else if (SAGE_Q == 15) {
	599	mes "Oh, are you done with the dissertation?";
	600	mes "Sure, you can submit it to Dean Kayron.";
	601	next;
	602	mes "[Metheus Sylphe]";
	603	mes "So long as you make the effort, you should achieve good results.";
	604	mes "Good luck.";
	605	close;
	606	}
	607	else {
	608	mes "Oh sorry, this is a rather inconvenient time to converse.";
	609	mes "Please come back later. I apologize for troubling you.";
	610	close;
	611	}
	612	}
	613
	614	yuno_in03,105,177,5 script Written Test Professor#s 754,{
	615	mes "[Claytos Verdo]";
	616	if (BaseJob != Job_Mage) {
	617	if (BaseJob == Job_Sage) {
	618	mes "Eh? What? Why are you back here?";
	619	mes "Do you want to enter the school again?";
	620	next;
	621	mes "[Claytos Verdo]";
	622	mes "Now, I understand how you feel. Since you graduated, you have become a Sage. A Sage...until the end of your days.";
	623	mes "So, be strong and independent. Try to explore some places where nobody else has ventured to go.";
	624	next;
	625	mes "[Claytos Verdo]";
	626	mes "Don't forget to record everything you've experienced.";
	627	mes "You must share your knowledge with others by taking excellent notes.";
	628	}
	629	else if (BaseJob == Job_Novice) {
	630	mes "What are you doing here, kid?";
	631	mes "This is a Magic Academy, not a day care center.";
	632	next;
	633	mes "[Claytos Verdo]";
	634	mes "Go outside and play with the Porings. That's your job.";
	635	mes "Go out, chop chop!!";
	636	}
	637	else if (Class == Job_Wizard) {
	638	mes "Well...look who came crawling back. Magic addict.";
	639	mes "Yeah yeah, so it's not so bad to be devoted to magic.";
	640	next;
	641	mes "[Claytos Verdo]";
	642	mes "But I hope you remember, no one can live alone.";
	643	mes "Although you're strong enough for solo play, you must cooperate and help other people. That's what a Wizard shoud stand for.";
	644	}
	645	else {
	646	mes "Hmm... I understand that you want to enter our prestigious academy, but since you chose to live as a different class,";
	647	mes "I don't think you can become a Sage.";
	648	next;
	649	mes "[Claytos Verdo]";
	650	mes "So, don't go around regretting why you chose a job other than Sage. You'd better go out and hunt, leveling up your current job.";
	651	}
	652	close;
	653	}
	654	if (SAGE_Q == 0) {
	655	mes "What, do you want to be a Sage?";
	656	mes "I can tell by your eyes, hungering for wisdom.";
	657	next;
	658	mes "[Claytos Verdo]";
	659	mes "Of course, if you want to be a Sage, you must first enter the academy.";
	660	mes "Apply for enrollment, and then come again.";
	661	close;
	662	}
	663	else if (SAGE_Q == 1 \|\| SAGE_Q == 2 \|\| SAGE_Q == 3) {
	664	mes "Hah! You didn't even finish the application process!?";
	665	mes "I see...did Metheus tell you something?";
	666	next;
	667	mes "[Claytos Verdo]";
	668	mes "Do your best. It'll be a good experience for you.";
	669	mes "Come again when you finish the application.";
	670	close;
	671	}
	672	else if (SAGE_Q == 4) {
	673	mes "Welcome to the Schweicherbil Magic Academy.";
	674	mes "You applied for this test already, didn't you?";
	675	next;
	676	mes "[Claytos Verdo]";
	677	mes "Let's see, your name is " + strcharinfo(0) + "...";
	678	mes "Okay, let's get started!";
	679	next;
	680	mes "[Claytos Verdo]";
	681	mes "The test that I am going to give you will test your knowledge on all of the academic subjects in the world.";
	682	mes "I will give you 20 questions, with each question being worth 5 points. When you earn a grade of 80 points, you will pass the test.";
	683	next;
	684	mes "[Claytos Verdo]";
	685	mes "Okay, there's no need to wait. Let's start right away";
	686	mes "Oh, and if you don't answer immediately, the test will be cancelled.";
	687	L_AskQuestions:
	688	next;
	689	switch(rand(1,3)) {
	690	case 1:
	691	mes "1. Choose an item that the Gift merchant in Prontera does not sell.";
	692	next;
	693	if (select("China:Red Frame:Bouquet:Glass Bead") == 3)
	694	set .@sage_t,.@sage_t+5;
	695	mes "2. Choose a city where you cannot purchase a Stiletto.";
	696	next;
	697	if (select("Prontera:Morroc:Geffen:Lutie") == 1)
	698	set .@sage_t,.@sage_t+5;
	699	mes "3. Choose the closest city to Turtle Island.";
	700	next;
	701	if (select("Al De Baran:Alberta:Comodo:Izlude") == 2)
	702	set .@sage_t,.@sage_t+5;
	703	mes "4. Choose the monster that is a different type than the others.";
	704	next;
	705	if (select("Raggler:Pest:Frilldora:Aster") == 4)
	706	set .@sage_t,.@sage_t+5;
	707	mes "5. Choose the monster that has a different attribute than the others.";
	708	next;
	709	if (select("Mantis:Metaller:Rocker:Horn") == 2)
	710	set .@sage_t,.@sage_t+5;
	711	mes "6. Choose the monster that is different sized than the others.";
	712	next;
	713	if (select("Raydric:Raydric Archer:Wanderer:Dark Frame") == 1)
	714	set .@sage_t,.@sage_t+5;
	715	mes "7. Choose the monster which doesn't drop 'Alcohol'.";
	716	next;
	717	if (select("Horong:Plankton:Poison Spore:Toad") == 3)
	718	set .@sage_t,.@sage_t+5;
	719	mes "8. Choose the NPC that is irrelevant to the Knight job change quest.";
	720	next;
	721	if (select("Sir Siracuse:Thomas Servantes:Sir Windsor:Lady Amy") == 2)
	722	set .@sage_t,.@sage_t+5;
	723	mes "9. Choose the NPC that is not a citizen of Prontera.";
	724	next;
	725	if (select("Tono:Pina:YuPi:Hollgrehenn") == 2)
	726	set .@sage_t,.@sage_t+5;
	727	mes "10. Choose the right name for the Kafra lady who wears glasses.";
	728	next;
	729	if (select("Pavianne:Roxie:Leilah:Curly Sue") == 3)
	730	set .@sage_t,.@sage_t+5;
	731	mes "11. How much SP is spent to use lvl 7 Thunderstorm?";
	732	next;
	733	if (select("49:59:69:74") == 2)
	734	set .@sage_t,.@sage_t+5;
	735	mes "12. Choose the right amount of damage reduction and SP consumption of the Energy Coat skill when the caster's remaining SP is 50%.";
	736	next;
	737	if (select("Damage -24% SP1.5%:Damage -24% SP2%:Damage -18% SP1.5%:Damage -18% SP2%") == 4)
	738	set .@sage_t,.@sage_t+5;
	739	mes "13. Choose the property that is irrelevant to 'Bolt' type skills for the Mage class.";
	740	next;
	741	if (select("Water:Earth:Fire:Wind") == 2)
	742	set .@sage_t,.@sage_t+5;
	743	mes "14. Choose the right chance and attack strength for lvl 7 Double Attack, the Thief skill.";
	744	next;
	745	if (select("35% / 120%:35% / 140%:40% / 120%:40% / 140%") == 2)
	746	set .@sage_t,.@sage_t+5;
	747	mes "15. Choose the skill that is irrelevant to learning Magnus Exorcismus, the Priest skill.";
	748	next;
	749	if (select("Divine Protection:Heal:Ruwach:Aqua Benedicta") == 1)
	750	set .@sage_t,.@sage_t+5;
	751	mes "16. Choose the correct defense and ability of the Bunny Band.";
	752	next;
	753	if (select("1 / LUK +2:1 / LUK +5:2 / LUK +2:2 / LUK +5") == 3)
	754	set .@sage_t,.@sage_t+5;
	755	mes "17. Choose the class that cannot equip Padded Armor.";
	756	next;
	757	if (select("Swordman:Merchant:Thief:Archer") == 4)
	758	set .@sage_t,.@sage_t+5;
	759	mes "18. Choose the item that cures all abnormal status and restores full HP and SP at the same time.";
	760	next;
	761	if (select("Royal Jelly:Yggdrasil Seed:Yggdrasilberry:Mastella Fruit") == 3)
	762	set .@sage_t,.@sage_t+5;
	763	mes "19. Who rules the Rune-Midgarts kingdom right now?";
	764	next;
	765	if (select("Tristun the 3rd:Tristram the 3rd:Tristar the 3rd:Trast the 3rd") == 2)
	766	set .@sage_t,.@sage_t+5;
	767	mes "20. Choose the god of Crusaders.";
	768	next;
	769	if (select("Odin:Loki:Thor:Venadin") == 1)
	770	set .@sage_t,.@sage_t+5;
	771	break;
	772	case 2:
	773	mes "1. Choose the jewel that the Morroc Jewel Merchant does not sell.";
	774	next;
	775	if (select("Topaz:Garnet:Diamond:Sapphire") == 2)
	776	set .@sage_t,.@sage_t+5;
	777	mes "2. Choose the city where users cannot purchase Monster's Feed from an NPC.";
	778	next;
	779	if (select("Prontera:Morroc:Al De Baran:Alberta") == 3)
	780	set .@sage_t,.@sage_t+5;
	781	mes "3. Choose the closest city to the Maze.";
	782	next;
	783	if (select("Prontera:Morroc:Geffen:Payon") == 1)
	784	set .@sage_t,.@sage_t+5;
	785	mes "4. Choose the monster that is a different type than the others.";
	786	next;
	787	if (select("Muka:Drops:Plankton:Penomena") == 4)
	788	set .@sage_t,.@sage_t+5;
	789	mes "5. Choose the monster with the different attribute.";
	790	next;
	791	if (select("Dokebi:Isis:Giearth:Deviruchi") == 3)
	792	set .@sage_t,.@sage_t+5;
	793	mes "6. Choose the monster that is different in size.";
	794	next;
	795	if (select("Thiefbug (Aggressive):Horn:Metaller:Argos") == 4)
	796	set .@sage_t,.@sage_t+5;
	797	mes "7. Choose the monster which does not drop 'Yggdrasil Leaf'.";
	798	next;
	799	if (select("Marduk:Baphomet Jr.:Angeling:Wanderer") == 1)
	800	set .@sage_t,.@sage_t+5;
	801	mes "8. Choose the NPC that is irrelevant to the Priest job change quest.";
	802	next;
	803	if (select("Paul:Sir Windsor:Peter S. Alberto:Cecilia") == 2)
	804	set .@sage_t,.@sage_t+5;
	805	mes "9. Choose the NPC that is not a citizen of Morroc.";
	806	next;
	807	if (select("Syvia:Akira:Antonio:Dmitrii") == 3)
	808	set .@sage_t,.@sage_t+5;
	809	mes "10. Choose the Kafra lady who has gorgeous blue hair.";
	810	next;
	811	if (select("Pavianne:Roxie:Leilah:Curly Sue") == 1)
	812	set .@sage_t,.@sage_t+5;
	813	mes "11. Choose the skill that is irrelevant to learning Fire Wall, the Mage skill.";
	814	next;
	815	if (select("lvl 4 Fire Bolt:lvl 4 Napalm Beat:lvl 5 Fire Ball:lvl 1 Sight") == 2)
	816	set .@sage_t,.@sage_t+5;
	817	mes "12. How much SP can be restored when learning SP recovery at lvl 6 (without being affected by INT)?";
	818	next;
	819	if (select("14:16:18:21") == 3)
	820	set .@sage_t,.@sage_t+5;
	821	mes "13. How many INT points does a Mage receive as a bonus at job lvl 33?";
	822	next;
	823	if (select("7:6:5:4") == 4)
	824	set .@sage_t,.@sage_t+5;
	825	mes "14. Choose the correct SP consumption and the skill duration for Improve Concentration lvl 5 (Archer skill).";
	826	next;
	827	if (select("45 / 80 sec:50 / 80 sec:45 / 90 sec:50 / 90 sec") == 1)
	828	set .@sage_t,.@sage_t+5;
	829	mes "15. Choose the skill that is irrelevant to learning Maximize Power, the Blacksmith skill.";
	830	next;
	831	if (select("Hilt Binding:Skin Tempering:Hammer Fall:Weapon Perfection") == 2)
	832	set .@sage_t,.@sage_t+5;
	833	mes "16. What is the correct defense rate and ability of Cute Ribbon?";
	834	next;
	835	if (select("0 / SP +20:0 / SP +30:1 / SP +20:1 / SP +30") == 3)
	836	set .@sage_t,.@sage_t+5;
	837	mes "17. Choose the class that cannot equip Saint Robe.";
	838	next;
	839	if (select("Swordman:Merchant:Thief:Acolyte") == 3)
	840	set .@sage_t,.@sage_t+5;
	841	mes "18. Choose the abnormal status that cannot be cured by Green Potion.";
	842	next;
	843	if (select("Silence:Chaos:Blind:Curse") == 4)
	844	set .@sage_t,.@sage_t+5;
	845	mes "19. Choose the correct name for the ancient kingdom that disappeared somewhere in Geffen.";
	846	next;
	847	if (select("Geffayon:Geffenia:Gefenn:Jaffen") == 2)
	848	set .@sage_t,.@sage_t+5;
	849	mes "20. Choose the correct name for the tree that has become the root of this world.";
	850	next;
	851	if (select("Yggdrasil:Iggdrassil:Mastella:Dead Branch") == 1)
	852	set .@sage_t,.@sage_t+5;
	853	break;
	854	case 3:
	855	mes "1. Choose the item that the Magical Tool merchant in Geffen does not sell.";
	856	next;
	857	if (select("Mantle:Wand:Circlet:Silver Robe") == 1)
	858	set .@sage_t,.@sage_t+5;
	859	mes "2. Choose the city where users cannot purchase Blade from an NPC.";
	860	next;
	861	if (select("Prontera:Izlude:Al De Baran:Payon") == 3)
	862	set .@sage_t,.@sage_t+5;
	863	mes "3. Choose the closest city to Glast Heim.";
	864	next;
	865	if (select("Prontera:Geffen:Morroc:Payon") == 2)
	866	set .@sage_t,.@sage_t+5;
	867	mes "4. Choose the monster that is a different type than the others.";
	868	next;
	869	if (select("Aster:Marc:Marse:Marin") == 4)
	870	set .@sage_t,.@sage_t+5;
	871	mes "5. Choose the monster that has a different attribute.";
	872	next;
	873	if (select("Baby Desert Wolf:Smokie:Picky:Choco") == 2)
	874	set .@sage_t,.@sage_t+5;
	875	mes "6. Choose the monster that is different sized.";
	876	next;
	877	if (select("Drake:Wraith:Evil Druid:Khalitzburg") == 1)
	878	set .@sage_t,.@sage_t+5;
	879	mes "7. Choose the monster that does not drop 'Phracon'.";
	880	next;
	881	if (select("Pupa:Peco Peco Egg:Savage Bebe:Baby Desert Wolf") == 2)
	882	set .@sage_t,.@sage_t+5;
	883	mes "8. Choose the NPC that is irrelevant to the Blacksmith job change quest.";
	884	next;
	885	if (select("Altiregen:Geschupenschte:Barcadi:Baisulist") == 3)
	886	set .@sage_t,.@sage_t+5;
	887	mes "9. Choose the NPC that is not a citizen of Al De Baran.";
	888	next;
	889	if (select("RS125:GOD-POING:Stromme:Chemirre") == 2)
	890	set .@sage_t,.@sage_t+5;
	891	mes "10. Choose the Kafra lady who is the youngest among the staff.";
	892	next;
	893	if (select("Pavianne:Roxie:Leilah:Curly Sue") == 4)
	894	set .@sage_t,.@sage_t+5;
	895	mes "11. Choose the correct SP consumption and the number of evasions when using Safety Wall lvl 6.";
	896	next;
	897	if (select("SP 40, 6 times:SP 35, 6 times:SP 40, 7 times:SP 35, 7 times") == 3)
	898	set .@sage_t,.@sage_t+5;
	899	mes "12. Choose the correct amount of magic attack for Napalm Beat lvl 6.";
	900	next;
	901	if (select("MATK * 1.2:MATK * 1.3:MATK * 1.4:MATK * 1.5") == 2)
	902	set .@sage_t,.@sage_t+5;
	903	mes "13. Choose the catalyst stone for Mage Solution no. 4 that is used for the Mage job change quest.";
	904	next;
	905	if (select("Blue Gemstone:Red Gemstone:Yellow Gemstone:1 carat Diamond") == 4)
	906	set .@sage_t,.@sage_t+5;
	907	mes "14. Choose the correct attack strength and SP consumption for Bash lvl 6, the Swordman skill.";
	908	next;
	909	if (select("250% / 8:280% / 8:280% / 15:310% / 15") == 3)
	910	set .@sage_t,.@sage_t+5;
	911	mes "15. Choose the skill that is irrelevant to learning Claymore Trap, the Hunter skill.";
	912	next;
	913	if (select("Remove Trap:Land Mine:Ankle Snare:Flasher") == 1)
	914	set .@sage_t,.@sage_t+5;
	915	mes "16. Choose the correct defense and ability of Wedding Veil.";
	916	next;
	917	if (select("0 / MDEF +3:0 / MDEF +5:1 / MDEF +3:1 / MDEF +5") == 2)
	918	set .@sage_t,.@sage_t+5;
	919	mes "17. Choose the class that cannot equip Coat.";
	920	next;
	921	if (select("Swordman:Merchant:Thief:Novice") == 4)
	922	set .@sage_t,.@sage_t+5;
	923	mes "18. Choose the item that is not an ingredient for Blue Dyestuffs.";
	924	next;
	925	if (select("Alcohol:Detrimindexta:Karvodailnirol:Blue Herb") == 3)
	926	set .@sage_t,.@sage_t+5;
	927	mes "19. When the world was created by the god Odin, what did he use for the material?";
	928	next;
	929	if (select("The heart of Ymir:The nail of Ymir:The tooth of Ymir:The memento of Ymir") == 1)
	930	set .@sage_t,.@sage_t+5;
	931	mes "20. Choose the metal that has rumored to bring fortune and fame to a person with the destiny.";
	932	next;
	933	if (select("Empelium Gold:Emperium:Emperor:Phracon") == 2)
	934	set .@sage_t,.@sage_t+5;
	935	}
	936	mes "[Claytos Verdo]";
	937	if (SAGE_Q == 4) {
	938	mes "Well, you answered all 20 of the questions.";
	939	mes "Okay, let me check your answers and add up your score.";
	940	}
	941	else {
	942	mes "Well, we finished all 20 questions.";
	943	mes "Now, let's check how many points you got.";
	944	}
	945	next;
	946	mes "[Claytos Verdo]";
	947	mes "Let's see...";
	948	mes "Hmm... hmm...";
	949	next;
	950	mes "[Claytos Verdo]";
	951	mes "You got " + .@sage_t + " points.";
	952	if (.@sage_t == 100) {
	953	if (SAGE_Q == 4)
	954	mes "Excellent! You seem fully qualified to become a Sage!";
	955	else
	956	mes "Excellent! You must have studed really hard for this test!";
	957	set SAGE_Q,6;
	958	next;
	959	mes "[Claytos Verdo]";
	960	mes "You have passed the written test.";
	961	mes "Go visit Professor Hermes for the practical examination.";
	962	}
	963	else if (.@sage_t >= 80) {
	964	set SAGE_Q,6;
	965	mes "Yeah, not bad. I assume that you will at least understand what you're going to learn in class.";
	966	next;
	967	mes "[Claytos Verdo]";
	968	mes "You passed the written test.";
	969	mes "Go visit Professor Hermes for the practical examination.";
	970	}
	971	else {
	972	if (SAGE_Q == 4) {
	973	set SAGE_Q,5;
	974	mes "Oh well...what a shame: You failed.";
	975	next;
	976	mes "[Claytos Verdo]";
	977	mes "But I'll give you another chance to take the written test,";
	978	mes "Go study harder and come back later.";
	979	}
	980	else {
	981	mes "Oh what a shame: You failed.";
	982	next;
	983	mes "[Claytos Verdo]";
	984	mes "But I'll give you another chance,";
	985	mes "Go study even harder and come back.";
	986	}
	987	}
	988	close;
	989	}
	990	else if (SAGE_Q == 5) {
	991	mes "Welcome back.";
	992	mes "So, did you study harder this time?";
	993	next;
	994	mes "[Claytos Verdo]";
	995	mes "You will take the written test under the same conditions as the test you took before. I'll give you 20 questions.";
	996	mes "Each correct answer will give you 5 points. When your score reaches 80 points, you pass the test.";
	997	next;
	998	set sage_m2,rand(1,3);
	999	mes "[Claytos Verdo]";
	1000	mes "Okay, there's no need to wait.";
	1001	mes "Answer immediately, or I'll fail you again.";
	1002	set SAGE_Q,5;
	1003	goto L_AskQuestions;
	1004	end;
	1005	}
	1006	else if (SAGE_Q == 6) {
	1007	mes "What else do you want?! Do you want to take this test again?";
	1008	mes "You've already passed!";
	1009	next;
	1010	mes "[Claytos Verdo]";
	1011	mes "Go visit Professor Hermes for the practical examination.";
	1012	mes "Move!";
	1013	close;
	1014	}
	1015	else if (SAGE_Q == 15) {
	1016	mes "Heh heh, It seems you're done with your dissertation.";
	1017	mes "But I'm not the person handling that part of the test.";
	1018	next;
	1019	mes "[Claytos Verdo]";
	1020	mes "submit your thesis to Dean Kayron.";
	1021	mes "He will decide whether you are qualified to graduate or not.";
	1022	close;
	1023	}
	1024	else {
	1025	mes "I'm too busy to take care of written tests.";
	1026	mes "Come back later, and I'll spare some time to talk.";
	1027	close;
	1028	}
	1029	}
	1030
	1031	//Practical Examination Professer
	1032	yuno_in03,169,180,3 script Practical Examination P 755,{
	1033	mes "[Hermes Tris]";
	1034	if (BaseJob != Job_Mage) {
	1035	if (BaseJob == Job_Sage) {
	1036	mes "Welcome. How have you been?";
	1037	mes "I guess you've been through a lot of hard times...I can tell by your appearance.";
	1038	next;
	1039	mes "[Hermes Tris]";
	1040	mes "I know how hard it is to explore all those perilous areas, but it will help you to gain more knowledge.";
	1041	mes "Book smarts never can beat street smarts.";
	1042	next;
	1043	mes "[Hermes Tris]";
	1044	mes "However, it's a very dangerous idea to go deep inside a dungeon alone. ";
	1045	mes "You'd better look for trustworthy comrades.";
	1046	}
	1047	else if (BaseJob == Job_Novice) {
	1048	mes "Heh heh, now ain't that a cute little Novice?";
	1049	next;
	1050	mes "[Hermes Tris]";
	1051	mes "In this continent of Rune-Midgarts, there are a lot of unknown places and objects that haven't been fully discovered.";
	1052	mes "The monsters, mysterious objects and heroes of myths...";
	1053	next;
	1054	mes "[Hermes Tris]";
	1055	mes "Why don't you consider being a Sage in the future?";
	1056	mes "You will love studying the world.";
	1057	next;
	1058	mes "[Hermes Tris]";
	1059	mes "If by chance you do decide to do that, we'll meet again.";
	1060	mes "Take care, kiddy.";
	1061	}
	1062	else {
	1063	mes "Welcome to the Schweicherbil Magic Academy.";
	1064	next;
	1065	mes "[Hermes Tris]";
	1066	mes "We Sages are more like scholars than Mages.";
	1067	mes "We are very helpful and powerful as members of a party.";
	1068	next;
	1069	mes "[Hermes Tris]";
	1070	mes "Try to make a party with a Sage next time.";
	1071	mes "The wisdom a Sage will bring will be more than helpful for your party...";
	1072	}
	1073	close;
	1074	}
	1075	if (SAGE_Q >= 0 && SAGE_Q <= 3) {
	1076	mes "I am Professor Hermes, in charge of practical examinations.";
	1077	mes "Are you a candidate for the Sage class?";
	1078	next;
	1079	mes "[Hermes Tris]";
	1080	mes "Register your application and take the written test first.";
	1081	close;
	1082	}
	1083	else if (SAGE_Q == 4 \|\| SAGE_Q == 5) {
	1084	mes "I am professor Hermes, in charge of practical examinations.";
	1085	mes "Are you a candidate for the Sage class?";
	1086	next;
	1087	mes "[Hermes Tris]";
	1088	mes "Go pass the written test with Professor Claytos first.";
	1089	mes "Then I will take care of you.";
	1090	close;
	1091	}
	1092	else if (SAGE_Q == 6) {
	1093	mes "Welcome, you just passed the written test, didn't you?";
	1094	mes "Now it's time for the practical examination.";
	1095	next;
	1096	mes "[Hermes Tris]";
	1097	mes "There is nothing difficult or special about this test.";
	1098	mes "All you have to do is kill all the monsters within the time limit.";
	1099	next;
	1100	mes "[Hermes Tris]";
	1101	mes "It's better to experience this for yourself, rather than be told about this test 100 times.";
	1102	mes "How about it? Are you ready to take this test?";
	1103	next;
	1104	if (select("Yes, I am.:Sorry, give me some time.") == 1) {
	1105	set SAGE_Q,7;
	1106	mes "[Hermes Tris]";
	1107	mes "Good, let's start immediately.";
	1108	mes "Do your best and come back safely!";
	1109	close2;
	1110	warp "job_sage",50,154;
	1111	end;
	1112	}
	1113	set SAGE_Q,7;
	1114	mes "[Hermes Tris]";
	1115	mes "Yes, you don't need to hurry... take your time and come back.";
	1116	close;
	1117	}
	1118	else if (SAGE_Q == 7) {
	1119	mes "Welcome again! So, did you fully prepare yourself this time?";
	1120	mes "Oh well, it's not that hard. Give it your all, okay?";
	1121	next;
	1122	mes "[Hermes Tris]";
	1123	mes "Are you ready?";
	1124	next;
	1125	if (select("Yes, I am.:Sorry, give me some time.") == 1) {
	1126	mes "[Hermes Tris]";
	1127	mes "Good, let's start immediately.";
	1128	mes "Do your best and come back safely!";
	1129	close2;
	1130	warp "job_sage",50,154;
	1131	end;
	1132	}
	1133	mes "[Hermes Tris]";
	1134	mes "Yes, you don't need to hurry... take your time and come back.";
	1135	close;
	1136	}
	1137	else if (SAGE_Q == 8) {
	1138	mes "Good job~ Since you passed the practical examination as well...";
	1139	mes "I'll accept your admission.";
	1140	next;
	1141	mes "[Hermes Tris]";
	1142	mes "Now I need to decide what subject you will learn and study...";
	1143	mes "Let's see... let me check your written test grade and the time spent on the practical examination.";
	1144	next;
	1145	mes "[Hermes Tris]";
	1146	mes "Hmm, hmm... I see.";
	1147	mes "Well... I think you're okay.";
	1148	next;
	1149	switch(rand(1,3)) {
	1150	case 1:
	1151	set SAGE_Q,9;
	1152	mes "[Hermes Tris]";
	1153	mes "Now, you will study Yggdrasil.";
	1154	mes "Yggdrasil is the tree that was rumored to be the source of life for this world.";
	1155	next;
	1156	mes "[Hermes Tris]";
	1157	mes "That is a good subject which helps us to recognize changes in the world, as well as the direction of its improvement.";
	1158	mes "Go ask for help from Professor Saphien. He's in the Lecture Room.";
	1159	next;
	1160	mes "[Hermes Tris]";
	1161	mes "I wish you luck.";
	1162	close;
	1163	case 2:
	1164	set SAGE_Q,11;
	1165	mes "[Hermes Tris]";
	1166	mes "Now, you will study monsters.";
	1167	mes "The purpose of this study is to learn and understand more about creatures existing all over the continent.";
	1168	next;
	1169	mes "[Hermes Tris]";
	1170	mes "This is a good subject which will help you lead your life as a well-experienced Sage.";
	1171	mes "Go ask for help from Professor Lucius. He's in the Monster Museum.";
	1172	next;
	1173	mes "[Hermes Tris]";
	1174	mes "I wish you luck.";
	1175	close;
	1176	case 3:
	1177	set SAGE_Q,13;
	1178	mes "[Hermes Tris]";
	1179	mes "Now, you will study magic skills that have certain properties.";
	1180	mes "The purpose of this study is to better understand basic magic skills that we use in everyday life.";
	1181	next;
	1182	mes "[Hermes Tris]";
	1183	mes "That is a good subject which helps you to deeply understand of the truth of magic.";
	1184	mes "Go ask Professor Aebecee for help...He's in the Somatology Laboratory.";
	1185	next;
	1186	mes "[Hermes Tris]";
	1187	mes "I wish you luck.";
	1188	close;
	1189	}
	1190	}
	1191	else if (SAGE_Q == 9) {
	1192	mes "Huh? Didn't you understand what I said?";
	1193	mes "I told you to study Yggdrasil.";
	1194	next;
	1195	mes "[Hermes Tris]";
	1196	mes "Go ask for help from Professor Saphien. He's in the Lecture Room.";
	1197	close;
	1198	}
	1199	else if (SAGE_Q == 11) {
	1200	mes "Huh? Didn't you understand what I said?";
	1201	mes "I told you to study monsters.";
	1202	next;
	1203	mes "[Hermes Tris]";
	1204	mes "Go ask for help from Professor Lucius. He's in the Monster Museum.";
	1205	close;
	1206	}
	1207	else if (SAGE_Q == 13) {
	1208	mes "Huh? Didn't you understand what I said?";
	1209	mes "I told you to study magic spells that possess certain properties.";
	1210	next;
	1211	mes "[Hermes Tris]";
	1212	mes "Go ask a help from Professor Aebecee. He's in the Somatology Laboratory.";
	1213	close;
	1214	}
	1215	else if (SAGE_Q == 15) {
	1216	mes "What are you doing here? Aren't you supposed to be with Dean Kayron?";
	1217	mes "Oh well, there's no harm in showing me your dissertation though...";
	1218	next;
	1219	mes "[Hermes Tris]";
	1220	mes "But then again, maybe there is. Go see Dean Kayron.";
	1221	close;
	1222	}
	1223	else {
	1224	mes "Oh sorry, I'm quite busy at the moment...";
	1225	mes "If you have any questions, go visit the professor I've assigned to you.";
	1226	close;
	1227	}
	1228	}
	1229
	1230	yuno_in03,62,176,2 script History Professor#sa 109,{
	1231	mes "[Saphien Layless]";
	1232	if (BaseJob != Job_Mage) {
	1233	if (BaseJob == Job_Sage) {
	1234	mes "Do I know you? Were you one of my students?";
	1235	mes "Oh, it doesn't matter anyway. You wouldn't be a Sage without graduating from this academy...";
	1236	next;
	1237	mes "[Saphien Layless]";
	1238	mes "In any case, you must study the past in order to better understand the present and to predict...the future.";
	1239	mes "This sentence contains all the truth of the world.";
	1240	next;
	1241	mes "[Saphien Layless]";
	1242	mes "I guess you're treading the right path...";
	1243	mes "One of these days you'll look back to this moment and realize it changed your life.";
	1244	}
	1245	else if (BaseJob == Job_Novice) {
	1246	mes "A Novice? Why is a novice here?";
	1247	next;
	1248	mes "[Saphien Layless]";
	1249	mes "One whose life has many possibilities... ";
	1250	mes "How do you wish to lead your life?";
	1251	next;
	1252	mes "[Saphien Layless]";
	1253	mes "No matter what you decide to be, everything depends on your choice.";
	1254	mes "May God bless you so that you can choose the path best for you...";
	1255	}
	1256	else {
	1257	mes "Welcome, I am in charge of historical studies here in the academy.";
	1258	next;
	1259	mes "[Saphien Layless]";
	1260	mes "The world as we know it is a result of events that described in the records of the ages. It is historical events that have shaped the world as it is today.";
	1261	mes "Therefore, knowing the past means you will better understand the present and...the future.";
	1262	next;
	1263	mes "[Saphien Layless]";
	1264	mes "Reflect upon your past.";
	1265	mes "You will see your path in the future...";
	1266	}
	1267	close;
	1268	}
	1269	if (SAGE_Q == 9) {
	1270	if (SAGE_Q2 == 0) {
	1271	mes "Welcome, " + strcharinfo(0) + ". I am glad to meet you.";
	1272	mes "My name is Saphien Layless, I will be in charge of your class for a while.";
	1273	next;
	1274	mes "[Saphien Layless]";
	1275	mes "The subject you're studying is Yggdrasil.";
	1276	mes "So...do you even know what Yggdrasil is?";
	1277	next;
	1278	switch(select("Yes, I know very well.:No, I don't.")) {
	1279	case 1:
	1280	mes "[Saphien Layless]";
	1281	mes "Okay then, what is Yggdrasil?";
	1282	mes "Please answer me.";
	1283	next;
	1284	switch(select("It's a name of a health item.:It's the source of life in the world.:Suckah, I lied.")) {
	1285	case 1:
	1286	mes "[Saphien Layless]";
	1287	mes "Wrong. " + strcharinfo(0) + ", you got - 10 points.";
	1288	mes "That's just one of the gifts from Yggdrasil.";
	1289	next;
	1290	mes "[Saphien Layless]";
	1291	mes "Yggdrasil is the name of the tree that is the source of life in this world.";
	1292	break;
	1293	case 2:
	1294	mes "[Saphien Layless]";
	1295	mes "That's right. Yggdrasil, the so-called 'World Tree', ";
	1296	mes "is the name of the tree that has been the source of life in this world.";
	1297	break;
	1298	case 3:
	1299	mes "[Saphien Layless]";
	1300	mes "Great Schott...If you don't know, just say so.";
	1301	mes "By the way, " + strcharinfo(0) + ", you just got - 10 points for lying and for being wrong.";
	1302	break;
	1303	}
	1304	next;
	1305	break;
	1306	case 2:
	1307	mes "[Saphien Layless]";
	1308	mes "Ah well, I expected you would know at least a little bit about Yggdrasil...";
	1309	mes "Yggdrasil is the name of the tree that is the source of life in this world.";
	1310	next;
	1311	break;
	1312	}
	1313	mes "[Saphien Layless]";
	1314	mes "Before we start the class, I'll need some reserve items.";
	1315	mes "It's for better understanding of Yggdrasil.";
	1316	next;
	1317	mes "[Saphien Layless]";
	1318	mes "Anything is fine as long as it's related to the Yggdrasil tree.";
	1319	mes "Seeds or fruits of the tree would be good. I know it's difficult to find, but please try.";
	1320	next;
	1321	set SAGE_Q2,1;
	1322	mes "[Saphien Layless]";
	1323	mes "When we have the reserve items, we will start the class.";
	1324	mes "Please come back.";
	1325	close;
	1326	}
	1327	else {
	1328	if (countitem(607) > 0) {
	1329	mes "[Saphien Layless]";
	1330	mes "Oh, did you bring them with you? Excellent!";
	1331	mes "You brought Yggdrasilberry!";
	1332	next;
	1333	mes "[Saphien Layless]";
	1334	mes "Okay, now I am starting the class.";
	1335	mes "Listen carefully, I will not accept dozing off in the middle of class.";
	1336	next;
	1337	}
	1338	else if (countitem(608) > 0) {
	1339	mes "[Saphien Layless]";
	1340	mes "Hmm, did you prepare for class? Let's see...";
	1341	mes "Oh! So you brought me the Yggdrasil Seed?";
	1342	next;
	1343	mes "[Saphien Layless]";
	1344	mes "Very well. Now I am starting the class..";
	1345	mes "Listen carefully, I will not accept dozing off in the middle of class.";
	1346	next;
	1347	}
	1348	else if (countitem(610) > 0) {
	1349	mes "[Saphien Layless]";
	1350	mes "Hmm, did you prepare for class? Let's see...";
	1351	mes "Yggdrasil Leaf...";
	1352	next;
	1353	mes "[Saphien Layless]";
	1354	mes "You can purchase this item from the town of Al De Baran! You didn't show any effort.";
	1355	mes "So, I must give you - 10 points, " + strcharinfo(0) + ".";
	1356	next;
	1357	mes "[Saphien Layless]";
	1358	mes "Okay, now I am starting the class.";
	1359	mes "Listen carefully, I will not accept you dozing off in the middle of class, or any more slacking.";
	1360	next;
	1361	}
	1362	else {
	1363	mes "[Saphien Layless]";
	1364	mes "Huh? You're not ready to this class yet!";
	1365	mes "I told you to bring me any items related Yggdrasil.";
	1366	next;
	1367	mes "[Saphien Layless]";
	1368	mes "Tell me when you're ready.";
	1369	mes "Don't worry about being late, we professors are paid to wait around.";
	1370	close;
	1371	}
	1372	mes "[Saphien Layless]";
	1373	mes "The root of this world, Yggdrasil, is a gigantic tree.";
	1374	mes "It takes root all over the continent of Rune-Midgarts and its leaves reach the sky.";
	1375	next;
	1376	mes "[Saphien Layless]";
	1377	mes "Outside of this continent, there is a ocean where a giant snake named Yormungandr is coiled up.";
	1378	mes "The world as we know it consists of 3 places: Asgard, Midgard and Utgard.";
	1379	next;
	1380	mes "[Saphien Layless]";
	1381	mes "Utgard is where all the titans live.";
	1382	next;
	1383	mes "[Saphien Layless]";
	1384	mes "Midgard is where all human beings live.";
	1385	next;
	1386	mes "[Saphien Layless]";
	1387	mes "And Asgard is where the gods reside...";
	1388	mes "An ash tree taking root in the middle of the Rune-Midgarts continent, that is Yggdrasil.";
	1389	next;
	1390	mes "[Saphien Layless]";
	1391	mes "This continent was born from the heart of Ymir, and Yggdrasil holds the continent together by grasping it with its 3 roots.";
	1392	mes "These roots stretch into 3 different places.";
	1393	next;
	1394	mes "[Saphien Layless]";
	1395	mes "The first root reaches Asgard where the gods live and ";
	1396	mes "where we, mere humans, haven't yet explored or experienced.";
	1397	next;
	1398	mes "[Saphien Layless]";
	1399	mes "The second root reaches Jotunnheim where all the giants live.";
	1400	mes "We've been told this name many times through myths and legends.";
	1401	next;
	1402	mes "[Saphien Layless]";
	1403	mes "The third one reaches Niflheim.";
	1404	mes "That place is rumored to be covered with a thick, black fog.";
	1405	next;
	1406	mes "[Saphien Layless]";
	1407	mes "Items, such as Seed of Yggdrasil, Yggdrasilbrry and Leaf of Yggdrasil are";
	1408	mes "considered a part of Yggdrasil tree.";
	1409	next;
	1410	mes "[Saphien Layless]";
	1411	mes "Yggdrasilberry has a fascinating scent that is rumored to";
	1412	mes "restore full HP and SP at once.";
	1413	next;
	1414	mes "[Saphien Layless]";
	1415	mes "The seed of Yggdrasil which has the fragrance of a blooming flower and the flavor of nut is rumored to";
	1416	mes "restore half of HP and SP at once.";
	1417	next;
	1418	mes "[Saphien Layless]";
	1419	mes "The leaf of Yggdrasil which is filled with vital force is rumored to";
	1420	mes "revive the dead, bringing them back to this world.";
	1421	next;
	1422	mes "[Saphien Layless]";
	1423	mes "Lastly... if by some chance you discover a way into Asgard in the future, ";
	1424	mes "I hope you will find the Yggdrasil tree.";
	1425	next;
	1426	mes "[Saphien Layless]";
	1427	mes "Even though the story of the Yggdrasil tree only exists in myths and legends, ";
	1428	mes "we Sages are obligated to discover the truth of the Yggdrasil tree.";
	1429	next;
	1430	mes "[Saphien Layless]";
	1431	mes "That is the end of today's class.";
	1432	mes "Please record the articles you've learned today, and try to remember as much as you can.";
	1433	next;
	1434	mes "[Saphien Layless]";
	1435	mes "In the next class, you will write a thesis about Yggdrasil...";
	1436	mes "Please bring the following items to prepare for class.";
	1437	next;
	1438	mes "[Saphien Layless]";
	1439	mes "^3355FF1 Feather of Birds^000000 which will be used as a pen,";
	1440	mes "^3355FF1 Animal Skin^000000 which will be used as paper,";
	1441	mes "^3355FF1 Trunk^000000 which will be used to bind a book,";
	1442	mes "^3355FF1 Squid Ink^000000 which will be used as ink,";
	1443	mes "^3355FF1 Empty Bottle^000000 which will be used for holding the squid ink.";
	1444	next;
	1445	set SAGE_Q2,0;
	1446	set SAGE_Q,10;
	1447	mes "[Saphien Layless]";
	1448	mes "I will help you to write your thesis when you're ready with all those items.";
	1449	mes "I am looking forward to the next class with you.";
	1450	close;
	1451	}
	1452	}
	1453	else if (SAGE_Q == 10) {
	1454	if (countitem(916) > 0 && countitem(919) > 0 && countitem(1019) > 0 && countitem(1024) > 0 && countitem(713) > 0) {
	1455	delitem 916,1; //Feather_Of_Birds
	1456	delitem 919,1; //Animal's_Skin
	1457	delitem 1019,1; //Wooden_Block
	1458	delitem 1024,1; //Chinese_Ink
	1459	delitem 713,1; //Empty_Bottle
	1460	mes "Now, you're writing your thesis.";
	1461	mes "I will assist you with your writing.";
	1462	next;
	1463	mes "..........";
	1464	next;
	1465	mes "....................";
	1466	next;
	1467	mes ".................................";
	1468	next;
	1469	mes ".....There is a ocean around the continent,";
	1470	mes "The ocean is coiled up by";
	1471	switch(select("A giant ash tree.:A giant snake Yormungandr.:A giant turtle and elephants.:A giant dragon.")) {
	1472	case 1:
	1473	set .@w_point,.@w_point+1;
	1474	mes "A giant ash tree.";
	1475	break;
	1476	case 2:
	1477	mes "A giant snake Yormungandr.";
	1478	break;
	1479	case 3:
	1480	set .@w_point,.@w_point+1;
	1481	mes "A giant turtle and elephants.";
	1482	break;
	1483	case 4:
	1484	set .@w_point,.@w_point+1;
	1485	mes "A giant dragon.";
	1486	break;
	1487	}
	1488	mes "The continent consists of three places such as,";
	1489	switch(select("Mt.Mjolnir, where spiders live,:Uranos, where titans live,:Utgard, where titans live,:Lutie, the winter land,")) {
	1490	case 1:
	1491	set .@w_point,.@w_point+1;
	1492	mes "Mt.Mjolnir where spiders live,";
	1493	break;
	1494	case 2:
	1495	set .@w_point,.@w_point+1;
	1496	mes "Uranos where titans live,";
	1497	break;
	1498	case 3:
	1499	mes "Utgard where titans live,";
	1500	break;
	1501	case 4:
	1502	set .@w_point,.@w_point+1;
	1503	mes "Lutie, the winter land,";
	1504	break;
	1505	}
	1506	switch(select("Midgard, where humans live,:Rune-Midgarts where humans live,:Tritonia, where mermaids live,:Morroc, the desert city,")) {
	1507	case 1:
	1508	mes "Midgard, where humans live in,";
	1509	break;
	1510	case 2:
	1511	set .@w_point,.@w_point+1;
	1512	mes "Rune-Midgarts, where humans live,";
	1513	break;
	1514	case 3:
	1515	set .@w_point,.@w_point+1;
	1516	mes "Tritonia, where mermaids live,";
	1517	break;
	1518	case 4:
	1519	set .@w_point,.@w_point+1;
	1520	mes "Morroc, the desert city,";
	1521	break;
	1522	}
	1523	switch(select("Abguard, where gods live.:Asgard, where gods live.:Schwarzwald, where citizens live.:Prontera, the capital of Rune-Midgarts.")) {
	1524	case 1:
	1525	set .@w_point,.@w_point+1;
	1526	mes "Abguard where gods live.";
	1527	break;
	1528	case 2:
	1529	mes "Asgard, where gods live.";
	1530	break;
	1531	case 3:
	1532	set .@w_point,.@w_point+1;
	1533	mes "Schwarzwald, where citizens live.";
	1534	break;
	1535	case 4:
	1536	set .@w_point,.@w_point+1;
	1537	mes "Prontera, the capital of Rune-Midgarts.";
	1538	break;
	1539	}
	1540	mes "The continent consists of the three places stated above.";
	1541	next;
	1542	if (.@w_point > 0) {
	1543	mes "[Saphien Layless]";
	1544	mes "..." + strcharinfo(0) + ", have you lost your mind?";
	1545	mes "Your work is too poor to be considered as a thesis!";
	1546	next;
	1547	mes "[Saphien Layless]";
	1548	mes "I don't think you can submit your work to the dean.";
	1549	mes "Go study harder and try again!";
	1550	close;
	1551	}
	1552	mes ".....as we studied from the last class,";
	1553	mes "Yggdrasil is...";
	1554	switch(select("A giant ash tree.:A fabulous Mastella tree.:A giant willow.:A giant dead branch.")) {
	1555	case 1:
	1556	mes "A giant ash tree.";
	1557	break;
	1558	case 2:
	1559	set .@w_point,.@w_point+1;
	1560	mes "A fabulous Mastella tree.";
	1561	break;
	1562	case 3:
	1563	set .@w_point,.@w_point+1;
	1564	mes "A giant willow.";
	1565	break;
	1566	case 4:
	1567	set .@w_point,.@w_point+1;
	1568	mes "A giant dead branch.";
	1569	break;
	1570	}
	1571	mes "The root of Yggdrasil is divided into 3 parts. Those parts reach to 3 places...";
	1572	switch(select("Schwarzwald, Jotunnheim, Niflheim.:Midgard, Jotunnheim, Naffleheim.:Asgard, Jotunnheim, Naffleheim.:Asgard, Jotunnheim, Niflheim.")) {
	1573	case 1:
	1574	set .@w_point,.@w_point+1;
	1575	mes "Schwarzwald, Jotunnheim, Niflheim.";
	1576	break;
	1577	case 2:
	1578	set .@w_point,.@w_point+1;
	1579	mes "Midgard, Jotunnheim, Naffleheim.";
	1580	break;
	1581	case 3:
	1582	set .@w_point,.@w_point+1;
	1583	mes "Asgard, Jotunnheim, Naffleheim.";
	1584	break;
	1585	case 4:
	1586	mes "Asgard, Jotunnheim, Niflheim.";
	1587	break;
	1588	}
	1589	mes "One who has a Seed of Yggdrasil,";
	1590	switch(select("can be cured from all the abnormal statuses.:can restore full HP and SP at once.:can restore half of total HP and SP.:can be cured from Silence, Curse and Chaos.")) {
	1591	case 1:
	1592	set .@w_point,.@w_point+1;
	1593	mes "can be cured from all the abnormal statuses.";
	1594	break;
	1595	case 2:
	1596	set .@w_point,.@w_point+1;
	1597	mes "can restore full HP and SP at once.";
	1598	break;
	1599	case 3:
	1600	mes "can restore half of total HP and SP.";
	1601	break;
	1602	case 4:
	1603	set .@w_point,.@w_point+1;
	1604	mes "can be cured from Silence, Curse and Chaos.";
	1605	break;
	1606	}
	1607	next;
	1608	if (.@w_point > 0) {
	1609	mes "[Saphien Layless]";
	1610	mes "..." + strcharinfo(0) + ", have you lost your mind?";
	1611	mes "Your work is too poor to be considered as a thesis!";
	1612	next;
	1613	mes "[Saphien Layless]";
	1614	mes "I don't think you can submit your work to the dean.";
	1615	mes "Go study harder and try again!";
	1616	close;
	1617	}
	1618	mes "..........";
	1619	next;
	1620	mes "....................";
	1621	next;
	1622	mes ".................................";
	1623	next;
	1624	set SAGE_Q,15;
	1625	mes "[Saphien Layless]";
	1626	mes "Oh, did you finish already? Well done.";
	1627	mes "Please handle this with care, because you won't be able to do this ever again.";
	1628	getitem 1550,1; //Book
	1629	next;
	1630	mes "[Saphien Layless]";
	1631	mes "I assume you're ready to submit your work to the dean.";
	1632	mes "Whether you will pass the test or not is his decision.";
	1633	close;
	1634	}
	1635	else {
	1636	mes "I am not sure that you're ready to write a thesis.";
	1637	mes "I am afraid to say I already informed you of what you need.";
	1638	next;
	1639	mes "[Saphien Layless]";
	1640	mes "^3355FF1 Feather of Birds^000000 which will be used as a pen,";
	1641	mes "^3355FF1 Animal Skin^000000 which will be used as paper,";
	1642	mes "^3355FF1 Trunk^000000 which will be used to bind a book,";
	1643	mes "^3355FF1 Squid Ink^000000 which will be used as ink,";
	1644	mes "^3355FF1 Empty Bottle^000000 which will be used for holding squid ink.";
	1645	next;
	1646	mes "[Saphien Layless]";
	1647	mes "I will assist you in writing your thesis.";
	1648	mes "Please bring all those items with you.";
	1649	close;
	1650	}
	1651	}
	1652	else if (SAGE_Q == 15) {
	1653	mes "Huh? Aren't you supposed to head over to the dean?";
	1654	mes "If you've finished writing your thesis, please bring it to the dean.";
	1655	next;
	1656	mes "[Saphien Layless]";
	1657	mes "You can have only one chance to write your thesis before you become a Sage.";
	1658	mes "So please move on.";
	1659	close;
	1660	}
	1661	else {
	1662	mes "I am not sure if you have business with me, but please come back later.";
	1663	mes "I have some issues to think about..";
	1664	close;
	1665	}
	1666	}
	1667
	1668	yuno_in03,32,102,1 script Biology Professor#sa 755,{
	1669	mes "[Lucius Celsus]";
	1670	if (BaseJob != Job_Mage) {
	1671	if (BaseJob == Job_Sage) {
	1672	mes "What is your business with me?";
	1673	mes "You must make a reservation a week in advance if you have any questions.";
	1674	next;
	1675	mes "[Lucius Celsus]";
	1676	mes "You don't know how busy person I am...don't you?";
	1677	mes "If you're a Sage, you're supposed to know about me by now.";
	1678	next;
	1679	mes "[Lucius Celsus]";
	1680	mes "You have too much time on your hands. Go explore some dungeons.";
	1681	mes "I think it will be more helpful than wasting your time on me.";
	1682	}
	1683	else if (BaseJob == Job_Novice) {
	1684	mes "What brings you to me, kid?";
	1685	next;
	1686	mes "[Lucius Celsus]";
	1687	mes "You'd better go out and play with your pals. ";
	1688	mes "This is not a place where you can fool around.";
	1689	}
	1690	else {
	1691	mes "Hmm? What brings you to me? Are you interested in watching monsters?";
	1692	next;
	1693	mes "[Lucius Celsus]";
	1694	mes "You're allowed to watch. However, do not disturb them by making any fuss.";
	1695	mes "And keep your hands off, some of these guys are way too dangerous to touch.";
	1696	next;
	1697	mes "[Lucius Celsus]";
	1698	mes "By the way, if you catch any rare monsters in future, let me know.";
	1699	mes "I am willing to purchase those at any cost.";
	1700	}
	1701	close;
	1702	}
	1703	if (SAGE_Q == 11) {
	1704	if (SAGE_Q2 == 0) {
	1705	mes "Welcome to my class, did you earn good results in the practical exam?";
	1706	mes "My name is Lucius Celsus, the expert of Biology.";
	1707	next;
	1708	mes "[Lucius Celsus]";
	1709	mes "Huh...how rude of you! You're expected to introduce yourself to me as soon as I greet you!";
	1710	mes "What is your name, young one?";
	1711	next;
	1712	select(strcharinfo(0));
	1713	mes "[Lucius Celsus]";
	1714	mes "A fine name. It's nice to meet you.";
	1715	mes "So, are you aware of the subject you're studying?";
	1716	next;
	1717	mes "[Lucius Celsus]";
	1718	mes "As you know, your topic of study is monsters.";
	1719	mes "How many times have you fought with monsters?";
	1720	next;
	1721	if (select("Well, I can't even count.:A few times, I guess...") == 1) {
	1722	mes "[Lucius Celsus]";
	1723	mes "Oh shut up, you brat. Don't be so sure about yourself.";
	1724	mes "Even if you have much experience with monsters, you will have a hard time comprehending my lecture.";
	1725	}
	1726	mes "[Lucius Celsus]";
	1727	mes "Yes, that's what I guessed about you. You're just book smart.";
	1728	mes "However, I am sure you will encounter most of the monsters mentioned in my lecture.";
	1729	next;
	1730	set sage_m4,rand(1,3);
	1731	mes "[Lucius Celsus]";
	1732	mes "Let's get started.";
	1733	mes "Make sure you're ready for the practical examination during my lecture.";
	1734	next;
	1735	if (sage_m4 == 1) {
	1736	set SAGE_Q2,1;
	1737	mes "[Lucius Celsus]";
	1738	mes "Go bring the following items to me.";
	1739	mes "5 ^3355FFTentacle^000000,";
	1740	mes "5 ^3355FFSingle Cell^000000,";
	1741	mes "5 ^3355FFFish Tail^000000.";
	1742	}
	1743	else if (sage_m4 == 2) {
	1744	set SAGE_Q2,2;
	1745	mes "[Lucius Celsus]";
	1746	mes "Go bring the following items to me.";
	1747	mes "5 ^3355FFNipper^000000,";
	1748	mes "5 ^3355FFClam Flesh^000000,";
	1749	mes "5 ^3355FFHeart of Mermaid^000000.";
	1750	}
	1751	else {
	1752	set SAGE_Q2,3;
	1753	mes "[Lucius Celsus]";
	1754	mes "Go bring following items to me.";
	1755	mes "5 ^3355FFTendon^000000,";
	1756	mes "5 ^3355FFNipper^000000,";
	1757	mes "5 ^3355FFSharp Scale^000000.";
	1758	}
	1759	next;
	1760	mes "[Lucius Celsus]";
	1761	mes "I will proceed with the class when you bring those to me.";
	1762	mes "Have fun.";
	1763	close;
	1764	}
	1765	else if (SAGE_Q2 >= 1 && SAGE_Q2 <=3) {
	1766	switch(SAGE_Q2) {
	1767	case 1: setarray .@items[0],962,1052,1023; break;
	1768	//Nipper, Clam Flesh, Heart of Mermaid
	1769	case 2: setarray .@items[0],960,966,950; break;
	1770	//Tendon, Nipper, Sharp Scale
	1771	case 3: setarray .@items[0],1050,960,963; break;
	1772	}
	1773	if (countitem(.@items[0]) > 4 && countitem(.@items[1]) > 4 && countitem(.@items[2]) > 4) {
	1774	mes "You showed great effort to gather all of those.";
	1775	mes "Well, I am not sure if you gathered them by yourself or bought them from shops...";
	1776	next;
	1777	mes "[Lucius Celsus]";
	1778	mes "Somehow the monsters that drop those items have something in common.";
	1779	mes "Can you tell me what that similarity is?";
	1780	next;
	1781	switch(select("They possess water property.:They are fishes.:They are aggressive.:Um...they monsters.")) {
	1782	case 1:
	1783	mes "[Lucius Celsus]";
	1784	mes "Yes, they possess water property and at the same time they are fishes.";
	1785	mes "Most fish class monsters live underwater, so they are attributed with the water property.";
	1786	break;
	1787	case 2:
	1788	mes "[Lucius Celsus]";
	1789	mes "Yes, they possess water property and at the same time they are fishes.";
	1790	mes "Most fish class monsters live underwater, so they are attributed with the water property.";
	1791	break;
	1792	case 3:
	1793	set sage_m4,4;
	1794	mes "[Lucius Celsus]";
	1795	mes "...I didn't know Phens were aggressive nowadays?";
	1796	mes "Or do Marina and Plankton team up to start a fight with you?";
	1797	next;
	1798	mes "[Lucius Celsus]";
	1799	mes "All the monsters from which you obtained these items are not agressive... get a grip.";
	1800	mes "They are all fishes and possess water property.";
	1801	break;
	1802	case 4:
	1803	set sage_m4,4;
	1804	mes "[Lucius Celsus]";
	1805	mes "What...! What are you here for!? You are here to study about specific monsters, microcephalic moron!";
	1806	mes "Sigh...they are all fishes and possess water property.";
	1807	break;
	1808	}
	1809	next;
	1810	mes "[Lucius Celsus]";
	1811	mes "Not all fish class monsters possess water property, but most of them do.";
	1812	mes "So which kind of magic would work best on most fish class monsters?";
	1813	next;
	1814	switch(select("Lightening Bolt.:Fire Bolt.:Thunder Storm.:Frost Diver.")) {
	1815	case 1:
	1816	mes "[Lucius Celsus]";
	1817	mes "That's right, Lightening Bolt, which possesses the wind property, works best on water property monsters.";
	1818	mes "Although you might want to be careful of monsters that recognize magic casting.";
	1819	break;
	1820	case 2:
	1821	set sage_m4,4;
	1822	mes "[Lucius Celsus]";
	1823	mes "What? Fire Bolt! Fire cannot beat water, you imbecile!";
	1824	mes "Most fishes are attributed with the water property. Therefore, they are weak to wind property magic spells. Don't you get it?";
	1825	break;
	1826	case 3:
	1827	mes "[Lucius Celsus]";
	1828	mes "Yeah, Thunder Storm spell is fine... it's a wind property spell.";
	1829	mes "However, you will be in trouble if you use the spell in a poorly chosen spot.";
	1830	break;
	1831	case 4:
	1832	set sage_m4,4;
	1833	mes "[Lucius Celsus]";
	1834	mes "I can't fathom such stupidity! This question asks you to choose a property that counters water! Don't you get it?";
	1835	mes "Logically, any magic spell possessing the water property cannot overcome the water atrribute monsters!";
	1836	break;
	1837	}
	1838	next;
	1839	mes "[Lucius Celsus]";
	1840	mes "By the way, although some monsters such as Penomena or Aster are considered to be fish class monsters, ";
	1841	mes "they have a different property than the others. You'd better be careful with them.";
	1842	next;
	1843	mes "[Lucius Celsus]";
	1844	mes "Okay, let me teach you about insect monsters.";
	1845	mes "Let's see... hmm... hmm...";
	1846	next;
	1847	switch(rand(1,4)) {
	1848	case 1:
	1849	set SAGE_Q2,4;
	1850	mes "5 ^3355FFCobweb^000000,";
	1851	mes "5 ^3355FFShell^000000,";
	1852	mes "5 ^3355FFInsect Feeler^000000.";
	1853	break;
	1854	case 2:
	1855	set SAGE_Q2,5;
	1856	mes "5 ^3355FFHorn^000000,";
	1857	mes "5 ^3355FFSnail's Shell^000000,";
	1858	mes "5 ^3355FFMoth Dust^000000.";
	1859	break;
	1860	case 3:
	1861	set SAGE_Q2,6;
	1862	mes "5 ^3355FFMantis Scythe^000000,";
	1863	mes "5 ^3355FFWorm Peeling^000000,";
	1864	mes "5 ^3355FFRainbow Shell^000000.";
	1865	break;
	1866	case 4:
	1867	set SAGE_Q2,7;
	1868	mes "5 ^3355FFCobweb^000000,";
	1869	mes "5 ^3355FFMantis Scythe^000000,";
	1870	mes "5 ^3355FFSolid Shell^000000.";
	1871	}
	1872	next;
	1873	mes "[Lucius Celsus]";
	1874	mes "I will proceed with the class when you bring those to me.";
	1875	mes "Have fun.";
	1876	close;
	1877	}
	1878	mes "What, you already forgot what I told you just a minute before?";
	1879	mes "What a nusance... listen carefully this time.";
	1880	next;
	1881	mes "[Lucius Celsus]";
	1882	mes "5 ^3355FF"+getitemname(.@items[0])+"^000000,";
	1883	mes "5 ^3355FF"+getitemname(.@items[1])+"^000000,";
	1884	mes "5 ^3355FF"+getitemname(.@items[2])+"^000000,";
	1885	close;
	1886	}
	1887	else if (SAGE_Q2 >= 4 && SAGE_Q2 <= 7) {
	1888	switch(SAGE_Q2) {
	1889	case 4: setarray .@items[0],1025,935,928; break;
	1890	//Horn, Snail's Shell, Moth Dust
	1891	case 5: setarray .@items[0],947,946,1057; break;
	1892	//Mantis Scythe, Worm Peeling, Rainbow Shell
	1893	case 6: setarray .@items[0],1031,955,1013; break;
	1894	//Cobweb, Mantis Scythe, Solid Shell
	1895	case 7: setarray .@items[0],1025,1031,943; break;
	1896	}
	1897	if (countitem(.@items[0]) > 4 && countitem(.@items[1]) > 4 && countitem(.@items[2]) > 4) {
	1898	mes "Well done. So, did you watch insects while gathering those items?";
	1899	mes "Oh well, I believe you did a good job with the task.";
	1900	next;
	1901	mes "[Lucius Celsus]";
	1902	mes "Insect class monsters do not share the same property most of the time, ";
	1903	mes "You must think twice before you cast a magic spell on an insect.";
	1904	next;
	1905	mes "[Lucius Celsus]";
	1906	mes "It's remarkable that insects can detect hidden objects.";
	1907	mes "Therefore, any hiding skill such as the Hiding skill or Cloaking skill will not work on insect monsters.";
	1908	next;
	1909	mes "[Lucius Celsus]";
	1910	mes "Some insects form a group and live together.";
	1911	mes "They are controlled by the head of the group...";
	1912	next;
	1913	mes "[Lucius Celsus]";
	1914	mes "For instance, Maya the queen ant...";
	1915	mes "Mistress, the queen of hornets,";
	1916	mes "or Golden Thiefbug, the king of thiefbugs...";
	1917	next;
	1918	mes "[Lucius Celsus]";
	1919	mes "You cannot beat those boss monsters alone, ";
	1920	mes "you'd better form a party if you want to fight with them.";
	1921	next;
	1922	mes "[Lucius Celsus]";
	1923	mes "That's the end of my class...it's time for you to write a thesis.";
	1924	mes "Bring me following items for writing the thesis.";
	1925	next;
	1926	mes "[Lucius Celsus]";
	1927	mes "^3355FF1 Feather of Birds^000000 which will be used as a pen,";
	1928	mes "^3355FF1 Animal Skin^000000 which will be used as paper,";
	1929	mes "^3355FF1 Trunk^000000 which will be used to bind a book,";
	1930	mes "^3355FF1 Squid Ink^000000 which will be used as ink,";
	1931	mes "^3355FF1 Empty Bottle^000000 which will be used for holding squid ink.";
	1932	next;
	1933	set SAGE_Q2,0;
	1934	set SAGE_Q,12;
	1935	mes "[Lucius Celsus]";
	1936	mes "I will help you in writing the thesis when you bring all of those items.";
	1937	mes "You're almost there. Isn't learning easy?";
	1938	close;
	1939	}
	1940	mes "What, you already forgot what I told you?";
	1941	mes "What a nuisance...listen carefully this time.";
	1942	next;
	1943	mes "[Lucius Celsus]";
	1944	mes "5 ^3355FF"+getitemname(.@items[0])+"^000000,";
	1945	mes "5 ^3355FF"+getitemname(.@items[1])+"^000000,";
	1946	mes "5 ^3355FF"+getitemname(.@items[2])+"^000000,";
	1947	close;
	1948	}
	1949	mes "Zzz...Zzz...";
	1950	close;
	1951	}
	1952	else if (SAGE_Q == 12) {
	1953	if (countitem(916) > 0 && countitem(919) > 0 && countitem(1019) > 0 && countitem(1024) > 0 && countitem(713) > 0) {
	1954	delitem 916,1; //Feather_Of_Birds
	1955	delitem 919,1; //Animal's_Skin
	1956	delitem 1019,1; //Wooden_Block
	1957	delitem 1024,1; //Chinese_Ink
	1958	delitem 713,1; //Empty_Bottle
	1959	mes "Hmph. Lucky brat brought all of the items.";
	1960	mes "Well, I don't expect you to write an outrageously great thesis though...";
	1961	next;
	1962	mes "[Lucius Celsus]";
	1963	mes "Well, if you really want to write it by yourself, I can let you handle it but...";
	1964	mes "I will give you a work of staggering genius. Just make a copy of it under your name.";
	1965	next;
	1966	mes "[Lucius Celsus]";
	1967	mes "You got a problem with that? Tough, that's my style.";
	1968	mes "Just do what I say.";
	1969	next;
	1970	mes "..........";
	1971	next;
	1972	mes "....................";
	1973	next;
	1974	mes ".................................";
	1975	next;
	1976	select(".....Monsters vary by physical appearance,");
	1977	mes ".....Monsters vary by physical appearance,";
	1978	select("...and possess various elemental properties.");
	1979	mes "...and possess various elemental properties.";
	1980	select("You must be aware of each monster's properties,");
	1981	mes "You must be aware of each monster's properties,";
	1982	select("...and be aware that certain spells work differently on different monsters.");
	1983	mes "...and be aware that certain spells work differently on different monsters.";
	1984	select("You must be especially careful of holy property and shadow property monsters.");
	1985	mes "You must be especially careful of holy property and shadow property monsters.";
	1986	select("These monsters are most dangerous, though occasionally cute.");
	1987	mes "These monsters are most dangerous.";
	1988	next;
	1989	mes "..........";
	1990	next;
	1991	mes "....................";
	1992	next;
	1993	mes ".................................";
	1994	next;
	1995	set SAGE_Q,15;
	1996	mes "[Lucius Celsus]";
	1997	mes "Are you done? Okay, then it's over.";
	1998	mes "You won't be able to write another thesis again, handle this with care.";
	1999	getitem 1550,1; //Book
	2000	next;
	2001	mes "[Lucius Celsus]";
	2002	mes "Show this masterpiece to the dean.";
	2003	mes "Then, he will let you graduate from the academy. See you.";
	2004	close;
	2005	}
	2006	else {
	2007	mes "What, are you sure that you're ready? No, I don't think so.";
	2008	mes "Oh well... listen carefully this time.";
	2009	next;
	2010	mes "[Lucius Celsus]";
	2011	mes "^3355FF1 Feather of Birds^000000 which will be used as a pen,";
	2012	mes "^3355FF1 Animal Skin^000000 which will be used as paper,";
	2013	mes "^3355FF1 Trunk^000000 which will be used to bind a book,";
	2014	mes "^3355FF1 Squid Ink^000000 which will be used as ink,";
	2015	mes "^3355FF1 Empty Bottle^000000 which will be used for holding squid ink.";
	2016	next;
	2017	mes "[Lucius Celsus]";
	2018	mes "You have been doing fine, I guess you can do this without a problem.";
	2019	mes "Go get them. Hurry up.";
	2020	close;
	2021	}
	2022	}
	2023	else if (SAGE_Q == 15) {
	2024	mes "What are you doing here, Go show your thesis to the dean!";
	2025	mes "Don't wasn't any more time here.";
	2026	next;
	2027	mes "[Lucius Celsus]";
	2028	mes "It seems you have too much time on your hands. Okay, I will assign you some tasks.";
	2029	mes "Hahaha, did you say no? Alright then, fine. Scram.";
	2030	close;
	2031	}
	2032	else {
	2033	mes "Wah~! My brain is gonna blow up soon! Why must I have to prepare all of these things?!";
	2034	mes "Who are you?! Don't disturb me, I'm busy!!";
	2035	next;
	2036	mes "[Lucius Celsus]";
	2037	mes "If you just want to watch monsters here, fine with me...";
	2038	mes "Just don't ask me any questions.";
	2039	close;
	2040	}
	2041	}
	2042
	2043	yuno_in03,244,31,3 script Physics Professor#sa 120,{
	2044	mes "[Aebecee George]";
	2045	if (BaseJob != Job_Mage) {
	2046	if (BaseJob == Job_Sage) {
	2047	mes "Tee hee, hello there! What brings you here again, sweetie?";
	2048	mes "Oh, I see... you're just excited because you finally became a Sage? Tee hee~";
	2049	next;
	2050	mes "[Aebecee George]";
	2051	mes "Oh well, although you have become a Sage, you're just doing the same thing, tee hee...we're mages down to the core!";
	2052	mes "We're way better than any other class because we're pretty good with our heads, you know?";
	2053	next;
	2054	mes "[Aebecee George]";
	2055	mes "Okay, is there anything you want to talk about?";
	2056	mes "Oh dearie, don't be nervous...where's your sense of adventure?";
	2057	}
	2058	else if (BaseJob == Job_Novice) {
	2059	mes "Well, aren't you the cutest little Novice~";
	2060	next;
	2061	mes "[Aebecee George]";
	2062	mes "What are you doing here, sweetcakes? Do you just come over to see what's in here?";
	2063	mes "Do you want some candy? Candy, my precious? Tee hee.";
	2064	next;
	2065	mes "[Aebecee George]";
	2066	mes "Oh gosh...Sorry, I thought I had some...";
	2067	mes "But I've got other treats, you catch my drift?";
	2068	}
	2069	else {
	2070	mes "Hey there, tee hee, how's it going sailor?";
	2071	next;
	2072	mes "[Aebecee George]";
	2073	mes "Did you come here to look around? Huh...?";
	2074	mes "Well, if you're not here for business, you must be here...";
	2075	next;
	2076	mes "[Aebecee George]";
	2077	mes "...for PLEASURE.";
	2078	mes "Hey wait! Come back~!";
	2079	}
	2080	close;
	2081	}
	2082	if (SAGE_Q == 13) {
	2083	if (SAGE_Q2 == 0) {
	2084	mes "Hello~? Nice to meet you, tee hee.";
	2085	mes "Did you come to see me? Oh, you're a student!";
	2086	next;
	2087	mes "[Aebecee George]";
	2088	mes "Tee hee, I am the Professor in charge of you, Abecee George.";
	2089	mes "So...aren't you happy to be with me, dearie? Aren't you gay? Tee hee~";
	2090	next;
	2091	mes "[Aebecee George]";
	2092	mes "However, before we get start class, I need you to do me...a favor.";
	2093	mes "Don't be scared, its just an eensy weensy favor. Tee hee~";
	2094	next;
	2095	mes "[Aebecee George]";
	2096	mes "Please bring me ^3355FF30 Stone^000000, that's all.";
	2097	mes "It's not so hard, isn't it?";
	2098	next;
	2099	set SAGE_Q2,1;
	2100	mes "[Aebecee George]";
	2101	mes "Why don't you ask a thief pal for help?";
	2102	mes "We'll start the class when you bring me those stones~ Tee hee~";
	2103	close;
	2104	}
	2105	else if (SAGE_Q2 == 1) {
	2106	if (countitem(7049) > 29) {
	2107	mes "Oh~ how sweet! You brought them all~ thank you~";
	2108	mes "Oh, can you wait a little bit? I need to do something before we start. Tee hee~";
	2109	next;
	2110	mes "[Aebecee George]";
	2111	mes "Hocus-focus!!";
	2112	next;
	2113	mes "[Aebecee George]";
	2114	mes "Hocus~focus!!";
	2115	next;
	2116	mes "[Aebecee George]";
	2117	mes "Ho~cus~fo~cus!!";
	2118	next;
	2119	delitem 7049,30; //Stone
	2120	mes "[Aebecee George]";
	2121	mes "Tee hee, you naughty stone~";
	2122	mes "Only 3 of them worked for me. Tee hee~";
	2123	next;
	2124	mes "[Aebecee George]";
	2125	mes "Here's my other favor to ask of you. Oh, are those tears of...joy?";
	2126	mes "Oh, I'm sooo excited too! Tee hee~";
	2127	next;
	2128	getitem 991,1; //Crystal_Blue
	2129	getitem 993,1; //Yellow_Live
	2130	getitem 992,1; //Wind_Of_Verdure
	2131	mes "[Aebecee George]";
	2132	mes "I will give you these elemental ores...but...they are not for free.";
	2133	mes "Whoa there cowboy! Don't pull out so soon~ Listen, tee hee~";
	2134	set SAGE_Q2,2;
	2135	next;
	2136	mes "[Aebecee George]";
	2137	mes "Please make arrows using these items and bring them to me, pretty please~";
	2138	mes "50 ^3355FFCrystal Arrow^000000,";
	2139	mes "50 ^3355FFStone Arrow^000000,";
	2140	mes "50 ^3355FFWind Arrow^000000.";
	2141	next;
	2142	mes "[Aebecee George]";
	2143	mes "Ask any of your Archer friends if you know any.";
	2144	mes "I am looking forward to seeing you again, tee hee~";
	2145	close;
	2146	}
	2147	else {
	2148	mes "You don't have all the items? And here I was, getting all hot and bothered.";
	2149	mes "Go on, sweetheart, and hurry baaack~";
	2150	next;
	2151	mes "[Aebecee George]";
	2152	mes "I asked you to bring ^3355FF30 Stone^000000.";
	2153	mes "There are many out there, so you won't have too hard a time getting them~ tee hee.";
	2154	close;
	2155	}
	2156	}
	2157	else if (SAGE_Q2 == 2) {
	2158	if (countitem(1754) > 49 && countitem(1756) > 49 && countitem(1755) > 49) {
	2159	mes "Oh~ how sweet! You brought them all~ Oh thank you~";
	2160	mes "Well now, let's get down to business. Tee hee~";
	2161	next;
	2162	mes "[Aebecee George]";
	2163	mes "I'll say something, and you just write everything down.";
	2164	mes "Don't forget to underline the important sentences~";
	2165	next;
	2166	mes "[Aebecee George]";
	2167	mes "Water property magic is sooo strong against the fire property.";
	2168	mes "Just remember those burly, sexay fire fighters, shall we say, putting out that fire with water. Ooh, wet!";
	2169	next;
	2170	mes "[Aebecee George]";
	2171	mes "Wind property magic totally dominates the water property! Oh, yes~";
	2172	mes "Think of a hot flash, and by that I mean ligntening, striking a lake. Oh, I'm bad!";
	2173	next;
	2174	mes "[Aebecee George]";
	2175	mes "In terms of strength, magic with earth property goes on top of wind property magic! Ho~~";
	2176	mes "Just think of how the wind passionately beats against the cliffside near the Lookout Point or Lover's Lane. Tee hee~";
	2177	next;
	2178	mes "[Aebecee George]";
	2179	mes "Magic with fire property is strong against earth property! Tee hee~";
	2180	mes "Just think of burning wood, sprung from the earth, in a cozy fireplace. On the bearskin, in the dark~";
	2181	next;
	2182	mes "[Aebecee George]";
	2183	mes "...Oh my gosh! Time flies sooo fast!";
	2184	mes "Let's call it a day, dear, tee hee~";
	2185	next;
	2186	delitem 1754,50; //Crystal_Arrow
	2187	delitem 1756,50; //Stone_Arrow
	2188	delitem 1755,50; //Arrow_Of_Wind
	2189	mes "[Aebecee George]";
	2190	mes "When you come to the next class, bring ^3355FF1 Holy Water^000000~";
	2191	mes "I hope you have at least one Priest friend. Oh, you don't? Well, it couldn't hurt to get friendly with one.";
	2192	set SAGE_Q2,3;
	2193	close;
	2194	}
	2195	else {
	2196	mes "What are you doing here, precious...are you trying to fool me? Tee hee~";
	2197	mes "I hope you didn't sell the elemental ores I gave you? Naughty naughty~ Don't you know diamonds are a girl's best friend? Tee hee~";
	2198	next;
	2199	mes "[Aebecee George]";
	2200	mes "50 ^3355FFCrystal Arrow^000000,";
	2201	mes "50 ^3355FFStone Arrow^000000,";
	2202	mes "50 ^3355FFWind Arrow^000000.";
	2203	mes "Ask your Archer friend if you have one~ tee hee.";
	2204	close;
	2205	}
	2206	}
	2207	else if (SAGE_Q2 == 3) {
	2208	if (countitem(523) > 0) {
	2209	mes "Oh~ how sweet! You brought some Holy Water~ thanks honey~";
	2210	mes "Oh righty, we should start class. Tee hee~";
	2211	next;
	2212	mes "[Aebecee George]";
	2213	mes "Just Like last time, I will speak and you just write down everything I say.";
	2214	mes "Even if you don't understand, just pretend and go with the flow, alright? Tee hee~";
	2215	next;
	2216	mes "[Aebecee George]";
	2217	mes "Water Magic is weak against wind property! Yes, that's right~";
	2218	mes "Just remember why you don't keep the electric fan around when you're taking a hot bubble bath. Ooh! So electric!";
	2219	next;
	2220	mes "[Aebecee George]";
	2221	mes "Magic with the wind property is weak against earth property!";
	2222	mes "Think of how the wind can't, shall we say, penetrate a mud facial mask~";
	2223	next;
	2224	mes "[Aebecee George]";
	2225	mes "Magic with earth property is weak against fire property! Tee hee~";
	2226	mes "Just think of burning wood, sprung from the earth, in a cozy fireplace. On the be--oh? I said that already? Oh poopy.";
	2227	next;
	2228	mes "[Aebecee George]";
	2229	mes "Magic with fire property is weak against water property! Yes~";
	2230	mes "When things get flaming hot, it's best to splash things in cold water. Don't you agree~?";
	2231	next;
	2232	mes "[Aebecee George]";
	2233	mes "Oh, it's the end of the class~ tee hee.";
	2234	mes "So? Do you think you've learned a lot? You can thank me, honey!";
	2235	next;
	2236	delitem 523,1; //Holy_Water
	2237	mes "[Aebecee George]";
	2238	mes "Well, that's it. You can write your thesis with what I've taught you!";
	2239	mes "Tee hee~ yes! Yes! I am the best teacher in the world! Oh, I am on fire! Tee hee~";
	2240	set SAGE_Q2,0;
	2241	set SAGE_Q,14;
	2242	next;
	2243	mes "[Aebecee George]";
	2244	mes "Okay, please gather these items so you can write the thesis, dear~ Tee hee~";
	2245	mes "^3355FF1 Feather of Birds^000000 which will be used as a pen,";
	2246	mes "^3355FF1 Animal Skin^000000 which will be used as paper,";
	2247	mes "^3355FF1 Trunk^000000 which will be used to bind a book,";
	2248	mes "^3355FF1 Squid Ink^000000 which will be used as ink,";
	2249	mes "^3355FF1 Empty Bottle^000000 to keep that Squid Ink from splashing.";
	2250	next;
	2251	mes "[Aebecee George]";
	2252	mes "So get on out there cowboy and hurry back~ Tee hee~";
	2253	close;
	2254	}
	2255	else {
	2256	mes "What are you doing here, precious...are you playing games? Tee hee.";
	2257	mes "Oh, poor dear. Did you already forget what I told you? Do you want me to remind you? Tee hee~";
	2258	next;
	2259	mes "[Aebecee George]";
	2260	mes "^3355FF1 Holy Water^000000,";
	2261	mes "It couldn't hurt to get friendly with an Aco or Priest...tee hee.";
	2262	close;
	2263	}
	2264	}
	2265	else {
	2266	mes "So...do you have the time? I'm kidding, girlfriend!";
	2267	close;
	2268	}
	2269	}
	2270	else if (SAGE_Q == 14) {
	2271	if (countitem(916) > 0 && countitem(919) > 0 && countitem(1019) > 0 && countitem(1024) > 0 && countitem(713) > 0) {
	2272	delitem 916,1; //Feather_Of_Birds
	2273	delitem 919,1; //Animal's_Skin
	2274	delitem 1019,1; //Wooden_Block
	2275	delitem 1024,1; //Chinese_Ink
	2276	delitem 713,1; //Empty_Bottle
	2277	mes "Okay~ so its now or never~ tee hee~";
	2278	mes "I taught you everything I know. Don't be nervous, you'll be okay~";
	2279	next;
	2280	mes "..........";
	2281	next;
	2282	mes "....................";
	2283	next;
	2284	mes ".................................";
	2285	next;
	2286	mes ".....Magic spells are varied into 4 elements such as";
	2287	switch(select("Water, Earth, Fire and Wind.:Earth, Water, Fire and Wind.:Water, Wind, Earth and Fire.")) {
	2288	case 1:
	2289	mes "Water, Earth, Fire and Wind.";
	2290	break;
	2291	case 2:
	2292	mes "Earth, Water, Fire and Wind.";
	2293	break;
	2294	case 3:
	2295	mes "Water, Wind, Earth and Fire.";
	2296	break;
	2297	}
	2298	mes "Each property has an opposing property,";
	2299	switch(select("Magic with wind property is strong against water:Magic with water property is strong against fire:Magic with fire property is strong against earth")) {
	2300	case 1:
	2301	mes "Magic with wind property is strong against water";
	2302	break;
	2303	case 2:
	2304	mes "Magic with water property is strong against fire";
	2305	break;
	2306	case 3:
	2307	mes "Magic with fire property is strong against earth";
	2308	break;
	2309	}
	2310	mes "Magic with earth property is strong against wind.";
	2311	switch(select("However, that does not work on the opposite case :This theory works the same for earth property weapons:Elemental properties are varied by monster types")) {
	2312	case 1:
	2313	mes "However, that does not work on the opposite case ";
	2314	break;
	2315	case 2:
	2316	mes "This theory works the same for earth property weapons";
	2317	break;
	2318	case 3:
	2319	mes "Elemental properties are varied by monster types";
	2320	break;
	2321	}
	2322	switch(select("You must be aware of the limit of your ability.:You must apply different types of property by the situation or place.:Red Potion is rumored to taste like strawberries.")) {
	2323	case 1:
	2324	mes "You must be aware of the limit of your ability.";
	2325	break;
	2326	case 2:
	2327	mes "You must apply different types of property by the situation or place.";
	2328	break;
	2329	case 3:
	2330	mes "Red Potion is rumored to taste like strawberries.";
	2331	break;
	2332	}
	2333	next;
	2334	switch(select("The most adorable NPC is YuPi in Prontera:Red Potion is rumored to be made out of Porings:You never know the limits of magic")) {
	2335	case 1:
	2336	mes "The most adorable NPC is YuPi in Prontera";
	2337	break;
	2338	case 2:
	2339	mes "Red Potion is rumored to be made out of Porings";
	2340	break;
	2341	case 3:
	2342	mes "You never know the limits of magic";
	2343	break;
	2344	}
	2345	switch(select("Merchant Lady in Morroc is also as cute as YuPi.:Nobody knows why Red Potion tastes like strawberries.:It is not suggested to be too addicted to magic spells.")) {
	2346	case 1:
	2347	mes "Merchant Lady in Morroc is also as cute as YuPi.";
	2348	break;
	2349	case 2:
	2350	mes "Nobody knows why Red Potion tastes like strawberries.";
	2351	break;
	2352	case 3:
	2353	mes "It is not suggested to be too addicted to magic spells.";
	2354	break;
	2355	}
	2356	switch(select("If I had a Bunny Band,:If so, what about the taste of White Potion?:Only pertinent uses of magic, as well as rest")) {
	2357	case 1:
	2358	mes "If I had a Bunny Band,";
	2359	break;
	2360	case 2:
	2361	mes "If so, what about the taste of White Potion?";
	2362	break;
	2363	case 3:
	2364	mes "Only pertinent uses of magic, as well as rest";
	2365	break;
	2366	}
	2367	switch(select("I would want to give it to her as a present.:I can't even imagine the taste.:will guarantee you a safe battle.")) {
	2368	case 1:
	2369	mes "I would want to give it to her as a present.";
	2370	break;
	2371	case 2:
	2372	mes "I can't even imagine the taste.";
	2373	break;
	2374	case 3:
	2375	mes "will guarantee you a safe battle.";
	2376	break;
	2377	}
	2378	switch(select("Although the Bunny Band best fits the Acolyte class:I love this thrilling feeling:Forming a party with people of different classes")) {
	2379	case 1:
	2380	mes "Although the Bunny Band best fits the Acolyte class";
	2381	break;
	2382	case 2:
	2383	mes "I love this thrilling feeling";
	2384	break;
	2385	case 3:
	2386	mes "Forming a party with people of different classes";
	2387	break;
	2388	}
	2389	switch(select("I still wonder if the Bunny Band would be perfect for GOD-POING.:I won't be able to drink it even if my HP is less than 1.:is considered the best way to ready for battle.")) {
	2390	case 1:
	2391	mes "I still wonder if the Bunny Band would be perfect for GOD-POING.";
	2392	break;
	2393	case 2:
	2394	mes "I won't be able to drink it even if my HP is less than 1.";
	2395	break;
	2396	case 3:
	2397	mes "is considered the best way to ready for battle.";
	2398	break;
	2399	}
	2400	next;
	2401	mes "..........";
	2402	next;
	2403	mes "....................";
	2404	next;
	2405	mes ".................................";
	2406	next;
	2407	set SAGE_Q,15;
	2408	mes "[Aebecee George]";
	2409	mes "Tee hee, so... are you done with your thesis? What do you think of your work? I think you did fine~";
	2410	mes "Don't forget, this is the first and the last time you'll write a thesis, okay? Tee hee~";
	2411	getitem 1550,1; //Book
	2412	next;
	2413	mes "[Aebecee George]";
	2414	mes "Okay, now you can show the dean your thesis~";
	2415	mes "You're almost there~ tee hee.";
	2416	close;
	2417	}
	2418	else {
	2419	mes "What are you still doing here, sweet cheeks? Tee hee~";
	2420	mes "Oh, poor dear. Did you already forget what I told you? Do you want me to remind you? Not a problem, tee hee.";
	2421	next;
	2422	mes "[Aebecee George]";
	2423	mes "^3355FF1 Feather of Birds^000000 which will be used as a pen,";
	2424	mes "^3355FF1 Animal Skin^000000 which will be used as paper,";
	2425	mes "^3355FF1 Trunk^000000 which will be used to bind a book,";
	2426	mes "^3355FF1 Squid Ink^000000 which will be used as ink,";
	2427	mes "^3355FF1 Empty Bottle^000000 which will be used for holding squid ink.";
	2428	next;
	2429	mes "[Aebecee George]";
	2430	mes "You are supposed to prepare all of those items, aren't you?";
	2431	mes "Hurry baaack~! Tee hee~";
	2432	close;
	2433	}
	2434	}
	2435	else if (SAGE_Q == 15) {
	2436	mes "What are you doing here, dearie? Don't you want to meet the dean and show him your stuff?";
	2437	mes "Take it from me, boys like him won't wait for you forever, tee hee~";
	2438	next;
	2439	mes "[Aebecee George]";
	2440	mes "I know, I know...you wanna play with little ol' me. But you should become a Sage first.";
	2441	mes "Please hurry up, tee hee.";
	2442	close;
	2443	}
	2444	else {
	2445	mes "Well well...what do we have here?";
	2446	next;
	2447	mes "[Aebecee George]";
	2448	mes "You're not a Sage. Pity, sweet thang like yourself...";
	2449	mes "But seeing as you're not here for business, you must be here for...";
	2450	next;
	2451	mes "[Aebecee George]";
	2452	mes "...PLEASURE. Wait, where are you going, hon?";
	2453	close;
	2454	}
	2455	}
	2456
	2457	job_sage,50,165,4 script Test Helper#talk 700,{
	2458	mes "[Test Helper]";
	2459	mes "Welcome to the Sage practical examination hall.";
	2460	mes "If you wish to take the test right now, please enter the waiting room.";
	2461	next;
	2462	mes "[Test Helper]";
	2463	mes "If someone is currently taking the test, please wait until that person finishes.";
	2464	mes "The progression of the test is announced on the entire map. An announcement will be made when the next person is ready to leave the waiting room.";
	2465	next;
	2466	mes "[Test Helper]";
	2467	mes "The Test takes 5 ~ 10 minutes per each person.";
	2468	mes "If you wish to leave the arena, please log out from the game.";
	2469	close;
	2470	}
	2471
	2472	job_sage,50,165,4 script Waiting Room#sg 700,{
	2473	OnInit:
	2474	disablenpc "Waiting Room#sg";
	2475	waitingroom "Waiting Room",20,"Waiting Room#sg::OnStartArena",1;
	2476	enablewaitingroomevent;
	2477	end;
	2478
	2479	OnStartArena:
	2480	warpwaitingpc "job_sage",116,97;
	2481	donpcevent "Arena#1::OnEnable";
	2482	disablewaitingroomevent;
	2483	end;
	2484
	2485	OnEnable:
	2486	enablewaitingroomevent;
	2487	end;
	2488	}
	2489
	2490	- script Arena#1 66,{
	2491	OnInit:
	2492	disablenpc "Arena#1";
	2493	end;
	2494
	2495	OnEnable:
	2496	enablenpc "Arena#1";
	2497	set .MyMobs,16;
	2498	monster "job_sage",111,102,"Grade F",1183,1,"Arena#1::OnMyMobDead";
	2499	monster "job_sage",120,102,"Grade F",1183,1,"Arena#1::OnMyMobDead";
	2500	monster "job_sage",111,93,"Grade F",1183,1,"Arena#1::OnMyMobDead";
	2501	monster "job_sage",120,93,"Grade F",1183,1,"Arena#1::OnMyMobDead";
	2502	monster "job_sage",107,98,"Grade F",1183,1,"Arena#1::OnMyMobDead";
	2503	monster "job_sage",124,98,"Grade F",1183,1,"Arena#1::OnMyMobDead";
	2504	monster "job_sage",115,106,"Grade F",1183,1,"Arena#1::OnMyMobDead";
	2505	monster "job_sage",115,90,"Grade F",1183,1,"Arena#1::OnMyMobDead";
	2506	monster "job_sage",103,110,"Grade D",1184,1,"Arena#1::OnMyMobDead";
	2507	monster "job_sage",128,110,"Grade D",1184,1,"Arena#1::OnMyMobDead";
	2508	monster "job_sage",103,85,"Grade D",1184,1,"Arena#1::OnMyMobDead";
	2509	monster "job_sage",128,85,"Grade D",1184,1,"Arena#1::OnMyMobDead";
	2510	monster "job_sage",107,106,"Grade D",1184,1,"Arena#1::OnMyMobDead";
	2511	monster "job_sage",124,106,"Grade D",1184,1,"Arena#1::OnMyMobDead";
	2512	monster "job_sage",107,89,"Grade D",1184,1,"Arena#1::OnMyMobDead";
	2513	monster "job_sage",124,89,"Grade D",1184,1,"Arena#1::OnMyMobDead";
	2514	initnpctimer;
	2515	end;
	2516
	2517	OnReset:
	2518	killmonsterall "job_sage";
	2519	end;
	2520
	2521	OnMyMobDead:
	2522	set .MyMobs,.MyMobs-1;
	2523	if (.MyMobs < 1) {
	2524	mapannounce "job_sage"," " + strcharinfo(0) + ", successfully defeat all the monsters.",bc_map;
	2525	donpcevent "Arena#2::OnEnable";
	2526	stopnpctimer;
	2527	}
	2528	end;
	2529
	2530	OnTimer1000:
	2531	mapannounce "job_sage","The practical examination has started.",bc_map;
	2532	end;
	2533
	2534	OnTimer2000:
	2535	mapannounce "job_sage","1st test - time limit 3 minutes.",bc_map;
	2536	end;
	2537
	2538	OnTimer3000:
	2539	mapannounce "job_sage","Please defeat all the monsters within the time limit.",bc_map;
	2540	end;
	2541
	2542	OnTimer33000:
	2543	mapannounce "job_sage","2 minutes 30 seconds remaining.",bc_map;
	2544	end;
	2545
	2546	OnTimer63000:
	2547	mapannounce "job_sage","2 minutes remaining.",bc_map;
	2548	end;
	2549
	2550	OnTimer93000:
	2551	mapannounce "job_sage","1 minute 30 seconds remaining.",bc_map;
	2552	end;
	2553
	2554	OnTimer123000:
	2555	mapannounce "job_sage","1 min remaining.",bc_map;
	2556	end;
	2557
	2558	OnTimer153000:
	2559	mapannounce "job_sage","30 seconds remaining.",bc_map;
	2560	end;
	2561
	2562	OnTimer173000:
	2563	mapannounce "job_sage","10 seconds remaining.",bc_map;
	2564	end;
	2565
	2566	OnTimer183000:
	2567	mapannounce "job_sage","Time over.",bc_map;
	2568	donpcevent "Arena#1::OnReset";
	2569	end;
	2570
	2571	OnTimer184000:
	2572	areawarp "job_sage",100,82,131,113,"yuno",324,258;
	2573	end;
	2574
	2575	OnTimer185000:
	2576	mapannounce "job_sage","Next candidate, enter.",bc_map;
	2577	end;
	2578
	2579	OnTimer186000:
	2580	disablenpc "Arena#1";
	2581	donpcevent "Waiting Room#sg::OnEnable";
	2582	stopnpctimer;
	2583	end;
	2584	}
	2585
	2586	- script Arena#2 -1,{
	2587	OnInit:
	2588	disablenpc "Arena#2";
	2589	end;
	2590
	2591	OnEnable:
	2592	enablenpc "Arena#2";
	2593	disablenpc "Arena#1::OnReset";
	2594	set .MyMobs,24;
	2595	monster "job_sage",111,102,"Numerical Value",1063,1,"Arena#2::OnMyMobDead";
	2596	monster "job_sage",111,102,"Physics",1063,1,"Arena#2::OnMyMobDead";
	2597	monster "job_sage",111,102,"History",1063,1,"Arena#2::OnMyMobDead";
	2598	monster "job_sage",120,102,"Geography",1063,1,"Arena#2::OnMyMobDead";
	2599	monster "job_sage",120,102,"Astronomy",1063,1,"Arena#2::OnMyMobDead";
	2600	monster "job_sage",120,102,"Meteorology",1063,1,"Arena#2::OnMyMobDead";
	2601	monster "job_sage",111,93,"Architecture",1063,1,"Arena#2::OnMyMobDead";
	2602	monster "job_sage",111,93,"Control",1063,1,"Arena#2::OnMyMobDead";
	2603	monster "job_sage",111,93,"Instrumentology",1063,1,"Arena#2::OnMyMobDead";
	2604	monster "job_sage",120,102,"Statistics;",1063,1,"Arena#2::OnMyMobDead";
	2605	monster "job_sage",120,102,"Graphic Method",1063,1,"Arena#2::OnMyMobDead";
	2606	monster "job_sage",120,102,"Language",1063,1,"Arena#2::OnMyMobDead";
	2607	monster "job_sage",111,93,"Sitology",1063,1,"Arena#2::OnMyMobDead";
	2608	monster "job_sage",111,93,"Dietetics",1063,1,"Arena#2::OnMyMobDead";
	2609	monster "job_sage",111,93,"Landscape Architecture",1063,1,"Arena#2::OnMyMobDead";
	2610	monster "job_sage",120,93,"Anthropology",1063,1,"Arena#2::OnMyMobDead";
	2611	monster "job_sage",120,93,"Biology",1063,1,"Arena#2::OnMyMobDead";
	2612	monster "job_sage",120,93,"Ethics",1063,1,"Arena#2::OnMyMobDead";
	2613	monster "job_sage",107,98,"Economy",1063,1,"Arena#2::OnMyMobDead";
	2614	monster "job_sage",107,98,"Politics",1063,1,"Arena#2::OnMyMobDead";
	2615	monster "job_sage",107,98,"Photography",1063,1,"Arena#2::OnMyMobDead";
	2616	monster "job_sage",124,98,"Dendrology",1063,1,"Arena#2::OnMyMobDead";
	2617	monster "job_sage",124,98,"Hygiene",1063,1,"Arena#2::OnMyMobDead";
	2618	monster "job_sage",124,98,"Sociology",1063,1,"Arena#2::OnMyMobDead";
	2619	initnpctimer;
	2620	end;
	2621
	2622	OnReset:
	2623	killmonsterall "job_sage";
	2624	end;
	2625
	2626	OnMyMobDead:
	2627	set .MyMobs,.MyMobs-1;
	2628	if (.MyMobs < 1) {
	2629	mapannounce "job_sage"," " + strcharinfo(0) + ", successfully defeat all the monsters.",bc_map;
	2630	donpcevent "Arena#Doorkeeper::OnEnable";
	2631	donpcevent "Arena#3::OnEnable";
	2632	stopnpctimer;
	2633	}
	2634	end;
	2635
	2636	OnTimer1000:
	2637	mapannounce "job_sage","Second test - time limit 3 minutes.",bc_map;
	2638	end;
	2639
	2640	OnTimer2000:
	2641	mapannounce "job_sage","Please defeat all the monsters within the time limit.",bc_map;
	2642	end;
	2643
	2644	OnTimer33000:
	2645	mapannounce "job_sage","2 minutes 30 seconds remaining.",bc_map;
	2646	end;
	2647
	2648	OnTimer63000:
	2649	mapannounce "job_sage","2 minutes remaining.",bc_map;
	2650	end;
	2651
	2652	OnTimer93000:
	2653	mapannounce "job_sage","1 minute 30 seconds remaining.",bc_map;
	2654	end;
	2655
	2656	OnTimer123000:
	2657	mapannounce "job_sage","1 min remaining.",bc_map;
	2658	end;
	2659
	2660	OnTimer153000:
	2661	mapannounce "job_sage","30 seconds remaining.",bc_map;
	2662	end;
	2663
	2664	OnTimer173000:
	2665	mapannounce "job_sage","10 seconds remaining.",bc_map;
	2666	end;
	2667
	2668	OnTimer183000:
	2669	mapannounce "job_sage","Time over.",bc_map;
	2670	donpcevent "Arena#2::OnReset";
	2671	end;
	2672
	2673	OnTimer184000:
	2674	areawarp "job_sage",100,82,131,113,"yuno",324,258;
	2675	end;
	2676
	2677	OnTimer185000:
	2678	mapannounce "job_sage","Next candidate, please enter.",bc_map;
	2679	end;
	2680
	2681	OnTimer186000:
	2682	disablenpc "Arena#2";
	2683	donpcevent "Waiting Room#sg::OnEnable";
	2684	stopnpctimer;
	2685	end;
	2686	}
	2687
	2688	- script Arena#Doorkeeper -1,{
	2689	OnInit:
	2690	disablenpc "Arena#Doorkeeper";
	2691	end;
	2692
	2693	OnEnable:
	2694	enablenpc "Arena#Doorkeeper";
	2695	donpcevent "Arena#2::OnReset";
	2696	disablenpc "Arena#2";
	2697	set .MyMobs,1;
	2698	monster "job_sage",116,97,"Academic Probation",1179,1,"Arena#Doorkeeper::OnMyMobDead";
	2699	initnpctimer;
	2700	end;
	2701
	2702	OnReset:
	2703	donpcevent "Arena#3::OnReset";
	2704	killmonsterall "job_sage";
	2705	end;
	2706
	2707	OnDisable:
	2708	disablenpc "Arena#3";
	2709	disablenpc "Arena#Doorkeeper";
	2710	end;
	2711
	2712	OnMyMobDead:
	2713	set .MyMobs,.MyMobs-1;
	2714	if (.MyMobs < 1) {
	2715	mapannounce "job_sage","Congratulations, " + strcharinfo(0) + ". You passed the test.",bc_map;
	2716	set SAGE_Q,8;
	2717	donpcevent "Test Helper#sg::OnEnable";
	2718	disablenpc "Arena#Doorkeeper";
	2719	stopnpctimer;
	2720	}
	2721	end;
	2722
	2723	OnTimer1000:
	2724	mapannounce "job_sage","3rd test - Time limit 1 minute.",bc_map;
	2725	end;
	2726
	2727	OnTimer30000:
	2728	mapannounce "job_sage","30 seconds remaining.",bc_map;
	2729	end;
	2730
	2731	OnTimer50000:
	2732	mapannounce "job_sage","10 seconds remaining.",bc_map;
	2733	end;
	2734
	2735	OnTimer60000:
	2736	mapannounce "job_sage","Time over.",bc_map;
	2737	disablenpc "Arena#Doorkeeper";
	2738	end;
	2739
	2740	OnTimer61000:
	2741	areawarp "job_sage",100,82,131,113,"yuno",324,258;
	2742	end;
	2743
	2744	OnTimer62000:
	2745	mapannounce "job_sage","Next candidate, please enter.",bc_map;
	2746	end;
	2747
	2748	OnTimer63000:
	2749	disablenpc "Arena#Doorkeeper";
	2750	donpcevent "Waiting Room#sg::OnEnable";
	2751	stopnpctimer;
	2752	end;
	2753	}
	2754
	2755	- script Arena#3 -1,{
	2756	OnInit:
	2757	disablenpc "Arena#3";
	2758	end;
	2759
	2760	OnEnable:
	2761	monster "job_sage",107,106,"Absent 3 times",1185,1;
	2762	monster "job_sage",124,106,"Being Late 5 times",1185,1;
	2763	monster "job_sage",107,89,"Cheating 2 times",1185,1;
	2764	monster "job_sage",124,89,"Cheating 4 times",1185,1;
	2765	end;
	2766
	2767	OnDisable:
	2768	killmonsterall "job_sage";
	2769	end;
	2770	}
	2771
	2772	- script Test Helper#sg -1,{
	2773	OnInit:
	2774	disablenpc "Test Helper#sg";
	2775	end;
	2776
	2777	OnEnable:
	2778	initnpctimer;
	2779	end;
	2780
	2781	OnTimer2000:
	2782	mapannounce "job_sage","Please go back to where you came from and finish the rest of your job change quest.",bc_map;
	2783	end;
	2784
	2785	OnTimer4000:
	2786	mapannounce "job_sage","This is the end of practical examination. Next candidate, please get ready.",bc_map;
	2787	end;
	2788
	2789	OnTimer5000:
	2790	areawarp "job_sage",100,82,131,113,"yuno_in03",163,180;
	2791	end;
	2792
	2793	OnTimer7000:
	2794	mapannounce "job_sage","Next candidate, please enter.",bc_map;
	2795	end;
	2796
	2797	OnTimer9000:
	2798	disablenpc "Test Helper#sg";
	2799	donpcevent "Waiting Room#sg::OnEnable";
	2800	stopnpctimer;
	2801	end;
	2802	}
	2803
	2804	//============================================================
	2805	// Mapflag
	2806	//============================================================
	2807	job_sage mapflag nomemo
	2808	job_sage mapflag noteleport
	2809	job_sage mapflag nosave SavePoint
	2810	job_sage mapflag nopenalty
	2811	job_sage mapflag nobranch
	2812
	2813	//============================================================
	2814	// Old changelog
	2815	//============================================================
	2816	//= Script mostly based on translated jA script
	2817	//= Written test questions/answers weren't translated 100% corectly
	2818	//= So a lot of those are based upon mRO site and my own info
	2819	//= IF you by excident have (or can get) screenshots of these questions
	2820	//= Then PLEASE send them to Darkchild
	2821	//= 1.3 Baby class Support added [Lupus] 1.5 Fixed possible EXP abuse [Lupus]
	2822	//= 1.6 Added a func which prevent advanced classes passing
	2823	//= 2nd Job Quests again. It also guides adv classes where to go. [Lupus]
	2824	//= 1.7 Fixed tuition fee. Fixed some answers, names & typos, added missing labels [Lupus]
	2825	//= 1.7a Moved JFunc back in the main file, fixed typos [Lupus]
	2826	//= 2.0 Changed numbers to constants. [Vicious]
	2827	//= 2.0a Fixed double warp [KarLaeda] 2.0b Mantis Scythe Item name fix

Note: See TracBrowser for help on using the browser.

Context Navigation

root/npc/jobs/2-2/sage.txt @ 1

Download in other formats: