OSDN Git Service

First version
[st-ro/stro.git] / npc / quests / counteragent_mixture.txt
1 //===== rAthena Script ======================================= 
2 //= Counteragent and Mixture Quest(Morgenstein)
3 //===== By: ================================================== 
4 //= kobra_k88
5 //= added some dialogs for Morgenstein by Komurka
6 //===== Current Version: ===================================== 
7 //= 2.2b
8 //===== Compatible With: ===================================== 
9 //= rAthena Project
10 //===== Description: ========================================= 
11 //= [Official Conversion]
12 //= Counteragent and Mixtures for making dyes & Alchemist Job Quest
13 //===== Additional Comments: ================================= 
14 //= 2.2 Rescripted to Aegis 10.3 standards. [L0ne_W0lf]
15 //= 2.2a A few minor fixes. (bugreport:1122) [L0ne_W0lf]
16 //= 2.2b Follow up fixes to bugreport:1122 [L0ne_W0lf]
17 //============================================================ 
18
19 alberta_in,133,55,3     script  Louitz#cm       84,{
20         if (molgenstain == 2) {
21                 mes "[Merchant Louitz]";
22                 mes "Oh, it's you again.";
23                 mes "So did you try finding";
24                 mes "that nutcase scientist";
25                 mes "who lives over in Geffen?";
26                 next;
27                 if (select("Talk About Molgenstein:Cancel") == 1) {
28                         mes "[Merchant Louitz]";
29                         mes "You know where he lives";
30                         mes "but didn't check it out? Hey,";
31                         mes "he may be off his rocker, but";
32                         mes "I guess most geniuses are";
33                         mes "like that. Still, I think it'd be^FFFFFFss^000000 a good idea if you see him.";
34                         next;
35                         mes "[Merchant Louitz]";
36                         mes "I mean...";
37                         mes "It's only a matter";
38                         mes "of time until a smart guy";
39                         mes "like that creates something";
40                         mes "truly miraculous, right?";
41                         close;
42                 }
43                 mes "[Merchant Louitz]";
44                 mes "...Hello?";
45                 mes "Hellooo? Hey.";
46                 mes "Hey! I'm talkin'";
47                 mes "to you! Man, I hate";
48                 mes "it when you adventurers";
49                 mes "just shut up and space out...";
50                 close;
51         }
52         mes "[Merchant Louitz]";
53         mes "Heya.";
54         mes "What's up?";
55         next;
56         if (countitem(971) > 0 && countitem(972) > 0) {
57                 switch(select("Talk:Talk about the solutions.:Cancel")) {
58                 case 1:
59                         mes "[Merchant Louitz]";
60                         mes "When I was in Geffen";
61                         mes "looking for magic items,";
62                         mes "I heard rumors of this really";
63                         mes "crazy scientist guy. So I got";
64                         mes "curious, asked around, and";
65                         mes "eventually found this guy.";
66                         next;
67                         mes "[Merchant Louitz]";
68                         mes "Boy, oh boy, this guy was";
69                         mes "screwy. He didn't even know";
70                         mes "I was there the whole time and";
71                         mes "just kept mumbling this mumbo";
72                         mes "jumbo while working on his";
73                         mes "experiments. Words like, um...";
74                         next;
75                         mes "[Merchant Louitz]";
76                         mes "Yeah, he kept mumbling";
77                         mes "words like ''Karvodailnirol''";
78                         mes "and ''Detrimindexta.'' The";
79                         mes "first time I heard it, I thought";
80                         mes "it was just crazy talk, you know?";
81                         next;
82                         mes "[Merchant Louitz]";
83                         mes "But it turns out,";
84                         mes "this Karvodailnirol";
85                         mes "and Detrimindexta actually";
86                         mes "exist. I think they're special";
87                         mes "liquids that don't work quite";
88                         mes "like any liquids we're used to.";
89                         close;
90                 case 2:
91                         set molgenstain,1;
92                         mes "[Merchant Louitz]";
93                         mes "Hey, this is one of";
94                         mes "those solutions that";
95                         mes "scientist kept mentioning.";
96                         mes "You were able to get one";
97                         mes "of these? Huh. Now, I have";
98                         mes "no idea what to do with them... ";
99                         next;
100                         mes "[Merchant Louitz]";
101                         mes "Ah, but that crazy";
102                         mes "scientist would know.";
103                         mes "I don't remember exactly";
104                         mes "where he lives, but I know";
105                         mes "he's in Geffen and that his";
106                         mes "name is ^0000FFMolgenstein^000000.";
107                         next;
108                         mes "[Merchant Louitz]";
109                         mes "Hmm... You better";
110                         mes "go around Geffen and";
111                         mes "around first. I know for";
112                         mes "ask around first. I know for";
113                         mes "sure that somebody knows";
114                         mes "where you can find Molgenstein.";
115                         close;
116                 case 3:
117                         mes "[Merchant Louitz]";
118                         mes "Um...";
119                         mes "Good talking";
120                         mes "to you pal. Uh,";
121                         mes "see ya 'round. Take";
122                         mes "care of yourself, 'kay?";
123                         close;
124                 }
125         }
126         if (countitem(972) > 0) {
127                 switch(select("Talk:Talk about Karvodailnirol:Cancel")) {
128                 case 1:
129                         mes "[Merchant Louitz]";
130                         mes "When I was in Geffen";
131                         mes "looking for magic items,";
132                         mes "I heard rumors of this really";
133                         mes "crazy scientist guy. So I got";
134                         mes "curious, asked around, and";
135                         mes "eventually found this guy.";
136                         next;
137                         mes "[Merchant Louitz]";
138                         mes "Boy, oh boy, this guy was";
139                         mes "screwy. He didn't even know";
140                         mes "I was there the whole time and";
141                         mes "just kept mumbling this mumbo";
142                         mes "jumbo while working on his";
143                         mes "experiments. Words like, um...";
144                         next;
145                         mes "[Merchant Louitz]";
146                         mes "Yeah, he kept mumbling";
147                         mes "words like ''Karvodailnirol''";
148                         mes "and ''Detrimindexta.'' The";
149                         mes "first time I heard it, I thought";
150                         mes "it was just crazy talk, you know?";
151                         next;
152                         mes "[Merchant Louitz]";
153                         mes "But it turns out,";
154                         mes "this Karvodailnirol";
155                         mes "and Detrimindexta actually";
156                         mes "exist. I think they're special";
157                         mes "liquids that don't work quite";
158                         mes "like any liquids we're used to.";
159                         close;
160                 case 2:
161                         set molgenstain,1;
162                         mes "[Merchant Louitz]";
163                         mes "Oh hey, this is that";
164                         mes "Karvodailnirol that the";
165                         mes "old scientist was talking";
166                         mes "about, huh? Of course, only";
167                         mes "someone like that guy would";
168                         mes "know what to do with it...";
169                         next;
170                         mes "[Merchant Louitz]";
171                         mes "Hey, why don't you go";
172                         mes "and ask him about it?";
173                         mes "I don't remember exactly";
174                         mes "where he lives, but I know";
175                         mes "he's in Geffen and that his";
176                         mes "name is ^0000FFMolgenstein^000000.";
177                         next;
178                         mes "[Merchant Louitz]";
179                         mes "Hmm... You better";
180                         mes "go around Geffen and";
181                         mes "around first. I know for";
182                         mes "ask around first. I know for";
183                         mes "sure that somebody knows";
184                         mes "where you can find Molgenstein.";
185                         close;
186                 case 3:
187                         mes "[Merchant Louitz]";
188                         mes "Um...";
189                         mes "Good talking";
190                         mes "to you pal. Uh,";
191                         mes "see ya 'round. Take";
192                         mes "care of yourself, 'kay?";
193                         close;
194                 }
195         }
196         if (countitem(971) > 0) {
197                 switch(select("Talk:Talk about Detrimindexta:Cancel")) {
198                 case 1:
199                         mes "[Merchant Louitz]";
200                         mes "When I was in Geffen";
201                         mes "looking for magic items,";
202                         mes "I heard rumors of this really";
203                         mes "crazy scientist guy. So I got";
204                         mes "curious, asked around, and";
205                         mes "eventually found this guy.";
206                         next;
207                         mes "[Merchant Louitz]";
208                         mes "Boy, oh boy, this guy was";
209                         mes "screwy. He didn't even know";
210                         mes "I was there the whole time and";
211                         mes "just kept mumbling this mumbo";
212                         mes "jumbo while working on his";
213                         mes "experiments. Words like, um...";
214                         next;
215                         mes "[Merchant Louitz]";
216                         mes "Yeah, he kept mumbling";
217                         mes "words like ''Karvodailnirol''";
218                         mes "and ''Detrimindexta.'' The";
219                         mes "first time I heard it, I thought";
220                         mes "it was just crazy talk, you know?";
221                         next;
222                         mes "[Merchant Louitz]";
223                         mes "But it turns out,";
224                         mes "this Karvodailnirol";
225                         mes "and Detrimindexta actually";
226                         mes "exist. I think they're special";
227                         mes "liquids that don't work quite";
228                         mes "like any liquids we're used to.";
229                         close;
230                 case 2:
231                         set molgenstain,1;
232                         mes "[Merchant Louitz]";
233                         mes "Oh hey, this is that";
234                         mes "Detrimindexta that the";
235                         mes "old scientist was talking";
236                         mes "about, huh? Of course, only";
237                         mes "someone like that guy would";
238                         mes "know what to do with it...";
239                         next;
240                         mes "[Merchant Louitz]";
241                         mes "Hey, why don't you go";
242                         mes "and ask him about it?";
243                         mes "I don't remember exactly";
244                         mes "where he lives, but I know";
245                         mes "he's in Geffen and that his";
246                         mes "name is ^0000FFMolgenstein^000000.";
247                         next;
248                         mes "[Merchant Louitz]";
249                         mes "Hmm... You better";
250                         mes "go around Geffen and";
251                         mes "around first. I know for";
252                         mes "ask around first. I know for";
253                         mes "sure that somebody knows";
254                         mes "where you can find Molgenstein.";
255                         close;
256                 case 3:
257                         mes "[Merchant Louitz]";
258                         mes "Um...";
259                         mes "Good talking";
260                         mes "to you pal. Uh,";
261                         mes "see ya 'round. Take";
262                         mes "care of yourself, 'kay?";
263                         close;
264                 }
265         }
266         if (select("Talk:Cancel") == 1) {
267                 mes "[Merchant Louitz]";
268                 mes "When I was in Geffen";
269                 mes "looking for magic items,";
270                 mes "I heard rumors of this really";
271                 mes "crazy scientist guy. So I got";
272                 mes "curious, asked around, and";
273                 mes "eventually found this guy.";
274                 next;
275                 mes "[Merchant Louitz]";
276                 mes "Boy, oh boy, this guy was";
277                 mes "screwy. He didn't even know";
278                 mes "I was there the whole time and";
279                 mes "just kept mumbling this mumbo";
280                 mes "jumbo while working on his";
281                 mes "experiments. Words like, um...";
282                 next;
283                 mes "[Merchant Louitz]";
284                 mes "Yeah, he kept mumbling";
285                 mes "words like ''Karvodailnirol''";
286                 mes "and ''Detrimindexta.'' The";
287                 mes "first time I heard it, I thought";
288                 mes "it was just crazy talk, you know?";
289                 next;
290                 mes "[Merchant Louitz]";
291                 mes "But it turns out,";
292                 mes "this Karvodailnirol";
293                 mes "and Detrimindexta actually";
294                 mes "exist. I think they're special";
295                 mes "liquids that don't work quite";
296                 mes "like any liquids we're used to.";
297                 close;
298         }
299         mes "[Merchant Louitz]";
300         mes "Um...";
301         mes "Good talking";
302         mes "to you pal. Uh,";
303         mes "see ya 'round. Take";
304         mes "care of yourself, 'kay?";
305         close;
306 }
307
308 geffen,181,114,3        script  Aure Dupon#cm   82,{
309         if (molgenstain == 2) {
310                 mes "[Aure Dupon]";
311                 mes "It seems that our";
312                 mes "paths yet cross again.";
313                 mes "Coincidence? It's more";
314                 mes "than that. This is ^0000FFfate^000000.";
315                 next;
316                 if (select("Talk About Molgenstein:Cancel") == 1) {
317                         mes "[Aure Dupon]";
318                         mes "Have you not met";
319                         mes "Molgenstein yet? He";
320                         mes "lives on the second floor";
321                         mes "of the Forge. Although we've";
322                         mes "just met, I must warn you not";
323                         mes "to get too close to him...";
324                         close;
325                 }
326                 mes "[Aure Dupon]";
327                 mes "Go then, and";
328                 mes "may the tides of";
329                 mes "destiny carry you";
330                 mes "to where you must go.";
331                 close;
332         }
333         mes "[Aure Dupon]";
334         mes "Time flows gently";
335         mes "and subtly, but no";
336         mes "force in this world";
337         mes "can possibly stop it.";
338         mes "Mankind is not even a";
339         mes "mote in the grand scheme.";
340         next;
341         if (molgenstain > 0) {
342                 switch(select("Talk:Ask About Molgenstein:Cancel")) {
343                 case 1:
344                         mes "[Aure Dupon]";
345                         mes "To have goals and focus";
346                         mes "is good, but to be obsessive";
347                         mes "about one single thing can be";
348                         mes "quite destructive. Relax, empty";
349                         mes "your mind, and let yourself be";
350                         mes "carried by the tides of destiny.";
351                         close;
352                 case 2:
353                         set molgenstain,2;
354                         mes "[Aure Dupon]";
355                         mes "Molgenstein...?";
356                         mes "The man is obsessed";
357                         mes "with conquering the forces";
358                         mes "that control our world. But";
359                         mes "you seem to be curious about";
360                         mes "him for some reason. Hmmm...";
361                         next;
362                         mes "[Aure Dupon]";
363                         mes "It would be best if you";
364                         mes "were to see Molgenstein";
365                         mes "and judge his character for";
366                         mes "yourself. You may find him in";
367                         mes "the second floor of the Geffen";
368                         mes "Forge. Go: It is your destiny.";
369                         close;
370                 case 3:
371                         mes "[Aure Dupon]";
372                         mes "Go then, and";
373                         mes "may the tides of";
374                         mes "destiny carry you";
375                         mes "to where you must go.";
376                         close;
377                 }
378         }
379         if (select("Talk:Cancel") == 1) {
380                 mes "[Aure Dupon]";
381                 mes "To have goals and focus";
382                 mes "is good, but to be obsessive";
383                 mes "about one single thing can be";
384                 mes "quite destructive. Relax, empty";
385                 mes "your mind, and let yourself be";
386                 mes "carried by the tides of destiny.";
387                 close;
388         }
389         mes "[Aure Dupon]";
390         mes "Go then, and";
391         mes "may the tides of";
392         mes "destiny carry you";
393         mes "to where you must go.";
394         close;
395 }
396
397 geffen_in,141,140,3     script  Molgenstein#cm  121,{
398         if (checkweight(1201,1) == 0) {
399                 mes "- Wait a minute !! -";
400                 mes "- Currently you're carrying -";
401                 mes "- too many items with you. -";
402                 mes "- Please try again -";
403                 mes "- after you loose some weight. -";
404                 close;
405         }
406         if (MISC_QUEST & 4) {
407                 mes "[Chemist Molgenstein]";
408                 mes ".....";
409                 mes "Welcome.";
410                 mes "Hehehehe....";
411                 mes "Heeheeheeheehee....";
412                 next;
413                 switch(select("Ask about his research:Ask him to make a new solution.:Cancel")) {
414                 case 1:
415                         mes "[Chemist Molgenstein]";
416                         mes "Heeheeheeheee...";
417                         mes "You must have heard the rumors about my research. Yes! But since you probably know already, I'll tell you without hiding, I mean, there's nothing to hide.";
418                         next;
419                         mes "[Chemist Molgenstein]";
420                         mes "Actually, you can say my research is complete! Nothing's impossible for my genius! Bwahaha, it's just a matter of time!";
421                         next;
422                         mes "[Chemist Molgenstein]";
423                         mes "Are you still here? Right, you wanted to know about my research. It's actually very simple. I was just trying to invent a super liquid that can melt everything!";
424                         next;
425                         mes "[Chemist Molgenstein]";
426                         mes "Isn't it interesting? No matter how strong you are, you can't break apart stone or steel, but with my new liquid, you can melt those things, making them soft like puddy!";
427                         next;
428                         mes "[Chemist Molgenstein]";
429                         mes "It can't melt everything yet, but I did find that you could combine things that you could never mix before with my invention. Heeheeheehee~!";
430                         next;
431                         mes "[Chemist Molgenstein]";
432                         mes "You can make a whole lot of things that you'd never would have imagined possible! I can make you a lot of new things you never would have imagined using this method... as long as you want it!!";
433                         next;
434                         mes "[Chemist Molgenstein]";
435                         mes "The endorphins are rushing to my face at least 2.1 times faster than the usual rate! Ah! I'm so excited! I... I just can't hide it!";
436                         close;
437                 case 2:
438                         mes "[Chemist Molgenstein]";
439                         mes "So...";
440                         mes "You want me to make something totally new, huh? Hehhehheh! I love your sense of scientific adventure!";
441                         next;
442                         switch(select("Counteragent:Mixture")) {
443                         case 1:
444                                 mes "[Chemist Molgenstein]";
445                                 mes "Ooh...!";
446                                 mes "You want to make a Counteragent? Hohohohoho, let's see what we'll need...";
447                                 next;
448                                 mes "[Chemist Molgenstein]";
449                                 mes "Oh, I remember, yes, Alcohol, and um, er, Detrimindexta and an Empty Bottle to put it it all in. Just these three items and 3000 zeny.";
450                                 next;
451                                 mes "[Chemist Molgenstein]";
452                                 mes "Bwahahahah!";
453                                 mes "Oh, I just can't wait to make this! Are you ready to begin?";
454                                 next;
455                                 if (select("Make:Cancel") == 1) {
456                                         if (countitem(970) == 0 || countitem(971) == 0 || countitem(713) == 0 || Zeny < 3000) {
457                                                 mes "[Chemist Molgenstein]";
458                                                 mes "Heuheuheuheuh.... not enough... not enough.. Haah...Haah... Go..... get the rest of the materials!";
459                                                 mes "We'll postpone the fun until then... Heuheuheuheuheuh.";
460                                                 close;
461                                         }
462                                         mes "[Chemist Molgenstein]";
463                                         mes "Ooooooooh...... heeheeheeheehee...... yes... like that...... yes... more... more........ heeheeheehee.";
464                                         mes ".... Aaah.... ahah... ha....ahahooooooooohoh!";
465                                         next;
466                                         if (countitem(970) < 1 || countitem(971) < 1 || countitem(713) < 1) {
467                                                 mes "[Chemist Molgenstein]";
468                                                 mes "Hohohoho.... not enough... not enough... haah...haah... go..... go get the rest of the materials!!";
469                                                 close;
470                                         }
471                                         delitem 970,1; //Alchol
472                                         delitem 971,1; //Detrimindexta
473                                         delitem 713,1; //Empty_Bottle
474                                         set Zeny, Zeny-3000;
475                                         getitem 973,1; //Counteragent
476                                         mes "[Chemist Molgenstein]";
477                                         mes "Hee hee hee...";
478                                         mes "Haaaaah......";
479                                         mes "Oh? We're done already?!";
480                                         close;
481                                 }
482                                 mes "[Chemist Molgenstein]";
483                                 mes "Hee hee hee...!";
484                                 mes "Come back when";
485                                 mes "you're ready~";
486                                 close;
487                         case 2:
488                                 mes "[Chemist Molgenstein]";
489                                 mes "Ooh...!";
490                                 mes "You want to make a Mixture? Hohohohoho, let's see what we'll need...";
491                                 next;
492                                 mes "[Chemist Molgenstein]";
493                                 mes "Ooh, I remember now, yes, Alcohol, and um, er, Karvodailnirol and an empty bottle to put all of it in. Just these three items and 4000 zeny.";
494                                 next;
495                                 mes "[Chemist Molgenstein]";
496                                 mes "Bwahahahah!";
497                                 mes "Oh, I just can't wait to make this! Are you ready to begin?";
498                                 next;
499                                 if (select("Make:Cancel") == 1) {
500                                         if (countitem(970) == 0 || countitem(972) == 0 || countitem(713) == 0 || Zeny < 4000) {
501                                                 mes "[Chemist Molgenstein]";
502                                                 mes "Hohohoho.... not enough... not enough... haah...haah... go..... go get the rest of the materials!!";
503                                                 mes "We'll have to postpone the fun for later... Hehehehe";
504                                                 close;
505                                         }
506                                         mes "[Chemist Molgenstein]";
507                                         mes "Ooooooooh... heehee...... yes... like that...... yes... more... more........ heeheeheehee";
508                                         mes ".... Aaah.... ahah... ha....ahah...oooooooooooooooooh!!!...!!!!!!";
509                                         next;
510                                         if (countitem(970) < 1 || countitem(972) < 1 || countitem(713) < 1) {
511                                                 mes "[Chemist Molgenstein]";
512                                                 mes "Hohohoho.... not enough... not enough... haah...haah... go..... go get the rest of the materials!!";
513                                                 close;
514                                         }
515                                         delitem 970,1; //Alchol
516                                         delitem 972,1; //Karvodailnirol
517                                         delitem 713,1; //Empty_Bottle
518                                         set Zeny, Zeny-4000;
519                                         getitem 974,1; //Mixture
520                                         mes "[Chemist Molgenstein]";
521                                         mes "Hee hee hee...";
522                                         mes "Haaaaah......";
523                                         mes "Oh? We're done already?!";
524                                         close;
525                                 }
526                                 mes "[Chemist Molgenstein]";
527                                 mes "[Chemist Molgenstein]";
528                                 mes "Hee hee hee...!";
529                                 mes "Come back when";
530                                 mes "you're ready~";
531                                 mes "Heh... heuheuheuheh....";
532                                 close;
533                         }
534                 case 3:
535                         mes "[Chemist Molgenstein]";
536                         mes "Heehee....heheheheh....";
537                         close;
538                 }
539         }
540         if (molgenstain == 2) {
541                 set MISC_QUEST,MISC_QUEST | 4;
542                 set molgenstain,0;
543                 mes "[Chemist Molgenstein]";
544                 mes "Heeheeheehee.... welcome. Hehehehe.... heeheeheeheehee....";
545                 next;
546                 mes "[Chemist Molgenstein]";
547                 mes "Ah...?!";
548                 mes "So sorry if I weirded you out. It's just... I haven't seen a living person in soooo long. So, er, what can I do for you??";
549                 next;
550                 if (select("Ask about his research.:Cancel.") == 1) {
551                         mes "[Chemist Molgenstein]";
552                         mes "Heeheeheeheee...";
553                         mes "You must have heard the rumors about my research. Yes! But since you probably know already, I'll tell you without hiding, I mean, there's nothing to hide.";
554                         next;
555                         mes "[Chemist Molgenstein]";
556                         mes "Actually, you can say my research is complete! Nothing's impossible for my genius! Bwahaha, it's just a matter of time!";
557                         next;
558                         mes "[Chemist Molgenstein]";
559                         mes "Are you still here? Right, you wanted to know about my research. It's actually very simple. I was just trying to invent a super liquid that can melt everything!";
560                         next;
561                         mes "[Chemist Molgenstein]";
562                         mes "Isn't it interesting? No matter how strong you are, you can't break apart stone or steel, but with my new liquid, you can melt those things, making them soft like puddy!";
563                         next;
564                         mes "[Chemist Molgenstein]";
565                         mes "It can't melt everything yet, but I did find that you could combine things that you could never mix before with my invention.";
566                         next;
567                         mes "[Chemist Molgenstein]";
568                         mes "I can make you a lot of new things you never would have imagined using this method... as long as you want it!!";
569                         next;
570                         mes "[Chemist Molgenstein]";
571                         mes "The endorphins are rushing to my face at least 2.1 times faster than the usual rate! Ah! I'm so excited! I... I just can't hide it!";
572                         close;
573                 }
574                 close;
575         }
576         mes "[Chemist Molgenstein]";
577         mes "Heeheeheehee...";
578         mes "You're not here to be a test subject, are you? Probably not though. Not since my little 'accident.' Heeheeheeee~!";
579         close;
580 }
581
582 //============================================================ 
583 // Old changelog
584 //============================================================ 
585 //= 1.0 Fully working
586 //= 1.1 Update for Alchemist Quest.
587 //= 1.2 added check for Empty Bottle [Lupus]
588 //= 1.3 Fixed some lil thingys [Darkchild]
589 //= 1.4 More li'l thing, added comments for items IDs [Lupus]
590 //= 1.5 Fixed Spelling mistakes. [Nexon]
591 //= 1.6 Fixed some bugs, also related to Alch Job quest [Lupus]
592 //= 1,7 Fixed exploit
593 //= 1.8 Got rid of 'al_morgen' var [Lupus]
594 //= 2.1 now uses (MISC_QUEST & 4) bit instead of al_morgen [Lupus]
595 //============================================================