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

Revision 1, 103.9 kB (checked in by jinshiro, 17 years ago)
Line 
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
28yuno_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
192yuno_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
614yuno_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.";
687L_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
1032yuno_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
1230yuno_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
1668yuno_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
2043yuno_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
2457job_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
2472job_sage,50,165,4       script  Waiting Room#sg 700,{
2473OnInit:
2474        disablenpc "Waiting Room#sg";
2475        waitingroom "Waiting Room",20,"Waiting Room#sg::OnStartArena",1;
2476        enablewaitingroomevent;
2477        end;
2478
2479OnStartArena:
2480        warpwaitingpc "job_sage",116,97;
2481        donpcevent "Arena#1::OnEnable";
2482        disablewaitingroomevent;
2483        end;
2484
2485OnEnable:
2486        enablewaitingroomevent;
2487        end;
2488}
2489
2490-       script  Arena#1 66,{
2491OnInit:
2492        disablenpc "Arena#1";
2493        end;
2494
2495OnEnable:
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
2517OnReset:
2518        killmonsterall "job_sage";
2519        end;
2520
2521OnMyMobDead:
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
2530OnTimer1000:
2531        mapannounce "job_sage","The practical examination has started.",bc_map;
2532        end;
2533
2534OnTimer2000:
2535        mapannounce "job_sage","1st test - time limit 3 minutes.",bc_map;
2536        end;
2537
2538OnTimer3000:
2539        mapannounce "job_sage","Please defeat all the monsters within the time limit.",bc_map;
2540        end;
2541
2542OnTimer33000:
2543        mapannounce "job_sage","2 minutes 30 seconds remaining.",bc_map;
2544        end;
2545
2546OnTimer63000:
2547        mapannounce "job_sage","2 minutes remaining.",bc_map;
2548        end;
2549
2550OnTimer93000:
2551        mapannounce "job_sage","1 minute 30 seconds remaining.",bc_map;
2552        end;
2553
2554OnTimer123000:
2555        mapannounce "job_sage","1 min remaining.",bc_map;
2556        end;
2557
2558OnTimer153000:
2559        mapannounce "job_sage","30 seconds remaining.",bc_map;
2560        end;
2561
2562OnTimer173000:
2563        mapannounce "job_sage","10 seconds remaining.",bc_map;
2564        end;
2565
2566OnTimer183000:
2567        mapannounce "job_sage","Time over.",bc_map;
2568        donpcevent "Arena#1::OnReset";
2569        end;
2570
2571OnTimer184000:
2572        areawarp "job_sage",100,82,131,113,"yuno",324,258;
2573        end;
2574
2575OnTimer185000:
2576        mapannounce "job_sage","Next candidate, enter.",bc_map;
2577        end;
2578
2579OnTimer186000:
2580        disablenpc "Arena#1";
2581        donpcevent "Waiting Room#sg::OnEnable";
2582        stopnpctimer;
2583        end;
2584}
2585
2586-       script  Arena#2 -1,{
2587OnInit:
2588        disablenpc "Arena#2";
2589        end;
2590
2591OnEnable:
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
2622OnReset:
2623        killmonsterall "job_sage";
2624        end;
2625
2626OnMyMobDead:
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
2636OnTimer1000:
2637        mapannounce "job_sage","Second test - time limit 3 minutes.",bc_map;
2638        end;
2639
2640OnTimer2000:
2641        mapannounce "job_sage","Please defeat all the monsters within the time limit.",bc_map;
2642        end;
2643
2644OnTimer33000:
2645        mapannounce "job_sage","2 minutes 30 seconds remaining.",bc_map;
2646        end;
2647
2648OnTimer63000:
2649        mapannounce "job_sage","2 minutes remaining.",bc_map;
2650        end;
2651
2652OnTimer93000:
2653        mapannounce "job_sage","1 minute 30 seconds remaining.",bc_map;
2654        end;
2655
2656OnTimer123000:
2657        mapannounce "job_sage","1 min remaining.",bc_map;
2658        end;
2659
2660OnTimer153000:
2661        mapannounce "job_sage","30 seconds remaining.",bc_map;
2662        end;
2663
2664OnTimer173000:
2665        mapannounce "job_sage","10 seconds remaining.",bc_map;
2666        end;
2667
2668OnTimer183000:
2669        mapannounce "job_sage","Time over.",bc_map;
2670        donpcevent "Arena#2::OnReset";
2671        end;
2672
2673OnTimer184000:
2674        areawarp "job_sage",100,82,131,113,"yuno",324,258;
2675        end;
2676
2677OnTimer185000:
2678        mapannounce "job_sage","Next candidate, please enter.",bc_map;
2679        end;
2680
2681OnTimer186000:
2682        disablenpc "Arena#2";
2683        donpcevent "Waiting Room#sg::OnEnable";
2684        stopnpctimer;
2685        end;
2686}
2687
2688-       script  Arena#Doorkeeper        -1,{
2689OnInit:
2690        disablenpc "Arena#Doorkeeper";
2691        end;
2692
2693OnEnable:
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
2702OnReset:
2703        donpcevent "Arena#3::OnReset";
2704        killmonsterall "job_sage";
2705        end;
2706
2707OnDisable:
2708        disablenpc "Arena#3";
2709        disablenpc "Arena#Doorkeeper";
2710        end;
2711
2712OnMyMobDead:
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
2723OnTimer1000:
2724        mapannounce "job_sage","3rd test - Time limit 1 minute.",bc_map;
2725        end;
2726
2727OnTimer30000:
2728        mapannounce "job_sage","30 seconds remaining.",bc_map;
2729        end;
2730
2731OnTimer50000:
2732        mapannounce "job_sage","10 seconds remaining.",bc_map;
2733        end;
2734
2735OnTimer60000:
2736        mapannounce "job_sage","Time over.",bc_map;
2737        disablenpc "Arena#Doorkeeper";
2738        end;
2739
2740OnTimer61000:
2741        areawarp "job_sage",100,82,131,113,"yuno",324,258;
2742        end;
2743
2744OnTimer62000:
2745        mapannounce "job_sage","Next candidate, please enter.",bc_map;
2746        end;
2747
2748OnTimer63000:
2749        disablenpc "Arena#Doorkeeper";
2750        donpcevent "Waiting Room#sg::OnEnable";
2751        stopnpctimer;
2752        end;
2753}
2754
2755-       script  Arena#3 -1,{
2756OnInit:
2757        disablenpc "Arena#3";
2758        end;
2759
2760OnEnable:
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
2767OnDisable:
2768        killmonsterall "job_sage";
2769        end;
2770}
2771
2772-       script  Test Helper#sg  -1,{
2773OnInit:
2774        disablenpc "Test Helper#sg";
2775        end;
2776
2777OnEnable:
2778        initnpctimer;
2779        end;
2780
2781OnTimer2000:
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
2785OnTimer4000:
2786        mapannounce "job_sage","This is the end of practical examination. Next candidate, please get ready.",bc_map;
2787        end;
2788
2789OnTimer5000:
2790        areawarp "job_sage",100,82,131,113,"yuno_in03",163,180;
2791        end;
2792
2793OnTimer7000:
2794        mapannounce "job_sage","Next candidate, please enter.",bc_map;
2795        end;
2796
2797OnTimer9000:
2798        disablenpc "Test Helper#sg";
2799        donpcevent "Waiting Room#sg::OnEnable";
2800        stopnpctimer;
2801        end;
2802}
2803
2804//============================================================
2805// Mapflag
2806//============================================================
2807job_sage        mapflag nomemo
2808job_sage        mapflag noteleport
2809job_sage        mapflag nosave  SavePoint
2810job_sage        mapflag nopenalty
2811job_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.