root/npc/quests/quests_ein.txt @ 9

Revision 1, 109.0 kB (checked in by jinshiro, 17 years ago)
Line 
1//===== eAthena Script =======================================
2//= Quest NPCs related to Einbroch and Einbech
3//===== By: ==================================================
4//= Evera and The eAthena Dev Team
5//===== Current Version: =====================================
6//= 2.0
7//===== Compatible With: =====================================
8//= eAthena 7.15 +
9//===== Description: =========================================
10//= Shinokas Quest, Einbroch Lover Quest, Factory Quest,
11//= Uwe Quest.
12//===== Additional Comments: =================================
13//= 1.0 Initial Release [Evera]
14//= 1.1 Added more quests [Evera]
15//= 1.2 Added quest bits from Einbech and renamed file to
16//=     quests_ein.txt [Evera]
17//= 1.3 Implemented the polution quest. [MasterOfMuppets]
18//= 1.4.1 Massive bugfix. Fixed Pollution exploit [Lupus]
19//= 1.4.2 Fixed Khowropher bug [Lupus]
20//= 1.5 Fixed double levelup bug [Lupus]
21//= 1.5.1 Fixed exploit [KarLaeda]
22//= 1.5.2 Updated Shino Quest to leave no grabage vars [Lupus]
23//= 1.5.3 Fixed some typos regarding Schwartzvalt Trilogy [SinSloth]
24//= 1.6 Updated Laboratory Entrance regarding Heart Fragment quest. [SinSloth]
25//= 1.7 Changed the laboratory entrance checking to prevent players
26//= from being stuck in the quest. [SinSloth]
27//= 1.8 Fixed experience gains to match upcoming rate adjustments. [SinSloth]
28//= 1.9 Fixed a bug with Einbroch Pollution quest. [SinSloth]
29//= 2.0 Fixed bad NPC header data to comply with rev. 11603. [L0ne_W0lf]
30//============================================================
31
32
33//============================================================
34//=================================================== Shinokas
35//====================================================== Quest
36
37ein_in01,231,163,1      script  Sick Old Man    849,6,6,{
38        switch(Shinokas_Quest){
39        case 9:
40                mes "^3131FFShinokas's";
41                mes "body has grown";
42                mes "cold to the tough.";
43                close;
44        case 8:
45                mes "["+strcharinfo(0)+"]";
46                mes "Shinokas,";
47                mes "I found something!";
48                next;
49                mes "[Shinokas]";
50                mes "You...";
51                mes "Came... back...";
52                mes "Even... if... it's";
53                mes "already... Too late.";
54                mes "*Cough Cough*";
55                next;
56                mes "^3131FFYou help Shinokas";
57                mes "sit up, but find that";
58                mes "your hands have been";
59                mes "stained with his blood.^000000";
60                next;
61                mes "["+strcharinfo(0)+"]";
62                mes "Blood...?!";
63                mes "Shinokas!";
64                mes "Who did this to you?";
65                mes "W-we need to call for help!";
66                next;
67                mes "[Shinokas]";
68                mes "No...";
69                mes "It's already";
70                mes "too late for me.";
71                mes "I should have died";
72                mes "a long time ago...";
73                next;
74                mes "[Shinokas]";
75                mes "*Cough*";
76                mes "I only regret that";
77                mes "I've never been able";
78                mes "to apologize to my";
79                mes "friends... *Cough!*";
80                next;
81                mes "[Shinokas]";
82                mes "But did you";
83                mes "find out? D-did";
84                mes "you find out what's";
85                mes "so special about";
86                mes "that ore? W-what";
87                mes "is it... Really?";
88                next;
89                mes "["+strcharinfo(0)+"]";
90                mes "It was...";
91                next;
92                input @text$;
93                mes "^0000FF"+@text$+"^000000!";
94                next;
95                mes "[Shinokas]";
96                mes "W-wait...!";
97                mes "What did...";
98                mes "I can't underst--";
99                mes "*Couhgh cough!*";
100                next;
101                mes "["+strcharinfo(0)+"]";
102                mes "No...!";
103                mes "Tell me who";
104                mes "did this to you!";
105                mes "Where are they?";
106                mes "Speak to me, please!";
107                next;
108                mes "[Shinokas]";
109                mes "W-wha...?";
110                mes "I told you.";
111                mes "Th-they we--";
112                next;
113                mes "[Shinokas]";
114                mes "...";
115                mes "......";
116                next;
117                mes "["+strcharinfo(0)+"]";
118                mes "No!";
119                mes "Shinokas!";
120                mes "Why, God?";
121                mes "Why...";
122                set Shinokas_Quest,9;
123                close;
124        case 7:
125                mes "[Shinokas]";
126                mes "...";
127                mes "......";
128                close;
129        case 6:
130                mes "[Shinokas]";
131                mes "So...?";
132                mes "Did you learn";
133                mes "anything new";
134                mes "in the Factory?";
135                next;
136                mes "["+strcharinfo(0)+"]";
137                if(EinFactory != 16){
138                        mes "I haven't went there";
139                        mes "yet.";
140                        next;
141                        mes "[Shinokas]";
142                        mes "Then why did you come";
143                        mes "back? Go and investigate";
144                        mes "the factory now.";
145                        close;
146                }
147                mes "Well...";
148                mes "There's a lot of";
149                mes "suspicious business";
150                mes "in the factory, but I don't";
151                mes "think any of it is related";
152                mes "to that ore you mentioned.";
153                next;
154                mes "[Shinokas]";
155                mes "Damn it...";
156                mes "Then where did";
157                mes "they hide it? Where";
158                mes "do you think that";
159                mes "ore might be?";
160                next;
161                while(1){
162                        switch(select("Airport:Factory:Train Station:Airship Repairshop:Laboratory")){
163                        case 1: //airport
164                                mes "[Shinokas]";
165                                mes "No...";
166                                mes "The Airport is always";
167                                mes "crowded with people.";
168                                mes "It'd be a bad idea to hide";
169                                mes "something so important";
170                                mes "in that kind of place.";
171                                next;
172                                break;
173                        case 2: //factory
174                                mes "[Shinokas]";
175                                mes "Didn't you just";
176                                mes "check the factory?";
177                                mes "You couldn't find";
178                                mes "any clues to the";
179                                mes "ore over there...";
180                                next;
181                                break;
182                        case 3: //train
183                                mes "[Shinokas]";
184                                mes "Hmm...";
185                                mes "People are always going";
186                                mes "in and out of the Train Station.";
187                                mes "It's not the best place to hide";
188                                mes "something as important as the ore.";
189                                next;
190                                break;
191                        case 4: //repairshop
192                                mes "[Shinokas]";
193                                mes "The Airship? Hm, it does";
194                                mes "fly through some mysterious";
195                                mes "power... But I already checked";
196                                mes "the Airship Replairshop myself.";
197                                mes "I haven't found any trace of";
198                                mes "the ore over there.";
199                                next;
200                                break;
201                        case 5: //Laboratory
202                                mes "[Shinokas]";
203                                mes "...!";
204                                mes "Yes. Yes...!";
205                                mes "That could be it!";
206                                mes "Why didn't I think";
207                                mes "about the Laboratory?";
208                                mes "It makes so much sense!";
209                                next;
210                                mes "[Shinokas]";
211                                mes "I have a good feeling";
212                                mes "about this. Please sneak";
213                                mes "into that Laboratory and";
214                                mes "see if you can find the ore!";
215                                next;
216                                mes "[Shinokas]";
217                                mes "Remember...";
218                                mes "Not just anybody";
219                                mes "can enter that kind";
220                                mes "of place. But I'm sure";
221                                mes "you'll figure something out.";
222                                set Shinokas_Quest,7;
223                                close;
224                        }
225                }
226        case 5:
227                mes "[Shinokas]";
228                mes "So, did you find";
229                mes "anything from the";
230                mes "Kapellthaines?";
231                next;
232                mes "["+strcharinfo(0)+"]";
233                mes "Well, Mr. Kapelltheine";
234                mes "is kind of violent, but";
235                mes "I didn't find anything";
236                mes "really suspicious.";
237                next;
238                mes "[Shinokas]";
239                mes "Huh...";
240                mes "I must have";
241                mes "been wrong, then...";
242                mes "Where else could it be?";
243                next;
244                mes "[Shinokas]";
245                mes "Oh, right! The huge";
246                mes "factory in Einbroch!";
247                mes "What could be more";
248                mes "suspicious? There's a ton";
249                mes "of workers, but no one really";
250                mes "knows what they do there...";
251                next;
252                mes "[Shinokas]";
253                mes "If they're so secretive";
254                mes "it's possible that they're";
255                mes "keeping the ore over there.";
256                mes "Please go and search the";
257                mes "Factory for that ore as";
258                mes "soon as you can.";
259                set Shinokas_Quest,6;
260                close;
261        case 4:
262                mes "[Shinokas]";
263                mes "Please...";
264                mes "Find out if the Kapelltheines";
265                mes "are keeping some kind of unique";
266                mes "ore. Their manor is on the road";
267                mes "that leads to the Airport.";
268                close;
269        }
270        //Shinokas_Quest = 0 1 2 3 10
271        mes "[Sick Old Man]";
272        mes "...!";
273        next;
274        mes "[Sick Old Man]";
275        mes "Awwwk~";
276        mes "It's killing me!";
277        mes "Arrrgh! Awwwrgh!";
278        mes "W-when will my son";
279        mes "come back from";
280        mes "the factory...?!";
281        next;
282        if(Shinokas_Quest != 3){
283                mes "^3131FFYou feel really awkward";
284                mes "just staring at this old";
285                mes "man violently rolling";
286                mes "around in his bed.";
287                close;
288        }
289        //Shinokas_Quest = 3
290        mes "["+strcharinfo(0)+"]";
291        mes "Shi...";
292        mes "Shinokas?";
293        next;
294        mes "[Sick Old Man]";
295        mes "Huh...?";
296        mes "Noooo! My name is";
297        mes "Shinotarous. Y-you've";
298        mes "got the wrong person!";
299        next;
300        mes "["+strcharinfo(0)+"]";
301        mes "This has to be the";
302        mes "Shinokas that Hikeman";
303        mes "was talking about in Einbech";
304        mes "Hmmm, but how can I get";
305        mes "him to admit it?";
306        next;
307        mes "["+strcharinfo(0)+"]";
308        mes "*Ahem!*";
309        mes "Excuse me...";
310        next;
311        while(1){
312                switch(select("Remember the mine tunnel collapse?:Didn't you used to be a miner?:Have you lived in Einbroch all your life?")){
313                case 1: //remember
314                        if(@shinqst2 > 4 || @shinqst3 > 4) goto L_Cont;
315                        mes "[Sick Old Man]";
316                        mes "Noooo!";
317                        mes "I don't know";
318                        mes "what the hell";
319                        mes "you're talking";
320                        mes "about!";
321                        next;   
322                        break;
323                case 2: //miner
324                        if(@shinqst2 > 1)goto s_Quest2;
325                        mes "[Sick Old Man]";
326                        mes "Noooo...!";
327                        mes "W-why would you";
328                        mes "even ask me that";
329                        mes "kind of question?!";
330                s_Quest2:
331                        set @shinqst2,@shinqst2 + 1;
332                        if(@shinqst3)set @shinqst3,0;
333                        next;
334                        break;
335
336                case 3: //einbroch
337                        if(@shinqst3 > 1)goto s_Quest3;
338                        mes "[Sick Old Man]";
339                        mes "Y-yes!";
340                        mes "Born and raised";
341                        mes "raised here in";
342                        mes "Einbe--Einbroch!";
343                        next;
344                        mes "^3131FFIt doesn't seem";
345                        mes "like this old man";
346                        mes "is telling the truth...";
347                s_Quest3:
348                        set @shinqst3,@shinqst3 + 1;
349                        if(@shinqst2)set @shinqst2,0;
350                        next;
351                        break;
352                }
353        }
354       
355L_Cont:
356        mes "[Shinokas]";
357        mes "Hmm...";
358        mes "^0000FFBuender Hikeman^000000...";
359        next;
360        mes "[Shinokas]";
361        mes "No!";
362        mes "I've never met";
363        mes "Buender Hikeman";
364        mes "in my entire li--";
365        next;
366        mes "[Shinokas]";
367        mes "...";
368        mes "......";
369        next;
370        mes "["+strcharinfo(0)+"]";
371        mes "I was right!";
372        mes "You're Shinokas!";
373        next;
374        mes "[Shinokas]";
375        mes "Curses!";
376        mes "I've blown";
377        mes "my cover!";
378        mes "W-wait! How much";
379        mes "do you know?!";
380        next;
381        mes "[Shinokas]";
382        mes "Did ^0000FFthey^000000 send you?";
383        mes "*Sigh* I think that this";
384        mes "is it. I'll never be";
385        mes "able to solve the";
386        mes "secret before I die.";
387        next;
388        mes "[Shinokas]";
389        mes "Okay.";
390        mes "Get on with it.";
391        mes "I'm ready now...";
392        next;
393        mes "["+strcharinfo(0)+"]";
394        mes "Tell me everything";
395        mes "you know related to";
396        mes "that incident where";
397        mes "the mine tunnel";
398        mes "collapsed around";
399        mes "you and Hikeman.";
400        next;
401        mes "[Shinokas]";
402        mes "...?";
403        mes "Errr....";
404        mes "You're not";
405        mes "here to kill me?";
406        next;
407        mes "["+strcharinfo(0)+"]";
408        mes "No...!";
409        mes "I'm here to find";
410        mes "out the truth";
411        next;
412        mes "[Shinokas]";
413        mes "That means...";
414        mes "I still have some time.";
415        mes "This must be destiny!";
416        mes "Allright, I'll tell you what";
417        mes "happened. But it's a";
418        mes "long story...";
419        next;
420        mes "[Shinokas]";
421        mes "How much do you know";
422        mes "about the accident? No,";
423        mes "wait. Don't answer that.";
424        mes "I don't want to hear it";
425        next;
426        mes "[Shinokas]";
427        mes "I admit it. Yes.";
428        mes "I stabbed my friends";
429        mes "in the back. It was an";
430        mes "unforgivable sin that will";
431        mes "haunt me untill the day that I die";
432        next;
433        mes "[Shinokas]";
434        mes "I sold out my friends for";
435        mes "money. I destroyed that";
436        mes "tunnel and killed them. But";
437        mes "I suppose I was tricked as well.";
438        mes "^0000FFThey^000000 never intended to keep";
439        mes "their end of our agreement.";
440        next;
441        mes "[Shinokas]";
442        mes "After I destroyed the tunnel,";
443        mes "they targeted me and I ended";
444        mes "spending the rest of my life being";
445        mes "pursued and running for place to";
446        mes "place. What the hell was that ^0000FFore^000000";
447        mes "and why was it so important?";
448        next;
449        mes "[Shinokas]";
450        mes "I need to know more about";
451        mes "that ore if it's worth killing for.";
452        mes "That's why I've risked sneaking";
453        mes "into Einbroch. Sopposedly, an ore";
454        mes "similar to the ore we found has";
455        mes "been transported here recently";
456        next;
457        menu "Did you find it?",-;
458        mes "[Shinokas]";
459        mes "No, not yet.";
460        mes "I've been searching";
461        mes "for that ore every night.";
462        mes "During the day, this kind";
463        mes "blacksmith has managed";
464        mes "to hide me from those men";
465        next;
466        mes "[Shinokas]";
467        mes "But I won't be safe";
468        mes "for very long. Look, I'm";
469        mes "no saint, but before I die,";
470        mes "I wanna do this one last";
471        mes "thing and see what's so";
472        mes "great about this ore...";
473        next;
474        menu "Wait, who's trying to get you?",-;
475        mes "[Shinokas]";
476        mes "Who's trying to kill me?";
477        mes "The people who hired me and";
478        mes "my friends to dig up that ore in";
479        mes "the first place. We thought they";
480        mes "were ordinary businessmen,";
481        mes "but... They're dangerous.";
482        next;
483        mes "[Shinokas]";
484        mes "So I told you everything";
485        mes "and now you know that my";
486        mes "day might be numbered.";
487        mes "Please do an old man a favor";
488        mes "and search Einbroch for that";
489        mes "strange, mysterious ore.";
490        next;
491        mes "[Shinokas]";
492        mes "Now, the first thing I learned";
493        mes "in this tows is that the richest";
494        mes "family is the Kapelltheines. Only";
495        mes "the rich and powerful can possibly";
496        mes "be involved in something so big.";
497        next;
498        mes "[Shinokas]";
499        mes "Would you search";
500        mes "Kappelltheine Manor";
501        mes "for that ore? It's on the way";
502        mes "to the Airport and it shouldn't be";
503        mes "hard to miss. They're the richest";
504        mes "people in Einbroch, after all.";
505        next;
506        mes "[Shinokas]";
507        mes "I'm too old and weak to leave";
508        mes "this house, and there's the change";
509        mes "that those men will find me. If you";
510        mes "can sympathize with my situation,";
511        mes "please find out if the Kapelltheine";
512        mes "family has any unique ores...";
513        set Shinokas_Quest,4;
514        close;
515
516OnTouch:
517        if(Shinokas_Quest != 8) end;
518        mes "^3131FFThe open window rattles";
519        mes "as you enter the room and";
520        mes "are welcomed by a sudden";
521        mes "chill. A trail of red footprints";
522        mes "lies near your feet.";
523        next;
524        mes "^3131FFA grey sheet lies";
525        mes "rumpled on the bed,";
526        mes "but you can see dark red";
527        mes "stains in between the folds.";
528        close;
529}       
530
531ein_in01,32,133,6       script  Maid    850,{
532        mes "[Maid]";
533        if(Shinokas_Quest != 4){
534                mes "There's no end";
535                mes "to all these plates";
536                mes "I have to clean...!";
537                close;
538        }       
539        mes "Did you ask me";
540        mes "if I saw some kind";
541        mes "of ore around here?";
542        mes "That's strange...";
543        next;
544        mes "[Maid]";
545        mes "Will, I've been with";
546        mes "this family for a long";
547        mes "time. Let me assure you";
548        mes "that there's no secrets";
549        mes "from me in this household!";
550        next;
551        mes "[Maid]";
552        mes "I'm sorry, but I don't";
553        mes "think we have any ores,";
554        mes "special or otherwise, here";
555        mes "in the manor. What exactly";
556        mes "do you need them for?";
557        set Shinokas_Quest,5;
558        close;
559}
560
561einbroch,51,52,1        script  lab_warp        45,2,2,{
562        if(Shinokas_Quest != 7 && lhz_heart != 9 && lhz_heart != 10){
563                mes "^3131FFThe door is locked.";
564                mes "You cannot enter.";
565                close;
566        }
567        mes "[Security System]";
568        mes "^FF0000*Beep Boop*^000000";
569        mes "Restricted Access Area.";
570        mes "Please identify yourself";
571        mes "through the system.";
572        next;
573        switch(select("Identify.:Information:Cancel")){
574                case 1: //Identify
575                        break; //continue after switch =\
576                case 2: //information
577                        mes "[Security System]";
578                        mes "You must use the";
579                        mes "security system in order";
580                        mes "to gain access into the";
581                        mes "Einbroch Laboratory.";
582                        next;
583                        mes "[Security System]";
584                        mes "You will be given";
585                        mes "a password that you";
586                        mes "must input correctly";
587                        mes "withing 60 seconds.";
588                        mes "Otherwise, you will";
589                        mes "fail the security check.";
590                        //hell of a security system ye got there mate
591                        //wonder if gravity co has the same sort? xD
592                        next;
593                        mes "[Security System]";
594                        mes "If you take longer";
595                        mes "then 3 minutes to";
596                        mes "enter the password,";
597                        mes "the security system";
598                        mes "will initiate lockout.";
599                        close;
600                case 3: //cancel
601                        mes "[Security System]";
602                        mes "You have canceled";
603                        mes "the ID security check.";
604                        close;
605        }
606        //ID check:
607        mes "[Security System]";
608        mes "Enter the following";
609        mes "password in 60 seconds.";
610        mes "Failure to do so will result";
611        mes "in lockout. Please wait.";
612        next;
613        mes "[Security System]";
614        set @startseconds,gettime(3)*60*60+gettime(2)*60+gettime(1);
615        switch(rand(1,11)){
616        case 1:
617                mes "^00CCFFburrdingdingdilidingdingphoohudaamb";
618                mes "^00CCFFandoora^0000FFbambarambambamburanbamding";
619                input @str$;
620                if(@str$ != "burrdindingdilidingdingphoohudaambandoorabambarambambamburanbamding") goto L_SCFail;
621                goto L_Suc;
622        case 2:
623                mes "^FF33CCbarapaphurarlandreamduranbatuhi^990066wooi";
624                mes "^990066kabamturubamdingding";
625                next;
626                input @str$;
627                if(@str$ != "barapaphurarlandreamduranbatuhiwooikabamturubamdingding") goto L_SCFail;
628                goto L_Suc;
629        case 3:
630                mes "^00CCFFbelief love luck grimace sweat rush";
631                mes "^00CCFFfolktale rodimus optimus burnblebe";
632                input @str$;
633                if(@str$ != "belief love luck grimace sweat rush folktale rodimus optimus burnblebe") goto L_SCFail;
634                goto L_Suc;
635        case 4:
636                mes "^FF33CCLiGhTsPeEd RiGhT SPEed leFT TURn";
637                mes "^FF33CCRiGhT BuRn OrIGInAL GaNgSteR SmACk";
638                input @str$;
639                if(@str$ != "LiGhTsPeEd RiGhT SPEed leFT TURn RiGhT BuRn OrIGInAL GaNgSteR SmACk") goto L_SCFail;
640                goto L_Suc;
641        case 5:
642                mes "^00CCFFCoboman no chikara-yumei na";
643                mes "^00CCFFchikara-daiookii na chikara da ze!";
644                mes "^00CCFFCOBO ON";
645                input @str$;
646                if(@str$ != "Coboman no chikara-yumei na chikara-daiookii na chikara da ze! COBO ON") goto L_SCFail;
647                goto L_Suc;
648        case 6:
649                mes "^FF33CChfjdkeldjs^990066hfjdjeiskdlefvbd";
650                input @str$;
651                if(@str$ != "hfjdkeldjshfjdjeiskdlefvbd") goto L_SCFail;
652                goto L_Suc;
653        case 7:
654                mes "^00CCFFI'm the King of all Weirdos! Now";
655                mes "^00CCFFyou know of my true power. Obey~!";
656                input @str$;
657                if(@str$ != "I'm the King of all Weirdos! Now you know of my true power. Obey~!") goto L_SCFail;
658                goto L_Suc;
659        case 8:
660                mes "^990066uNflAPPaBLe LoVaBLe SeCreTs AnD";
661                mes "^990066BoWLiNg aGaINST tHe KarMA of YoUtH";
662                input @str$;
663                if(@str$ != "uNflAPPaBLe LoVaBLe SeCreTs AnD BoWLiNg aGaINST tHe KarMA of YoUtH") goto L_SCFail;
664                goto L_Suc;
665        case 9:
666                mes "^00CCFFBy the power of^000000";
667                mes "^00CCFFp-po-poi-po-poi-poin-poing";
668                mes "^00CCFFGOD-POING. I NEVER LOSE!";
669                input @str$;
670                if(@str$ != "By the power of p-po-poi-po-poi-poin-poing GOD-POING. I NEVER LOSE!") goto L_SCFail;
671                goto L_Suc;
672        case 10:
673                mes "^00CCFF...silence. quiet benevolence...";
674                mes "^00CCFFsoul mate... wonder. enigma...";
675                mes "^00CCFFcloud.^000000";
676                input @str$;
677                if(@str$ != "...silence. quiet benevolence... soul mate... wonder. enigma... cloud.") goto L_SCFail;
678                goto L_Suc;
679        case 11:
680                mes "^FF33CCopeN,Open!op3n.openOpen0p3nOpEn0pen";
681                mes "^FF33CC`open'0Pen open?open!111OPENSESAME";
682                input @str$;
683                if(@str$ != "opeN,Open!op3n.openOpen0p3nOpEn0pen`open'0Pen open?open!111OPENSESAME") goto L_SCFail;
684                goto L_Suc;
685        }
686L_Suc:
687        next;
688        set @endtime,gettime(3)*60*60+gettime(2)*60+gettime(1);
689        set @time,@endtime-@startseconds;
690        if(@time > 60) goto L_SC60;
691        mes "[Security System]";
692        mes "It took ^FF0000"+@time+" seconds^000000";
693        mes "for you to enter the";
694        mes "password. Initiating";
695        mes "override. Access granted.";
696        close2;
697        warp "ein_in01",283,25;
698        end;
699       
700L_SC60:
701        mes "[Security System]";
702        mes "Time over.";
703        mes "It took ^FF0000"+@time+" seconds^000000";
704        mes "for you to enter the";
705        mes "password. Initiating";
706        mes "lockout. Access denied.";
707        close;
708       
709L_SCFail:
710        next;
711        mes "[Security System]";
712        mes "You have failed";
713        mes "the identification";
714        mes "check. Access denied.";
715        close;
716}
717einbroch,51,56,6        script  Laboratory Soldier#01   852,{
718        mes "[Laboratory Soldier]";
719        mes "This area is off limits.";
720        mes "Please leave";
721        mes "immediately";
722        close;
723
724OnHide:
725        specialeffect 16;
726        disablenpc "Laboratory Soldier#01";
727        end;
728
729OnUnhide:
730        misceffect 215;
731        end;
732
733}
734einbroch,51,47,6        script  Laboratory Soldier#02   852,{
735        mes "[Laboratory Soldier]";
736        mes "This area is off limits.";
737        mes "Please leave";
738        mes "immediately";
739        close;
740
741OnHide:
742        specialeffect 16;
743        disablenpc "Laboratory Soldier#02";
744        end;
745
746OnUnhide:
747        misceffect 215;
748        end;
749
750}
751ein_in01,254,35,1       script  Scientist       749,{
752        mes "[Scientist]";
753        mes "*Grumble grumble*";
754        next;
755        if(ein_scientist == 1) goto L_P2;
756        mes "[Scientist]";
757        mes "Huh...?";
758        mes "How did you";
759        mes "get in here?";
760        next;
761        mes "["+strcharinfo(0)+"]";
762        mes "Oh! Ah...";
763        mes "I'm the new...";
764        mes "Guard. Nice";
765        mes "to meet you.";
766        next;
767        mes "[Scientist]";
768        mes "Oh. Yeah.";
769        mes "Nice-meet-you";
770        mes "..............";
771        mes "*Grumble grumble*";
772        next;
773        if(select("What's wrong?:Catch you later.")==2){
774                 mes "[Scientist]";
775                 mes "Right.";
776                 mes "Yeah.";
777                 mes "Later, man.";
778                 close;
779        }
780        mes "[Scientist]";
781        mes "What's wrong...?!";
782        mes "Oh, don't get me started!";
783        mes "I'm stuck here doing all the";
784        mes "work while the Lab Departement";
785        mes "Head goes out every freakin' day!";
786        next;
787        mes "[Scientist]";
788        mes "While I'm slaving";
789        mes "away here, he's in";
790        mes "that Airship, busy";
791        mes "flirting with that";
792        mes "woman. God...!";
793        mes "I'm like, so teed off!";
794        if(Shinokas_Quest == 7) set ein_scientist,1;
795        close;
796       
797L_P2:
798        mes "[Scientist]";
799        mes "Man alive!";
800        mes "Would it kill the";
801        mes "Department Head";
802        mes "to come in here and do";
803        mes "some work for a change?!";
804        next;
805        mes "[Scientist]";
806        mes "I mean, come on!";
807        mes "I shouldn't have to";
808        mes "carry his workload!";
809        close;
810}
811
812ein_in01,266,26,1       script  Unknown Stuff   111,{
813        mes "^3131FFThere's something";
814        mes "attached to a huge";
815        mes "machine with many cords";
816        mes "and folds of barbed wire";
817        if(Shinokas_Quest == 7) set ein_stuff,1;
818        close;
819}
820
821airplane,31,77,4        script  Drunken Man#03  853,{
822        if(Shinokas_Quest >= 8){
823                mes "[Drunken Man]";
824                mes "Hahahahaha!";
825                mes "You're great!";
826                mes "I feel great!";
827                mes "Everything's great!";
828                mes "Bwahahahaahahah!";
829                mes "*Hiccup*";
830                close;
831        }
832        mes "[Drunken Man]";
833        mes "Okay okay...";
834        mes "Daddy's gonna";
835        mes "win some Apples";
836        mes "this time for sure!";
837        next;
838        if(ein_stuff && ein_scientist){
839                mes "[Drunken Man]";
840                mes "Let's do it!";
841                mes "^3131FFYmir's Heart^000000 is";
842                mes "on my side! GO!";
843                next;
844                mes "["+strcharinfo(0)+"]";
845                mes "Huh...?";
846                mes "What did he just say?";
847                mes "It seemed important!";
848                next;
849        }
850        mes "^0000FF*Rolling and rumbling*^000000";
851        next;
852        mes "[Kaci]";
853        mes "I have a total of ^FF000011^000000";
854        mes "and you have total ^FF00005^000000.";
855        mes "You lose this game. I'm";
856        mes "sorry, but I hope we play";
857        mes "again sometime.";
858        donpcevent "Kaci::OnLose";
859        next;
860        mes "[Drunken Man]";
861        mes "Waaaaaahhhhhhhhh!";
862        mes "Apples! My apples!";
863        mes "Apples, I need more...!";
864        if(countitem(512) && ein_stuff && ein_scientist) goto L_Apples;
865        close;
866       
867L_Apples:
868        next;
869        mes "["+strcharinfo(0)+"]";
870        mes "Do you want";
871        mes "some of mine?";
872        next;
873        if(countitem(512) <100){
874                mes "[Drunken Man]";
875                mes "What...?";
876                mes "I can't do anything";
877                mes "with so few Apples!";
878                mes "I'm a high roller and";
879                mes "this is a high stakes game!";
880                close;
881        }
882        mes "[Drunken Man]";
883        mes "Wha--? Yes...";
884        mes "Hell yes! Gimme";
885        mes "some of your Apples!";
886        mes "Yeeeeeeeeeeehaw!";
887        mes "I'm back, baby!";
888        next;
889        mes "[Drunken Man]";
890        mes "Now, to win!";
891        mes "Daddy needs love...";
892        mes "Time to go from";
893        mes "crappy to classy!";
894        next;
895        mes "^0000FF*Rolling and rumbling*^000000";
896        next;
897        delitem 512,countitem(512);
898        set @kaci,rand(2,12);
899        set @man,rand(2,12);
900        if(@man == @kaci){
901                if(rand(2)){
902                        if(@man != 12)
903                                set @man,@man+1;
904                        else
905                                set @man,@man-1;
906                }else{
907                        if(@man != 2)
908                                set @man,@man-1;
909                        else
910                                set @man,@man+1;
911                }
912        }
913        mes "[Kaci]";
914        mes "Oooh...";
915        mes "I got a total of ^FF0000"+@kaci+"^000000,";
916        mes "and you have a total of ^FF0000"+@man+"^000000.";
917        if(@man < @kaci){
918                mes "I'm sorry, but you lose";
919                mes "again. Better luck next time...";
920                donpcevent "Kaci::OnLose";
921                next;
922                mes "[Drunken Man]";
923                mes "Waaaaaahhhhhhhhhhhh!";
924                mes "Waaaaaaaahhhhhhh!";
925                close;
926        }
927        mes "Congratulations, you won!";
928        mes "Let me give you your winning";
929        mes "and we'll play again some time~";
930        donpcevent "Kaci::OnWin";
931        next;
932        mes "[Drunken Man]";
933        mes "Mwahhhahahahaha!";
934        mes "Whahahahahahahahaha!";
935        mes "That's why they call me";
936        mes "the 'Resurrection Kid!'";
937        mes "I always come back!";
938        next;
939        mes "[Drunken Man]";
940        mes "Oh yes, right!";
941        mes "You...! You lent";
942        mes "me those lucky";
943        mes "Apples. ^111111*Hiccup*^000000";
944        next;
945        mes "[Drunken Man]";
946        mes "I'm Kurschenburg!";
947        mes "Thanks to you, I'm";
948        mes "on a winning streak!";
949        mes "Hahaha! Th-thank you~";
950        mes "^111111*Hic-hic-hiccup!*^000000";
951        next;
952        if(select("So what was that about Ymir's Heart?:Hehe, you're welcome.")==2){
953                 mes "[Drunken Man]";
954                 mes "Hahahaha!";
955                 mes "You're great!";
956                 mes "And I feel great!";
957                 mes "Bwahahahaahahah!";
958                 mes "^111111*Hiccup*^000000";
959                 close;
960        }
961        mes "[Drunken Man]";
962        mes "What...?";
963        mes "Ymir's Heart?";
964        mes "How do you know";
965        mes "about that? ^111111*Hiccup*^000000";
966        next;
967        mes "["+strcharinfo(0)+"]";
968        mes "Y-you...!";
969        mes "You were just yelling,";
970        mes "'Ymir's Heart is on my";
971        mes "side,' while you were";
972        mes "gambling with those Apples!";
973        next;
974        mes "[Drunken Man]";
975        mes "What...?!";
976        mes "No way~";
977        mes "Err...? Did I...?";
978        next;
979        mes "[Drunken Man]";
980        mes "Heh heh...";
981        mes "I'm not really";
982        mes "supposed to be talking";
983        mes "about this. As head of";
984        mes "the Laboratory, I'm sworn";
985        mes "to secrecy about Ymir's Heart.";
986        next;
987        mes "[Drunken Man]";
988        mes "But what do I care?!";
989        mes "All they want are the";
990        mes "results of my research!";
991        mes "They don't appreciate";
992        mes "my work at all! My title";
993        mes "is completely worthless!";
994        next;
995        mes "[Drunken Man]";
996        mes "You don't know how long I've";
997        mes "been imprisoned in the lab and";
998        mes "that the work conditions just get";
999        mes "worse and worse. Screw them! I'll";
1000        mes "keep getting paid as long as I show";
1001        mes "them some progress in our project!";
1002        next;
1003        menu "Project?",-;
1004        mes "[Drunken Man]";
1005        mes "Yeah, we're researching";
1006        mes "Ymir's Heart. It was found";
1007        mes "a long time ago in ^3131FFEinbech^000000";
1008        mes "and it's in our lab now.";
1009        next;
1010        mes "[Drunken Man]";
1011        mes "Everyone knows it's supposed";
1012        mes "to hold some legendary power,";
1013        mes "but even I was surprised to see";
1014        mes "what it was capable of. It's both";
1015        mes "terrible and miraculous, scary";
1016        mes "and wondrous...";
1017        next;
1018        mes "[Drunken Man]";
1019        mes "So...";
1020        mes "I figure...";
1021        mes "It may even";
1022        mes "have the power to";
1023        mes "win me Dice games!";
1024        mes "Bwahaha--*Hiccup!*";
1025        next;
1026        mes "["+strcharinfo(0)+"]";
1027        mes "(That thing I saw";
1028        mes "hooked up to all those";
1029        mes "wires in the Laboratory";
1030        mes "must have been a piece";
1031        mes "of ^3131FFYmir's Heart^000000. I better";
1032        mes "tell Shinokas about this.)";
1033        set Shinokas_Quest,8;
1034        //cleaning temp variables from the lab.
1035        set ein_stuff,0;
1036        set ein_scientist,0;
1037        close;
1038}
1039       
1040einbech,57,210,4        script  Young Man#04    854,{
1041        mes "[Young Man]";
1042        mes "Behind the pub,";
1043        mes "you'll see this old man";
1044        mes "who's always mumbling";
1045        mes "something to himself.";
1046        next;
1047        mes "[Young Man]";
1048        mes "Sometimes he seems really";
1049        mes "angry, but other times he looks";
1050        mes "awfully depressed. He must have";
1051        mes "lived through some really horrible";
1052        mes "experiences. I can't help but feel";
1053        mes "really sorry for the old guy.";
1054        next;
1055        mes "[Young Man]";
1056        mes "He says and does";
1057        mes "a lot of strange things.";
1058        mes "It's sad to see someone";
1059        mes "that old act that way, but";
1060        mes "it makes me wonder what";
1061        mes "could have happened to him.";
1062        if(!Shinokas_Quest)set Shinokas_Quest,1;
1063        close;
1064}
1065
1066einbech,165,105,7       script  Buender Hikeman 847,{
1067        if(Shinokas_Quest >= 9) goto L_P2;
1068        if(Shinokas_Quest == 3) goto L_BEST;
1069        if(Shinokas_Quest == 2) goto L_BASTARD;
1070        mes "[Buender Hikeman]";
1071        mes "...";
1072        mes "......";
1073        if(!Shinokas_Quest)close;
1074        next;
1075        mes "[Buender Hikeman]";
1076        mes "...";
1077        mes "......";
1078        mes "......You...";
1079        next;
1080        mes "[Buender Hikeman]";
1081        mes "...";
1082        mes "......";
1083        mes "......You...";
1084        mes "......Stop it...";
1085        next;
1086        mes "[Buender Hikeman]";
1087        mes "...";
1088        mes "......";
1089        mes "......You...";
1090        mes "......Stop it...";
1091        mes "...You ^FF0000bastard^000000!";
1092        next;
1093        mes "[Buender Hikeman]";
1094        mes "RaaaaAAAARGHHH!!";
1095        next;
1096        mes "[Buender Hikeman]";
1097        mes "^0000FFThe old man seems^000000";
1098        mes "^0000FFslightly irked at seeing^000000";
1099        mes "^0000FFyou. Unfortunately, his^000000";
1100        mes "^0000FFscreaming and rambling^000000";
1101        mes "^0000FFis totally incoherent.^000000";
1102        next;
1103        mes "[Buender Hikeman]";
1104        mes "It ^FF0000is^000000 you!";
1105        mes "You're responsible!";
1106        mes "You've taken everything";
1107        mes "away from me!!";
1108        next;
1109        menu "What are you talking about?",L_WHAT,"Ignore Him.",-;
1110        mes "[Buender Hikeman]";
1111        mes "W...wait!";
1112        mes "I said wait!";
1113        mes "*Cough!*";
1114        close;
1115L_WHAT:
1116        mes "[Buender Hikeman]";
1117        mes "How dare you...";
1118        mes "How dare you treat";
1119        mes "after destroying all the";
1120        mes "happiness in my life!";
1121        next;
1122        mes "[Buender Hikeman]";
1123        mes "Damn you...";
1124        mes "How can you have";
1125        mes "the audacity to pretend";
1126        mes "as if nothing happened?!";
1127        mes "*C-cough Cough...*";
1128        next;
1129        mes "[Buender Hikeman]";
1130        mes "Are you so evil to";
1131        mes "just shallowly forget";
1132        mes "what you've done to our";
1133        mes "lives? Did you already";
1134        mes "forget what you did";
1135        mes "here in Einbech?!";
1136        next;
1137        mes "[Buender Hikeman]";
1138        mes "It was such a long";
1139        mes "time ago, but I'll never";
1140        mes "forget. This town was";
1141        mes "small, but full of folk";
1142        mes "with warm hearts...";
1143        next;
1144        mes "[Buender Hikeman]";
1145        mes "Me, Khartophe, Anuto,";
1146        mes "Maskharundt... All of";
1147        mes "us were friends hired";
1148        mes "by that businessman";
1149        mes "to dig up ores in the mine.";
1150        next;
1151        mes "[Buender Hikeman]";
1152        mes "And then there";
1153        mes "was you! All of us";
1154        mes "put together made the";
1155        mes "greatest mining team!";
1156        mes "That was, until, we";
1157        mes "discovered ^FF0000it^000000.";
1158        next;
1159        mes "[Buender Hikeman]";
1160        mes "Yes...";
1161        mes "The mysterious ore";
1162        mes "that dazzled with a";
1163        mes "magnificent light.";
1164        next;
1165        mes "[Buender Hikeman]";
1166        mes "But we should have known";
1167        mes "that the ^0000FFUngoliant^000000 would";
1168        mes "be arround that ore. We";
1169        mes "should have realized";
1170        mes "the danger...";
1171        next;
1172        mes "[Buender Hikeman]";
1173        mes "We reported our findings";
1174        mes "to our employer, and then";
1175        mes "the ore just disappeared. He";
1176        mes "must have sent it somewhere,";
1177        mes "it was none of our business.";
1178        next;
1179        mes "[Buender Hikeman]";
1180        mes "Then life was back";
1181        mes "to normal for a while.";
1182        mes "But one day you yelled";
1183        mes "to us that you had found";
1184        mes "another special, mysterious";
1185        mes "ore in the mines.";
1186        next;
1187        mes "[Buender Hikeman]";
1188        mes "But when we came";
1189        mes "over to check the hole";
1190        mes "you dug up, you know";
1191        mes "what we found...?!";
1192        next;
1193        menu "Ungoliant?",L_UNGOLIANT,"A mysterious ore, right?",L_ORE,"Nothing...?",-;
1194        mes "[Buender Hikeman]";
1195        mes "Yes...";
1196        mes "Nothing.";
1197        next;
1198        goto L_CONTINUE;
1199L_UNGOLIANT:
1200        mes "[Buender Hikeman]";
1201        mes "Don't you remember";
1202        mes "what happened? What";
1203        mes "you did to us at that time?!";
1204        next;
1205L_CONTINUE:
1206        mes "[Buender Hikeman]";
1207        mes "There was nothing";
1208        mes "inside the hole!";
1209        next;
1210        mes "[Buender Hikeman]";
1211        mes "Then you pointed to";
1212        mes "the wall behind us and";
1213        mes "screamed that Ungoliant";
1214        mes "was coming! In our panic";
1215        mes "we started to dig our way out!";
1216        next;
1217        mes "[Buender Hikeman]";
1218        mes "I remember that the expression on";
1219        mes "your face seemed so strange. I had";
1220        mes "thought you looked sad, but now I'm";
1221        mes "sure you were consumed by greed! We";
1222        mes "trusted you and you betrayed us!";
1223        next;
1224        mes "[Buender Hikeman]";
1225        mes "When we finally smashed";
1226        mes "down that last wall, everything";
1227        mes "started to fall around us. We";
1228        mes "were the only two to survive";
1229        mes "that tunnel collapse.";
1230        next;
1231        mes "[Buender Hikeman]";
1232        mes "Then I learned...";
1233        mes "You planned it all along.";
1234        if(Shinokas_Quest == 1) set Shinokas_Quest,2;
1235        close;
1236L_ORE:
1237        mes "[Buender Hikeman]";
1238        mes "Don't you remember";
1239        mes "what happened? What";
1240        mes "you did to us at that time?!";
1241        next;
1242        goto L_CONTINUE;
1243L_BASTARD:
1244        mes "[Buender Hikeman]";
1245        mes "Bastard!";
1246        mes "I'm sick of";
1247        mes "your lies!";
1248        next;
1249        menu "I'm not who you think!",L_IM,"How did you survive the accident?",-;
1250L_HOW:
1251        mes "[Buender Hikeman]";
1252        mes "When I came to,";
1253        mes "I was lying on my";
1254        mes "stomach in the ruins";
1255        mes "of that dark tunnel.";
1256        next;
1257        mes "[Buender Hikeman]";
1258        mes "And I found...";
1259        mes "You know what I found.";
1260        next;
1261        mes "[Buender Hikeman]";
1262        mes "*Cough Cough*";
1263        mes "The corpses of my friends!";
1264        mes "Kartophe, Anuto, Maskharundt";
1265        mes "Great men and my best friends.";
1266        mes "But where were you?!";
1267        next;
1268        mes "[Buender Hikeman]";
1269        mes "Your body was nowhere";
1270        mes "to be found. I searched";
1271        mes "the tunnel and finnaly";
1272        mes "climbed outside where";
1273        mes "I was found unconscious.";
1274        next;
1275        mes "[Buender Hikeman]";
1276        mes "I was so stupid.";
1277        mes "It was because of";
1278        mes "that ore! You killed our";
1279        mes "friend and destroyed";
1280        mes "my life for that thing!";
1281        next;
1282        mes "[Buender Hikeman]";
1283        mes "And now...";
1284        mes "You come out of";
1285        mes "hiding and show up.";
1286        mes "What do you want of";
1287        mes "me? What more can";
1288        mes "you possibly take away?!";
1289        next;
1290        menu "I'm not who you think I am!",L_THINK,"I'd like to apologize.",-;
1291        mes "[Buender Hikeman]";
1292        mes "Ha ha...";
1293        mes "Apologize?";
1294        mes "The harm is";
1295        mes "already done...";
1296        goto L_CONTINUE2;
1297L_THINK:
1298        mes "[Buender Hikeman]";
1299        mes "Quit lying!";
1300        mes "You've stirred up";
1301        mes "my hatred by showing";
1302        mes "up again! I've never";
1303        mes "forgotten that day!";
1304        next;
1305L_CONTINUE2:
1306        mes "[Buender Hikeman]";
1307        mes "It's too late";
1308        mes "for you now. For";
1309        mes "the sake of my friends,";
1310        mes "I'll have my vengeance!";
1311        next;
1312        mes "[Buender Hikeman]";
1313        mes "Prepare to die!";
1314        mes "^0000FFShinokas^000000!!!!";
1315        next;
1316        mes "[Buender Hikeman]";
1317        mes "...!";
1318        mes "*Cough! Cough!*";
1319        mes "Noooo! N-not now...";
1320        mes "*Cough! Cough!*";
1321        next;
1322        mes "[" + strcharinfo(0) + "]";
1323        mes "...";
1324        mes "I better";
1325        mes "get away";
1326        mes "from him!";
1327        next;
1328        mes "^0000FFYou ran away from Hikeman^000000";
1329        mes "^0000FFas he collapsed on the ground^000000";
1330        mes "^0000FFIt wouldn't be a good idea to^000000";
1331        mes "^0000FFprovoke the old man anymore,^000000";
1332        mes "^0000FFintentionally or not.^000000";
1333        if(Shinokas_Quest == 2) set Shinokas_Quest,3;
1334        close;
1335L_BEST:
1336        mes "^0000FFIt'd be best^000000";
1337        mes "^0000FFto avoid aggravating^000000";
1338        mes "^0000FFthe old man for now.^000000";
1339        close;
1340L_IM:
1341        mes "[Buender Hikeman]";
1342        mes "Ha...!";
1343        mes "Do you think";
1344        mes "I'd so easily";
1345        mes "forget the face";
1346        mes "of the person who";
1347        mes "shattered my life?!";
1348        next;
1349        goto L_HOW;
1350       
1351L_P2:
1352        mes "^0000FFHikeman is dozing^000000";
1353        mes "^0000FFoff in his chair. Judging^000000";
1354        mes "^0000FFfrom the look of discomfort^000000";
1355        mes "^0000FFon his face, he seems to be^000000";
1356        mes "^0000FFhaving a nightmare.^000000";
1357        if(Shinokas_Quest == 10) close;
1358        next;
1359        mes "["+strcharinfo(0)+"]";
1360        mes "Excuse me...";
1361        next;
1362        mes "[Buender Hikeman]";
1363        mes "Huh...?";
1364        mes ".........!!";
1365        mes "Hahahahaha!";
1366        mes "Come back for";
1367        mes "your beating,";
1368        mes "eh, Shinokas?!";
1369        next;
1370        mes "["+strcharinfo(0)+"]";
1371        mes "Look...!";
1372        mes "I'm not Shinokas,";
1373        mes "okay? How can you";
1374        mes "forget what he looks";
1375        mes "like or how old he is?";
1376        mes "I'm way younger!";
1377        next;
1378        mes "[Buender Hikeman]";
1379        mes "What...?";
1380        next;
1381        mes "[Buender Hikeman]";
1382        mes "..................";
1383        next;
1384        mes "[Buender Hikeman]";
1385        mes "Uhhhh......";
1386        next;
1387        mes "[Buender Hikeman]";
1388        mes "Huh.";
1389        next;
1390        mes "[Buender Hikeman]";
1391        mes "It seems...";
1392        mes "I've made a";
1393        mes "huge mistake.";
1394        next;
1395        mes "[Buender Hikeman]";
1396        mes "Ever since the accident, people";
1397        mes "have said that I haven't been the";
1398        mes "same. Maybe they're right.";
1399        next;
1400        mes "[Buender Hikeman]";
1401        mes "I keep making the same";
1402        mes "mistakes, so maybe they're";
1403        mes "right about me getting senile.";
1404        mes "Did you come just to clear";
1405        mes "up this misunderstanding?";
1406        next;
1407        mes "["+strcharinfo(0)+"]";
1408        mes "Um...";
1409        mes "Actually...";
1410        next;
1411        menu "Tell Hikeman about Shinakas's death.",-,"Don't notify Hikeman",L_NNotify;
1412
1413        set Shinokas_Quest,10;
1414        mes "["+strcharinfo(0)+"]";
1415        mes "Shinokas died";
1416        mes "a while ago in";
1417        mes "Einbroch.";
1418        next;
1419        mes "[Buender Hikeman]";
1420        mes "Wh-what...?";
1421        next;
1422        mes "["+strcharinfo(0)+"]";
1423        mes "Shinokas was killed by";
1424        mes "some men. He thinks they";
1425        mes "may have been the ones";
1426        mes "who hired you guys. In the";
1427        mes "end, he was betrayed too...";
1428        next;
1429        mes "[Buender Hikeman]";
1430        mes "I...";
1431        mes "I see...";
1432        next;
1433        mes "["+strcharinfo(0)+"]";
1434        mes "Shinokas may have";
1435        mes "gotten some money,";
1436        mes "but he spent the rest";
1437        mes "of his life in hiding,";
1438        mes "being hunted down.";
1439        next;
1440        mes "[Buender Hikeman]";
1441        mes "Nothing's left.";
1442        mes "I've got nothing";
1443        mes "to look forward to.";
1444        mes "I was living only to";
1445        mes "avenge my friends...";
1446        next;
1447        mes "[Buender Hikeman]";
1448        mes "Please...";
1449        mes "Just go back to";
1450        mes "wherever you came";
1451        mes "from. Leave me alone...";
1452        next;
1453        mes "["+strcharinfo(0)+"]";
1454        mes "...";
1455        next;
1456        mes "["+strcharinfo(0)+"]";
1457        mes "Did Hikeman really want";
1458        mes "revenge on Shinokas or did";
1459        mes "he want to hear him out since";
1460        mes "they used to be close friends?";
1461        next;
1462        mes "["+strcharinfo(0)+"]";
1463        mes "If I mention that";
1464        mes "what they found was";
1465        mes "the Ymir Heart Piece,";
1466        mes "Hikeman might end up";
1467        mes "getting hunter down, so";
1468        mes "I better not say anything.";
1469        next;
1470        mes "["+strcharinfo(0)+"]";
1471        mes "Why are those men";
1472        mes "so obsessed with that";
1473        mes "Ymir Heart Piece? Is it";
1474        mes "really worth this kind of";
1475        mes "cruelty? Whoever they are,";
1476        mes "their intentions can't be good.";
1477        if(BaseLevel < 41) getexp 34750,0;
1478        else if(BaseLevel > 40 && BaseLevel < 61) getexp 69500,0;
1479        else if(BaseLevel > 60 && BaseLevel < 71) getexp 139000,0;
1480        else if(BaseLevel > 70 && BaseLevel < 81) getexp 278000,0;
1481        else if(BaseLevel > 80 && BaseLevel < 91) getexp 417000,0;
1482        else if(BaseLevel > 90) getexp 556000,0;
1483        close;
1484       
1485L_NNotify:
1486        mes "["+strcharinfo(0)+"]";
1487        mes "Yeah...";
1488        mes "That's right.";
1489        mes "I wanted to clear up";
1490        mes "this misunderstanding";
1491        mes "so you could calm down,";
1492        mes "even if it's just a little bit.";
1493        next;
1494        mes "[Buender Hikeman]";
1495        mes "Well, you don't have";
1496        mes "to worry so much about";
1497        mes ",u stress. I find that the";
1498        mes "winds that pass through";
1499        mes "this town to be very relaxing.";
1500        next;
1501        mes "[Buender Hikeman]";
1502        mes "Each time the wind";
1503        mes "blows by, my vision blurs,";
1504        mes "my memories haze and all";
1505        mes "of my hatred just drifts away.";
1506        next;
1507        mes "[Buender Hikeman]";
1508        mes "Without the wind, I'd only";
1509        mes "have my hatred towards ^FF0000him^000000.";
1510        mes "Maybe it's my only reason for";
1511        mes "living and maybe I'm lonely,";
1512        mes "but it's too late to feel";
1513        mes "sorry for myself now.";
1514        close;
1515}
1516
1517
1518//============================================================
1519//============================================= Einbroch Lover
1520//====================================================== Quest
1521ein_in01,31,151,4       script  Satra   850,{
1522        if(EIN_LOVERQ > 11)goto s_Intimi;
1523        if(EIN_LOVERQ == 11)goto s_Coal4;
1524        if(EIN_LOVERQ == 10)goto s_Coal3;
1525        if(EIN_LOVERQ == 9)goto s_Coal2;
1526        if(EIN_LOVERQ == 8)goto s_Coal1;
1527        if(EIN_LOVERQ == 7)goto s_Advent;
1528        mes "[Satra]";
1529        mes "A wandering";
1530        mes "adventurer...?";
1531        mes "How sinfully";
1532        mes "intriguing!";
1533        mes "Ho ho ho ho~";
1534        next;
1535        mes "[Satra]";
1536        mes "Oh, do not worry";
1537        mes "I'm sure the beauty of";
1538        mes "my home has captured your";
1539        mes "curiosity. My brutish excuse";
1540        mes "for a husband would have you";
1541        mes "beat if he found you...";
1542        next;
1543        mes "[Satra]";
1544        mes "But I'm far more genteel";
1545        mes "then Megass. You're more";
1546        mes "than welcome to enjoy the";
1547        mes "furnishings. Ho ho ho ho~";
1548        close;
1549
1550s_Advent:
1551        mes "[Satra]";
1552        mes "A wandering adventurer...?";
1553        mes "How ravishingly delightful!";
1554        mes "You must have risked life and";
1555        mes "limb to sneak past my husband";
1556        mes "to enjoy the captivating sights";
1557        mes "of my home. Ho ho ho ho~";
1558        next;
1559        mes "[Satra]";
1560        mes "Since you're a very";
1561        mes "unique quest, I shall";
1562        mes "give you a unique honor";
1563        mes "and deign to converse";
1564        mes "with you, adventurer.";
1565        next;
1566        mes "[Satra]";
1567        mes "Einbech exists to provide";
1568        mes "my family with coal and";
1569        mes "materials from their mines.";
1570        mes "It's a natural law: workers";
1571        mes "must be led by a chosen few.";
1572        next;
1573        mes "[Satra]";
1574        mes "It's delightfully";
1575        mes "ludicrous to see those";
1576        mes "workers aspire to reach";
1577        mes "our heights of social";
1578        mes "prestige. Ho ho ho ho~";
1579        next;
1580        mes "[Satra]";
1581        mes "Oh, I haven't spoken to";
1582        mes "someone from a lower";
1583        mes "class in ages! It feels";
1584        mes "so forbiddenly exciting!";
1585        next;
1586        mes "[Satra]";
1587        mes "Well adventurer, that's";
1588        mes "the end of our informal";
1589        mes "chat. I'll even grant you";
1590        mes "full permission to boast";
1591        mes "of the fact that you've";
1592        mes "spoken to Lady Satra.";
1593        next;
1594        mes "[Satra]";
1595        mes "If you wish for";
1596        mes "me to share words with";
1597        mes "you once more, prove to";
1598        mes "me that you're worthier";
1599        mes "than the other peons of";
1600        mes "my graceful presence.";
1601        next;
1602s_Coal1:
1603        mes "[Satra]";
1604        mes "Oh, I have a marvelous";
1605        mes "idea! Why don't you bring";
1606        mes "me ^9C0000Coals^000000? It's not impossible";
1607        mes "for someone like yourself, but";
1608        mes "this kind of task will require";
1609        mes "some effort on your part.";
1610        next;
1611        if(EIN_LOVERQ == 8 && countitem(1003) > 9)goto s_GotCoal1;
1612        mes "[Satra]";
1613        mes "Tah tah,";
1614        mes "adventurer~";
1615        if(EIN_LOVERQ == 7)set EIN_LOVERQ,8;
1616        close;
1617
1618s_GotCoal1:
1619        mes "[Satra]";
1620        mes "My, you've already";
1621        mes "brought the Coal?";
1622        mes "How charmingly";
1623        mes "prompt you are~";
1624        next;
1625        mes "[Satra]";
1626        mes "On behalf of the";
1627        mes "Kappellthaine family,";
1628        mes "I shall ignore your lowly";
1629        mes "status and graciously";
1630        mes "accept your small gift.";
1631        mes "Ho ho ho~";
1632        next;
1633        mes "[Satra]";
1634        mes "Do you hail from";
1635        mes "Einbech, adventurer?";
1636        mes "Ah, the Rune-Midgarts";
1637        mes "kingdom! I've visited your";
1638        mes "country. It's quite quaint";
1639        mes "and Jawaii is very lovely.";
1640        next;
1641        mes "[Satra]";
1642        mes "Well, I shall try to";
1643        mes "find some use for these.";
1644        mes "I'm afraid the gift I've asked";
1645        mes "from you isn't very practical.";
1646        mes "How is coal usually used?";
1647        mes "Ah, I have a novel idea!";
1648        next;
1649        mes "[Satra]";
1650        mes "Wouldn't it be";
1651        mes "intoxicatingly wild if";
1652        mes "Megass were to hold one";
1653        mes "of those social functions that";
1654        mes "the lower classes are so fond";
1655        mes "of? A 'barbeque', yes?";
1656        next;
1657        mes "[Satra]";
1658        mes "In any case, If you";
1659        mes "bring me more of that";
1660        mes "Coal, you would be even";
1661        mes "more favored by me and";
1662        mes "you'll become a recipient";
1663        mes "of my good graces. Ho ho~";
1664        set EIN_LOVERQ,9;
1665        delitem 1003,10;
1666        close;
1667
1668s_Coal2:
1669        mes "[Satra]";
1670        mes "^111111*Titter~*^000000";
1671        mes "Why, if it isn't my";
1672        mes "intrepid adventurer.";
1673        mes "Ho ho ho ho~";
1674        next;
1675        if(countitem(1003) > 9)goto s_GotCoal2;
1676        mes "[Satra]";
1677        mes "My apologies, but you";
1678        mes "must first prove to me";
1679        mes "that you are worthy of";
1680        mes "conversation. Why don't";
1681        mes "you deliver more of those";
1682        mes "^9C0000Coals^000000, mmm?";
1683        next;
1684        mes "[Satra]";
1685        mes "After all, I have no other";
1686        mes "means of knowing whether";
1687        mes "or not you appreciate the time";
1688        mes "I sacrifice by socializing with";
1689        mes "someone of your status.";
1690        mes "Ho ho ho ho~";
1691        close;
1692
1693s_GotCoal2:
1694        mes "[Satra]";
1695        mes "My word!";
1696        mes "Why are you carrying";
1697        mes "all of that dirty Coal";
1698        mes "with you? You poor,";
1699        mes "impoverished thing.";
1700        next;
1701        mes "[Satra]";
1702        mes "Oh! Dear me,";
1703        mes "I've nearly forgotten~";
1704        mes "How divinely silly of me!";
1705        mes "Once again, I graciously";
1706        mes "accept your small gift on";
1707        mes "behalf of the Kappelthaines.";
1708        next;
1709        mes "[Satra]";
1710        mes "Let me share a little";
1711        mes "bit of history concerning";
1712        mes "our lovely Einbroch. At one";
1713        mes "time, there was only Einbech,";
1714        mes "the mining village. You can";
1715        mes "imagine how long ago that was.";
1716        next;
1717        mes "[Satra]";
1718        mes "However, the minerals";
1719        mes "and ores mined in Einbech";
1720        mes "need to be processed and";
1721        mes "refined in factories that were";
1722        mes "all built in a nearby industrial";
1723        mes "comple which became Einbroch.";
1724        next;
1725        mes "[Satra]";
1726        mes "Now every citizen in";
1727        mes "Einbroch is wealthy and";
1728        mes "it's well known that there";
1729        mes "is a higher standard of";
1730        mes "living here than in Einbech.";
1731        next;
1732        mes "[Satra]";
1733        mes "Goodness, I believe";
1734        mes "it's time for a spot of tea~";
1735        mes "The next time you wish to have";
1736        mes "an audience with me, it would";
1737        mes "behoove you to bring another";
1738        mes "gift of Coal. Toodles~";
1739        set EIN_LOVERQ,10;
1740        delitem 1003,10;
1741        close;
1742
1743s_Coal3:
1744        mes "[Satra]";
1745        mes "Why hello~";
1746        mes "Your visits have";
1747        mes "recently been quite";
1748        mes "delightful, fair adventurer.";
1749        next;
1750        mes "[Satra]";
1751        mes "Oh, my apologies!";
1752        mes "I supposed you're just";
1753        mes "here for sight seeing,";
1754        mes "or perhaps you're running";
1755        mes "some sort of adventurer's";
1756        mes "errand. Am I right?";
1757        next;
1758        if(countitem(1003) > 9)goto s_GotCoal3;
1759        mes "[Satra]";
1760        mes "I know you well enough";
1761        mes "to know that you wouldn't";
1762        mes "be so rude as to stop by";
1763        mes "and chat without bringing";
1764        mes "any ^9C0000Coal^000000. Ho ho ho ho~";
1765        close;
1766
1767s_GotCoal3:
1768        mes "[Satra]";
1769        mes "Continue to show";
1770        mes "your appreciation";
1771        mes "and dedication to me";
1772        mes "and you'll soon be known";
1773        mes "to be my most favored";
1774        mes "commoner. Ho ho ho ho~";
1775        next;
1776        mes "[Satra]";
1777        mes "I'm sure you've noticed";
1778        mes "the strained relationship";
1779        mes "between Einbroch and Einbech";
1780        mes "by now. It's a shame, really.";
1781        next;
1782        mes "[Satra]";
1783        mes "As Einbroch grew wealthier";
1784        mes "and Einbech became more";
1785        mes "destitude, the affluent began";
1786        mes "despising the impoverished.";
1787        mes "I supposed it follows that the";
1788        mes "poor started to resent the rich.";
1789        next;
1790        mes "[Satra]";
1791        mes "It might be said that";
1792        mes "both towns have been";
1793        mes "trying to take advantage";
1794        mes "of each other, but it's";
1795        mes "clear that Einbroch has";
1796        mes "always had the upper hand.";
1797        next;
1798        mes "[Satra]";
1799        mes "In fact, because of";
1800        mes "this rift between our";
1801        mes "cities, our families are";
1802        mes "taught not to associate";
1803        mes "with the people of Einbech.";
1804        next;
1805        mes "[Satra]";
1806        mes "Now, I believe that most";
1807        mes "people who live in Einbech";
1808        mes "are peons, but that does not";
1809        mes "mean I will not give them a";
1810        mes "chance to prove their worth.";
1811        next;
1812        mes "[Satra]";
1813        mes "Why should I deprive";
1814        mes "the lowly of my gracious";
1815        mes "presence if they prove";
1816        mes "themselves meritable?";
1817        mes "Ho ho ho ho~";
1818        next;
1819        mes "[Satra]";
1820        mes "Oh, that was scrumptious!";
1821        mes "If you wish to pay me another";
1822        mes "visit, don't forget to bring some";
1823        mes "Coal with you. Tah tah~";
1824        set EIN_LOVERQ,11;
1825        delitem 1003,10;
1826        close;
1827
1828s_Coal4:
1829        mes "[Satra]";
1830        mes "Ho ho ho ho~";
1831        mes "Welcome adventurer,";
1832        mes "I so enjoy our little chats.";
1833        mes "Hors d'oeuvre?";
1834        next;
1835        if(countitem(1003) > 9)goto s_GotCoal4;
1836        mes "[Satra]";
1837        mes "Ah...";
1838        mes "It seems you've";
1839        mes "forgotten your ^9C0000Coals^000000.";
1840        mes "A silly mistake, but one";
1841        mes "I'm willing to overlook.";
1842        close;
1843
1844s_GotCoal4:
1845        mes "[Satra]";
1846        mes "Oh! You can't enjoy";
1847        mes "any food in that state!";
1848        mes "Your hands are atrociously";
1849        mes "grimy! May I ask why?";
1850        next;
1851        mes "[Satra]";
1852        mes "Ah~";
1853        mes "In my excitement,";
1854        mes "I nearly forgot that";
1855        mes "I asked you to bring";
1856        mes "Coals to me again!";
1857        mes "My apologies~";
1858        next;
1859        mes "[Satra]";
1860        mes "You've brought so much Coal";
1861        mes "to me, I'm convinced that you're";
1862        mes "much more diligent than those";
1863        mes "languid peasants in Einbech.";
1864        mes "I appreciate that you've labored";
1865        mes "so much to win my favor.";
1866        next;
1867        mes "[Satra]";
1868        mes "Hm, what was that?";
1869        mes "someone else provided";
1870        mes "these Coals and you were";
1871        mes "only delivering them? Then";
1872        mes "who actually gathered these?";
1873        next;
1874        input @str$;
1875        mes "[Satra]";
1876        if(@str$ != "Clitzer"){
1877                mes "I beg your pardon?";
1878                mes "" + @str$ + "? Oh my...";
1879                mes "I believe I may have";
1880                mes "misheard you. Ho ho ho ho~";
1881                close;
1882        }
1883        mes "Ah, Clitzer?";
1884        mes "I must say, that's";
1885        mes "a very humble name.";
1886        mes "Yet it's so familiar...";
1887        next;
1888        mes "[Satra]";
1889        mes "Ah, I recall there";
1890        mes "was a hooligan that";
1891        mes "has been pestering my";
1892        mes "daughter named Clitzer.";
1893        mes "Perhaps they are one";
1894        mes "and the same. Hmm...";
1895        next;
1896        mes "[Satra]";
1897        mes "I remember that he was";
1898        mes "rather shabby looking and";
1899        mes "lacked any semblance of";
1900        mes "etiquette whatsoever. Clearly,";
1901        mes "he is a fool and a coward, but";
1902        mes "now I see that he is sincere.";
1903        next;
1904        mes "[Satra]";
1905        mes "It might not be possible";
1906        mes "to let him go otu with my";
1907        mes "daughter straight away, but";
1908        mes "I will invite him for a spot of";
1909        mes "tea. And if Calla likes him,";
1910        mes "well, he must be special.";
1911        next;
1912        mes "[Satra]";
1913        mes "For a humble peasant,";
1914        mes "this must be like a dream";
1915        mes "come true! And to have tea";
1916        mes "with Clitzer. Oh, what would";
1917        mes "the girls say? Ah, but I did";
1918        mes "marry that oafish Megass~";
1919        next;
1920        mes "[Satra]";
1921        mes "Anyway, when you next";
1922        mes "meet Clitzer, please tell";
1923        mes "him to pay me a visit soon.";
1924        mes "Oh, and remind him to dress";
1925        mes "appropriately for this special";
1926        mes "occasion. Ho ho ho ho ho~";
1927        set EIN_LOVERQ,12;
1928        close;
1929
1930s_Intimi:
1931        mes "[Satra]";
1932        mes "I understand that my";
1933        mes "home is extravagantly";
1934        mes "splendid and to approach";
1935        mes "any Kappelthaine is an";
1936        mes "honor t most commoners.";
1937        next;
1938        mes "[Satra]";
1939        mes "However, Clitzer";
1940        mes "has no reason to feel so";
1941        mes "intimidated. Tell the poor";
1942        mes "boy that he's earned the";
1943        mes "honor of speaking with me.";
1944        close;
1945
1946}
1947
1948ein_in01,31,138,4       script  Calla   90,{
1949        if(EIN_LOVERQ > 4 && EIN_LOVERQ < 14)goto s_NoSwitch;
1950        if(EIN_LOVERQ > 1)goto s_Switches;
1951s_NoSwitch:
1952        mes "[Calla]";
1953        mes "Hello adventurer.";
1954        mes "Our city must just be";
1955        mes "another place where";
1956        mes "you'll stay no longer";
1957        mes "than a few days.";
1958        next;
1959        mes "[Calla]";
1960        mes "You must have so much";
1961        mes "freedom. I envy you. I can't";
1962        mes "do what I want to do. I don't";
1963        mes "even have the courage to tell";
1964        mes "my family what I really want,";
1965        mes "much less change things here...";
1966        next;
1967        mes "[Calla]";
1968        mes "How is it like?";
1969        mes "Going wherever you";
1970        mes "please, following your";
1971        mes "heart's true desire?";
1972        mes "What I would give to";
1973        mes "be able to do that...";
1974        if(!EIN_LOVERQ)set EIN_LOVERQ,1;
1975        close;
1976
1977s_Switches:
1978        switch(EIN_LOVERQ)
1979        {
1980
1981        case 2:
1982                mes "[Calla]";
1983                mes "You're the adventurer";
1984                mes "from before, aren't you?";
1985                mes "Sadly, there isn't much";
1986                mes "to do around here. This";
1987                mes "place is basically like";
1988                mes "a prison to me...";
1989                next;
1990                mes "[Calla]";
1991                mes "Oh, you've met Clitzer?";
1992                mes "Isn't he so kind, such";
1993                mes "a perfect gentleman?";
1994                next;
1995                mes "[Calla]";
1996                mes "I really wish I could";
1997                mes "see him, but it's almost";
1998                mes "impossible. My parents think";
1999                mes "he's not good enough for me,";
2000                mes "but they're wrong! What am";
2001                mes "I going to do? Oh, Clitzer...";
2002                next;
2003                mes "[Calla]";
2004                mes "Well, maybe I can't see";
2005                mes "him, but would you give";
2006                mes "my violin to Clitzer for me?";
2007                mes "I used to play this for him";
2008                mes "all the time...";
2009                next;
2010                mes "[Calla]";
2011                mes "I'm sorry to trouble you,";
2012                mes "but please understand";
2013                mes "that I want to comfort my";
2014                mes "Clitzer in any way that";
2015                mes "I possibly can. Thank";
2016                mes "you so much, adventurer...";
2017                set EIN_LOVERQ,3;
2018                getitem 1901,1;
2019                close;
2020        break;
2021
2022        case 3:
2023        s_Regards:
2024                mes "[Calla]";
2025                mes "Oh, please send my";
2026                mes "regards to Clitzer for me.";
2027                mes "I wish I could comnfort";
2028                mes "him in person, but this";
2029                mes "is the best I can do for now.";
2030                close;
2031        break;
2032
2033        case 4:
2034                if(!countitem(712))goto s_Regards;
2035                mes "[Calla]";
2036                mes "You've spoken";
2037                mes "with Clitzer? How";
2038                mes "is he? What did he say?";
2039                next;
2040                mes "[Calla]";
2041                mes "Oh...?";
2042                mes "He asked you to";
2043                mes "deliver this flower";
2044                mes "to me? How sweet~";
2045                mes "Thank you very much,";
2046                mes "kind adventurer~";
2047                next;
2048                mes "[Calla]";
2049                mes "Ah, I'm so rude!";
2050                mes "I've been calling you";
2051                mes "^111111*adventurer*^000000 this whole";
2052                mes "time you've been helping";
2053                mes "me! Would you please";
2054                mes "tell me your name?";
2055                next;
2056                input @str$;
2057                mes "[Calla]";
2058                if(@str$ != strcharinfo(0)){
2059                        mes "I'm sorry...";
2060                        mes "I didn't catch that.";
2061                        mes "would you please tell";
2062                        mes "me your name again?";
2063                        close;
2064                }
2065                mes "Ah, " + strcharinfo(0) + "!";
2066                mes "Such a lovely name~";
2067                mes "I promise that I won't ever";
2068                mes "forget it. Oh, and if you pass by";
2069                mes "Einbech, would you thank Clitzer";
2070                mes "for the flower for me please?";
2071                next;
2072                mes "[Calla]";
2073                mes "A-and... And...";
2074                mes "Please tell him that";
2075                mes "I really miss him a lot.";
2076                mes "^565656*Sob Sob...*";
2077                delitem 712,1;
2078                set EIN_LOVERQ,5;
2079                close;
2080        break;
2081
2082        case 14:
2083                mes "[Calla]";
2084                mes "I just heard from my mother";
2085                mes "that she's planning to have";
2086                mes "tea with Clitzer! I'm sure that";
2087                mes "I have you to thank for this~";
2088                next;
2089                mes "[Calla]";
2090                mes "I never dreamed that";
2091                mes "something as wonderful";
2092                mes "as this could happen.";
2093                mes "I'm so happy, I could cry...";
2094                mes "I'll always be grateful";
2095                mes "for what you've done.";
2096                next;
2097                mes "[Calla]";
2098                mes "I feel like such a fool,";
2099                mes "thinking it was all hopeless.";
2100                mes "I'll be doing my best to have";
2101                mes "my parents accept Clitzer and";
2102                mes "someday we'll be married~";
2103                next;
2104                mes "[Calla]";
2105                mes "There isn't much that I can";
2106                mes "give you, but I can show you";
2107                mes "one of my family's secrets.";
2108                mes "It's an invigorating massage";
2109                mes "technique that makes you alot";
2110                mes "healthier in only ten seconds.";
2111                next;
2112                mes "[Calla]";
2113                mes "Well, please take";
2114                mes "off your equipment";
2115                mes "and stand still while";
2116                mes "I give the massage. It";
2117                mes "might hurt a bit at first...";
2118                nude;
2119                next;
2120                mes "^3151FF*Rub Rub Rub*";
2121                mes "*Knead Knead Knead*";
2122                mes "*Crrack C-c-c--c-crack*";
2123                mes "*Crack Crack Crrrrrack*";
2124                mes "*Rub Crrraaaaaaaaaackk*^000000";
2125                next;
2126                mes "[" + strcharinfo(0) + "]";
2127                mes "Ooooooooh...";
2128                mes "I feel sooo";
2129                mes "sore and yet";
2130                mes "soooooo good.";
2131                mes "Wait. Now I just";
2132                mes "feel goooood~";
2133                if(BaseLevel < 41) getexp 3712,0;
2134                else if(BaseLevel > 40 && BaseLevel < 61) getexp 7425,0;
2135                else if(BaseLevel > 60 && BaseLevel < 71) getexp 14850,0;
2136                else if(BaseLevel > 70 && BaseLevel < 81) getexp 29700,0;
2137                else if(BaseLevel > 80 && BaseLevel < 91) getexp 59400,0;
2138                else if(BaseLevel > 90) getexp 118800,0;
2139                set EIN_LOVERQ,15;
2140                next;
2141                mes "[Calla]";
2142                mes "So how was it?";
2143                mes "I hope it was refreshing.";
2144                mes "Please understand that";
2145                mes "it's the best thing I can";
2146                mes "give you to show my gratitude.";
2147                next;
2148                mes "[Calla]";
2149                mes "Once again,";
2150                mes "thank you so";
2151                mes "much, " + strcharinfo(0) + ".";
2152                mes "I'll always pray for";
2153                mes "your safety on your";
2154                mes "your adventures~";
2155                close;
2156        break;
2157
2158        case 15:
2159                mes "[Calla]";
2160                mes "Thank you so much!";
2161                mes "I'll try my best to convince";
2162                mes "my parents to accept our";
2163                mes "relationship. It'll be hard,";
2164                mes "but it's a good first step~";
2165                next;
2166                mes "[Calla]";
2167                mes "I hope that we can all";
2168                mes "work together ti improve";
2169                mes "relations between Einbech";
2170                mes "and Einbroch. The hatred";
2171                mes "between our towns must end...";
2172                next;
2173                mes "[Calla]";
2174                mes "I really appreciate";
2175                mes "what you've done for";
2176                mes "all of use. I'll be praying";
2177                mes "for your safety, adventurer.";
2178                close;
2179        break;
2180
2181        }
2182}
2183
2184ein_in01,191,102,4      script  Kaijeta 846,{
2185        if(EIN_LOVERQ > 13)goto s_Learned;
2186        if(EIN_LOVERQ == 13)goto s_Clothes;
2187        if(EIN_LOVERQ > 6 && EIN_LOVERQ < 13)goto s_Hatred;
2188        if(EIN_LOVERQ == 6)goto s_Helping;
2189        mes "[Kaijeta]";
2190        mes "Welcome to my humble";
2191        mes "abode, adventurer. I'm";
2192        mes "sorry if I'm a poor host.";
2193        next;
2194        mes "[Kaijeta]";
2195        mes "As you can see, we have";
2196        mes "to share this house with";
2197        mes "other families so we don't";
2198        mes "have much open space or";
2199        mes "privacy. I'm afraid we can't";
2200        mes "even affor basic comfort.";
2201        next;
2202        mes "[Kaijeta]";
2203        mes "For now, this is the best";
2204        mes "we can do. We don't have";
2205        mes "the zeny to buy a house or";
2206        mes "land, so we have no choice";
2207        mes "but to endure through this...";
2208        close;
2209
2210s_Helping:
2211        mes "[Kaijeta]";
2212        mes "Thank you for helping my";
2213        mes "son. He may look like a fool";
2214        mes "for falling in love with someone";
2215        mes "from Einbroch, but he's an honest";
2216        mes "hard working man.";
2217        next;
2218        mes "[Kaijeta]";
2219        mes "Then again, it was bound to";
2220        mes "happen sometime. Einbech is";
2221        mes "a very poor town while Einbroch";
2222        mes "is a very rich town. I'd understand";
2223        mes "if you don't agree, but opposites";
2224        mes "attract sooner of later.";
2225        next;
2226        mes "[Kaijeta]";
2227        mes "^565656*Sigh...*^000000";
2228        mes "If my son and Calla can";
2229        mes "work things out, maybe it";
2230        mes "would improve relations";
2231        mes "between our two towns.";
2232        mes "I certainly hope so...";
2233        next;
2234        mes "[Kaijeta]";
2235        mes "Still, I'm quite baffled!";
2236        mes "I raised my son to have more";
2237        mes "guts than to wallow in misery";
2238        mes "when his heart's broken. And";
2239        mes "I still have no idea how he got";
2240        mes "together with such a rich woman.";
2241        next;
2242        mes "[Kaijeta]";
2243        mes "Do you have any idea";
2244        mes "how we can put an end";
2245        mes "to the hate between our";
2246        mes "two towns? I don't want to";
2247        mes "see this couple separated";
2248        mes "because of such pettiness.";
2249        set EIN_LOVERQ,7;
2250        close;
2251
2252s_Hatred:
2253        mes "[Kaijeta]";
2254        mes "I can't bear to see the";
2255        mes "petty hatred between our";
2256        mes "two towns stop my son from";
2257        mes "seeing the woman he loves...";
2258        close;
2259
2260s_Clothes:
2261        mes "[Kaijeta]";
2262        mes "Thank you for helping";
2263        mes "my son Clitzer. Sadly, the";
2264        mes "little fool doesn't have any";
2265        mes "clue when it comes to certain";
2266        mes "things like choosing clothing.";
2267        mes "he gets so nervous about it!";
2268        next;
2269        mes "[Kaijeta]";
2270        mes "A man should wear nice";
2271        mes "clothes, like a Formal Suit";
2272        mes "or a Tuxedo, for important";
2273        mes "meetings and special occassions.";
2274        mes "hopefully, he'll learn that soon.";
2275        close;
2276
2277s_Learned:
2278        mes "[Kaijeta]";
2279        mes "My son learned";
2280        mes "an awful lot from";
2281        mes "your good example.";
2282        mes "As a mother, I really";
2283        mes "appreciate everything";
2284        mes "you've done for him.";
2285        next;
2286        mes "[Kaijeta]";
2287        mes "Well, adventurer,";
2288        mes "I will be praying for";
2289        mes "your safety wherever";
2290        mes "your journeys may";
2291        mes "take you.";
2292        close;
2293
2294}
2295
2296ein_in01,200,101,4      script  Clitzer 854,{
2297        if(EIN_LOVERQ)goto s_Switches;
2298s_Back:
2299        mes "[Clitzer]";
2300        mes "Is there something";
2301        mes "that you really want";
2302        mes "in life, but it's just";
2303        mes "beyond your grasp?";
2304        next;
2305        mes "[Clitzer]";
2306        mes "I wish I was more";
2307        mes "like you adventurers.";
2308        mes "People like you never";
2309        mes "seem to give up, no matter";
2310        mes "what the obstacles may be.";
2311        mes "But I'm so helpless...";
2312        next;
2313        mes "[Clitzer]";
2314        mes "I can't even see";
2315        mes "the one person that";
2316        mes "I love. We're just so";
2317        mes "different that it's not";
2318        mes "even possible anymore...";
2319        close;
2320
2321s_Switches:
2322        switch(EIN_LOVERQ){
2323        case 1:
2324                mes "[Clitzer]";
2325                mes "That faintly sweet";
2326                mes "and pleasant scent...";
2327                mes "It's just like the fragrance";
2328                mes "they use in Calla's house.";
2329                next;
2330                mes "[Clitzer]";
2331                mes "Ah, so you visited";
2332                mes "Calla in Einbroch?";
2333                mes "I miss her sooo much!";
2334                mes "Is she doing alright?";
2335                next;
2336                mes "[Clitzer]";
2337                mes "Calla's so beautiful.";
2338                mes "And she's so lovely.";
2339                mes "Every time I close my";
2340                mes "eyes, I can still see";
2341                mes "her lovely smile.";
2342                next;
2343                mes "[Clitzer]";
2344                mes "I'm sorry if I sound";
2345                mes "silly, but I can't help";
2346                mes "it. I know I'm acting like";
2347                mes "a complete idiot. But I'd";
2348                mes "give anything to see her...";
2349                next;
2350                mes "[Clitzer]";
2351                mes "Just...";
2352                mes "Just don't listen";
2353                mes "to anything I say.";
2354                mes "I'm just a poor fool";
2355                mes "in love with the wrong";
2356                mes "person. That has to be it...";
2357                set EIN_LOVERQ,2;
2358                close;
2359                break;
2360
2361        case 2:
2362                mes "[Clitzer]";
2363                mes "^565656*Sigh*^000000";
2364                mes "I really appreciate your";
2365                mes "sympathy, but I'm merely";
2366                mes "a coward and a fool.";
2367                next;
2368                mes "[Clitzer]";
2369                mes "Yeah...";
2370                mes "I'm a coward for doing";
2371                mes "nothing about my feelings";
2372                mes "and an idiot for falling in love";
2373                mes "with such a high class girl in";
2374                mes "the first place... Oh, Calla...";
2375                close;
2376                break;
2377
2378        case 3:
2379                if(!countitem(1901))goto s_Back;
2380                mes "[Clitzer]";
2381                mes "What brings you here?";
2382                mes "aren't you tired of hearing";
2383                mes "me moan and whine about";
2384                mes "lost love? ^111111*Siiiiigh...*^000000";
2385                next;
2386                mes "[Clitzer]";
2387                mes "Hey, this violin...";
2388                mes "Calla used to play";
2389                mes "such beautiful music";
2390                mes "on this for me. Did";
2391                mes "she give this to you?";
2392                next;
2393                mes "[Clitzer]";
2394                mes "I see. Calla must have";
2395                mes "known that I'm all broken up";
2396                mes "right now. She's too good to";
2397                mes "me. How can se consider";
2398                mes "my feelings before thinking";
2399                mes "about herself?";
2400                next;
2401                mes "[Clitzer]";
2402                mes "I know I'm being";
2403                mes "shameless, but I have";
2404                mes "a favor to ask. Adventurer,";
2405                mes "would you please send";
2406                mes "Calla a present for me?";
2407                next;
2408                mes "[Clitzer]";
2409                mes "All you need to do is";
2410                mes "just give her ^FF00001 Flower^000000.";
2411                mes "I don't have the zeny and";
2412                mes "I don't think I'm welcome";
2413                mes "at Kapellthaine Manor.";
2414                next;
2415                mes "[Clitzer]";
2416                mes "Here, in return, I'll";
2417                mes "give you this health";
2418                mes "massage. It's not a";
2419                mes "big deal, but when I'm";
2420                mes "done, your mind and body";
2421                mes "will be refreshed. Here goes!";
2422                next;
2423                mes "^3151FF*Knead Knead*";
2424                mes "*Rub Rub Rub Rub*";
2425                mes "*Press Press Press*";
2426                mes "*C-c-c-c-c-c-crakck!*^000000";
2427                next;
2428                mes "[" + strcharinfo(0) + "]";
2429                mes "Oh--";
2430                mes "Hell yeah!";
2431                mes "That's the stuff!";
2432                delitem 1901,1;
2433                if(BaseLevel < 41) getexp 3712,0;
2434                else if(BaseLevel > 40 && BaseLevel < 61) getexp 7425,0;
2435                else if(BaseLevel > 60 && BaseLevel < 71) getexp 14850,0;
2436                else if(BaseLevel > 70 && BaseLevel < 81) getexp 29700,0;
2437                else if(BaseLevel > 80 && BaseLevel < 91) getexp 59400,0;
2438                else if(BaseLevel > 90) getexp 118800,0;
2439                set EIN_LOVERQ,4;
2440                next;
2441                mes "[Clitzer]";
2442                mes "Would you please bring";
2443                mes "1 Flower to Calla for me?";
2444                mes "I'm sorry for troubling you...";
2445                close;
2446                break;
2447
2448        case 4:
2449                mes "[Clitzer]";
2450                mes "Would you please bring";
2451                mes "1 Flower to Calla for me?";
2452                mes "I'm sorry for troubling you...";
2453                close;
2454                break;
2455
2456        case 5:
2457                mes "[Clitzer]";
2458                mes "You've given her";
2459                mes "the flower? That's";
2460                mes "great! Thank you,";
2461                mes "thank you so mu--";
2462                next;
2463                mes "[Clitzer]";
2464                mes "...Oh!";
2465                mes "Gosh! I was thinking so";
2466                mes "much about myself that";
2467                mes "I forgot to ask you for your";
2468                mes "name! I'm sorry for being";
2469                mes "so knuckle-headed...";
2470                next;
2471                mes "[Clitzer]";
2472                mes "So...";
2473                mes "What's your name?";
2474                next;
2475                input @str$;
2476                mes "[Clitzer]";
2477                if(@str$ != strcharinfo(0)){
2478                        mes "Hm...?";
2479                        mes "Oh, don't be";
2480                        mes "so nervous~";
2481                        mes "But would you please";
2482                        mes "tell me your name again?";
2483                        mes "I couldn't hear you...";
2484                        close;
2485                }
2486                mes "" + strcharinfo(0) + "...";
2487                mes "That's very nice. Thank you,";
2488                mes "I'm really grateful for your help.";
2489                mes "Although I can't see Calla in";
2490                mes "person, I can at least send";
2491                mes "my regards if you help me.";
2492                next;
2493                mes "[Clitzer]";
2494                mes "I feel so much";
2495                mes "better now. Oh!";
2496                mes "When you have the";
2497                mes "time, why don't you talk";
2498                mes "to my mother? She always";
2499                mes "likes meeting my friends.";
2500                set EIN_LOVERQ,6;
2501                close;
2502                break;
2503
2504        case 6:
2505        case 7:
2506        case 8:
2507        case 9:
2508        case 10:
2509        case 11:
2510                mes "[Clitzer]";
2511                mes "^111111*Sigh...*^000000";
2512                mes "What can I do to";
2513                mes "get Calla's parents";
2514                mes "to accept me as her";
2515                mes "boyfriend? I can't";
2516                mes "think of anything...";
2517                close;
2518                break;
2519
2520        case 12:
2521                mes "[Clitzer]";
2522                mes "Eh...?";
2523                mes "What did you just say?";
2524                mes "You did something for";
2525                mes "the Kapellthaines?";
2526                next;
2527                mes "[Clitzer]";
2528                mes "What...?";
2529                mes "Did you just say";
2530                mes "that Calla's mother";
2531                mes "wants me to have tea";
2532                mes "with her? Holy moley...!";
2533                next;
2534                mes "[Clitzer]";
2535                mes "Okay, okay.";
2536                mes "I-I I'll need something";
2537                mes "nice to wear, right? Oh.";
2538                mes "Wow. This is so sudden!";
2539                mes "W-what should I do?";
2540                next;
2541                mes "[Clitzer]";
2542                mes "This monkey suit";
2543                mes "that I've got on just";
2544                mes "won't do! Arrrgh! But I've";
2545                mes "already outgrown all of my";
2546                mes "nice clothes already. Boy,";
2547                mes "am I in a pickle...";
2548                set EIN_LOVERQ,13;
2549                close;
2550                break;
2551
2552        case 13:
2553                if(countitem(2320) || countitem(7170))goto s_Clothes;
2554                mes "[Clitzer]";
2555                mes "Noooooo!";
2556                mes "I've got to find";
2557                mes "the perfect thing";
2558                mes "to wear or Calla's";
2559                mes "mother might ^FF0000hate^000000 me!";
2560                next;
2561                mes "[Clitzer]";
2562                mes "Think, Clitzer, think!";
2563                mes "Okay, no fun colors.";
2564                mes "I don't want her to";
2565                mes "think I'm not serious";
2566                mes "about Calla. Stripes";
2567                mes "might be bad too...";
2568                close;
2569                break;
2570
2571        case 14:
2572        case 15:
2573                mes "[Clitzer]";
2574                mes "Look out, world!";
2575                mes "I'm gonna become";
2576                mes "worth of Calla's love!";
2577                mes "Someday, maybe even her";
2578                mes "parents will approve me!";
2579                close;
2580                break;
2581        }
2582
2583s_Clothes:
2584        mes "[Clitzer]";
2585        mes "Waaah!";
2586        mes "What should I wear?!";
2587        mes "I can't for the life of me";
2588        mes "figure this out! Something,";
2589        mes "um, formal? I've never worn";
2590        mes "anything like that before!";
2591        next;
2592        if(countitem(7170)){
2593                set @clothes,7170;
2594                mes "[Clitzer]";
2595                mes "Wait, " + strcharinfo(0) + ".";
2596                mes "What's that you've got";
2597                mes "there? I've seen something";
2598                mes "like that before. It's called";
2599                mes "a Tuxedo, right? Something";
2600                mes "like that would be perfect!";
2601                next;
2602                menu "Give it to him.",s_Giveclothes,"Ignore him.",-;
2603
2604                mes "[Clitzer]";
2605                mes "But how can I get";
2606                mes "a Tuxedo? Ooh, I hope";
2607                mes "it doesn't cost too much";
2608                mes "zeny or I won't be able to";
2609                mes "get one of those soon...";
2610        } else if(countitem(2320)){
2611                set @clothes,2320;
2612                mes "[Clitzer]";
2613                mes "Wait, " + strcharinfo(0) + ".";
2614                mes "What's that you've got";
2615                mes "there? I've seen something";
2616                mes "like that before. It's called";
2617                mes "a Formal Suit, right?";
2618                mes "Something like that would";
2619                mes "be perfect!";
2620                next;
2621                menu "Give it to him.",s_Giveclothes,"Ignore him.",-;
2622
2623                mes "[Clitzer]";
2624                mes "But how can I get";
2625                mes "a Formal Suit? I hope";
2626                mes "it doesn't cost too much";
2627                mes "zeny or I won't be able to";
2628                mes "get one of those soon...";
2629        }
2630        close;
2631
2632s_Giveclothes:
2633        mes "[Clitzer]";
2634        mes "I can have this?";
2635        mes "Oh, thank you so much!";
2636        mes "Finally, I have something";
2637        mes "nice enough to wear to meet";
2638        mes "Calla's mom! What a relief!";
2639        next;
2640        mes "[Clitzer]";
2641        mes "You've been helping me all";
2642        mes "this time and I haven't properly";
2643        mes "expressed my gratitude. I'm sorry";
2644        mes "if I've been to absorbed in my own";
2645        mes "problems. I may be poor, but I need";
2646        mes "to repay you somehow...";
2647        next;
2648        mes "[Clitzer]";
2649        mes "Wait...";
2650        mes "Why don't you have this";
2651        mes "ore? I don't how";
2652        mes "valuable it is, but I know";
2653        mes "that it's pretty rare. It may";
2654        mes "even be useful to you later~";
2655        delitem @clothes,1;
2656        set EIN_LOVERQ,14;
2657        switch(rand(1,9)){
2658        case 1:
2659                getitem 7289,1;
2660                break;
2661
2662        case 2:
2663                getitem 7290,1;
2664                break;
2665
2666        case 3:
2667                getitem 7291,1;
2668                break;
2669
2670        case 4:
2671                getitem 7292,1;
2672                break;
2673
2674        case 5:
2675                getitem 7293,1;
2676                break;
2677
2678        case 6:
2679                getitem 7294,1;
2680                break;
2681
2682        case 7:
2683                getitem 7295,1;
2684                break;
2685
2686        case 8:
2687                getitem 7296,1;
2688                break;
2689
2690        case 9:
2691                getitem 7297,1;
2692                break;
2693        }
2694        next;
2695        mes "[Clitzer]";
2696        mes "" + strcharinfo(0) + ",";
2697        mes "you've really opened";
2698        mes "my eyes. From now on,";
2699        mes "I'll do my best to earn the";
2700        mes "approval of Calla's parents and";
2701        mes "become worthy of Calla's love.";
2702        close;
2703
2704}
2705
2706//============================================================
2707//=========================================== Einbroch Polution
2708//============================================================
2709
2710einbroch,1,1,0  script  #PolutionNPC    -1,{
2711
2712OnPolution:
2713        set $@AlrdEinPoll,1;
2714        donpcevent "Liotzburg::OnHide";
2715        donpcevent "Morei::OnHide";
2716        donpcevent "Mark::OnHide";
2717        donpcevent "Khemko::OnHide";
2718        donpcevent "Oberu::OnHide";
2719        donpcevent "Khowropher::OnHide";
2720        donpcevent "Kesunboss::OnHide";
2721        donpcevent "Train Station Staff#01::OnHide";
2722        donpcevent "Train Station Staff#02::OnHide";
2723        donpcevent "Leslie::OnHide";
2724        donpcevent "Little Toby::OnHide";
2725        donpcevent "Tan::OnHide";
2726        donpcevent "Keneshiotz::OnHide";
2727        donpcevent "Sleik::OnHide";
2728        donpcevent "Uwe Kleine::OnHide";
2729        donpcevent "Laboratory Soldier#01::OnHide";
2730        donpcevent "Laboratory Soldier#02::OnHide";
2731        disablenpc "Paddler";
2732        disablenpc "Head Gear Dealer";
2733
2734        mapannounce "einbroch","This is a state of emercency! Harmful smog is reaching high levels of saturation. Residents of Einbroch must find shelter immediately.",bc_map;
2735        monster "einbroch",82,332,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2736        monster "einbroch",99,328,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2737        monster "einbroch",122,317,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2738        monster "einbroch",138,319,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2739        monster "einbroch",147,312,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";
2740        monster "einbroch",159,316,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2741        monster "einbroch",173,315,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2742        monster "einbroch",161,311,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2743        monster "einbroch",147,296,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2744        monster "einbroch",168,282,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";
2745        monster "einbroch",175,271,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2746        monster "einbroch",146,274,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2747        monster "einbroch",160,272,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2748        monster "einbroch",155,256,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2749        monster "einbroch",179,262,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";
2750        monster "einbroch",192,248,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2751        monster "einbroch",212,255,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2752        monster "einbroch",230,250,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2753        monster "einbroch",246,251,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2754        monster "einbroch",262,254,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";
2755        monster "einbroch",253,240,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2756        monster "einbroch",202,245,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2757        monster "einbroch",181,251,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2758        monster "einbroch",172,238,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2759        monster "einbroch",146,242,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";
2760        monster "einbroch",186,226,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2761        monster "einbroch",173,239,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2762        monster "einbroch",124,248,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2763        monster "einbroch",120,234,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2764        monster "einbroch",98,234,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";
2765        monster "einbroch",101,219,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2766        monster "einbroch",89,208,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2767        monster "einbroch",96,191,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2768        monster "einbroch",76,194,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2769        monster "einbroch",60,196,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";
2770        monster "einbroch",45,194,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2771        monster "einbroch",34,201,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2772        monster "einbroch",40,184,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2773        monster "einbroch",64,173,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2774        monster "einbroch",96,173,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";
2775        monster "einbroch",41,155,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2776        monster "einbroch",46,131,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2777        monster "einbroch",46,108,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2778        monster "einbroch",38,93,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2779        monster "einbroch",55,86,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";
2780        monster "einbroch",81,81,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2781        monster "einbroch",107,82,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2782        monster "einbroch",107,104,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2783        monster "einbroch",123,73,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2784        monster "einbroch",132,87,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";
2785        monster "einbroch",125,63,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2786        monster "einbroch",142,64,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2787        monster "einbroch",150,52,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2788        monster "einbroch",157,37,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2789        monster "einbroch",179,39,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";
2790        monster "einbroch",197,46,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2791        monster "einbroch",217,67,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2792        monster "einbroch",246,54,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2793        monster "einbroch",228,110,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2794        monster "einbroch",250,118,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";
2795        monster "einbroch",273,127,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2796        monster "einbroch",288,138,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2797        monster "einbroch",281,160,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2798        monster "einbroch",281,192,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2799        monster "einbroch",291,201,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";
2800        monster "einbroch",283,218,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2801        monster "einbroch",268,216,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2802        monster "einbroch",273,196,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2803        monster "einbroch",262,164,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2804        monster "einbroch",241,180,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";
2805        monster "einbroch",216,205,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2806        monster "einbroch",209,198,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2807        monster "einbroch",224,177,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2808        monster "einbroch",227,163,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2809        monster "einbroch",208,166,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";
2810        monster "einbroch",132,87,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2811        monster "einbroch",149,119,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2812        monster "einbroch",119,36,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2813        monster "einbroch",84,155,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
2814        monster "einbroch",82,107,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";
2815        initnpctimer;
2816        end;
2817
2818OnMobChk:
2819        if(mobcount("einbroch","#PolutionNPC::OnMobChk"))end;
2820
2821OnTimer600000:
2822        killmonster "einbroch","#PolutionNPC::OnMobChk";
2823        mapannounce "einbroch","Emergency status is now cancelled. Air pollution levels are now within the safety zone.",bc_map;
2824        enablenpc "Liotzburg";
2825        donpcevent "Liotzburg::OnUnHide";
2826        enablenpc "Morei";
2827        donpcevent "Morei::OnUnHide";
2828        enablenpc "Mark";
2829        donpcevent "Mark::OnUnHide";
2830        enablenpc "Khemko";
2831        donpcevent "Khemko::OnUnHide";
2832        enablenpc "Oberu";
2833        donpcevent "Oberu::OnUnHide";
2834        enablenpc "Khowropher";
2835        donpcevent "Khowropher::OnUnHide";
2836        enablenpc "Kesunboss";
2837        donpcevent "Kesunboss::OnUnHide";
2838        enablenpc "Train Station Staff#01";
2839        donpcevent "Train Station Staff#01::OnUnHide";
2840        enablenpc "Train Station Staff#02";
2841        donpcevent "Train Station Staff#02::OnUnHide";
2842        enablenpc "Leslie";
2843        donpcevent "Leslie::OnUnHide";
2844        enablenpc "Little Toby";
2845        donpcevent "Little Toby::OnUnHide";
2846        enablenpc "Tan";
2847        donpcevent "Tan::OnUnHide";
2848        enablenpc "Keneshiotz";
2849        donpcevent "Keneshiotz::OnUnHide";
2850        enablenpc "Sleik";
2851        donpcevent "Sleik::OnUnHide";
2852        enablenpc "Uwe Kleine";
2853        donpcevent "Uwe Kleine::OnUnHide";
2854        enablenpc "Laboratory Soldier#01";
2855        donpcevent "Laboratory Soldier#01::OnUnHide";
2856        enablenpc "Laboratory Soldier#02";
2857        donpcevent "Laboratory Soldier#02::OnUnHide";
2858        enablenpc "Paddler";
2859        enablenpc "Head Gear Dealer";
2860        set $EinPolution,0;
2861        set $@AlrdEinPoll,0;
2862        end;
2863
2864}
2865
2866sec_in02,127,86,3       script  Einbroch Polution       851,{
2867
2868        if(getgmlevel() > 79){
2869                mes "[Einbroch Polution Variable Management]";
2870                mes "$EinPolution is currently: " + $EinPolution + ".";
2871                mes "What would you like to do?";
2872                next;
2873                menu "Reset $EinPolution to 0",s_0,"Input My Own Value",s_Input,"Cancel.",-;
2874                close;
2875        s_0:
2876                mes "[Einbroch Polution Variable Management]";
2877                mes "$EinPolution has been reset to 0.";
2878                set $EinPolution,0;
2879                set $@AlrdEinPoll,0;
2880                close;
2881        s_Input:
2882                mes "[Einbroch Polution Variable Management]";
2883                mes "Insert a number you want $EinPollution";
2884                mes "to be replaced with. Type '0' to cancel.";
2885                input @temppol;
2886                if(@temppol == 0)close;
2887                set $EinPolution,@temppol;
2888                mes "[Einbroch Polution Variable Management]";
2889                mes "$EinPolution has been set to: " + $EinPolution + ".";
2890                close;
2891        } else {
2892                mes "[Einbroch Polution Variable Management]";
2893                mes "Sorry you don't have authorization";
2894                mes "to use this NPC.";
2895                close;
2896        }
2897}
2898
2899//============================================================
2900//=========================================== Einbroch Factory
2901//====================================================== Quest
2902
2903einbroch,132,84,3       script  Liotzburg       853,{
2904
2905        if($EinPolution > 9){
2906                mes "[Liotzburg]";
2907                mes "What's going on?!";
2908                mes "Who's responsible?!";
2909                mes "God, I can't believe";
2910                mes "this is happening!";
2911                mes "^333333*Cough Cough!*^000000";
2912                next;
2913                mes "[Liotzburg]";
2914                mes "I need to get out of here!";
2915                mes "You! D-do something and";
2916                mes "fix this! I gotta hide and find";
2917                mes "someplace safe!";
2918                close2;
2919                if(!$@AlrdEinPoll)donpcevent "#PolutionNPC::OnPolution";
2920                end;
2921        }
2922        if(EinFactory >= 13){
2923                if(EinFactory > 13){
2924                        mes "[Liotzburg]";
2925                        mes "What...?";
2926                        mes "Factory Repair";
2927                        mes "budget? No way!";
2928                        next;
2929                }
2930                mes "[Liotzburg]";
2931                mes "Why waste money?";
2932                mes "We haven't had any";
2933                mes "problems so far! Look,";
2934                mes "everything's fine! Why";
2935                mes "are you exaggerating";
2936                mes "such small details?";
2937                next;
2938                mes "[Liotzburg]";
2939                mes "The field overseer,";
2940                mes "Zelmeto, just came by to";
2941                mes "ask for a budget increase.";
2942                mes "Well, I think he's lying!";
2943                mes "Everything's perfect!";
2944                if(EinFactory == 13)set EinFactory,14;
2945                close;
2946        }
2947        mes "[Liotzburg]";
2948        mes "I'm the plant";
2949        mes "superintendant of this";
2950        mes "factory. Most of my employees";
2951        mes "are diligent workers. I can't say";
2952        mes "that of everyone, but overall we're";
2953        mes "doing an excellent job. Ha ha ha~!";
2954        next;
2955        mes "[Liotzburg]";
2956        mes "So long as this factory";
2957        mes "is well maintained, we won't";
2958        mes "have to worry about this city's";
2959        mes "safety. The field overseer,";
2960        mes "Zelmeto, is also very reliable.";
2961        next;
2962        mes "[Liotzburg]";
2963        mes "I can trust Zelmeto";
2964        mes "to look after things,";
2965        mes "so there's no need for";
2966        mes "me to go inside the factory.";
2967        mes "Delegating work is great!";
2968        next;
2969        mes "[Liotzburg]";
2970        mes "Our factory will";
2971        mes "continue to develop";
2972        mes "and everyone will be";
2973        mes "proud of the progress";
2974        mes "we're making. Yes, I can";
2975        mes "assure you of that!";
2976        close;
2977
2978OnHide:
2979        specialeffect 16;
2980        disablenpc "Liotzburg";
2981        end;
2982
2983OnUnhide:
2984        misceffect 215;
2985        end;
2986
2987}
2988
2989ein_in01,67,243,3       script  Zelmeto 851,{
2990
2991        if($EinPolution > 9){
2992                mes "[Zelmeto]";
2993                mes "We've got a big problem";
2994                mes "here! I appreciate that you've";
2995                mes "been gathering the materials,";
2996                mes "but the machines have been";
2997                mes "broken for too long!";
2998                next;
2999                mes "[Zelmeto]";
3000                mes "Right when I tried to";
3001                mes "fix it, a huge shortout";
3002                mes "occurred. Our town is";
3003                mes "probably filled with";
3004                mes "toxic fog right now!";
3005                next;
3006                mes "[Zelmeto]";
3007                mes "I'll try my best to fix";
3008                mes "this, but we really should";
3009                mes "have allocated some funds";
3010                mes "to fix this machine earlier!";
3011                next;
3012                mes "[Zelmeto]";
3013                mes "The most important";
3014                mes "thing is that you get";
3015                mes "out of here and find";
3016                mes "shelter! Right now!";
3017                close2;
3018                warp "einbroch",131,83;
3019                end;
3020        }
3021
3022        if(EinFactory > 0)goto s_Switches;
3023        mes "[Zelmeto]";
3024        mes "Ah, you must be a visitor.";
3025        mes "I'm Zelmeto Abellov, the";
3026        mes "field overseer. Have you";
3027        mes "been in this facility before?";
3028        next;
3029        mes "[Zelmeto]";
3030        mes "This factory plays an";
3031        mes "important role in our city";
3032        mes "and generates a lot of income.";
3033        mes "However, our employess suffer";
3034        mes "from a poor work environment.";
3035        next;
3036        mes "[Zelmeto]";
3037        mes "Our superintendant makes a lot";
3038        mes "of money and seems content with";
3039        mes "the current situation. However, the";
3040        mes "rest of the workforce doesn't enjoy";
3041        mes "all of the benefits he receives.";
3042        next;
3043        mes "[Zelmeto]";
3044        mes "Many people have already";
3045        mes "quit and there are only a few";
3046        mes "people who continue to work";
3047        mes "here. So now we're understaffed";
3048        mes "and I'm in quite a bind...";
3049        next;
3050        mes "[Zelmeto]";
3051        mes "There are some urgent";
3052        mes "tasks I need done, but";
3053        mes "there's no way for me";
3054        mes "to recruit new workers.";
3055        mes "Ah, I'm sorry, I've spoken too";
3056        mes "freely about my own problems...";
3057        next;
3058        menu "You're understaffed?",s_Underst,"No, it's okay.",-;
3059
3060        mes "[Zelmeto]";
3061        mes "Thank you for";
3062        mes "your kindness.";
3063        mes "And please don't";
3064        mes "let anyone know about";
3065        mes "anything I just told you.";
3066        close;
3067
3068s_Underst:
3069        mes "[Zelmeto]";
3070        mes "Yes, we are!";
3071        mes "I don't have enough";
3072        mes "people to inspect the";
3073        mes "factory machines and";
3074        mes "determine what kinds";
3075        mes "of problems we have.";
3076        next;
3077        mes "[Zelmeto]";
3078        mes "It's a time consuming";
3079        mes "task I'd rather do on my";
3080        mes "own. However, between that";
3081        mes "and managing the workforce,";
3082        mes "I don't have enough time...";
3083        next;
3084        menu "I can help you.",s_Help,"Keep up the good job.",-;
3085
3086        mes "[Zelmeto]";
3087        mes "Well, it's a living.";
3088        mes "^6A6A6A*Sigh*^000000 I can put up with";
3089        mes "this, but I hope the higher";
3090        mes "ups will consider improving";
3091        mes "the work environment here...";
3092        close;
3093
3094s_Help:
3095        mes "[Zelmeto]";
3096        mes "You can help me?";
3097        mes "I know something like";
3098        mes "this is too much to ask,";
3099        mes "but I'll accept any help";
3100        mes "anyone offers me. I'm";
3101        mes "that desperate.";
3102        next;
3103        mes "[Zelmeto]";
3104        mes "Alright, I'll have you";
3105        mes "inspect the machines";
3106        mes "in the factory one by one.";
3107        mes "It's imperative that we know";
3108        mes "what needs to be repaired";
3109        mes "and what's working fine";
3110        next;
3111        mes "[Zelmeto]";
3112        mes "First, find the ^FF00002nd control";
3113        mes "panel^000000 and determine its";
3114        mes "status. I'm fairly certain that";
3115        mes "it broke a long time ago, but";
3116        mes "it wouldn't hur to make sure.";
3117        mes "You should find it easily.";
3118        next;
3119        mes "[Zelmeto]";
3120        mes "When you finish your";
3121        mes "inspection, report back";
3122        mes "to me so I can tell you";
3123        mes "which machine to check";
3124        mes "next. Thanks again for";
3125        mes "offering to help";
3126        set EinFactory,1;
3127        close;
3128s_Switches:
3129        switch(EinFactory){
3130        case 1:
3131                mes "[Zelmeto]";
3132                mes "If you would,";
3133                mes "please inspect the";
3134                mes "2nd control panel that";
3135                mes "seems to have been";
3136                mes "broken for a while...";
3137                close;
3138                break;
3139
3140        case 2:
3141                mes "[Zelmeto]";
3142                mes "Huh, I see.";
3143                mes "We must do something";
3144                mes "about that as soon as";
3145                mes "we can. Now, let me tell";
3146                mes "you what to check next.";
3147                next;
3148                mes "[Zelmeto]";
3149                mes "There are 3 automatic";
3150                mes "pressure governors which";
3151                mes "hammer the bent iron plates";
3152                mes "from above to flatten them. It";
3153                mes "seems that one of them may";
3154                mes "have some kind of problem.";
3155                next;
3156                mes "[Zelmeto]";
3157                mes "Please inspect the ^FF0000automatic";
3158                mes "pressure governors^000000. Even if the";
3159                mes "problem seems small, please";
3160                mes "report it to me. I know it might";
3161                mes "seem fine now, but I want to";
3162                mes "prevent an accident if I can.";
3163                next;
3164                mes "[Zelmeto]";
3165                mes "Thank you";
3166                mes "in advance,";
3167                mes "adventurer.";
3168                set EinFactory,3;
3169                close;
3170                break;
3171
3172        case 3:
3173                mes "[Zelmeto]";
3174                mes "You need to inspect";
3175                mes "an automatic pressure";
3176                mes "governor. It looks fine,";
3177                mes "but sometimes it makes";
3178                mes "strange noises.";
3179                next;
3180                mes "[Zelmeto]";
3181                mes "It probably will";
3182                mes "be a good idea to";
3183                mes "check that machine";
3184                mes "more carefully this";
3185                mes "time, just in case.";
3186                next;
3187                mes "[Zelmeto]";
3188                mes "Thank you";
3189                mes "for helping us,";
3190                mes "adventurer.";
3191                close;
3192                break;
3193
3194        case 4:
3195                mes "[Zelmeto]";
3196                mes "What...?";
3197                mes "This is worse";
3198                mes "than I expected. But";
3199                mes "it's good that we know";
3200                mes "about these problems";
3201                mes "as soon as possible.";
3202                next;
3203                mes "[Zelmeto]";
3204                mes "Don't you worry,";
3205                mes "we'll take care of";
3206                mes "this. In the meantime,";
3207                mes "I'd like you to inspect";
3208                mes "the next machine for me.";
3209                next;
3210                mes "[Zelmeto]";
3211                mes "I want you to check";
3212                mes "a ^FF0000control panel^000000. It's the";
3213                mes "same kind as the one";
3214                mes "you just inspected, but";
3215                mes "bigger in size.";
3216                next;
3217                mes "[Zelmeto]";
3218                mes "It's located in the";
3219                mes "middle of the factory,";
3220                mes "so you should be able";
3221                mes "to find it. It may be in bad";
3222                mes "condition, even though it's";
3223                mes "operating fine for now...";
3224                next;
3225                mes "[Zelmeto]";
3226                mes "We need to ensure that";
3227                mes "it's stable, reliable and";
3228                mes "doesn't pose a threat to";
3229                mes "our workforce. Thanks";
3230                mes "again, adventurer.";
3231                set EinFactory,5;
3232                close;
3233                break;
3234
3235        case 5:
3236                mes "[Zelmeto]";
3237                mes "I'd like you to inspect";
3238                mes "the control panel. It's";
3239                mes "fairly large and can be";
3240                mes "found in the middle of the";
3241                mes "factory. You shouldn't have";
3242                mes "too much trouble finding it.";
3243                close;
3244                break;
3245
3246        case 6:
3247                mes "[Zelmeto]";
3248                mes "I see...";
3249                mes "It's most likely that";
3250                mes "there was a short";
3251                mes "circuit and most";
3252                mes "of the internal devices";
3253                mes "were burnt out...";
3254                next;
3255                mes "[Zelmeto]";
3256                mes "Thanks for checking";
3257                mes "that out for me. Now,";
3258                mes "the next machine I need";
3259                mes "you to inspect is different";
3260                mes "than the others I've had";
3261                mes "you examine.";
3262                next;
3263                mes "[Zelmeto]";
3264                mes "It's a mechanical";
3265                mes "hand that transports";
3266                mes "small objects. We didn't";
3267                mes "really give it a name, but";
3268                mes "you should be able to find it.";
3269                next;
3270                mes "[Zelmeto]";
3271                mes "Recently, it seems";
3272                mes "that there have been";
3273                mes "problems in operating";
3274                mes "that machine. If something's";
3275                mes "broken, we need to know";
3276                mes "and fix it right away.";
3277                next;
3278                mes "[Zelmeto]";
3279                mes "Thanks again";
3280                mes "in advance.";
3281                set EinFactory,7;
3282                close;         
3283                break;
3284
3285        case 7:
3286                mes "[Zelmeto]";
3287                mes "The machine which";
3288                mes "I want you to inspect";
3289                mes "this time is a small";
3290                mes "sized conveyor.";
3291                next;
3292                mes "[Zelmeto]";
3293                mes "Be sure that you";
3294                mes "inspect the small";
3295                mes "one, since we also";
3296                mes "have a large conveyor";
3297                mes "in the factory as well";
3298                close;
3299                break;
3300
3301        case 8:
3302                mes "[Zelmeto]";
3303                mes "Huh?";
3304                mes "I'm suprised to hear";
3305                mes "that. ^6A6A6A*Sigh*^000000 There's just";
3306                mes "too many things that need";
3307                mes "fixing. This is terrible...";
3308                next;
3309                mes "[Zelmeto]";
3310                mes "Well, let me worry";
3311                mes "about that for now. Please";
3312                mes "focus on continuing to inspect";
3313                mes "some of the other machines.";
3314                next;
3315                mes "[Zelmeto]";
3316                mes "Now, there's a pipe inside";
3317                mes "this factory that I want you";
3318                mes "to look at. Many of our pipes";
3319                mes "aren't in the best condition,";
3320                mes "but this particular one might";
3321                mes "be severely damaged.";
3322                next;
3323                mes "[Zelmeto]";
3324                mes "Now, the pipe I want";
3325                mes "you to inspect is located";
3326                mes "near those large caultrons";
3327                mes "of molten metal. You should";
3328                mes "be able to find it pretty easily";
3329                next;
3330                mes "[Zelmeto]";
3331                mes "Thanks again";
3332                mes "for your help,";
3333                mes "adventurer.";
3334                set EinFactory,9;
3335                close;
3336                break;
3337
3338        case 9:
3339                mes "[Zelmeto]";
3340                mes "The pipe I want";
3341                mes "you to inspect is located";
3342                mes "near those large caultrons";
3343                mes "of molten metal. You should";
3344                mes "be able to find it pretty easily";
3345                next;
3346                mes "[Zelmeto]";
3347                mes "Thanks again";
3348                mes "for your help,";
3349                mes "adventurer.";
3350                close;
3351                break;
3352
3353        case 10:
3354                mes "[Zelmeto]";
3355                mes "This is";
3356                mes "worse than";
3357                mes "I imagined...";
3358                next;
3359                mes "[Zelmeto]";
3360                mes "We've got to start";
3361                mes "repairs as soon as we";
3362                mes "can! Hopefully, we can";
3363                mes "resolve this before";
3364                mes "any serious problems happen...";
3365                next;
3366                mes "[Zelmeto]";
3367                mes "Alright, the last";
3368                mes "thing that you need to";
3369                mes "inspect is a ^FF0000large conveyor^000000.";
3370                mes "It's similiar to the one you";
3371                mes "inspected before, but it's";
3372                mes "bigger and more powerful.";
3373                next;
3374                mes "[Zelmeto]";
3375                mes "We have only one of these";
3376                mes "machines and it's usually";
3377                mes "moved around a lot since";
3378                mes "a lot of people in the factory";
3379                mes "use it. I really don't know";
3380                mes "where it could be now.";
3381                next;
3382                mes "[Zelmeto]";
3383                mes "Still I'm sure that";
3384                mes "it's inside the building,";
3385                mes "so you should be able to";
3386                mes "find it. I hope you can inspect";
3387                mes "that conveyor for me soon.";
3388                set EinFactory,11;
3389                close;
3390                break;
3391
3392        case 11:
3393                mes "[Zelmeto]";
3394                mes "The machine which";
3395                mes "you are supposed to";
3396                mes "inspect right now";
3397                mes "is a large convyore.";
3398                next;
3399                mes "[Zelmeto]";
3400                mes "Remember that we";
3401                mes "also have a small sized";
3402                mes "conveyor, so make sure";
3403                mes "that you examine the";
3404                mes "larger one, alright?";
3405                close;
3406                break;
3407
3408        case 12:
3409                mes "[Zelmeto]";
3410                mes "Well, I figured that both";
3411                mes "conveyors would have";
3412                mes "similiar problems. We";
3413                mes "can fix them at the";
3414                mes "same time, but it'll";
3415                mes "be a hassle";
3416                next;
3417                mes "[Zelmeto]";
3418                mes "Thank you so much for";
3419                mes "your help. Without you,";
3420                mes "I'm pretty sure we wouldn't";
3421                mes "know about these problems";
3422                mes "until it was too late.";
3423                next;
3424                mes "[Zelmeto]";
3425                mes "Now, I've got to make sure";
3426                mes "we have enough materials";
3427                mes "to make the repairs so that";
3428                mes "the machines will be safely";
3429                mes "functioning again.";
3430                next;
3431                mes "[Zelmeto]";
3432                mes "First, I better";
3433                mes "hurry and request";
3434                mes "an increase for the";
3435                mes "Factory Repair budget";
3436                mes "from our superintendant.";
3437                set EinFactory,13;
3438                close;
3439                break;
3440
3441        case 13:
3442                mes "[Zelmeto]";
3443                mes "I've got to report this";
3444                mes "to our superintendant";
3445                mes "as soon as possible.";
3446                next;
3447                mes "[Zelmeto]";
3448                mes "With any luck, he'll approve";
3449                mes "a budget increase so that we";
3450                mes "can get all of the materials";
3451                mes "needed for the repairs.";
3452                close;
3453                break;
3454
3455        case 14:
3456                mes "[Zelmeto]";
3457                mes "...";
3458                mes "......";
3459                next;
3460                mes "[Zelmeto]";
3461                mes "^6A6A6A*Sigh*^000000";
3462                mes "My proposal was rejected";
3463                mes "by our superintendant. But";
3464                mes "maintainance and repairs";
3465                mes "are crucial for peak operating";
3466                mes "efficiency and worker safety!";
3467                next;
3468                mes "[Zelmeto]";
3469                mes "I'm frustrated and worried.";
3470                mes "Maybe nothing will happen";
3471                mes "for now, but we've got to";
3472                mes "safeguard our future by";
3473                mes "regularly maintaining";
3474                mes "all of these machines";
3475                next;
3476                mes "[Zelmeto]";
3477                mes "Even possible threats";
3478                mes "to the safety of our workers";
3479                mes "can't be ignored. Isn't there";
3480                mes "something I can do? ^6A6A6A*Sigh*^000000";
3481                next;
3482                mes "[Zelmeto]";
3483                mes "If we can";
3484                mes "just get";
3485                mes "20 ^FF0000Flexible Tube^000000,";
3486                mes "10 ^FF0000Rusty Screw^000000 and";
3487                mes "10 ^FF0000Used Iron Plate^000000,";
3488                mes "we could make those repairs.";     
3489                next;
3490                mes "[Zelmeto]";
3491                mes "But without funds, there's";
3492                mes "no way we can purchase";
3493                mes "those items. If something";
3494                mes "happens, who's going to";
3495                mes "be responsible?";
3496                set EinFactory,15;
3497                close;
3498                break;
3499
3500        case 15:
3501                mes "[Zelmeto]";
3502                if(countitem(7325) < 20 || countitem(7317) < 10 || countitem(7319) < 10){
3503                        mes "We need";
3504                        mes "at least";
3505                        mes "20 ^FF0000Flexible Tube^000000,";
3506                        mes "10 ^FF0000Rusty Screw^000000 and";
3507                        mes "10 ^FF0000Used Iron Plate^000000,";
3508                        mes "to repair this factory.";
3509                        next;
3510                        mes "[Zelmeto]";
3511                        mes "^6A6A6A*Sigh*^000000";
3512                        mes "But there's no way";
3513                        mes "we can get all of those";
3514                        mes "things. Our budget isn't";
3515                        mes "big enough to cover it.";
3516                        close;
3517                }
3518                mes "Ah, it's you again.";
3519                mes "It's shameful letting";
3520                mes "other people know about";
3521                mes "our miserable situation...";
3522                next;
3523                mes "[Zelmeto]";
3524                mes "There's nothing";
3525                mes "worth seeing here,";
3526                mes "so there really isn't";
3527                mes "a point in you coming to";
3528                mes "visit this place anymore.";
3529                next;
3530                menu "Give him the materials.",s_Give,"Huh.",-;
3531
3532                mes "[Zelmeto]";
3533                mes "^6A6A6A*Sigh*^000000";
3534                mes "I'm really worried";
3535                mes "about this factory's";
3536                mes "future. What is our";
3537                mes "superintendant thinking...?";
3538                close;
3539
3540        s_Give:
3541                mes "[Zelmeto]";
3542                mes "...Hm?";
3543                mes "Aren't these the";
3544                mes "materials we need";
3545                mes "to make repairs in";
3546                mes "the factory? How did";
3547                mes "you find all of these?";
3548                next;
3549                if(countitem(7325) < 20 || countitem(7317) < 10 || countitem(7319) < 10)close;
3550                delitem 7325,20;
3551                delitem 7317,10;
3552                delitem 7319,10;
3553                set EinFactory,16;
3554                set $EinPolution,$EinPolution+1;
3555                if(BaseLevel < 41) getexp 615,0;
3556                else if(BaseLevel >= 41 && BaseLevel < 51) getexp 3075,0;
3557                else if(BaseLevel >= 51 && BaseLevel < 61) getexp 6604,0;
3558                else if(BaseLevel >= 61 && BaseLevel < 71) getexp 18508,0;
3559                else if(BaseLevel >= 71 && BaseLevel < 81) getexp 32062,0;
3560                else if(BaseLevel >= 81 && BaseLevel < 91) getexp 76026,0;
3561                else if(BaseLevel >= 91) getexp 290675,0;
3562                mes "[Zelmeto]";
3563                mes "I don't know how";
3564                mes "I can possible pay you";
3565                mes "back for this great favor.";
3566                mes "I appreciate that you've";
3567                mes "stepped forward to help us.";
3568                next;
3569                mes "[Zelmeto]";
3570                mes "Oh...!";
3571                mes "In my years of managing,";
3572                mes "I've learned the ultimate";
3573                mes "motivation techniques. Let";
3574                mes "me enhance your motivation";
3575                mes "to show you my gratitude.";
3576                next;
3577                mes "[Zelmeto]";
3578                mes "Now...";
3579                mes "Just open your mind";
3580                mes "and listen to my words";
3581                mes "of encouragement";
3582                mes "and inspiration...";
3583                next;
3584                mes "[Zelmeto]";
3585                mes "^3131FFWhen the going";
3586                mes "gets rough, you've";
3587                mes "gotta get rougher!";
3588                mes "You gotta climb that";
3589                mes "mountain 'cause no one's";
3590                mes "gonna climb it for you!";
3591                next;
3592                mes "[Zelmeto]";
3593                mes "^3131FFDon't give it up!";
3594                mes "Go for broke!";
3595                mes "Losers are quitters";
3596                mes "and quitters are losers!";
3597                next;
3598                mes "[Zelmeto]";
3599                mes "^6A6A6A*Whew*";
3600                mes "^000000I haven't given that much";
3601                mes "inspiration in a while, but";
3602                mes "your help was well worth it.";
3603                mes "I'm going to start  the repairs, but";
3604                mes "once again I'd like to thank you.";
3605                close;
3606                break;
3607
3608        case 16:
3609                mes "[Zelmeto]";
3610                mes "We'll be putting good";
3611                mes "use to the materials you";
3612                mes "gave me. With your help,";
3613                mes "our factory will operate";
3614                mes "safely. At least, for just";
3615                mes "a little while longer.";
3616                close;
3617        }       
3618}
3619
3620ein_in01,50,232,4       script  2nd Control Panel       111,{
3621
3622        if(EinFactory == 1){
3623                mes "^3131FFIt's the 2nd control panel";
3624                mes "Zelmeto asked you to inspect.";
3625                mes "it looks totally broken: screws";
3626                mes "are missing, and the iron cover";
3627                mes "has been bent open, revealing";
3628                mes "a tangled mess of wires inside.";
3629                set EinFactory,2;
3630                close;
3631        }
3632        end;
3633}
3634
3635ein_in01,108,217,4      script  3rd Pressure Governor   111,{
3636
3637        if(EinFactory == 3){
3638                mes "^3131FFAt first glance, this";
3639                mes "pressure governor looks";
3640                mes "perfectly fine. But after you";
3641                mes "check it more carefully, you";
3642                mes "find that it's making strange";
3643                mes "grinding noises and a few of";
3644                mes "the surface screws are loose.";
3645                set EinFactory,4;
3646                close;
3647        }
3648        end;
3649}
3650
3651ein_in01,61,259,4       script  Main Control Panel      111,{
3652
3653        if(EinFactory == 5){
3654                mes "^3131FFThe main control panel";
3655                mes "doesn't look like it has";
3656                mes "any problems. But after";
3657                mes "tapping on its surface,";
3658                mes "you hear a disheartening";
3659                mes "hollow sound. It looks like";
3660                mes "it's missing some parts...";
3661                set EinFactory,6;
3662                close;
3663        }
3664        end;
3665}
3666
3667ein_in01,47,197,4       script  Conveyor#01     111,{
3668
3669        if(EinFactory == 7){
3670                mes "^3131FFThe conveyor's movements";
3671                mes "look jittery and clumsy. The";
3672                mes "mechanical arm also doesn't";
3673                mes "look powerful enough to bear";
3674                mes "the loads that it's carrying. The";
3675                mes "screws in the conveyor look";
3676                mes "loose and rusted over.";
3677                set EinFactory,8;
3678                close;
3679        }
3680        end;
3681}
3682
3683ein_in01,100,267,4      script  Pipe    111,{
3684
3685        if(EinFactory == 9){
3686                mes "^3131FFThe inspection of this";
3687                mes "pipe didn't take very long.";
3688                mes "It's bloated and worn out";
3689                mes "from long durations of";
3690                mes "being overloaded with";
3691                mes "pressure. It's a wonder";
3692                mes "it hasn't exploded yet.";
3693                set EinFactory,10;
3694                close;
3695        }
3696        end;
3697}
3698
3699ein_in01,95,238,4       script  Conveyor#02     111,{
3700
3701        if(EinFactory == 11){
3702                mes "^3131FFThis conveyor seems";
3703                mes "to have similiar problems";
3704                mes "as its smaller version. Its";
3705                mes "movements are awkward,";
3706                mes "erratic and weak, and almost";
3707                mes "all of its screws are rusted.";
3708                set EinFactory,12;
3709                close;
3710        }
3711        end;
3712}
3713//============================================================
3714//=============================================== Einbroch Uwe
3715//====================================================== Quest
3716einbroch,215,180,5      script  Uwe Kleine      85,{
3717
3718        if(EinUwe == 2)goto s_Cont2;
3719        if(EinUwe == 1)goto s_Cont;
3720        mes "[Uwe]";
3721        mes "Cooking is such a joy~!";
3722        mes "The scents, the flavors, the";
3723        mes "sensation of sheer ^EFAEBDsatiation^000000...";
3724        next;
3725        menu "Um, isn't this a forge?",s_Forge,"Ignore him.",-;
3726
3727        mes "[Uwe]";
3728        mes "Cooking begins with";
3729        mes "fire and ends with fire.";
3730        mes "There's a certain art to";
3731        mes "creating fine, delicious";
3732        mes "foods to delight the palate~";
3733        close;
3734
3735s_Forge:
3736        mes "[Uwe]";
3737        mes "Is this a forge?";
3738        mes "Oh, sugar honey,";
3739        mes "you haven't been here";
3740        mes "before, haven't you?";
3741        next;
3742        mes "[Uwe]";
3743        mes "My name is Uwe Kleine";
3744        mes "and this is my forge~! I am";
3745        mes "the most elegant Blacksmith";
3746        mes "and the best chef here in the";
3747        mes "Schwarzwald Republic~";
3748        next;
3749        mes "[Uwe]";
3750        mes "So, how can";
3751        if(Sex){
3752                mes "I help you, you";
3753                mes "adoooooooooorable";
3754                mes "hunk of a man?";
3755        }else{
3756                mes "I help you?";
3757        }
3758        next;
3759        menu "Talk about Einbroch",s_Ein,"Ask him to forge a Weapon.",s_Weap,"Master, I want to learn cooking.",s_Cook,"Cancel.",-;
3760
3761        mes "[Uwe]";
3762        mes "Take care,";
3763        mes "sugar honey~";
3764        mes "Ho ho ho!";
3765        close;
3766
3767s_Ein:
3768        mes "[Uwe]";
3769        mes "Einbroch was originally";
3770        mes "build to support Einbech's";
3771        mes "mining efforts. Because it's";
3772        mes "small and crowded with people,";
3773        mes "there's no room to build the ore";
3774        mes "refining factories over there.";
3775        next;
3776        mes "[Uwe]";
3777        mes "Sine Einbroch used to be";
3778        mes "an empty lot, it was perfect";
3779        mes "for building factories. That's";
3780        mes "what my grandfather told me a";
3781        mes "long time ago. Anyway, Einbroch";
3782        mes "quickly grew into a major city.";
3783        next;
3784        mes "[Uwe]";
3785        mes "Now people think that this";
3786        mes "city was never planned to be";
3787        mes "just an extension of Einbech.";
3788        mes "See that rampart over there?";
3789        mes "It doesn't connection to Einbech";
3790        mes "at all! No protection for them...";
3791        next;
3792        mes "[Uwe]";
3793        mes "It's like the government";
3794        mes "lost all interest in Einbech.";
3795        mes "Even the miners there have";
3796        mes "been moving here to work in";
3797        mes "the factories. But more people";
3798        mes "hasn't made this city more lively.";
3799        next;
3800        mes "[Uwe]";
3801        mes "Einbroch may look modern";
3802        mes "and exciting now, but soon";
3803        mes "you'll see that there's no sign";
3804        mes "of warmth or life. So... Just";
3805        mes "don't live here in your old age.";
3806        next;
3807        menu "Then why are you here?",s_WhyHere,"I won't. Thanks for the advice.",-;
3808
3809        mes "[Uwe]";
3810        mes "Oh, that is such";
3811        mes "a good decision,";
3812        mes "sugar honey! Oh, you";
3813        mes "cutie adventurers are";
3814        mes "so precious, so lovable.";
3815        mes "^111111*Tee hee hee~*^000000";
3816        next;
3817        mes "[Uwe]";
3818        mes "Well, that was";
3819        mes "a fun talk. Come";
3820        mes "back and visit, 'kay?";
3821        mes "I'll miss you until";
3822        mes "the next time~";
3823        close;
3824
3825s_WhyHere:
3826        mes "[Uwe]";
3827        mes "Well, I have some";
3828        mes "precious memories of";
3829        mes "this place. Once, there was";
3830        mes "a man who lived here who";
3831        mes "was just like a father to me.";
3832        next;
3833        mes "[Uwe]";
3834        mes "Oh, but I'm sure that";
3835        mes "you don't want to hear";
3836        mes "about that. Next time you";
3837        mes "drop by, we'll talk about";
3838        mes "something more fun, 'kay?";
3839        mes "Buhbye for now, cutie~";
3840        close;
3841
3842s_Weap:
3843        mes "[Uwe]";
3844        mes "Well...";
3845        mes "I actually just";
3846        mes "do smithing work";
3847        mes "to create my own";
3848        mes "cooking tools.";
3849        next;
3850        mes "[Uwe]";
3851        mes "Oh, I understand";
3852        mes "that somebody needs";
3853        mes "to fight the monsters,";
3854        mes "but I'm the wrong person";
3855        mes "to ask for forging weapons.";
3856        mes "I... am a strict pacifist~";
3857        next;
3858        mes "[Uwe]";
3859        mes "Just go look";
3860        mes "around for a little";
3861        mes "bit, I'm sure you'll";
3862        mes "find a Blacksmith";
3863        mes "who's willing to forge";
3864        mes "you a good weapon~";
3865        close;
3866
3867s_Cook:
3868        mes "[Uwe]";
3869        mes "Mm...?";
3870        mes "Did you just";
3871        mes "say that you";
3872        mes "want to learn";
3873        mes "the art of cooking?";
3874        next;
3875        mes "[Uwe]";
3876        mes "I'm sorry, but I can't";
3877        mes "really give culinary";
3878        mes "lessons. But I will";
3879        mes "give good advice for";
3880        mes "hopeful beginners.";
3881        next;
3882        mes "[Uwe]";
3883        mes "Now...";
3884        mes "For your tuiton";
3885        mes "I'll need-- Gosh,";
3886        mes "there's just so many";
3887        mes "things. Get some paper,";
3888        mes "and a pen for this list...";
3889        next;
3890        mes "[Uwe]";
3891        mes "Just kidding!";
3892        mes "^111111*Titter~* ^000000I don't need";
3893        mes "much to make some";
3894        mes "cooking utensils. Bring";
3895        mes "6 ^0000FFLarge Jellopies^000000. That's it!";
3896        next;
3897        mes "[Uwe]";
3898        mes "In return, I will give you";
3899        mes "1 Coal and some useful";
3900        mes "cooking advice for novices.";
3901        mes "I give this advice for free to";
3902        mes "my smithing colleages, though.";
3903        next;
3904        mes "[Uwe]";
3905        mes "Why ^EFAEBDdon't^000000 you";
3906        mes "become a Blacksmith?";
3907        mes "I'm much more confident";
3908        mes "in that field. ^111111*Tee hee~*^000000";
3909        next;
3910        mes "[Uwe]";
3911        mes "Well, I'll be";
3912        mes "waiting right";
3913        mes "here until you";
3914        mes "come back.";
3915        mes "^111111...*Tee hee~*";
3916        set EinUwe,1;
3917        close;
3918
3919s_Cont:
3920        mes "[Uwe]";
3921        mes "Oh hello hello~";
3922        mes "It's been a long";
3923        mes "time since we've talked,";
3924        mes "you cutie adventurer~";
3925        next;
3926        mes "[Uwe]";
3927        mes "So, sugar honey,";
3928        mes "how is it going with";
3929        mes "the little favor I asked";
3930        mes "you about last time?";
3931        mes "Did you already forget";
3932        mes "the 6 Large Jellopies?";
3933        next;
3934        menu "Talk about Einbroch",s_Ein,"Ask him to forge a Weapon.",s_Weap,"Give him the Materials.",s_Material,"Cancel.",-;
3935
3936s_Material:
3937        mes "[Uwe]";
3938        if(countitem(7126) < 6){
3939                mes "Huh...?";
3940                mes "You brought";
3941                if(countitem(7126))
3942                        mes "only " + countitem(7126) + " of them?";
3943                else
3944                        mes "none at all...?";
3945                mes "Next time, be sure";
3946                mes "to bring 6 Large Jellopies,";
3947                mes "okay? Don't forget, cutie~";
3948                close;
3949        }
3950        delitem 7126,6;
3951        getitem 1003,1;
3952        set EinUwe,2;
3953        mes "Thank you ^EFAEBDso^000000 much!";
3954        mes "Here's the Coal I promised~";
3955        next;
3956        mes "[Uwe]";
3957        mes "Now, I can't teach you everything";
3958        mes "about cooking, but I will give you";
3959        mes "some good advice for beginners.";
3960        mes "I hope you pay attnetion, sugar";
3961        mes "honey. Now what would you like";
3962        mes "to hear more about? Hmm...?";
3963        next;
3964s_Menu3:
3965        menu "Heart",s_Heart,"Ingredients",s_Ingredients,"Skills",s_Skills,"Tools",s_Tools,"Cancel.",-;
3966
3967        mes "[Uwe]";
3968        mes "Take care,";
3969        mes "sugar honey~";
3970        mes "Ho ho ho!";
3971        close;
3972
3973s_Heart:
3974        mes "[Uwe]";
3975        mes "Ah, heart. Just like forging,";
3976        mes "you need passion and desire";
3977        mes "to create something special.";
3978        mes "Every smith and cook knows that";
3979        mes "you can do anything if you have";
3980        mes "the will and the commitments.";
3981        next;
3982        mes "[Uwe]";
3983        mes "Well, that's all";
3984        mes "I really have to";
3985        mes "say about that. But";
3986        mes "come back and chat";
3987        mes "whenever you please.";
3988        mes "...Behbie~";
3989        close;
3990
3991s_Ingredients:
3992        mes "[Uwe]";
3993        mes "Now, for beginners,";
3994        mes "learning to select";
3995        mes "and use ingredients";
3996        mes "is one of the most";
3997        mes "important fundamentals.";
3998        next;
3999        mes "[Uwe]";
4000        mes "Cooking is like forging";
4001        mes "since specific ingredients";
4002        mes "are needed to make specialty";
4003        mes "items or dishes. You can't just";
4004        mes "skip them if you really need";
4005        mes "them, right? Right!";
4006        next;
4007        mes "[Uwe]";
4008        mes "Once you make up your";
4009        mes "mind to do something,";
4010        mes "focus on finishing it, 'kay?";
4011        mes "Never cut corners and always";
4012        mes "dedicate yourself to make the";
4013        mes "very best finished product~";
4014        next;
4015        mes "[Uwe]";
4016        mes "Well, that was";
4017        mes "a fun talk. Come";
4018        mes "back and visit, 'kay?";
4019        mes "I'll miss you until";
4020        mes "the next time~";
4021        mes "...Ho ho~";
4022        close;
4023
4024s_Skills:
4025        mes "[Uwe]";
4026        mes "When you're beginning to learn";
4027        mes "skills, you can't let yourself be";
4028        mes "discouraged! Practice makes";
4029        mes "perfect, you know? But never";
4030        mes "use your lack of skills as an";
4031        mes "excuse if you happen to fail...";
4032        next;
4033        mes "[Uwe]";
4034        mes "Effort is also an essential";
4035        mes "in forging and cooking! Now,";
4036        mes "on the oher hand, if you put";
4037        mes "in all the effort but didn't learn";
4038        mes "any of the skills, you'll still get";
4039        mes "nowhere fast, right? Right!";
4040        next;
4041        mes "[Uwe]";
4042        mes "The key is to always";
4043        mes "give 100% effort and work";
4044        mes "on improving your skills.";
4045        mes "Before you know it, you'll";
4046        mes "be a respected master!";
4047        next;
4048        mes "[Uwe]";
4049        mes "Well, that was";
4050        mes "a fun talk. Come";
4051        mes "back and visit, 'kay?";
4052        mes "I'll miss you until";
4053        mes "the next time~";
4054        mes "...Ho ho~";
4055        close;
4056
4057s_Tools:
4058        mes "[Uwe]";
4059        mes "Cooking is a little";
4060        mes "easier if you have";
4061        mes "nicer tools to use,";
4062        mes "but that's it. Tools by";
4063        mes "themselves can't make";
4064        mes "just anybody a master.";
4065        next;
4066        mes "[Uwe]";
4067        mes "In the end, the best";
4068        mes "tools are the ones you're";
4069        mes "most comfortable with using.";
4070        mes "In fact, I still use the old knife";
4071        mes "I used back when I was just";
4072        mes "a little novice chef~";
4073        next;
4074        mes "[Uwe]";
4075        mes "Well, that was";
4076        mes "a fun talk. Come";
4077        mes "back and visit, 'kay?";
4078        mes "I'll miss you until";
4079        mes "the next time~";
4080        mes "...Ho ho~";
4081        close;
4082
4083s_Cont2:
4084        mes "[Uwe]";
4085        mes "Ah, hello again,";
4086        mes "cutie adventurer.";
4087        mes "How can I help you?";
4088        next;
4089        menu "Talk about Einbroch",s_Ein,"Ask him to forge a Weapon.",s_Weap,"Talk about Cooking.",s_Cooking,"Cancel.",-;       
4090
4091        mes "[Uwe]";
4092        mes "Take care,";
4093        mes "sugar honey~";
4094        mes "Ho ho ho!";
4095        close;
4096
4097s_Cooking:
4098        mes "[Uwe]";
4099        mes "Ooh, cooking!";
4100        mes "So what did you";
4101        mes "want to ask me...?";
4102        next;
4103        goto s_Menu3;
4104
4105OnHide:
4106        specialeffect 16;
4107        disablenpc "Uwe Kleine";
4108        end;
4109
4110OnUnhide:
4111        misceffect 215;
4112        end;
4113
4114}
Note: See TracBrowser for help on using the browser.