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

Revision 1, 91.2 kB (checked in by jinshiro, 17 years ago)
Line 
1//===== eAthena Script =======================================
2//= Monk Job Quest
3//===== By: ==================================================
4//= Dino9021, Edited / Translated by Celest
5//===== Current Version: =====================================
6//= 2.3a
7//===== Compatible With: =====================================
8//= eAthena SVN
9//===== Description: =========================================
10//= [Aegis Conversion]
11//= Job quest for Monk classes
12//===== Additional Comments: =================================
13//= 2.2 Rescripted to Aegis 10.3 stadards. [L0ne_W0lf]
14//=     No longer uses function "F_BlockHigh"
15//= 2.3 Corrected NPC names to fall within proper restrictions. [L0ne_W0lf]
16//= 2.3a Deleted unused variables. [Samuray22]
17//============================================================
18
19prt_monk,59,247,1       script  Guarding Monk#mk        120,6,2,{
20        if (Upper == 1) {
21                mes "[Tohobu]";
22                mes "Hmm? What business do you have here?";
23                mes "If you wish to enter this sacred area,";
24                mes "you must give me your name and job level!";
25                next;
26                mes "[Tohobu]";
27                mes "....Eh?";
28                mes "Oh!^FF0000gosh^000000! I am sorry, I think I misunderstood you from someone I know.";
29                next;
30                mes "[Tohobu]";
31                mes ".......";
32                mes "........";
33                next;
34                mes "[Tohobu]";
35                mes "It is odd...I never misunderstand people...oh, well. Have a good day.";
36                close;
37        }
38        if (BaseJob == Job_Acolyte && MONK_Q == 0) {
39                mes "[Tohobu]";
40                mes "Hmm? What business do you have here?";
41                mes "If you wish to enter this sacred area,";
42                mes "you must give me your name and job level!";
43                next;
44                mes "[Tohobu]";
45                mes "Now, please tell me your name and job level.";
46                next;
47                if (select("Ignore him.:Tell him.") == 1) {
48                        mes "[Tohobu]";
49                        mes "To ignore another is disrespectful, get out!";
50                        close2;
51                        warp "prt_fild03",357,256;
52                        end;
53                }
54                mes "[Tohobu]";
55                mes "Hmm... " + strcharinfo(0) + " is your name?";
56                mes "...did I say it right?";
57                mes "Okay, and your job level is " + JobLevel + " correct?";
58                next;
59                mes "[Tohobu]";
60                mes "Very well... why have you come here";
61                mes "" + strcharinfo(0) + "?";
62                next;
63                switch(select("To visit and learn about monks.:I wish to become a monk...:I'm tired and need to rest...")) {
64                case 1:
65                        mes "[Tohobu]";
66                        mes "I see...";
67                        mes "We monks live our lives for spiritual enlightenment.";
68                        mes "We improve our bodies as well as our minds to reach true inner peace.";
69                        mes "May you find your inner peace as well.";
70                        set MONK_Q,1;
71                        close;
72                case 2:
73                        if (BaseJob == Job_Acolyte && JobLevel > 39) {
74                                mes "[Tohobu]";
75                                mes "Hmm you seem as though you have been training for this...";
76                                mes "That is good. Go see our sensei Moohae. Speak with him.";
77                                mes "He will help you start your training.";
78                                set MONK_Q,2;
79                                close;
80                        }
81                        else if (BaseJob == Job_Acolyte && JobLevel < 40) {
82                                mes "[Tohobu]";
83                                mes "Hmm, you do not seem ready to become a monk.";
84                                mes "To become a monk you must be,";
85                                mes "at least a job level 40 Acolyte.";
86                                mes "If not, you are not yet ready to become a monk.";
87                                next;
88                                mes "[Tohobu]";
89                                mes "Come back to me when you have trained more";
90                                mes "and I will let you know if you are ready.";
91                                next;
92                                mes "[Tohobu]";
93                                mes "I hope that you will soon join us on our";
94                                mes "path of inner peace and enlightenment.";
95                                mes "I'll be waiting here for you.";
96                                set MONK_Q,1;
97                                close;
98                        }
99                        else {
100                                mes "[Tohobu]";
101                                mes "Hahahha that was a good joke!";
102                                close;
103                        }
104                case 3:
105                        mes "[Tohobu]";
106                        mes "Yes, we all need to take a rest once in a while...";
107                        mes "It is a good idea not to stress your self.";
108                        mes "Come in and make yourself comfortable.";
109                        mes "Rest as long as you need to.";
110                        next;
111                        mes "[Tohobu]";
112                        mes "I hope that you become energized";
113                        mes "when observing our brothers in their";
114                        mes "pursuit of spiritual enlightenment.";
115                        mes "I hope you reach it too.";
116                        set MONK_Q,1;
117                        close;
118                }
119        }
120        else {
121                if (MONK_Q == 1 && BaseJob == Job_Acolyte) {
122                        mes "[Tohobu]";
123                        mes "What do you think? Did your visit reveal anything to your spirit?";
124                        next;
125                        switch(select("No...:I wish to become a monk.:I need to rest...")) {
126                        case 1:
127                                mes "[Tohobu]";
128                                mes "I see, there is no shame in that.";
129                                mes "I hope that your experience here with";
130                                mes "our brothers has helped you become one";
131                                mes "step closer to true enlightenment.";
132                                set MONK_Q,1;
133                                close;
134                        case 2:
135                                if (BaseJob == Job_Acolyte && JobLevel > 39) {
136                                        mes "[Tohobu]";
137                                        mes "Hmm you seem as though you have been training for this...";
138                                        mes "That is good. Go see our sensei Moohae. Speak with him.";
139                                        mes "He will help you start your training.";
140                                        set MONK_Q,2;
141                                        close;
142                                }
143                                else if (BaseJob == Job_Acolyte && JobLevel < 40) {
144                                        mes "[Tohobu]";
145                                        mes "Hmm, you do not seem ready to become a monk.";
146                                        mes "To become a monk you must be,";
147                                        mes "at least a job level 40 Acolyte.";
148                                        mes "If not, you are not yet ready to become a monk.";
149                                        next;
150                                        mes "[Tohobu]";
151                                        mes "Come back to me when you have trained more on your own";
152                                        mes "and I will let you know if you are ready.";
153                                        next;
154                                        mes "[Tohobu]";
155                                        mes "I hope that you will soon join us in our";
156                                        mes "path to inner peace and enlightenment.";
157                                        mes "I'll be waiting here for you.";
158                                        set MONK_Q,1;
159                                        close;
160                                }
161                                else {
162                                        mes "[Tohobu]";
163                                        mes "Hahahha that was a good joke!";
164                                        close;
165                                }
166                        case 3:
167                                mes "[Tohobu]";
168                                mes "Yes, we all need to take a rest once in a while...";
169                                mes "It is a good idea not to stress your self.";
170                                mes "Come in and make yourself comfortable.";
171                                mes "Rest as long as you need to.";
172                                next;
173                                mes "[Tohobu]";
174                                mes "I hope that you become energized";
175                                mes "when observing our brothers in their";
176                                mes "pursuit of spiritual enlightenment.";
177                                mes "I hope you reach it too.";
178                                set MONK_Q,1;
179                                close;
180                        }
181                }
182                if (MONK_Q == 0) {
183                        mes "[Tohobu]";
184                        mes "Hmm? What business do you have here?";
185                        mes "If you wish to enter this sacred area,";
186                        mes "You must give me your name, job level, and level!";
187                        next;
188                        mes "[Tohobu]";
189                        mes "Now, please tell me your name as well as your job level!";
190                        next;
191                        if (select("Ignore.:Tell him.") == 1) {
192                                mes "[Tohobu]";
193                                mes "To ignore another is disrespectful, get out!";
194                                close2;
195                                warp "prt_fild03",357,256;
196                                end;
197                        }
198                        mes "[Tohobu]";
199                        mes "Hmm... " + strcharinfo(0) + " is your name?";
200                        mes "...did I say it right?";
201                        mes "Okay, and your job level is " + JobLevel + " correct?";
202                        next;
203                        mes "[Tohobu]";
204                        mes "Okay, Now, why have you come here";
205                        mes "" + strcharinfo(0) + "?";
206                        next;
207                        switch(select("To visit and learn about monks.:I wish to become a monk...:I'm tired and need to rest...")) {
208                        case 1:
209                                mes "[Tohobu]";
210                                mes "I see...";
211                                mes "We monks live our lives for God and spiritual enlightenment.";
212                                mes "We improve our bodies as well as our minds to reach true inner peace.";
213                                mes "May you find your inner peace as well.";
214                                set MONK_Q,1;
215                                close;
216                        case 2:
217                                if (BaseJob == Job_Acolyte && JobLevel > 39) {
218                                        mes "[Tohobu]";
219                                        mes "Hmm you seem as though you have been training for this...";
220                                        mes "That is good. Go see our sensei Moohae, speak with him";
221                                        mes "and he will help you start new training.";
222                                        set MONK_Q,2;
223                                        close;
224                                }
225                                else if (BaseJob == Job_Acolyte && JobLevel < 40) {
226                                        mes "[Tohobu]";
227                                        mes "Hmm, you do not seem ready to become a monk.";
228                                        mes "To become a monk you must be,";
229                                        mes "at least a job level 40 Acolyte.";
230                                        mes "If not, you are not yet ready to become a monk.";
231                                        next;
232                                        mes "[Tohobu]";
233                                        mes "Come back to me when you have trained more on your own";
234                                        mes "and I will let you know if you are ready.";
235                                        next;
236                                        mes "[Tohobu]";
237                                        mes "I hope that you will soon join us in our";
238                                        mes "path to inner peace and enlightenment.";
239                                        mes "I'll be waiting here for you.";
240                                        set MONK_Q,1;
241                                        close;
242                                }
243                                else {
244                                        mes "[Tohobu]";
245                                        mes "Hahahha that was a good joke!";
246                                        close;
247                                }
248                        case 3:
249                                mes "[Tohobu]";
250                                mes "Yes, we all need to take a rest once in a while...";
251                                mes "It is a good idea not to stress your self.";
252                                mes "Come in and make yourself comfortable.";
253                                mes "Rest as long as you need to.";
254                                next;
255                                mes "[Tohobu]";
256                                mes "I hope that you become energized";
257                                mes "when observing our brothers in their";
258                                mes "pursuit of spiritual enlightenment.";
259                                mes "I hope you reach it too.";
260                                set MONK_Q,1;
261                                close;
262                        }
263                }
264                else if (MONK_Q == 1) {
265                        mes "[Tohobu]";
266                        mes "Listen carefully on your journey.";
267                        mes "There is much to learn.";
268                        close;
269                }
270                else if (BaseJob == Job_Acolyte && MONK_Q == 2) {
271                        mes "[Tohobu]";
272                        mes "Hmm... would you like to meet sensei Moohae?";
273                        mes "He is in the south east area in 'The Hall of Monks'.";
274                        close;
275                }
276                else if (BaseJob == Job_Acolyte && MONK_Q > 2) {
277                        mes "[Tohobu]";
278                        mes "I hope you do well in your training and I look forward to seeing you again.";
279                        close;
280                }
281                else {
282                        mes "[Tohobu]";
283                        mes "Welcome to the central chamber of our Church.";
284                        mes "Please, try not to disturb the other monks.";
285                        mes "Even if you are a monk yourself.";
286                        close;
287                }
288        }
289
290OnTouch:
291        if (MONK_Q == 0) {
292                mes "[Tohobu]";
293                mes "How dare you set foot in";
294                mes "this holy building! ! !";
295                mes "Where is your respect?!";
296                next;
297                mes "[Tohobu]";
298                mes "Leave this place ! ! !";
299                close;
300        }
301        if (MONK_Q == 1) {
302                mes "[Tohobu]";
303                mes "Hmmm... come in.";
304                mes "You may learn something...";
305                close;
306        }
307        if (BaseJob == Job_Acolyte && MONK_Q == 2) {
308                mes "[Tohobu]";
309                mes "Hmm.....you wish to see our sensei Moohae?";
310                mes "He is in the south east section of this building.";
311                close;
312        }
313        if (BaseJob == Job_Acolyte && MONK_Q > 2) {
314                mes "[Tohobu]";
315                mes "I look forward to seeing you become a monk and joining us.";
316                close;
317        }
318        end;
319}
320
321monk_in,99,58,1 script  Sensei Moohae#mk        60,{
322        mes "[Sensei Moohae]";
323        mes "Greetings, you seem to be on a pure path.";
324        mes "Come in, come in, what can I do for you today?";
325        next;
326        if (SkillPoint) {
327                mes "[Sensei Moohae]";
328                mes "If you have free skill points, you will lose them during a job change.";
329                mes "Make sure to use any skill points you have.";
330                close;
331        }
332        if (BaseJob == Job_Acolyte && MONK_Q == 2 && JobLevel > 39) {
333                mes "[Sensei Moohae]";
334                mes "I sense a fighting spirit, do you wish to become a monk? ";
335                next;
336                if (select("Yes.:No.") == 2) {
337                        mes "[Sensei Moohae]";
338                        mes "My apologies... It has been some time since";
339                        mes "I have sensed someone with your strength.";
340                        mes "I hope you find your path young one.";
341                        close;
342                }
343                mes "[Sensei Moohae]";
344                mes "There are still those who wish to follow the old ways.";
345                if (Sex)
346                        mes "A strong young man. I am pleased of your will to join us.";
347                else
348                        mes "Such a delicate flower. I am pleased to see your will to join us.";
349                next;
350                mes "[Sensei Moohae]";
351                mes "Oh, you are the new pupil that wishes to join us...";
352                mes "Well there are a few things that you should know prior to beginning your training.";
353                next;
354                mes "[Sensei Moohae]";
355                mes "We monks are on a path of inner peace and enlightenment.";
356                mes "We strive to bring such peace to all others with great care.";
357                next;
358                mes "[Sensei Moohae]";
359                mes "We monks achieve this from mental and physical training.";
360                mes "We search for enlightenment in our surroundings and in nature.";
361                next;
362                mes "[Sensei Moohae]";
363                mes "It is, of course, important to always keep our original faith in God.";
364                next;
365                mes "[Sensei Moohae]";
366                mes "This is not an easy life and the true test of becoming a monk is having the ability to endure all of which I said...";
367                mes "The life of a monk is not for everybody, only those strong enough can become a monk.";
368                next;
369                mes "[Sensei Moohae]";
370                mes "Now, that you understand all of this,";
371                mes "prepare yourself to train";
372                mes "your strength and spirit.";
373                next;
374                mes "[Sensei Moohae]";
375                mes "Let us start with a simple task.";
376                next;
377                switch(rand(1,7)) {
378                case 1: setarray .@items[0], 938,5, 1055,10, 511,20, 3; break;
379                case 2: setarray .@items[0], 942,20, 1002,5, 510,3, 4; break;
380                case 3: setarray .@items[0], 905,30, 909,5, 955,10, 5; break;
381                case 4: setarray .@items[0], 943,5, 935,20, 912,5, 6; break;
382                case 5: setarray .@items[0], 7053,5, 509,10, 508,10, 7; break;
383                case 6: setarray .@items[0], 913,10, 948,4, 7033,20, 8; break;
384                case 7: setarray .@items[0], 1027,5, 1025,20, 1042,10, 9; break;
385                }
386                mes "[Sensei Moohae]";
387                mes .@items[1]+" "+getitemname(.@items[0])+",";
388                mes .@items[3]+" "+getitemname(.@items[2])+",";
389                mes .@items[5]+" "+getitemname(.@items[4])+".";
390                mes "Find these items and return to me.";
391                set MONK_Q,.@items[6];
392                next;
393                mes "[Sensei Moohae]";
394                switch (.@items[6]) {
395                case 3: mes "Why the face? This is a test of your abilities."; break;
396                case 4: mes "What's wrong? This is a test of your abilities."; break;
397                case 5: mes "You do understand don't you? This is a test of your abilities."; break;
398                case 6: mes "Don't look at me like that. This is a test of your abilities."; break;
399                case 7: mes "You don't seem concerned, this is a test of your abilities You should take this seriously."; break;
400                case 8: mes "It is a test of your abilities so make sure you acquire these on your own."; break;
401                case 9: mes "Don't be concerned, I believe you can do it. This is only to test your abilities."; break;
402                }
403                next;
404                mes "[Sensei Moohae]";
405                mes "If you are unable to return with these items, you are not yet ready to become a monk.";
406                mes "Be sure to collect all the items I listed.";
407                mes "May God be with you.";
408                close;
409        }
410        else if (MONK_Q == 3) {
411                mes "[Sensei Moohae]";
412                mes "You are back, did you bring what I asked?";
413                next;
414                if (countitem(938) > 4 && countitem(1055) > 9 && countitem(511) > 19) {
415                        mes "[Sensei Moohae]";
416                        mes "Well done, you found all the items.";
417                        mes "I will tell this to the elders.";
418                        set MONK_Q,10;
419                        delitem 938,5; //Sticky_Mucus
420                        delitem 1055,10; //Earthworm_Peeling
421                        delitem 511,20; //Green_Herb
422                        next;
423                        mes "[Sensei Moohae]";
424                        mes "Let's see who is to see you next..";
425                        mes "Ah... go find elder Touha.";
426                        mes "He is in the north west.";
427                        close;
428                }
429                else {
430                        mes "[Sensei Moohae]";
431                        mes "How can you think to be done?";
432                        mes "You do not have what I asked for!";
433                        mes "5 Sticky Mucus,";
434                        mes "10 Earthworm Peeling,";
435                        mes "20 Green Herb.";
436                        mes "These are the items I require, go find them all.";
437                        close;
438                }
439        }
440        else if (MONK_Q == 4) {
441                mes "[Sensei Moohae]";
442                mes "...eh?";
443                next;
444                if (countitem(942) > 19 && countitem(1002) > 4 && countitem(510) > 2) {
445                        mes "[Sensei Moohae]";
446                        mes "Very good, you found all the items.";
447                        mes "I will tell this to the elders.";
448                        set MONK_Q,10;
449                        delitem 942,20; //Yoyo_Tail
450                        delitem 1002,5; //Iron_Ore
451                        delitem 510,3; //Blue_Herb
452                        next;
453                        mes "[Sensei Moohae]";
454                        mes "Let's see who is to see you next..";
455                        mes "Ah... go find elder Touha.";
456                        mes "He is in the north west.";
457                        close;
458                }
459                else {
460                        mes "[Sensei Moohae]";
461                        mes "Why did you return?";
462                        mes "You do not have what I asked for!";
463                        mes "20 Yoyo Tail,";
464                        mes "5 Iron Ore,";
465                        mes "3 Blue Herb.";
466                        mes "These are the items I require, go find them all.";
467                        close;
468                }
469        }
470        else if (MONK_Q == 5) {
471                mes "[Sensei Moohae]";
472                mes "Hmm?";
473                next;
474                if (countitem(905) > 29 && countitem(909) > 4 && countitem(955) > 9) {
475                        mes "[Sensei Moohae]";
476                        mes "See, that wasn't so bad you real found all the items.";
477                        mes "I will tell this to the elders.";
478                        set MONK_Q,10;
479                        delitem 905,30; //Stem
480                        delitem 909,5; //Jellopy
481                        delitem 955,10; //Worm_Peelings
482                        next;
483                        mes "[Sensei Moohae]";
484                        mes "The next step will be given";
485                        mes "to you by Touha.";
486                        mes "He is in the north west.";
487                        close;
488                }
489                else {
490                        mes "[Sensei Moohae]";
491                        mes "How can you think to be done?";
492                        mes "You do not have what I asked for!";
493                        mes "30 Stem,";
494                        mes "5 Jellopy";
495                        mes "10 Worm Peelings";
496                        mes "These are the items I require, go find them all.";
497                        close;
498                }
499        }
500        else if (MONK_Q == 6) {
501                mes "[Sensei Moohae]";
502                mes "I have been waiting for you.";
503                next;
504                if (countitem(943) > 4 && countitem(935) > 19 && countitem(912) > 4) {
505                        mes "[Sensei Moohae]";
506                        mes "Impressive, you really found all the items.";
507                        mes "I will tell this to the elders.";
508                        set MONK_Q,10;
509                        delitem 943,5; //Solid_Shell
510                        delitem 935,20; //Shell
511                        delitem 912,5; //Zargon
512                        next;
513                        mes "[Sensei Moohae]";
514                        mes "Your next step will be with..";
515                        mes "elder Touha. Go find him.";
516                        mes "He is in the north west.";
517                        close;
518                }
519                else {
520                        mes "[Sensei Moohae]";
521                        mes "How can you think to be done?";
522                        mes "You do not have what I asked for!";
523                        mes "5 Solid Shell,";
524                        mes "20 Shell,";
525                        mes "5 Zargon.";
526                        mes "These are the items I require, go find them all.";
527                        close;
528                }
529        }
530        else if (MONK_Q == 7) {
531                mes "[Sensei Moohae]";
532                mes "Hello again. Back so soon?";
533                next;
534                if (countitem(7053) > 4 && countitem(509) > 9 && countitem(508) > 9) {
535                        mes "[Sensei Moohae]";
536                        mes "Very nice, you found all the items.";
537                        mes "I will tell this to the elders.";
538                        set MONK_Q,10;
539                        delitem 7053,5; //Cyfar
540                        delitem 509,10; //White_Herb
541                        delitem 508,10; //Yellow_Herb
542                        next;
543                        mes "[Sensei Moohae]";
544                        mes "Let's see who is to see you next..";
545                        mes "Ah... go find elder Touha.";
546                        mes "He is in the north west.";
547                        close;
548                }
549                else {
550                        mes "[Sensei Moohae]";
551                        mes "Where are the items...?";
552                        mes "You do not have what I asked for!";
553                        mes "5 Cyfar,";
554                        mes "10 White Herb,";
555                        mes "10 Yellow Herb.";
556                        mes "These are the items I require, go find them all.";
557                        close;
558                }
559        }
560        else if (MONK_Q == 8) {
561                mes "[Sensei Moohae]";
562                mes "Hmm?";
563                next;
564                if (countitem(913) > 9 && countitem(948) > 4 && countitem(7033) > 19) {
565                        mes "[Sensei Moohae]";
566                        mes "Excellent, all the items I asked for.";
567                        mes "I will tell this to the elders.";
568                        set MONK_Q,10;
569                        delitem 913,10; //Tooth_Of_Bat
570                        delitem 948,5; //Bear's_Foot
571                        delitem 7033,20; //Poison_Spore
572                        next;
573                        mes "[Sensei Moohae]";
574                        mes "Let's see who is to see you next..";
575                        mes "Ah... go find elder Touha.";
576                        mes "He is in the north west.";
577                        close;
578                }
579                else {
580                        mes "[Sensei Moohae]";
581                        mes "How can you think to be done?";
582                        mes "You do not have what I asked for!";
583                        mes "10 Tooth of Bat,";
584                        mes "5 Bear's Foot skin";
585                        mes "20 Poison Spore";
586                        mes "These are the items I require, go find them all.";
587                        close;
588                }
589        }
590        else if (MONK_Q == 9) {
591                mes "[Sensei Moohae]";
592                mes "Welcome back.";
593                next;
594                if (countitem(1027) > 4 && countitem(1025) > 19 && countitem(1042) > 9) {
595                        mes "[Sensei Moohae]";
596                        mes "Wow, you found all the items!!";
597                        mes "I will tell this to the elders.";
598                        set MONK_Q,10;
599                        delitem 1027,5; //Porcupine_Spike
600                        delitem 1025,20; //Spiderweb
601                        delitem 1042,10; //Short_Leg
602                        next;
603                        mes "[Sensei Moohae]";
604                        mes "Let's see who is to see you next..";
605                        mes "Ah... go find elder Touha.";
606                        mes "He is in the north west.";
607                        close;
608                }
609                else {
610                        mes "[Sensei Moohae]";
611                        mes "How can you think to be done?";
612                        mes "You do not have what I asked for!";
613                        mes "5 Porcupine Quill,";
614                        mes "20 Cobweb,";
615                        mes "10 Bug Leg.";
616                        mes "These are the items I require, go find them all.";
617                        close;
618                }
619        }
620        else if (MONK_Q > 9 && MONK_Q < 14) {
621                mes "[Sensei Moohae]";
622                mes "I told you already.";
623                mes "Go find ^CC0000Touha^000000.";
624                mes "He is a little north west of here.";
625                close;
626        }
627        else if (MONK_Q > 13 && MONK_Q < 26) {
628                mes "[Sensei Moohae]";
629                mes "Oh, are you still in the process of training?";
630                mes "Hurry and finish!";
631                close;
632        }
633        else if (MONK_Q > 25 && MONK_Q < 27) {
634                mes "[Sensei Moohae]";
635                mes "I hear good things coming from your training.";
636                mes "Good luck and work hard. You will do great things as a monk.";
637                close;
638        }
639        else if (MONK_Q == 27 && BaseJob == Job_Acolyte) {
640                mes "[Sensei Moohae]";
641                mes ".......Hmmm.....";
642                mes "Go to Tomoon, get a special potion from him. It will look like a green potion, but it isn't. Bring it to me...";
643                close;
644        }
645        else if (MONK_Q == 28 && BaseJob == Job_Acolyte) {
646                if (countitem(506) > 0) {
647                        mes "[Sensei Moohae]";
648                        mes "Do you still have the medicine you were supposed to bring?";
649                        mes "You must drink that green potion to strengthen yourself for becoming a monk.";
650                }
651                else if (countitem(506) == 0) {
652                        mes "[Sensei Moohae]";
653                        mes "Have you finished the task? Good, so you do have what it takes to become a monk.";
654                        mes "You didn't throw away the precious potion did you?";
655                        next;
656                        mes "[Sensei Moohae]";
657                        mes "The potion you drank earlier must be taking its effect by now.";
658                        mes "Now that you drank the potion your training to become a monk will begin shortly...";
659                        next;
660                        mes "[Sensei Moohae]";
661                        mes "But first, answer me these questions.";
662                        mes "Do you dedicate the remainder of your life to the pursuit of purity?";
663                        next;
664                        if (select("Yes.:No.") == 2) {
665                                mes "[Sensei Moohae]";
666                                mes "....with that kind of reply...";
667                                mes "Have you not enough heart to become a monk?";
668                                mes "Do you feel you have not suffered enough?";
669                                next;
670                                mes "[Sensei Moohae]";
671                                mes "Think about it a little more and return!";
672                                mes "We cannot accept a monk who is tainted with doubt...";
673                                close;
674                        }
675                        mes "[Sensei Moohae]";
676                        mes "Will you take advantage of the abilities gained through our training to use for personal benefit?";
677                        next;
678                        if (select("Yes.:No.") == 1) {
679                                mes "[Sensei Moohae]";
680                                mes "...then we cannot accept you as a monk. We, monks do not practice for personal benefit.";
681                                mes "We lead our lives honorably and as holy executioners to the damned.";
682                                next;
683                                mes "[Sensei Moohae]";
684                                mes "Go back where you're from and reconsider what it means to be a monk...";
685                                mes "How you stand before me now, you will never last as a monk and will be tainted by that which is evil...";
686                                close;
687                        }
688                        mes "[Sensei Moohae]";
689                        mes "Will you punishing those who are against";
690                        mes "veritas and aequitas? ^CCCCCC(Truth and Justice)^000000";
691                        next;
692                        if (select("Yes.:No.") == 2) {
693                                mes "[Sensei Moohae]";
694                                mes "Who do you think we, the monks are for!";
695                                mes "Any creature that is against the will of such spawns from the dregs of the world!";
696                                mes "They are not worthy to exist!";
697                                next;
698                                mes "[Sensei Moohae]";
699                                mes "Return when you are ready to face and eliminate that which is evil.";
700                                mes "Then you will know what you have to do next without my instructions.";
701                                close;
702                        }
703                        mes "[Sensei Moohae]";
704                        mes "Will you cooperate with others who have the same goal as yours and sacrifice yourself as a means to an end?";
705                        next;
706                        if (select("Yes.:No.") == 2) {
707                                mes "[Sensei Moohae]";
708                                mes "Did you say no...? This is unacceptable...";
709                                mes "If you can help your comrades by sacrificing yourself that is a true display of purity.";
710                                next;
711                                mes "[Sensei Moohae]";
712                                mes "Go back and contemplate upon what it means to sacrifice yourself for those you care for.";
713                                mes "Sacrificing yourself for others may seem easy, but it's the most difficult thing to do as a human being.";
714                                close;
715                        }
716                        mes "[Sensei Moohae]";
717                        mes "Will you assist your comrades by gathering monsters to follow you?";
718                        next;
719                        if (select("Yes.:No.") == 1) {
720                                mes "[Sensei Moohae]";
721                                mes "That is not acceptable. Purposely taunting monsters to follow you can be very dangerous and harmful to others. This is not the way of a monk.";
722                                mes "... that behavior is regarded as careless and is not tolerated.";
723                                next;
724                                mes "[Sensei Moohae]";
725                                mes "Even though you may be nearly invincible when hardening your body that skill is meant to be used for emergency situation not to be used for such disrespectful use!";
726                                next;
727                                mes "[Sensei Moohae]";
728                                mes "You might feel that's helping others, but it's not true.";
729                                mes "Consider what it is you must do as a monk for others again.";
730                                close;
731                        }
732                        mes "[Sensei Moohae]";
733                        mes "Will you yell and shout the same things over and over again in towns or in fields?";
734                        next;
735                        if (select("Yes.:No.") == 1) {
736                                mes "[Sensei Moohae]";
737                                mes "You are not allowed to do so. This doesn't apply only to monks but to everyone.";
738                                mes "Nobody wants their peace disturbed!";
739                                mes "Even if you mean well by it, it is disrespectful and not allowed.";
740                                close;
741                        }
742                        mes "[Sensei Moohae]";
743                        mes "Are you willing to die for others on your monk's path of being a holy executioner?";
744                        next;
745                        if (select("Yes.:No.") == 2) {
746                                mes "[Sensei Moohae]";
747                                mes "You cannot become a monk with such an attitude!!!";
748                                mes "If we can eliminate at least one more enemy of ours by sacrificing ourselves, that's what is expected of you as a holy executioner in whom we are trained to be.";
749                                next;
750                                mes "[Sensei Moohae]";
751                                mes "If you are unwilling to sacrifice yourself for those you care about,";
752                                mes "how can you expect to reach true enlightenment?";
753                                mes "Ponder upon the real meaning of life and death!!";
754                                close;
755                        }
756                        mes "Lastly, make your oath that you will keep these vows.";
757                        next;
758                        if (select(" I vow to keep these oaths.:...eh...no...") == 2) {
759                                mes "[Sensei Moohae]";
760                                mes "..............";
761                                next;
762                                mes "[Sensei Moohae]";
763                                mes "Then your training isn't completed.";
764                                if (Sex)
765                                        mes "You will not be accepted as a monk my boy.";
766                                else
767                                        mes "You will not be accepted as a monk little girl.";
768                                next;
769                                mes "[Sensei Moohae]";
770                                mes "In light of this, your training will start again from the beginning....";
771                                next;
772                                mes "Calm down yourself... I reconsidered... perhaps you are simply not ready for the commitment yet.";
773                                mes "Come back later when you're ready...";
774                                next;
775                                mes "[Sensei Moohae]";
776                                if (Sex)
777                                        mes "I hope that you are able to realize what you are to become soon my boy...";
778                                else
779                                        mes "I hope that you are able to realize what you are to become soon my girl...";
780                                close;
781                        }
782                        mes "[Sensei Moohae]";
783                        mes "Then your training is complete...";
784                        mes "Please come closer.";
785                        if (Sex)
786                                mes "We welcome you brother, in our holy battle against evil!";
787                        else
788                                mes "We welcome you sister, in our holy battle against evil!";
789                        next;
790                        mes "[Sensei Moohae]";
791                        if (Sex)
792                                mes "My brother, your oath has been heard by all around us.";
793                        else
794                                mes "My sister, your oath has been heard by all around us.";
795                        next;
796                        mes "[Sensei Moohae]";
797                        mes "I will now perform the ultimate techniques upon your body...";
798                        next;
799                        mes "[Sensei Moohae]";
800                        mes "I will use these ancient techniques to amplify your strength through the use of pressure points on your body.";
801                        next;
802                        mes "[Sensei Moohae]";
803                        mes "Close your eyes.........";
804                        next;
805                        mes "[Sensei Moohae]";
806                        mes "And relax your body.......";
807                        next;
808                        mes "["+ strcharinfo(0) +"]";
809                        mes "^00CCCC- You breathe in deeply -^000000";
810                        next;
811                        mes "["+ strcharinfo(0) +"]";
812                        mes "^CC0000- You feel fingers poking you all over your body with swiftness -^000000";
813                        next;
814                        mes "[Sensei Moohae]";
815                        mes "Kiiii~~~Yahahhhhhhh!!!";
816                        next;
817                        mes "[Sensei Moohae]";
818                        mes "Ooooohaaa!!!";
819                        next;
820                        mes "[Sensei Moohae]";
821                        mes "Kiii~~~Yahahhhhhhh!!!";
822                        next;
823                        mes "[Sensei Moohae]";
824                        mes "Haa~ Haa~ Haa~!!!!!";
825                        next;
826                        mes "[Sensei Moohae]";
827                        mes ".... now open your eyes......";
828                        next;
829                        mes "[Sensei Moohae]";
830                        mes "....and see life through the eyes of a monk.";
831                        next;
832                        set .@jlevel,JobLevel;
833                        callfunc "Job_Change",Job_Monk;
834                        callfunc "F_ClearJobVar";
835                        mes "[Sensei Moohae]";
836                        mes "....You are a monk.";
837                        next;
838                        mes "[Sensei Moohae]";
839                        mes "...heh.";
840                        next;
841                        mes "[Sensei Moohae]";
842                        mes "Well...I guess I am too old to do that anymore...I was better when I was younger...";
843                        next;
844                        mes "[Sensei Moohae]";
845                        mes "...anyways, you are a monk now.";
846                        mes "Welcome!";
847                        next;
848                        mes "[Sensei Moohae]";
849                        mes "I hope you will keep your vow..";
850                        next;
851                        mes "[Sensei Moohae]";
852                        mes "continue your training on your path and practice harder.";
853                        next;
854                        mes "[Sensei Moohae]";
855                        mes "Now...you may leave where the wind may take you.";
856                        mes "Oh and I have a gift for you before you leave.";
857                        if (.@jlevel == 50)
858                                getitem 1804,1; //Knuckle_Duster_
859                        else
860                                getitem 1801,1; //Waghnakh
861                }
862                close;
863        }
864        else if (BaseJob == Job_Acolyte) {
865                mes "[Sensei Moohae]";
866                mes "You are...an acolyte..?";
867                mes "If you seek consultation, go to the Sanctuary in Prontera. This place is for Monks, not for you.";
868                mes "Unless you intend to become a monk....please leave.";
869                close;
870        }
871        else if (BaseJob == Job_Monk) {
872                mes "[Sensei Moohae]";
873                mes "How's your practice going?";
874                mes "I hope you are still training and keeping your vows.";
875                next;
876                mes "[Sensei Moohae]";
877                mes "We must always continue our training in life and stay true to our path.";
878                mes "Otherwise evil will come and taint our mind with impurities.";
879                next;
880                mes "[Sensei Moohae]";
881                mes "Don't forget your vows, stay on your path and";
882                mes "do not let any evil taint your pure heart.";
883                close;
884        }
885        else {
886                mes "[Sensei Moohae]";
887                mes "If you seek consultation, go to the Sanctuary in Prontera.";
888                mes "We do not have anything of interest to you here, please leave and do not disturb the other monks.";
889                close;
890        }
891}
892
893prt_monk,251,255,1      script  Touha#mk        79,{
894        if (MONK_Q == 10) {
895                mes "[Touha]";
896                mes "What brings you to me.";
897                mes "Do you wish to share a conversation with me?";
898                next;
899                mes "[Touha]";
900                mes "Oh, I see. You're on the monk in training.";
901                mes "You already possess a similar spirit as a monk's.";
902                next;
903                mes "[Touha]";
904                mes "By the looks of you, it seems, you";
905                mes "have already visited Sensei Moohae. Good.";
906                next;
907                mes "[Touha]";
908                mes "Let me inform you about certain things you must know as a monk.";
909                mes "Then I will help you to strengthen your body so that you can bear your next training.";
910                next;
911                mes "[Touha]";
912                mes "Calm your mind.";
913                mes "Relax your body...are you ready?";
914                next;
915                if (select("Yes.:No.") == 2) {
916                        mes "[Touha]";
917                        mes "Please come back when you're ready.";
918                        close;
919                }
920                mes "[Touha]";
921                mes "Ok...then.";
922                next;
923                mes "[Touha]";
924                mes "Please repeat after me.";
925                next;
926                mes "[Touha]";
927                switch(rand(1,3)) {
928                case 1:
929                        set MONK_Q,11;
930                        mes "I seek the path";
931                        next;
932                        mes "[Touha]";
933                        mes "of enlightenment.";
934                        next;
935                        mes "[Touha]";
936                        mes "We monks";
937                        next;
938                        mes "[Touha]";
939                        mes "shall hold true";
940                        next;
941                        mes "[Touha]";
942                        mes "to what we believe";
943                        next;
944                        mes "[Touha]";
945                        mes "and will help protect others";
946                        next;
947                        mes "[Touha]";
948                        mes "through the teachings";
949                        next;
950                        mes "[Touha]";
951                        mes "we learn through our lives.";
952                        next;
953                        mes "[Touha]";
954                        mes "In nomine Patris, et Filii";
955                        next;
956                        mes "[Touha]";
957                        mes "et Spiritus Sancti.";
958                        break;
959                case 2:
960                        set MONK_Q,12;
961                        mes "I commit myself to";
962                        next;
963                        mes "[Touha]";
964                        mes "veritas and aequitas.";
965                        next;
966                        mes "[Touha]";
967                        mes "I will follow my path";
968                        next;
969                        mes "[Touha]";
970                        mes "to enlightenment and purity.";
971                        next;
972                        mes "[Touha]";
973                        mes "I will protect my";
974                        next;
975                        mes "[Touha]";
976                        mes "brothers with my life.";
977                        next;
978                        mes "[Touha]";
979                        mes "Evil shall never be";
980                        next;
981                        mes "[Touha]";
982                        mes "victorious while I breathe.";
983                        next;
984                        mes "[Touha]";
985                        mes "In nomine Patris, et Filii";
986                        next;
987                        mes "[Touha]";
988                        mes "et Spiritus Sancti.";
989                        break;
990                case 3:
991                        set MONK_Q,13;
992                        mes "And shepherds we shall be,";
993                        next;
994                        mes "[Touha]";
995                        mes "for thee my lord for thee.";
996                        next;
997                        mes "[Touha]";
998                        mes "Power hath descended forth";
999                        next;
1000                        mes "[Touha]";
1001                        mes "from the hand";
1002                        next;
1003                        mes "[Touha]";
1004                        mes "so our feet may swiftly carry";
1005                        next;
1006                        mes "[Touha]";
1007                        mes "out thy command. And we shall";
1008                        next;
1009                        mes "[Touha]";
1010                        mes "flow a river forth to thee and";
1011                        next;
1012                        mes "[Touha]";
1013                        mes "teeming with souls shall it ever be";
1014                        next;
1015                        mes "[Touha]";
1016                        mes "In nomine Patris, et Filii";
1017                        next;
1018                        mes "[Touha]";
1019                        mes "et Spiritus Sancti.";
1020                }
1021                next;
1022                mes "[Touha]";
1023                mes "Ok, that is all. Now repeat what I have spoken.";
1024                if (MONK_Q == 11) {
1025L_MonkOath1:
1026                        mes "" + strcharinfo(0) + ", your turn.";
1027                        next;
1028                        switch(select("shall hold true:We monks:and will help protect others:through the teachings:In nomine Patris, et Filii:to what we believe:I seek the path:we learn through our lives.:et Spiritus Sancti.:of enlightenment.")) {
1029                        case 1:
1030                                mes "[" + strcharinfo(0) + "]";
1031                                mes "shall hold true";
1032                                break;
1033                        case 2:
1034                                mes "[" + strcharinfo(0) + "]";
1035                                mes "We monks";
1036                                break;
1037                        case 3:
1038                                mes "[" + strcharinfo(0) + "]";
1039                                mes "and will help protect others";
1040                                break;
1041                        case 4:
1042                                mes "[" + strcharinfo(0) + "]";
1043                                mes "through the teachings";
1044                                break;
1045                        case 5:
1046                                mes "[" + strcharinfo(0) + "]";
1047                                mes "In nomine Patris, et Filii";
1048                                break;
1049                        case 6:
1050                                mes "[" + strcharinfo(0) + "]";
1051                                mes "to what we believe";
1052                                break;
1053                        case 7:
1054                                set .@monk_t,.@monk_t+10;
1055                                mes "[" + strcharinfo(0) + "]";
1056                                mes "I seek the path";
1057                                break;
1058                        case 8:
1059                                mes "[" + strcharinfo(0) + "]";
1060                                mes "we learn through our lives.";
1061                                break;
1062                        case 9:
1063                                mes "[" + strcharinfo(0) + "]";
1064                                mes "et Spiritus Sancti.";
1065                                break;
1066                        case 10:
1067                                mes "[" + strcharinfo(0) + "]";
1068                                mes "of enlightenment.";
1069                                break;
1070                        }
1071                        switch(select("We monks:In nomine Patris, et Filii:I seek the path:shall hold true:of enlightenment.:and will help protect others:we learn through our lives.:through the teachings:to what we believe:et Spiritus Sancti.")) {
1072                        case 1: mes "We monks"; break;
1073                        case 2: mes "In nomine Patris, et Filii"; break;
1074                        case 3: mes "I seek the path"; break;
1075                        case 4: mes "shall hold true"; break;
1076                        case 5:
1077                                set .@monk_t,.@monk_t+10;
1078                                mes "of enlightenment.";
1079                                break;
1080                        case 6: mes "and will help protect others";  break;
1081                        case 7: mes "we learn through our lives."; break;
1082                        case 8: mes "through the teachings"; break;
1083                        case 9: mes "to what we believe"; break;
1084                        case 10: mes "et Spiritus Sancti."; break;
1085                        }
1086                        switch(select("to what we believe:We monks:I seek the path:shall hold true:of enlightenment.:we learn through our lives.:In nomine Patris, et Filii:and will help protect others:through the teachings:et Spiritus Sancti.")) {
1087                        case 1: mes "to what we believe"; break;
1088                        case 2:
1089                                set .@monk_t,.@monk_t+10;
1090                                mes "We monks";
1091                                break;
1092                        case 3: mes "I seek the path"; break;
1093                        case 4: mes "shall hold true"; break;
1094                        case 5: mes "of enlightenment."; break;
1095                        case 6: mes "we learn through our lives."; break;
1096                        case 7: mes "In nomine Patris, et Filii"; break;
1097                        case 8: mes "and will help protect others"; break;
1098                        case 9: mes "through the teachings"; break;
1099                        case 10: mes "et Spiritus Sancti."; break;
1100                        }
1101                        switch(select("shall hold true:I seek the path:We monks:In nomine Patris, et Filii:of enlightenment.:et Spiritus Sancti.:to what we believe:we learn through our lives.:and will help protect others:through the teachings")) {
1102                        case 1:
1103                                set .@monk_t,.@monk_t+10;
1104                                mes "shall hold true";
1105                                break;
1106                        case 2: mes "I seek the path"; break;
1107                        case 3: mes "We monks";
1108                                break;
1109                        case 4: mes "In nomine Patris, et Filii"; break;
1110                        case 5: mes "of enlightenment."; break;
1111                        case 6: mes "et Spiritus Sancti."; break;
1112                        case 7: mes "to what we believe"; break;
1113                        case 8: mes "we learn through our lives."; break;
1114                        case 9: mes "and will help protect others"; break;
1115                        case 10: mes "through the teachings"; break;
1116                        }
1117                        switch(select("of enlightenment.:I seek the path:We monks:shall hold true:and will help protect others:through the teachings:we learn through our lives.:In nomine Patris, et Filii:to what we believe:et Spiritus Sancti.")) {
1118                        case 1: mes "of enlightenment."; break;
1119                        case 2: mes "I seek the path"; break;
1120                        case 3: mes "We monks"; break;
1121                        case 4: mes "shall hold true"; break;
1122                        case 5: mes "and will help protect others"; break;
1123                        case 6: mes "through the teachings"; break;
1124                        case 7: mes "we learn through our lives."; break;
1125                        case 8: mes "In nomine Patris, et Filii"; break;
1126                        case 9:
1127                                set .@monk_t,.@monk_t+10;
1128                                mes "to what we believe";
1129                                break;
1130                        case 10: mes "et Spiritus Sancti."; break;
1131                        }
1132                        switch(select("I seek the path:through the teachings:and will help protect others:of enlightenment.:shall hold true:et Spiritus Sancti.:In nomine Patris, et Filii:to what we believe:We monks:we learn through our lives.")) {
1133                        case 1: mes "I seek the path"; break;
1134                        case 2: mes "through the teachings"; break;
1135                        case 3:
1136                                set .@monk_t,.@monk_t+10;
1137                                mes "and will help protect others";
1138                                break;
1139                        case 4: mes "of enlightenment."; break;
1140                        case 5: mes "shall hold true"; break;
1141                        case 6: mes "et Spiritus Sancti."; break;
1142                        case 7: mes "In nomine Patris, et Filii"; break;
1143                        case 8: mes "to what we believe"; break;
1144                        case 9: mes "We monks"; break;
1145                        case 10: mes "we learn through our lives."; break;
1146                        }
1147                        switch(select("we learn through our lives.:In nomine Patris, et Filii:et Spiritus Sancti.:I seek the path:of enlightenment.:to what we believe:We monks:shall hold true:and will help protect others:through the teachings")) {
1148                        case 1: mes "we learn through our lives."; break;
1149                        case 2: mes "In nomine Patris, et Filii"; break;
1150                        case 3: mes "et Spiritus Sancti."; break;
1151                        case 4: mes "I seek the path"; break;
1152                        case 5: mes "of enlightenment."; break;
1153                        case 6: mes "to what we believe"; break;
1154                        case 7: mes "We monks"; break;
1155                        case 8: mes "shall hold true"; break;
1156                        case 9: mes "and will help protect others"; break;
1157                        case 10:
1158                                set .@monk_t,.@monk_t+10;
1159                                mes "through the teachings";
1160                                break;
1161                        }
1162                        switch(select("we learn through our lives.:In nomine Patris, et Filii:through the teachings:I seek the path:We monks:shall hold true:to what we believe:and will help protect others:of enlightenment.:et Spiritus Sancti.")) {
1163                        case 1:
1164                                set .@monk_t,.@monk_t+10;
1165                                mes "we learn through our lives.";
1166                                break;
1167                        case 2: mes "In nomine Patris, et Filii"; break;
1168                        case 3: mes "through the teachings"; break;
1169                        case 4: mes "I seek the path"; break;
1170                        case 5: mes "We monks"; break;
1171                        case 6: mes "shall hold true"; break;
1172                        case 7: mes "to what we believe"; break;
1173                        case 8: mes "and will help protect others"; break;
1174                        case 9: mes "of enlightenment."; break;
1175                        case 10: mes "et Spiritus Sancti."; break;
1176                        }
1177                        switch(select("I seek the path:of enlightenment.:We monks:shall hold true:to what we believe:et Spiritus Sancti.:and will help protect others:through the teachings:we learn through our lives.:In nomine Patris, et Filii")) {
1178                        case 1: mes "I seek the path"; break;
1179                        case 2: mes "of enlightenment."; break;
1180                        case 3: mes "We monks"; break;
1181                        case 4: mes "shall hold true"; break;
1182                        case 5: mes "to what we believe"; break;
1183                        case 6: mes "et Spiritus Sancti."; break;
1184                        case 7: mes "and will help protect others"; break;
1185                        case 8: mes "through the teachings"; break;
1186                        case 9: mes "we learn through our lives."; break;
1187                        case 10:
1188                                set .@monk_t,.@monk_t+10;
1189                                mes "In nomine Patris, et Filii";
1190                                break;
1191                        }
1192                        switch(select("I seek the path:of enlightenment.:We monks:shall hold true:to what we believe:and will help protect others:through the teachings:we learn through our lives.:In nomine Patris, et Filii:et Spiritus Sancti.")) {
1193                        case 1: mes "I seek the path"; break;
1194                        case 2: mes "of enlightenment."; break;
1195                        case 3: mes "We monks"; break;
1196                        case 4: mes "shall hold true"; break;
1197                        case 5: mes "to what we believe"; break;
1198                        case 6: mes "and will help protect others"; break;
1199                        case 7: mes "through the teachings"; break;
1200                        case 8: mes "we learn through our lives."; break;
1201                        case 9: mes "In nomine Patris, et Filii"; break;
1202                        case 10:
1203                                set .@monk_t,.@monk_t+10;
1204                                mes "et Spiritus Sancti.";
1205                                break;
1206                        }
1207                }
1208                else if (MONK_Q == 12) {
1209L_MonkOath2:
1210                        mes "" + strcharinfo(0) + ", your turn.";
1211                        next;
1212                        switch(select("I will follow my path:veritas and aequitas.:to enlightenment and purity.:I commit myself to:I will protect my:victorious while I breathe.:brothers with my life.:Evil shall never be:In nomine Patris, et Filii:et Spiritus Sancti.")) {
1213                        case 1:
1214                                mes "[" + strcharinfo(0) + "]";
1215                                mes "I will follow my path";
1216                                break;
1217                        case 2:
1218                                mes "[" + strcharinfo(0) + "]";
1219                                mes "veritas and aequitas.";
1220                                break;
1221                        case 3:
1222                                mes "[" + strcharinfo(0) + "]";
1223                                mes "to enlightenment and purity.";
1224                                break;
1225                        case 4:
1226                                mes "[" + strcharinfo(0) + "]";
1227                                set .@monk_t,.@monk_t+10;
1228                                mes "I commit myself to";
1229                                break;
1230                        case 5:
1231                                mes "[" + strcharinfo(0) + "]";
1232                                mes "I will protect my";
1233                                break;
1234                        case 6:
1235                                mes "[" + strcharinfo(0) + "]";
1236                                mes "victorious while I breathe.";
1237                                break;
1238                        case 7:
1239                                mes "[" + strcharinfo(0) + "]";
1240                                mes "brothers with my life.";
1241                                break;
1242                        case 8:
1243                                mes "[" + strcharinfo(0) + "]";
1244                                mes "Evil shall never be";
1245                                break;
1246                        case 9:
1247                                mes "[" + strcharinfo(0) + "]";
1248                                mes "In nomine Patris, et Filii";
1249                                break;
1250                        case 10:
1251                                mes "[" + strcharinfo(0) + "]";
1252                                mes "et Spiritus Sancti.";
1253                                break;
1254                        }
1255                        switch(select("I will follow my path:I will protect my:brothers with my life.:to enlightenment and purity.:Evil shall never be:victorious while I breathe.:et Spiritus Sancti.:I commit myself to:veritas and aequitas.:In nomine Patris, et Filii")) {
1256                        case 1: mes "I will follow my path"; break;
1257                        case 2: mes "I will protect my"; break;
1258                        case 3: mes "brothers with my life."; break;
1259                        case 4: mes "to enlightenment and purity."; break;
1260                        case 5: mes "Evil shall never be"; break;
1261                        case 6: mes "victorious while I breathe."; break;
1262                        case 7: mes "et Spiritus Sancti."; break;
1263                        case 8: mes "I commit myself to"; break;
1264                        case 9:
1265                                set .@monk_t,.@monk_t+10;
1266                                mes "veritas and aequitas.";
1267                                break;
1268                        case 10: mes "In nomine Patris, et Filii"; break;
1269                        }
1270                        switch(select("I will follow my path:veritas and aequitas.:I commit myself to:et Spiritus Sancti.:Evil shall never be:to enlightenment and purity.:In nomine Patris, et Filii:I will protect my:brothers with my life.:victorious while I breathe.")) {
1271                        case 1:
1272                                set .@monk_t,.@monk_t+10;
1273                                mes "I will follow my path";
1274                                break;
1275                        case 2: mes "veritas and aequitas."; break;
1276                        case 3: mes "I commit myself to"; break;
1277                        case 4: mes "et Spiritus Sancti."; break;
1278                        case 5: mes "Evil shall never be"; break;
1279                        case 6: mes "to enlightenment and purity."; break;
1280                        case 7: mes "In nomine Patris, et Filii"; break;
1281                        case 8: mes "I will protect my"; break;
1282                        case 9: mes "brothers with my life."; break;
1283                        case 10: mes "victorious while I breathe."; break;
1284                        }
1285                        switch(select("veritas and aequitas.:Evil shall never be:I will follow my path:I will protect my:victorious while I breathe.:to enlightenment and purity.:brothers with my life.:In nomine Patris, et Filii:et Spiritus Sancti.:I commit myself to")) {
1286                        case 1: mes "veritas and aequitas."; break;
1287                        case 2: mes "Evil shall never be"; break;
1288                        case 3: mes "I will follow my path"; break;
1289                        case 4: mes "I will protect my"; break;
1290                        case 5: mes "victorious while I breathe."; break;
1291                        case 6:
1292                                set .@monk_t,.@monk_t+10;
1293                                mes "to enlightenment and purity.";
1294                                break;
1295                        case 7: mes "brothers with my life."; break;
1296                        case 8: mes "In nomine Patris, et Filii"; break;
1297                        case 9: mes "et Spiritus Sancti."; break;
1298                        case 10: mes "I commit myself to"; break;
1299                        }
1300                        switch(select("victorious while I breathe.:I commit myself to:to enlightenment and purity.:brothers with my life.:Evil shall never be:In nomine Patris, et Filii:et Spiritus Sancti.:I will follow my path:veritas and aequitas.:I will protect my")) {
1301                        case 1: mes "victorious while I breathe."; break;
1302                        case 2: mes "I commit myself to"; break;
1303                        case 3: mes "to enlightenment and purity."; break;
1304                        case 4: mes "brothers with my life."; break;
1305                        case 5: mes "Evil shall never be"; break;
1306                        case 6: mes "In nomine Patris, et Filii"; break;
1307                        case 7: mes "et Spiritus Sancti."; break;
1308                        case 8: mes "I will follow my path"; break;
1309                        case 9: mes "veritas and aequitas."; break;
1310                        case 10:
1311                                set .@monk_t,.@monk_t+10;
1312                                mes "I will protect my";
1313                                break;
1314                        }
1315                        switch(select("to enlightenment and purity.:I will follow my path:veritas and aequitas.:I commit myself to:brothers with my life.:I will protect my:victorious while I breathe.:Evil shall never be:et Spiritus Sancti.:In nomine Patris, et Filii")) {
1316                        case 1: mes "to enlightenment and purity."; break;
1317                        case 2: mes "I will follow my path"; break;
1318                        case 3: mes "veritas and aequitas."; break;
1319                        case 4: mes "I commit myself to"; break;
1320                        case 5:
1321                                set .@monk_t,.@monk_t+10;
1322                                mes "brothers with my life.";
1323                                break;
1324                        case 6: mes "I will protect my"; break;
1325                        case 7: mes "victorious while I breathe."; break;
1326                        case 8: mes "Evil shall never be"; break;
1327                        case 9: mes "et Spiritus Sancti."; break;
1328                        case 10: mes "In nomine Patris, et Filii"; break;
1329                        }
1330                        switch(select("veritas and aequitas.:Evil shall never be:brothers with my life.:victorious while I breathe.:I will follow my path:to enlightenment and purity.:I will protect my:In nomine Patris, et Filii:et Spiritus Sancti.:I commit myself to")) {
1331                        case 1: mes "veritas and aequitas."; break;
1332                        case 2:
1333                                set .@monk_t,.@monk_t+10;
1334                                mes "Evil shall never be";
1335                                break;
1336                        case 3: mes "brothers with my life."; break;
1337                        case 4: mes "victorious while I breathe."; break;
1338                        case 5: mes "I will follow my path"; break;
1339                        case 6: mes "to enlightenment and purity."; break;
1340                        case 7: mes "I will protect my"; break;
1341                        case 8: mes "In nomine Patris, et Filii"; break;
1342                        case 9: mes "et Spiritus Sancti."; break;
1343                        case 10: mes "I commit myself to"; break;
1344                        }
1345                        switch(select("victorious while I breathe.:to enlightenment and purity.:I will protect my:veritas and aequitas.:brothers with my life.:I will follow my path:Evil shall never be:In nomine Patris, et Filii:I commit myself to:et Spiritus Sancti.")) {
1346                        case 1:
1347                                set .@monk_t,.@monk_t+10;
1348                                mes "victorious while I breathe.";
1349                                break;
1350                        case 2: mes "to enlightenment and purity."; break;
1351                        case 3: mes "I will protect my"; break;
1352                        case 4: mes "veritas and aequitas."; break;
1353                        case 5: mes "brothers with my life."; break;
1354                        case 6: mes "I will follow my path"; break;
1355                        case 7: mes "Evil shall never be"; break;
1356                        case 8: mes "In nomine Patris, et Filii"; break;
1357                        case 9: mes "I commit myself to"; break;
1358                        case 10: mes "et Spiritus Sancti."; break;
1359                        }
1360                        switch(select("I commit myself to:I will follow my path:veritas and aequitas.:I will protect my:to enlightenment and purity.:brothers with my life.:Evil shall never be:In nomine Patris, et Filii:victorious while I breathe.:et Spiritus Sancti.")) {
1361                        case 1: mes "I commit myself to"; break;
1362                        case 2: mes "I will follow my path"; break;
1363                        case 3: mes "veritas and aequitas."; break;
1364                        case 4: mes "I will protect my"; break;
1365                        case 5: mes "to enlightenment and purity."; break;
1366                        case 6: mes "brothers with my life."; break;
1367                        case 7: mes "Evil shall never be"; break;
1368                        case 8:
1369                                set .@monk_t,.@monk_t+10;
1370                                mes "In nomine Patris, et Filii";
1371                                break;
1372                        case 9: mes "victorious while I breathe."; break;
1373                        case 10: mes "et Spiritus Sancti."; break;
1374                        }
1375                        switch(select("I commit myself to:veritas and aequitas.:I will follow my path:to enlightenment and purity.:I will protect my:brothers with my life.:Evil shall never be:victorious while I breathe.:In nomine Patris, et Filii:et Spiritus Sancti.")) {
1376                        case 1: mes "I commit myself to"; break;
1377                        case 2: mes "veritas and aequitas."; break;
1378                        case 3: mes "I will follow my path"; break;
1379                        case 4: mes "to enlightenment and purity."; break;
1380                        case 5: mes "I will protect my"; break;
1381                        case 6: mes "brothers with my life."; break;
1382                        case 7: mes "Evil shall never be"; break;
1383                        case 8: mes "victorious while I breathe."; break;
1384                        case 9: mes "In nomine Patris, et Filii"; break;
1385                        case 10:
1386                                set .@monk_t,.@monk_t+10;
1387                                mes "et Spiritus Sancti.";
1388                                break;
1389                        }
1390                }
1391                else if (MONK_Q == 13) {
1392L_MonkOath3:
1393                        mes "" + strcharinfo(0) + ", your turn.";
1394                        next;
1395                        switch(select("for thee my lord for thee.:And shepherds we shall be,:Power hath descended forth:out thy command. And we shall:from the hand:flow a river forth to thee and:so our feet may swiftly carry:teeming with souls shall it ever be:et Spiritus Sancti.:In nomine Patris, et Filii")) {
1396                        case 1:
1397                                mes "[" + strcharinfo(0) + "]";
1398                                mes "for thee my lord for thee.";
1399                                break;
1400                        case 2:
1401                                mes "[" + strcharinfo(0) + "]";
1402                                set .@monk_t,.@monk_t+10;
1403                                mes "And shepherds we shall be,";
1404                                break;
1405                        case 3:
1406                                mes "[" + strcharinfo(0) + "]";
1407                                mes "Power hath descended forth";
1408                                break;
1409                        case 4:
1410                                mes "[" + strcharinfo(0) + "]";
1411                                mes "out thy command. And we shall";
1412                                break;
1413                        case 5:
1414                                mes "[" + strcharinfo(0) + "]";
1415                                mes "from the hand";
1416                                break;
1417                        case 6:
1418                                mes "[" + strcharinfo(0) + "]";
1419                                mes "flow a river forth to thee and";
1420                                break;
1421                        case 7:
1422                                mes "[" + strcharinfo(0) + "]";
1423                                mes "so our feet may swiftly carry";
1424                                break;
1425                        case 8:
1426                                mes "[" + strcharinfo(0) + "]";
1427                                mes "teeming with souls shall it ever be";
1428                                break;
1429                        case 9:
1430                                mes "[" + strcharinfo(0) + "]";
1431                                mes "et Spiritus Sancti.";
1432                                break;
1433                        case 10:
1434                                mes "[" + strcharinfo(0) + "]";
1435                                mes "In nomine Patris, et Filii";
1436                                break;
1437                        }
1438                        switch(select("teeming with souls shall it ever be:flow a river forth to thee and:so our feet may swiftly carry:In nomine Patris, et Filii:et Spiritus Sancti.:Power hath descended forth:And shepherds we shall be,:for thee my lord for thee.:from the hand:out thy command. And we shall")) {
1439                        case 1: mes "teeming with souls shall it ever be"; break;
1440                        case 2: mes "flow a river forth to thee and"; break;
1441                        case 3: mes "so our feet may swiftly carry"; break;
1442                        case 4: mes "In nomine Patris, et Filii"; break;
1443                        case 5: mes "et Spiritus Sancti."; break;
1444                        case 6: mes "Power hath descended forth"; break;
1445                        case 7: mes "And shepherds we shall be,"; break;
1446                        case 8:
1447                                set .@monk_t,.@monk_t+10;
1448                                mes "for thee my lord for thee.";
1449                                break;
1450                        case 9: mes "from the hand"; break;
1451                        case 10: mes "out thy command. And we shall"; break;
1452                        }
1453                        switch(select("And shepherds we shall be,:for thee my lord for thee.:Power hath descended forth:from the hand:teeming with souls shall it ever be:et Spiritus Sancti.:In nomine Patris, et Filii:so our feet may swiftly carry:out thy command. And we shall:flow a river forth to thee and")) {
1454                        case 1: mes "And shepherds we shall be,"; break;
1455                        case 2: mes "for thee my lord for thee."; break;
1456                        case 3:
1457                                set .@monk_t,.@monk_t+10;
1458                                mes "Power hath descended forth";
1459                                break;
1460                        case 4: mes "from the hand"; break;
1461                        case 5: mes "teeming with souls shall it ever be"; break;
1462                        case 6: mes "et Spiritus Sancti."; break;
1463                        case 7: mes "In nomine Patris, et Filii"; break;
1464                        case 8: mes "so our feet may swiftly carry"; break;
1465                        case 9: mes "out thy command. And we shall"; break;
1466                        case 10: mes "flow a river forth to thee and"; break;
1467                        }
1468                        switch(select("for thee my lord for thee.:And shepherds we shall be,:Power hath descended forth:so our feet may swiftly carry:from the hand:flow a river forth to thee and:out thy command. And we shall:In nomine Patris, et Filii:teeming with souls shall it ever be:et Spiritus Sancti.")) {
1469                        case 1: mes "for thee my lord for thee."; break;
1470                        case 2: mes "And shepherds we shall be,"; break;
1471                        case 3: mes "Power hath descended forth"; break;
1472                        case 4: mes "so our feet may swiftly carry"; break;
1473                        case 5:
1474                                set .@monk_t,.@monk_t+10;
1475                                mes "from the hand";
1476                                break;
1477                        case 6: mes "flow a river forth to thee and"; break;
1478                        case 7: mes "out thy command. And we shall"; break;
1479                        case 8: mes "In nomine Patris, et Filii"; break;
1480                        case 9: mes "teeming with souls shall it ever be"; break;
1481                        case 10: mes "et Spiritus Sancti."; break;
1482                        }
1483                        switch(select("And shepherds we shall be,:for thee my lord for thee.:Power hath descended forth:so our feet may swiftly carry:from the hand:so our feet may swiftly carry:flow a river forth to thee and:In nomine Patris, et Filii:teeming with souls shall it ever be:et Spiritus Sancti.")) {
1484                        case 1: mes "And shepherds we shall be,"; break;
1485                        case 2: mes "for thee my lord for thee."; break;
1486                        case 3: mes "Power hath descended forth"; break;
1487                        case 4:
1488                                set .@monk_t,.@monk_t+10;
1489                                mes "so our feet may swiftly carry";
1490                                break;
1491                        case 5: mes "from the hand"; break;
1492                        case 6: mes "so our feet may swiftly carry"; break;
1493                        case 7: mes "flow a river forth to thee and"; break;
1494                        case 8: mes "In nomine Patris, et Filii"; break;
1495                        case 9: mes "teeming with souls shall it ever be"; break;
1496                        case 10: mes "et Spiritus Sancti."; break;
1497                        }
1498                        switch(select("for thee my lord for thee.:Power hath descended forth:And shepherds we shall be,:from the hand:so our feet may swiftly carry:flow a river forth to thee and:out thy command. And we shall:teeming with souls shall it ever be:In nomine Patris, et Filii:et Spiritus Sancti.")) {
1499                        case 1: mes "for thee my lord for thee."; break;
1500                        case 2: mes "Power hath descended forth"; break;
1501                        case 3: mes "And shepherds we shall be,"; break;
1502                        case 4: mes "from the hand"; break;
1503                        case 5: mes "so our feet may swiftly carry"; break;
1504                        case 6: mes "flow a river forth to thee and"; break;
1505                        case 7:
1506                                set .@monk_t,.@monk_t+10;
1507                                mes "out thy command. And we shall";
1508                                break;
1509                        case 8: mes "teeming with souls shall it ever be"; break;
1510                        case 9: mes "In nomine Patris, et Filii"; break;
1511                        case 10: mes "et Spiritus Sancti."; break;
1512                        }
1513                        switch(select("for thee my lord for thee.:teeming with souls shall it ever be:flow a river forth to thee and:In nomine Patris, et Filii:et Spiritus Sancti.:Power hath descended forth:And shepherds we shall be,:so our feet may swiftly carry:from the hand:out thy command. And we shall")) {
1514                        case 1: mes "for thee my lord for thee."; break;
1515                        case 2: mes "teeming with souls shall it ever be"; break;
1516                        case 3:
1517                                set .@monk_t,.@monk_t+10;
1518                                mes "flow a river forth to thee and";
1519                                break;
1520                        case 4: mes "In nomine Patris, et Filii"; break;
1521                        case 5: mes "et Spiritus Sancti."; break;
1522                        case 6: mes "Power hath descended forth"; break;
1523                        case 7: mes "And shepherds we shall be,"; break;
1524                        case 8: mes "so our feet may swiftly carry"; break;
1525                        case 9: mes "from the hand"; break;
1526                        case 10: mes "out thy command. And we shall"; break;
1527                        }
1528                        switch(select("teeming with souls shall it ever be:In nomine Patris, et Filii:And shepherds we shall be,:for thee my lord for thee.:Power hath descended forth:from the hand:so our feet may swiftly carry:out thy command. And we shall:flow a river forth to thee and:et Spiritus Sancti.")) {
1529                        case 1:
1530                                set .@monk_t,.@monk_t+10;
1531                                mes "teeming with souls shall it ever be";
1532                                break;
1533                        case 2: mes "In nomine Patris, et Filii"; break;
1534                        case 3: mes "And shepherds we shall be,"; break;
1535                        case 4: mes "for thee my lord for thee."; break;
1536                        case 5: mes "Power hath descended forth"; break;
1537                        case 6: mes "from the hand"; break;
1538                        case 7: mes "so our feet may swiftly carry"; break;
1539                        case 8: mes "out thy command. And we shall"; break;
1540                        case 9: mes "flow a river forth to thee and"; break;
1541                        case 10: mes "et Spiritus Sancti."; break;
1542                        }
1543                        switch(select("Power hath descended forth:for thee my lord for thee.:And shepherds we shall be,:In nomine Patris, et Filii:so our feet may swiftly carry:from the hand:teeming with souls shall it ever be:flow a river forth to thee and:out thy command. And we shall:et Spiritus Sancti.")) {
1544                        case 1: mes "Power hath descended forth"; break;
1545                        case 2: mes "for thee my lord for thee."; break;
1546                        case 3: mes "And shepherds we shall be,"; break;
1547                        case 4:
1548                                set .@monk_t,.@monk_t+10;
1549                                mes "In nomine Patris, et Filii";
1550                                break;
1551                        case 5: mes "so our feet may swiftly carry"; break;
1552                        case 6: mes "from the hand"; break;
1553                        case 7: mes "teeming with souls shall it ever be"; break;
1554                        case 8: mes "flow a river forth to thee and"; break;
1555                        case 9: mes "out thy command. And we shall"; break;
1556                        case 10: mes "et Spiritus Sancti."; break;
1557                        }
1558                        switch(select("And shepherds we shall be,:for thee my lord for thee.:Power hath descended forth:from the hand:out thy command. And we shall:so our feet may swiftly carry:flow a river forth to thee and:teeming with souls shall it ever be:In nomine Patris, et Filii:et Spiritus Sancti.")) {
1559                        case 1: mes "And shepherds we shall be,"; break;
1560                        case 2: mes "for thee my lord for thee."; break;
1561                        case 3: mes "Power hath descended forth"; break;
1562                        case 4: mes "from the hand"; break;
1563                        case 5: mes "out thy command. And we shall"; break;
1564                        case 6: mes "so our feet may swiftly carry"; break;
1565                        case 7: mes "flow a river forth to thee and"; break;
1566                        case 8: mes "teeming with souls shall it ever be"; break;
1567                        case 9: mes "In nomine Patris, et Filii"; break;
1568                        case 10:
1569                                set .@monk_t,.@monk_t+10;
1570                                mes "et Spiritus Sancti.";
1571                                break;
1572                        }
1573                }
1574                next;
1575                mes "[Touha]";
1576                mes "...";
1577                next;
1578                mes "[Touha]";
1579                mes "Hmm...";
1580                next;
1581                if (.@monk_t > 90) {
1582                        set MONK_Q,14;
1583                        mes "[Touha]";
1584                        mes "...well done, that was perfect. You pay attention well...";
1585                        next;
1586                        mes "[Touha]";
1587                        mes "However, now is not the time to relax. Your path is still long ahead of you.";
1588                        next;
1589                        mes "[Touha]";
1590                        mes "Now as I promised, I will help strengthen your body.";
1591                        next;
1592                        mes "Focus your mind and do not move.";
1593                        next;
1594                        mes "^33CCFFYou feel wind all around your body.^000000";
1595                        next;
1596                        mes "^33CCFFAn energy within you grows.^000000";
1597                        next;
1598                        mes "[Touha]";
1599                        mes "I feel what grows within you.";
1600                        mes "You may now continue on...";
1601                        next;
1602                        mes "[Touha]";
1603                        mes "...the next course will be with Boohae.";
1604                        next;
1605                        mes "[Touha]";
1606                        mes "I wish you well on your journey.";
1607                        mes "Don't forget, his name is ^CC0000Boohae^000000.";
1608                        close;
1609                }
1610                else {
1611                        mes "[Touha]";
1612                        mes "I see you did not pay attention.. If you wish to become a monk, you must take this seriously.";
1613                        next;
1614                        mes "[Touha]";
1615                        mes "Perhaps the path of a monk is too difficult for you?";
1616                        mes "You must take this seriously if you wish to continue...";
1617                        next;
1618                        mes "[Touha]";
1619                        mes "I will give you another chance.";
1620                        next;
1621                        mes "[Touha]";
1622                        mes "If you cannot pay attention and repeat what I ask you to, I will not allow you to continue your training here..";
1623                        close;
1624                }
1625        }
1626        else if (MONK_Q > 10 && MONK_Q < 14) {
1627                mes "[Touha]";
1628                mes "Now, pay attention this time...";
1629                next;
1630                mes "[Touha]";
1631                if (MONK_Q == 11) {
1632                        mes "I seek the path";
1633                        next;
1634                        mes "[Touha]";
1635                        mes "of enlightenment.";
1636                        next;
1637                        mes "[Touha]";
1638                        mes "We monks";
1639                        next;
1640                        mes "[Touha]";
1641                        mes "shall hold true";
1642                        next;
1643                        mes "[Touha]";
1644                        mes "to what we believe";
1645                        next;
1646                        mes "[Touha]";
1647                        mes "and will help protect others";
1648                        next;
1649                        mes "[Touha]";
1650                        mes "through the teachings";
1651                        next;
1652                        mes "[Touha]";
1653                        mes "we learn through our lives.";
1654                        next;
1655                        mes "[Touha]";
1656                        mes "In nomine Patris, et Filii";
1657                        next;
1658                        mes "[Touha]";
1659                        mes "et Spiritus Sancti.";
1660                        next;
1661                        mes "[Touha]";
1662                        mes "Ok, that is the end.";
1663                        goto L_MonkOath1;
1664                }
1665                else if (MONK_Q == 12) {
1666                        mes "I commit myself to";
1667                        next;
1668                        mes "[Touha]";
1669                        mes "veritas and aequitas.";
1670                        next;
1671                        mes "[Touha]";
1672                        mes "I will follow my path";
1673                        next;
1674                        mes "[Touha]";
1675                        mes "to enlightenment and purity.";
1676                        next;
1677                        mes "[Touha]";
1678                        mes "I will protect my";
1679                        next;
1680                        mes "[Touha]";
1681                        mes "brothers with my life.";
1682                        next;
1683                        mes "[Touha]";
1684                        mes "Evil shall never be";
1685                        next;
1686                        mes "[Touha]";
1687                        mes "victorious while I breathe.";
1688                        next;
1689                        mes "[Touha]";
1690                        mes "In nomine Patris, et Filii";
1691                        next;
1692                        mes "[Touha]";
1693                        mes "et Spiritus Sancti.";
1694                        next;
1695                        mes "[Touha]";
1696                        mes "That's it... were you paying attention?.";
1697                        goto L_MonkOath2;
1698                }
1699                else if (MONK_Q == 13) {
1700                        mes "And shepherds we shall be,";
1701                        next;
1702                        mes "[Touha]";
1703                        mes "for thee my lord for thee.";
1704                        next;
1705                        mes "[Touha]";
1706                        mes "Power hath descended forth";
1707                        next;
1708                        mes "[Touha]";
1709                        mes "from the hand";
1710                        next;
1711                        mes "[Touha]";
1712                        mes "so our feet may swiftly carry";
1713                        next;
1714                        mes "[Touha]";
1715                        mes "out thy command. And we shall";
1716                        next;
1717                        mes "[Touha]";
1718                        mes "flow a river forth to thee and";
1719                        next;
1720                        mes "[Touha]";
1721                        mes "teeming with souls shall it ever be";
1722                        next;
1723                        mes "[Touha]";
1724                        mes "In nomine Patris, et Filii";
1725                        next;
1726                        mes "[Touha]";
1727                        mes "et Spiritus Sancti.";
1728                        next;
1729                        mes "[Touha]";
1730                        mes "I hope you were paying attention this time. This is a sacred family prayer.";
1731                        goto L_MonkOath3;
1732                }
1733        }
1734        else if (MONK_Q == 14) {
1735                mes "[Touha]";
1736                mes "Hmm... did you forget who to visit?";
1737                next;
1738                mes "[Touha]";
1739                mes "I wonder about your abilities if you cannot remember such a simple thing.";
1740                next;
1741                mes "[Touha]";
1742                mes "...are you testing my patience?";
1743                next;
1744                mes "[Touha]";
1745                mes "You wear my patience thin...";
1746                mes "... go visit Boohae.";
1747                close;
1748        }
1749        else if (MONK_Q > 14 && BaseJob == Job_Acolyte) {
1750                mes "[Touha]";
1751                mes "...do your best for the final test.";
1752                close;
1753        }
1754        else {
1755                mes "[Touha]";
1756                mes "Never shall innocent blood be shed.";
1757                next;
1758                mes "[Touha]";
1759                mes "Yet the blood of the wicked shall flow like a river.";
1760                next;
1761                mes "[Touha]";
1762                mes "We shall spread our blackened wings and be the vengeful striking hammer of god.";
1763                next;
1764                mes "[Touha]";
1765                mes "We shall flow a river forth to thee, and teeming with souls shall it ever be.";
1766                next;
1767                mes "[Touha]";
1768                mes "In nomine Patris, et Filii, et Spiritus Sancti.";
1769                next;
1770                mes "[Touha]";
1771                mes "...You don't have to be afraid of me...";
1772                close;
1773        }
1774}
1775
1776prt_monk,57,179,1       script  Boohae#mk       110,{
1777        if (MONK_Q == 14 && BaseJob == Job_Acolyte) {
1778                mes "[Boohae]";
1779                mes "...";
1780                next;
1781                mes "[Boohae]";
1782                mes "......";
1783                next;
1784                mes "[Boohae]";
1785                mes ".........";
1786                next;
1787                mes "[Boohae]";
1788                mes "............";
1789                next;
1790                select("...excuse me...?");
1791                mes "[Boohae]";
1792                mes "...";
1793                mes "You just interrupted my meditation, I should break your legs...";
1794                next;
1795                mes "[Boohae]";
1796                mes "........";
1797                mes "I will give you a chance to explain why you interrupted me.";
1798                next;
1799                mes "[Boohae]";
1800                mes ".....";
1801                next;
1802                mes "[Boohae]";
1803                mes "Well, start explaining... or you'll be crawling soon...";
1804                next;
1805                if (select("Touha sent me.:Sorry, nothing.") == 2) {
1806                        mes "[Boohae]";
1807                        mes "........";
1808                        mes "...you must have a death wish to have interrupted me intentionally...";
1809                        close;
1810                }
1811                mes "[Boohae]";
1812                mes "I see...";
1813                mes "Well then, let's see....";
1814                next;
1815                mes "[Boohae]";
1816                mes "....your body seems..";
1817                mes "strengthened. Good...";
1818                next;
1819                mes "[Boohae]";
1820                mes "What did you do with Touha?";
1821                next;
1822                switch(select("Umm... well...ah..:We recited a holy pledge.:He diagnosed my physical status.")) {
1823                case 1:
1824                        mes "[Boohae]";
1825                        mes "You are not ready if you";
1826                        mes "cannot answer a simple question.";
1827                        mes "Leave me to my prayers.";
1828                        close;
1829                case 2:
1830                        mes "[Boohae]";
1831                        mes "... I see...";
1832                        mes "Didn't he do anything for you?";
1833                        next;
1834                        switch(select("Umm... well...ah..:He diagnosed my physical status.:He taught me about being a monk.:He modified my body.")) {
1835                        case 1:
1836                                mes "[Boohae]";
1837                                mes "You are not ready if you";
1838                                mes "cannot answer a simple question.";
1839                                mes "Leave me to my prayers.";
1840                                close;
1841                        case 2:
1842                                mes "[Boohae]";
1843                                mes "That is unimportant to me...";
1844                                mes "Stop disturbing me and go away!";
1845                                close;
1846                        case 3:
1847                                mes "[Boohae]";
1848                                mes "The teachings of becoming a monk are learned after becoming one.";
1849                                mes "This is not what I am looking for...";
1850                                close;
1851                        case 4:
1852                                mes "[Boohae]";
1853                                mes "Very well, you seem to realize your body has something new inside.";
1854                                mes "Well then, we shall move on to the next step...";
1855                                next;
1856                                break;
1857                        }
1858                        break;
1859                case 3:
1860                        mes "[Boohae]";
1861                        mes "...You interrupted me to tell me that...?";
1862                        mes "Get lost before I break your legs...";
1863                        close;
1864                }
1865                mes "[Boohae]";
1866                mes "Alright... well we have two tests...";
1867                mes "Choose which one you want to do...";
1868                next;
1869                if (select("Gathering mushrooms:Marathon") == 1) {
1870                        set MONK_Q,15;
1871                        mes "[Boohae]";
1872                        mes "Hmm....gathering mushrooms. So you want to test your tolerance huh?";
1873                        mes "Go prepare and come back later when you're ready.";
1874                        close;
1875                }
1876                set MONK_Q,16;
1877                mes "[Boohae]";
1878                mes "Good choice. Forcing your physical limits to their boundaries and grants a higher amount of self control.";
1879                mes "Go prepare and come back later when you're ready.";
1880                close;
1881        }
1882        if (MONK_Q == 15) {
1883                mes "[Boohae]";
1884                mes "So, are you ready? You won't need anything but a great deal of determination.";
1885                next;
1886                mes "[Boohae]";
1887                mes "The gathering mushroom test is intended,";
1888                mes "to test your patience.";
1889                next;
1890                mes "[Boohae]";
1891                mes "Go inside the building near this abbey.";
1892                next;
1893                mes "[Boohae]";
1894                mes "Other monk candidates will be with you for the same test,";
1895                next;
1896                mes "[Boohae]";
1897                mes "The more people that are there, the less mushrooms they'll find.";
1898                mes "So I hope you will understand that they are testing their patience, just like you.";
1899                close;
1900        }
1901        if (MONK_Q == 16) {
1902                mes "[Boohae]";
1903                mes "Welcome back, did you prepare? You won't need anything except strong legs.";
1904                next;
1905                mes "[Boohae]";
1906                mes "The marathon is intended,";
1907                mes "to test your self-control ability.";
1908                next;
1909                mes "[Boohae]";
1910                mes "Go inside the building near this abbey.";
1911                next;
1912                mes "[Boohae]";
1913                mes "All you have to do is run around the building as many times as you're required.";
1914                mes "Well... get going.";
1915                close;
1916        }
1917        if (MONK_Q == 17) {
1918                mes "[Boohae]";
1919                mes "Now, go visit 'Tomoon'. How many times should I tell you this?";
1920                mes "Now you have a lot of chance to damage your body because you're so exhausted right now.";
1921                mes "'Tomoon' is staying in a deepest place inside a building near this abbey.";
1922                close;
1923        }
1924        if (MONK_Q > 17 && MONK_Q < 24) {
1925                mes "[Boohae]";
1926                mes "...........";
1927                next;
1928                mes "-He seems to be in meditation.-";
1929                close;
1930        }
1931        else {
1932                mes "[Boohae]";
1933                mes "Hmmmm....!!";
1934                next;
1935                mes "-He seems to be in meditation.-";
1936                close;
1937        }
1938}
1939
1940prt_monk,199,169,3      script  Door Keeper#mk  746,{
1941        mes "[Keeper Chorip]";
1942        mes "....this place is for those";
1943        mes " in testing for becoming a monk.";
1944        next;
1945        if (MONK_Q == 14) {
1946                mes "[Keeper Chorip]";
1947                mes "Huh? Did you just say Boohae?";
1948                next;
1949                mes "[Keeper Chorip]";
1950                mes "Boohae... tends to hide in some quite places, so you might not be able to find him. For instance... a corner...";
1951                close;
1952        }
1953        else if (MONK_Q > 14 && MONK_Q < 25) {
1954                mes "[Keeper Chorip]";
1955                mes "Is your name " + strcharinfo(0) + "?";
1956                next;
1957                if (select("Yes.:No.") == 1) {
1958                        mes "[Keeper Chorip]";
1959                        mes "Alright you're cool... go on in. Your test is waiting for you. Good luck.";
1960                        close;
1961                }
1962                mes "[Keeper Chorip]";
1963                mes "Yeah right, I know who you are... get in there... your test is ready.";
1964                close;
1965        }
1966        else {
1967                mes "[Keeper Chorip]";
1968                mes "...please be quiet inside.";
1969                close;
1970        }
1971}
1972
1973monk_test,329,61,3      script  Bashu#mk        753,{
1974        if (MONK_Q > 14 && MONK_Q < 25) {
1975                if (MONK_Q == 15) {
1976                        mes "[Bashu]";
1977                        mes "So, which test do you want to do...?";
1978                        next;
1979                        mes "[Bashu]";
1980                        mes "From what I've heard, you chose the mushroom test...";
1981                        mes "Oh well, it's still your choice.";
1982                }
1983                else if (MONK_Q == 16) {
1984                        mes "[Bashu]";
1985                        mes "Which test hall do you wish to enter?";
1986                        next;
1987                        mes "[Bashu]";
1988                        mes "Well, as far as I've been told, you chose the marathon test...";
1989                        mes "Oh well, it's your choice.";
1990                }
1991                else {
1992                        mes "[Bashu]";
1993                        mes "Which test hall do you wish to enter?";
1994                        mes "You can choose which one you want.";
1995                        next;
1996                }
1997                next;
1998                if (select("Tolerance - Gathering Mushrooms:Self-Control - Marathon") == 1) {
1999                        mes "You have decided to take the test of tolerance by ^FF0000gathering mushrooms^000000.";
2000                        close2;
2001                        warp "job_monk",226,175;
2002                        end;
2003                }
2004                mes "You have decided to take the test of self control by taking a ^FF0000marathon^000000.";
2005                close2;
2006                warp "monk_test",386,387;
2007                end;
2008        }
2009        else {
2010                mes "[Bashu]";
2011                mes "Welcome... this place is a training place for monks, Saint Capitolina Abbey.";
2012                mes "When you go inside....you will meet Tomoon the oldest monk who succeeds to the predecessors,";
2013                next;
2014                mes "[Bashu]";
2015                mes "Please be advised and do not touch anything.";
2016                mes "And please avoid talking loud in front of Tomoon.";
2017                next;
2018                mes "[Bashu]";
2019                mes "I hope you will have a great time in here.";
2020                close;
2021        }
2022}
2023
2024monk_test,386,388,4     script  Apprentice Monk#mk      110,{
2025        mes "[Monk Apprentice]";
2026        mes "W... welcome!";
2027        mes "Th... this place is for testing the tolerance of monk candidates!";
2028        next;
2029        mes "[Monk Apprentice]";
2030        mes "Ju... just run...";
2031        mes "until you're told to stop,";
2032        mes "Ru...ruu....run!";
2033        next;
2034        mes "[Monk Apprentice]";
2035        mes "M... m... me? I'll run one of these days!";
2036        next;
2037        mes "[Monk Apprentice]";
2038        mes "M... monk... are you going to be... a... m...m...monk??";
2039        next;
2040        mes "[Monk Apprentice]";
2041        mes "Ar...are...you...sure you are.. aren't... going to quit?";
2042        next;
2043        if (select("Quit.:Keep running.") == 1) {
2044                mes "[Monk Apprentice]";
2045                mes "" + strcharinfo(0) + "...q.q..q. .quit! ...the marathon!! Y...you do not have what it takes to be a m... monk!";
2046                mapannounce "monk_test","" + strcharinfo(0) + "...q.q..q. .quit! ...the marathon!! Y...you do not have what it takes to be a m... monk!",bc_map;
2047                close2;
2048                set MONK_Q,15;
2049                warp "prt_monk",194,168;
2050                end;
2051        }
2052        mes "[Monk Apprentice]";
2053        mes "Until you're told to stop,";
2054        mes "Ru...ruu....run!";
2055        close;
2056}
2057
2058monk_test,387,350,0     script  Supervisor#race_monk    45,2,2,{
2059OnTouch:
2060        if (MONK_Q >= 15 && MONK_Q <= 23) {
2061                set MONK_Q,MONK_Q+1;
2062                warp "monk_test",385,388;
2063                end;
2064        }
2065        else if (MONK_Q == 24) {
2066                set MONK_Q,25;
2067                mapannounce "monk_test","Now! This is the last lap!! If you make it you need to go visit Tomoon for the next test!",bc_map;
2068                warp "monk_test",385,388;
2069                end;
2070        }
2071        else if (MONK_Q == 25) {
2072                mes "[Supervisor]";
2073                mes "Now...you may go visit Tomoon.";
2074                mes "Tomoon is in the deepest room inside a building near this abbey.";
2075                mapannounce "monk_test","Congratulations!" + strcharinfo(0) +"!! You completed the marathon!",bc_map;
2076                close2;
2077                warp "prt_monk",194,168;
2078                end;
2079        }
2080}
2081
2082monk_test,82,384,0      script  Trap#t_monk1_1::MonkTrap        -1,{
2083OnTouch:
2084        mapannounce "monk_test",""+ strcharinfo(0) + ", you're trapped. You will be returned.",bc_map;
2085        warp "monk_test",387,387;
2086        end;
2087}
2088
2089monk_test,83,384,0      duplicate(MonkTrap)     Trap#t_monk1_2  -1
2090monk_test,82,385,0      duplicate(MonkTrap)     Trap#t_monk1_3  -1
2091monk_test,83,385,0      duplicate(MonkTrap)     Trap#t_monk1_4  -1
2092monk_test,38,388,0      duplicate(MonkTrap)     Trap#t_monk2_1  -1,0,1
2093monk_test,39,388,0      duplicate(MonkTrap)     Trap#t_monk2_2  -1,0,1
2094monk_test,38,386,0      duplicate(MonkTrap)     Trap#t_monk2_3  -1
2095monk_test,39,386,0      duplicate(MonkTrap)     Trap#t_monk2_4  -1
2096monk_test,11,158,0      duplicate(MonkTrap)     Trap#t_monk3_1  -1,1,0
2097monk_test,11,159,0      duplicate(MonkTrap)     Trap#t_monk3_2  -1,1,0
2098monk_test,13,159,0      duplicate(MonkTrap)     Trap#t_monk3_3  -1
2099monk_test,13,158,0      duplicate(MonkTrap)     Trap#t_monk3_4  -1
2100monk_test,11,30,0       duplicate(MonkTrap)     Trap#t_monk4_1  -1,3,0
2101monk_test,11,31,0       duplicate(MonkTrap)     Trap#t_monk4_2  -1,3,0
2102monk_test,15,30,0       duplicate(MonkTrap)     Trap#t_monk4_3  -1
2103monk_test,15,31,0       duplicate(MonkTrap)     Trap#t_monk4_4  -1
2104monk_test,70,12,0       duplicate(MonkTrap)     Trap#t_monk5_1  -1,0,1
2105monk_test,71,12,0       duplicate(MonkTrap)     Trap#t_monk5_2  -1,0,1
2106monk_test,70,10,0       duplicate(MonkTrap)     Trap#t_monk5_3  -1
2107monk_test,71,10,0       duplicate(MonkTrap)     Trap#t_monk5_4  -1
2108monk_test,186,11,0      duplicate(MonkTrap)     Trap#t_monk6_1  -1,2,3
2109monk_test,189,11,0      duplicate(MonkTrap)     Trap#t_monk6_2  -1,0,3
2110monk_test,387,43,0      duplicate(MonkTrap)     Trap#t_monk7_1  -1,1,0
2111monk_test,387,42,0      duplicate(MonkTrap)     Trap#t_monk7_2  -1,1,0
2112monk_test,389,43,0      duplicate(MonkTrap)     Trap#t_monk7_3  -1
2113monk_test,389,42,0      duplicate(MonkTrap)     Trap#t_monk7_4  -1
2114
2115job_monk,225,180,1      script  Hyunmoo#mk      89,{
2116        if ((countitem(1069) > 0 || countitem(1070) > 0) && (countitem(1069) < 30 || countitem(1070) < 30)) {
2117                mes "[Hyunmoo]";
2118                mes "You didn't bring enough mushrooms... go get some more.";
2119                next;
2120                mes "[Hyunmoo]";
2121                mes "Or is it you want to quit... do you want to quit?";
2122                next;
2123                switch(select("No.:Yes.") == 1) {
2124                        mes "[Hyunmoo]";
2125                        mes "Then move!";
2126                        close;
2127                }
2128                mes "[Hyunmoo]";
2129                mes ".....I figured as much....you don't have a spirit.";
2130                mapannounce "job_monk","" + strcharinfo(0) + ", has quit his testing to become a monk.",bc_map;
2131                close2;
2132                set MONK_Q,16;
2133                warp "prt_monk",194,168;
2134                end;
2135        }
2136        else if (MONK_Q > 14 && MONK_Q < 25 && (countitem(1069) == 0 || countitem(1070)  == 0)) {
2137                mes "[Hyunmoo]";
2138                mes "Nice to meet you. My name is Hyunmoo. I am in charge of the mushroom test.";
2139                next;
2140                mes "[Hyunmoo]";
2141                mes "Your task will be to gather mushrooms.";
2142                mes "Understand?";
2143                next;
2144                mes "[Hyunmoo]";
2145                mes "Picking the mushrooms is to train your tolerance.";
2146                mes "We planted a garden in order to survive as well as to discipline our minds.";
2147                next;
2148                mes "[Hyunmoo]";
2149                mes "I believe there is no better way to find true inner peace then to be one with nature.";
2150                mes "So we created our garden, however these mushrooms started sprouting up everywhere!";
2151                next;
2152                mes "[Hyunmoo]";
2153                mes "What we ask of you as part of your training is to remove these mushrooms.";
2154                mes "Go help the others remove as many mushrooms as you can and bring me back";
2155                mes "enough ^FF0000Orange Net Mushrooms^000000 and ^FF0000Orange Gooey Mushroom^000000 as proof.";
2156                next;
2157                mes "[Hyunmoo]";
2158                mes "Now, go get some mushrooms.";
2159                mes "Check back with me when you have picked some, I will tell you if it is enough.";
2160                mes "And remember, find peace when gardening.";
2161                next;
2162                mes "[Hyunmoo]";
2163                mes "...or do you want to quit?";
2164                next;
2165                if (select("No.:Yes.") == 1) {
2166                        mes "[Hyunmoo]";
2167                        mes "Alright then, keep going.";
2168                        close;
2169                }
2170                mes "[Hyunmoo]";
2171                mes ".....yeah I thought as much....you don't have the spirit needed to become a monk.";
2172                mapannounce "job_monk","" + strcharinfo(0) + ", has quit his testing to become a monk.",bc_map;
2173                delitem 1069,countitem(1069); //Mushroom_Of_Thief_1
2174                delitem 1070,countitem(1070); //Mushroom_Of_Thief_2
2175                close2;
2176                mapannounce "job_monk","" + strcharinfo(0) + ", has quit his training to become a monk.",bc_map;
2177                warp "prt_monk",194,168;
2178                set MONK_Q,16;
2179                end;
2180        }
2181        else if (MONK_Q > 14 && MONK_Q < 25 && (countitem(1069) > 29 || countitem(1070) > 29)) {
2182                mes "[Hyunmoo]";
2183                mes "...hmm... not bad.";
2184                mes "Ok, you passed.";
2185                next;
2186                mes "[Hyunmoo]";
2187                mes "Go meet Tomoon for your next test.";
2188                mes "Tomoon is staying in the deepest room inside a building near this abbey.";
2189                set MONK_Q,25;
2190                delitem 1069,countitem(1069); //Mushroom_Of_Thief_1
2191                delitem 1070,countitem(1070); //Mushroom_Of_Thief_2
2192                close2;
2193                warp "prt_monk",194,168;
2194                end;
2195        }
2196        else if (MONK_Q > 24) {
2197                mes "[Hyunmoo]";
2198                mes "Didn't I tell you to go meet ^FF0000Tomoon^000000? Or do you want to pick some more mushrooms?";
2199                mes "Tomoon is staying in the deepest room inside a building near this abbey.";
2200                close;
2201        }
2202}
2203
2204prt_monk,225,180,1      script  Hyunmoo#mk2     89,{
2205        if (MONK_Q < 25) {
2206                mes "[Hyunmoo]";
2207                mes "As I see vegetables growing, I feel myself growing within.";
2208                next;
2209                mes "[Hyunmoo]";
2210                mes "As I see other monks working hard on growing vegetables,";
2211                mes "it warms my heart to see others enjoying gardening as I do.";
2212                next;
2213                mes "[Hyunmoo]";
2214                mes "To be honest with you, I think gardening is the greatest thing ever...";
2215                mes "We should give thanks to the brothers who prepare our food for us through their hard work.";
2216                next;
2217                mes "[Hyunmoo]";
2218                mes "Don't forget to thank them as you go by for their hard work.";
2219                close;
2220        }
2221        else if (MONK_Q > 24 && BaseJob == Job_Acolyte) {
2222                mes "[Hyunmoo]";
2223                mes "Didn't I tell you to go meet Tomoon? Or do you want to pick more mushrooms?";
2224                mes "Tomoon is staying in the deepest room inside a building near this abbey.";
2225                close;
2226        }
2227        else {
2228                mes "[Hyunmoo]";
2229                mes "As I see vegetables growing, I feel myself growing within.";
2230                next;
2231                mes "[Hyunmoo]";
2232                mes "As I see other monks working hard on growing vegetables,";
2233                mes "it warms my heart to see others enjoying gardening as I do.";
2234                next;
2235                mes "[Hyunmoo]";
2236                mes "To be honest with you, I think gardening is the greatest thing ever...";
2237                mes "We should give thanks to the brothers who prepare our food for us through their hard work.";
2238                next;
2239                mes "[Hyunmoo]";
2240                mes "Don't forget to thank them as you go by for their hard work.";
2241                close;
2242        }
2243}
2244
2245monk_test,319,139,1     script  Tomoon#mk       52,{
2246        if (MONK_Q == 25) {
2247                mes "[Tomoon]";
2248                mes "Welcome young one.";
2249                mes "My name is Tomoon, I am in charge of the last test of spiritual training!";
2250                next;
2251                mes "[Tomoon]";
2252                mes "Now you don't need to be instructed any more then this:";
2253                mes "^990000Terminate every living thing in your way!^000000 That's all!";
2254                next;
2255                mes "[Tomoon]";
2256                mes "While you're wandering around within the maze, if you encounter any evil creatures, just kill them! Release their tortured souls!!";
2257                next;
2258                mes "[Tomoon]";
2259                mes "Do not compare us to the weakling priests! We are monks and we will always be the strongest!!";
2260                next;
2261                mes "[Tomoon]";
2262                mes "We are not like priests who cower behind the strength of others!";
2263                next;
2264                mes "[Tomoon]";
2265                mes "Now, focus!! Keep your fists tight and your eyes open! It's time to show me what you got.";
2266                next;
2267                mes "[Tomoon]";
2268                mes "Let's see if you got what it takes to be a true monk!!";
2269                close2;
2270                set MONK_Q,26;
2271                warp "monk_test",88,74;
2272                end;
2273        }
2274        else if (MONK_Q == 26) {
2275                mes "[Tomoon]";
2276                mes "Hmm... you failed?";
2277                mes "Cheer up! Failure is but a process to success!";
2278                mes "Go! Start again! Kill them all!!";
2279                close2;
2280                warp "monk_test",88,74;
2281                end;
2282        }
2283        else if (MONK_Q == 27) {
2284                mes "[Tomoon]";
2285                mes "Excellent job!!";
2286                mes "I knew you'd make it through!";
2287                mes "Now...I will give you a secret potion which will double your physical strength.";
2288                next;
2289                getitem 506,1; //Green_Potion
2290                mes "Drink this potion and you will be able to become a monk!!!";
2291                mes "... now go back to sensei Moohae!!!";
2292                set MONK_Q,28;
2293                close;
2294        }
2295        else if (MONK_Q == 28) {
2296                mes "[Tomoon]";
2297                mes "I already told you, go back to sensei Moohae!!!";
2298                close;
2299        }
2300        else {
2301                mes "[Tomoon]";
2302                mes "....be quiet.";
2303                mes ".....";
2304                next;
2305                mes "[Tomoon]";
2306                mes "I will not allow anyone to cause any trouble in this abbey.";
2307                next;
2308                mes "[Tomoon]";
2309                mes "You'd better not be thinking about causing any trouble.";
2310                close;
2311        }
2312}
2313
2314monk_test,82,85,1       script  Proctor#mk      95,{
2315        mes "[Proctor]";
2316        mes "So, are you ready to undergo the spiritual training?";
2317        next;
2318        switch(select("Yes!:No.:What do I have to do?")) {
2319        case 1:
2320                mes "[Proctor]";
2321                mes "Alright! I wish you luck. If you get lost and can't find a way out, simply log out and log back in.";
2322                mes "Then you will return to your save point. What's that mean? Heck if I know, I'm just told to say that. Oh yes and also, please cooperate with your comrades.";
2323                close2;
2324                set MONK_Q,26;
2325                warp "monk_test",125,277;
2326                end;
2327        case 2:
2328                mes "[Proctor]";
2329                mes "I see. Take your time.";
2330                close;
2331        case 3:
2332                mes "[Proctor]";
2333                mes "Inside this test hall is the maze of spirits.";
2334                mes "There are spirits inside which will block you from moving freely.";
2335                next;
2336                mes "[Proctor]";
2337                mes "If you want to exit the test hall, you must make your way to the warp portal located at the opposite side from the start point.";
2338                next;
2339                mes "[Proctor]";
2340                mes "....Oh yes and also there are monsters wandering around in the maze, please clear them.";
2341                mes "Good luck.";
2342                close;
2343        }
2344}
2345
2346monk_test,144,277,0     script  mob_monk#1_1    -1,1,1,{
2347OnTouch:
2348        monster "monk_test",144,277,"Zombie",1015,1;
2349        monster "monk_test",144,277,"Zombie",1015,1;
2350        monster "monk_test",144,277,"Zombie",1015,1;
2351        monster "monk_test",144,277,"Zombie",1015,1;
2352        end;
2353
2354OnDisable:
2355        killmonsterall "monk_test";
2356        end;
2357}
2358
2359monk_test,134,291,0     script  mob_monk#1_2    -1,1,1,{
2360OnTouch:
2361        monster "monk_test",134,291,"Zombie",1015,1;
2362        monster "monk_test",134,291,"Zombie",1015,1;
2363        monster "monk_test",134,291,"Zombie",1015,1;
2364        monster "monk_test",134,291,"Zombie",1015,1;
2365        end;
2366
2367OnDisable:
2368        killmonsterall "monk_test";
2369        end;
2370}
2371
2372monk_test,157,284,0     script  mob_monk#1_3    -1,1,1,{
2373OnTouch:
2374        monster "monk_test",157,284,"Mummy",1041,1;
2375        end;
2376
2377OnDisable:
2378        killmonsterall "monk_test";
2379        end;
2380}
2381
2382monk_test,156,261,0     script  mob_monk#1_4    -1,1,1,{
2383OnTouch:
2384        monster "monk_test",156,261,"Mummy",1041,1;
2385        end;
2386
2387OnDisable:
2388        killmonsterall "monk_test";
2389        end;
2390}
2391
2392monk_test,149,268,0     script  mob_monk#1_5    -1,1,1,{
2393OnTouch:
2394        monster "monk_test",149,268,"Zombie",1015,1;
2395        monster "monk_test",149,268,"Zombie",1015,1;
2396        monster "monk_test",149,268,"Zombie",1015,1;
2397        monster "monk_test",149,268,"Zombie",1015,1;
2398        monster "monk_test",149,268,"Zombie",1015,1;
2399        end;
2400
2401OnDisable:
2402        killmonsterall "monk_test";
2403        end;
2404}
2405
2406monk_test,166,278,0     script  exit_monk#1     45,1,1,{
2407OnTouch:
2408        mes "[Proctor]";
2409        mes "You did well. Please return to Tomoon, he's waiting for you.";
2410        set MONK_Q,27;
2411        donpcevent "mob_monk#1_5::OnDisable";
2412        donpcevent "mob_monk#1_4::OnDisable";
2413        donpcevent "mob_monk#1_3::OnDisable";
2414        donpcevent "mob_monk#1_2::OnDisable";
2415        donpcevent "mob_monk#1_1::OnDisable";
2416        close2;
2417        warp "prt_monk",196,168;
2418        end;
2419}
2420
2421monk_test,88,91,1       script  Proctor#mk2     52,{
2422        mes "[Proctor]";
2423        mes "So, are you ready to undergo this spiritual training?";
2424        next;
2425        switch(select("Yes!:No.:Check the caution for the test.")) {
2426        case 1:
2427                mes "[Proctor]";
2428                mes "Alright! I wish you luck. If you get lost and can't find a way out, simply log out and log back in.";
2429                mes "Then you will return to your save point. What's that mean? Heck if I know, I'm just told to say that. Oh yes and also, please cooperate with your comrades.";
2430                close2;
2431                set MONK_Q,26;
2432                warp "monk_test",125,177;
2433                end;
2434        case 2:
2435                mes "[Proctor]";
2436                mes "I see. Take your time.";
2437                close;
2438        case 3:
2439                mes "[Proctor]";
2440                mes "Inside this test hall is the maze of spirits.";
2441                mes "There are spirits inside which will block you from moving freely.";
2442                next;
2443                mes "[Proctor]";
2444                mes "If you want to exit the test hall, you must make your way to the warp portal located at the opposite side from the start point.";
2445                next;
2446                mes "[Proctor]";
2447                mes "....Oh yes and also there are monsters wandering around in the maze, please clear them.";
2448                mes "Good luck.";
2449                close;
2450        }
2451}
2452
2453monk_test,140,181,0     script  mob_monk#2_1    -1,1,1,{
2454OnTouch:
2455        monster "monk_test",140,181,"Zombie",1015,1;
2456        monster "monk_test",140,181,"Zombie",1015,1;
2457        monster "monk_test",140,181,"Zombie",1015,1;
2458        monster "monk_test",140,181,"Zombie",1015,1;
2459        end;
2460
2461OnDisable:
2462        killmonsterall "monk_test";
2463        end;
2464}
2465
2466monk_test,150,164,0     script  mob_monk#2_2    -1,1,1,{
2467OnTouch:
2468        monster "monk_test",150,164,"Zombie",1015,1;
2469        monster "monk_test",150,164,"Zombie",1015,1;
2470        monster "monk_test",150,164,"Zombie",1015,1;
2471        monster "monk_test",150,164,"Zombie",1015,1;
2472        end;
2473
2474OnDisable:
2475        killmonsterall "monk_test";
2476        end;
2477}
2478
2479monk_test,158,192,0     script  mob_monk#2_3    -1,1,1,{
2480OnTouch:
2481        monster "monk_test",158,192,"Mummy",1041,1;
2482        end;
2483
2484OnDisable:
2485        killmonsterall "monk_test";
2486        end;
2487}
2488
2489monk_test,165,186,0     script  mob_monk#2_4    -1,1,1,{
2490OnTouch:
2491        monster "monk_test",165,186,"Mummy",1041,1;
2492        end;
2493
2494OnDisable:
2495        killmonsterall "monk_test";
2496        end;
2497}
2498
2499monk_test,162,182,0     script  mob_monk#2_5    -1,1,1,{
2500OnTouch:
2501        monster "monk_test",162,182,"Zombie",1015,1;
2502        monster "monk_test",162,182,"Zombie",1015,1;
2503        monster "monk_test",162,182,"Zombie",1015,1;
2504        monster "monk_test",162,182,"Zombie",1015,1;
2505        monster "monk_test",162,182,"Zombie",1015,1;
2506        end;
2507
2508OnDisable:
2509        killmonsterall "monk_test";
2510        end;
2511}
2512
2513monk_test,166,178,0     script  exit_monk#2     45,1,1,{
2514OnTouch:
2515        mes "[Proctor]";
2516        mes "You did well. Please return to Tomoon, he's waiting for you.";
2517        set MONK_Q,27;
2518        donpcevent "mob_monk#2_5::OnDisable";
2519        donpcevent "mob_monk#2_4::OnDisable";
2520        donpcevent "mob_monk#2_3::OnDisable";
2521        donpcevent "mob_monk#2_2::OnDisable";
2522        donpcevent "mob_monk#2_1::OnDisable";
2523        close2;
2524        warp "prt_monk",196,168;
2525        end;
2526}
2527
2528monk_test,95,85,1       script  Proctor#btl#3   79,{
2529        mes "[Proctor]";
2530        mes "So, are you ready to undergo this spiritual training?";
2531        next;
2532        switch(select("Yes!:No.:Check the caution for the test.")) {
2533        case 1:
2534                mes "[Proctor]";
2535                mes "Alright! I wish you luck. If you get lost and can't find a way out, simply log out and log back in.";
2536                mes "Then you will return to your save point. What's that mean? Heck if I know, I'm just told to say that. Oh yes and also, please cooperate with your comrades.";
2537                close2;
2538                set MONK_Q,26;
2539                warp "monk_test",230,277;
2540                end;
2541        case 2:
2542                mes "[Proctor]";
2543                mes "I see. Take your time.";
2544                close;
2545        case 3:
2546                mes "[Proctor]";
2547                mes "Inside this test hall is the maze of spirits.";
2548                mes "There are spirits inside which will block you from moving freely.";
2549                next;
2550                mes "[Proctor]";
2551                mes "If you want to exit the test hall, you must make your way to the warp portal located at the opposite side from the start point.";
2552                next;
2553                mes "[Proctor]";
2554                mes "....Oh yes and also there are monsters wandering around in the maze, please clear them.";
2555                mes "Good luck.";
2556                close;
2557        }
2558}
2559
2560monk_test,249,277,0     script  mob_monk#3_1    -1,1,1,{
2561OnTouch:
2562        monster "monk_test",249,277,"Zombie",1015,1;
2563        monster "monk_test",249,277,"Zombie",1015,1;
2564        monster "monk_test",249,277,"Zombie",1015,1;
2565        monster "monk_test",249,277,"Zombie",1015,1;
2566        end;
2567
2568OnDisable:
2569        killmonsterall "monk_test";
2570}
2571
2572monk_test,231,296,0     script  mob_monk#3_2    -1,1,1,{
2573OnTouch:
2574        monster "monk_test",231,296,"Zombie",1015,1;
2575        monster "monk_test",231,296,"Zombie",1015,1;
2576        monster "monk_test",231,296,"Zombie",1015,1;
2577        monster "monk_test",231,296,"Zombie",1015,1;
2578        end;
2579
2580OnDisable:
2581        killmonsterall "monk_test";
2582        end;
2583}
2584
2585monk_test,264,292,0     script  mob_monk#3_3    -1,1,1,{
2586OnTouch:
2587        monster "monk_test",264,292,"Mummy",1041,1;
2588        end;
2589
2590OnDisable:
2591        killmonsterall "monk_test";
2592        end;
2593}
2594
2595monk_test,252,284,0     script  mob_monk#3_4    -1,1,1,{
2596OnTouch:
2597        monster "monk_test",252,284,"Mummy",1041,1;
2598        end;
2599
2600OnDisable:
2601        killmonsterall "monk_test";
2602        end;
2603}
2604
2605monk_test,257,285,0     script  mob_monk#3_5    -1,1,1,{
2606OnTouch:
2607        monster "monk_test",257,285,"Zombie",1015,1;
2608        monster "monk_test",257,285,"Zombie",1015,1;
2609        monster "monk_test",257,285,"Zombie",1015,1;
2610        monster "monk_test",257,285,"Zombie",1015,1;
2611        monster "monk_test",257,285,"Zombie",1015,1;
2612        monster "monk_test",257,285,"Zombie",1015,1;
2613        end;
2614
2615OnDisable:
2616        killmonsterall "monk_test";
2617        end;
2618}
2619
2620monk_test,270,278,0     script  exit_monk#3     45,1,1,{
2621OnTouch:
2622        mes "[Proctor]";
2623        mes "You did well. Please return to Tomoon, he's waiting for you.";
2624        set MONK_Q,27;
2625        donpcevent "mob_monk#3_5::OnDisable";
2626        donpcevent "mob_monk#3_4::OnDisable";
2627        donpcevent "mob_monk#3_3::OnDisable";
2628        donpcevent "mob_monk#3_2::OnDisable";
2629        donpcevent "mob_monk#3_1::OnDisable";
2630        close2;
2631        warp "prt_monk",196,168;
2632        end;
2633}
2634
2635monk_test,3,3,0 script  resetter#monk   -1,{
2636OnTimer500000:
2637        donpcevent "mob_monk#1_1::OnDisable";
2638        donpcevent "mob_monk#1_2::OnDisable";
2639        donpcevent "mob_monk#1_3::OnDisable";
2640        donpcevent "mob_monk#1_4::OnDisable";
2641        donpcevent "mob_monk#1_5::OnDisable";
2642        donpcevent "mob_monk#2_1::OnDisable";
2643        donpcevent "mob_monk#2_2::OnDisable";
2644        donpcevent "mob_monk#2_3::OnDisable";
2645        donpcevent "mob_monk#2_4::OnDisable";
2646        donpcevent "mob_monk#2_5::OnDisable";
2647        donpcevent "mob_monk#3_1::OnDisable";
2648        donpcevent "mob_monk#3_2::OnDisable";
2649        donpcevent "mob_monk#3_3::OnDisable";
2650        donpcevent "mob_monk#3_4::OnDisable";
2651        donpcevent "mob_monk#3_5::OnDisable";
2652        initnpctimer;
2653        end;
2654
2655
2656OnInit:
2657OnEnable:
2658        initnpctimer;
2659        end;
2660}
2661
2662monk_test,137,338,1     script  switchreset#monkmonk    79,{
2663        mes "Grrrr...";
2664        mes "All monsters in the monk job chance place have been reset.";
2665        mes "Timer's activated.";
2666        donpcevent "mob_monk#1_1::OnDisable";
2667        donpcevent "mob_monk#1_2::OnDisable";
2668        donpcevent "mob_monk#1_3::OnDisable";
2669        donpcevent "mob_monk#1_4::OnDisable";
2670        donpcevent "mob_monk#1_5::OnDisable";
2671        donpcevent "mob_monk#2_1::OnDisable";
2672        donpcevent "mob_monk#2_2::OnDisable";
2673        donpcevent "mob_monk#2_3::OnDisable";
2674        donpcevent "mob_monk#2_4::OnDisable";
2675        donpcevent "mob_monk#2_5::OnDisable";
2676        donpcevent "mob_monk#3_1::OnDisable";
2677        donpcevent "mob_monk#3_2::OnDisable";
2678        donpcevent "mob_monk#3_3::OnDisable";
2679        donpcevent "mob_monk#3_4::OnDisable";
2680        donpcevent "mob_monk#3_5::OnDisable";
2681        donpcevent "resetter#monk::OnEnable";
2682        close;
2683}
2684
2685//============================================================
2686// Monsters of Mushroom Collecting
2687//============================================================
2688job_monk,0,0,0,0        monster Thief Mushroom  1182,70,0,0,0
2689job_monk,0,0,0,0        monster Thief Bug Larva 1051,20,0,0,0
2690
2691//============================================================
2692// mapflag
2693//============================================================
2694monk_test       mapflag nomemo
2695monk_test       mapflag noteleport
2696monk_test       mapflag nosave  SavePoint
2697monk_test       mapflag nopenalty
2698monk_test       mapflag nobranch
2699monk_test       mapflag noexp
2700monk_test       mapflag noloot
2701
2702//============================================================
2703// Old changelog
2704//============================================================
2705//= 1.1 Fixed missing '";'. Now it's loading fine [Lupus]
2706//= 1.1+ Edited/Translated 5% [Celest]
2707//= 1.2 Made Poetry Quiz passable, Fixed Marathon Part [Lupus]
2708//= 1.3 Added Baby Class Support [Lupus]
2709//= 1.5 Fixed possible EXP abuse [Lupus]
2710//= 1.6 Added a func which prevent advanced classes passing
2711//= 2nd Job Quests again. It also guides adv classes where
2712//= to go. [Lupus] 1.7 Fixed warps19/20 [Yor]
2713//= 1.8 Fixed bugs. Fixed Green Potion exploit. Getting rid of Jfunc mess [Lupus]
2714//= 1.9 Added a missing check in Fuhai and fixed a LOT of Engrish. [Zephiris]
2715//= 1.9b Fixed another bug in Fuhai. [Zephiris]
2716//= 2.0 Changed numbers to constants. [Vicious]
2717//= 2.1 Removed Duplicates [Silent]
Note: See TracBrowser for help on using the browser.