root/npc/custom/quests/thq/THQS_Quests.txt @ 1

Revision 1, 30.9 kB (checked in by jinshiro, 17 years ago)
Line 
1//===== eAthena Script =======================================
2//= Treasure Hunter Script
3//===== Converted By =========================================
4//= Fredzilla
5//= Original
6//////////////////////////////////////////////////////////////
7//                  Treasure Hunter Quests                  //
8//                       By: Ezekial                        //
9//             for the use on nRO run by Newbe5             //
10//                    revised By Warlock                    //
11//////////////////////////////////////////////////////////////
12//===== Version ==============================================
13//= 1.4
14//===== Compatible With ======================================
15//= eAthena 1.0
16//===== Description ==========================================
17//= Start for Treasure hunter quests
18//===== Comments =============================================
19//= Event_THQS - Used to check if you have already registered
20//= #Treasure_Token - used to keep track of tokens
21//= 1.0 - Straight conversionof Aegis NPC file
22//= 1.2 some bugfixes, typos [Lupus]
23//= 1.3 Removed Duplicates [Silent]
24//= 1.4 Further removed duplicates. [L0ne_W0lf]
25//============================================================
26
27
28///////Job list 1///////
29//1-1
30mjolnir_09,187,189,6    script  Old Man 107,{
31        if (one_qset==1) goto N_QuestStart;
32        mes "[Old Man]";
33        mes "Eh! Can't and old man walk in peace anymore?!";
34        close;
35N_QuestStart:
36        mes "[Old Man]";
37        mes "Eh? whats that?!";
38        mes " ";
39        mes "My wife wants me home?! Alright, alright... I'm going, I'm going. Thank you for telling me the message.";
40        mes " ";
41        mes "Here take this Treasure Token.";
42        set one_qset,0;
43        set On_Quest,0;
44        set #Treasure_Token,#Treasure_Token+1;
45        close;
46}
47//1-2;
48pay_arche,86,129,6      script  Archer  732,{
49        if (one_qset == 2) goto N_QuestStart;
50        mes "[Kieth]";
51        mes "Sorry can't talk, I'm a busy man, I'm waiting for my package.";
52        close;
53N_QuestStart:
54        mes "[Kieth]";
55        mes "Ahh, you must be from the Treasure Hunter Agensy. Do you have my bow??";
56        mes " ";
57        mes "Ahh, good,thank you for your time. Take this Treasure Token.";
58        set one_qset,0;
59        set On_Quest,0;
60        delitem 1072,1;
61        set #Treasure_Token,#Treasure_Token+1;
62        close;
63}
64//1-3
65prt_fild06,37,192,6     script  Farmer  125,{
66        if (one_qset == 3 && countitem(909) > 19 && countitem(955) > 19 && countitem(914) > 19 && countitem(705) > 19) goto N_QuestComp;
67        if (one_qset==3) goto N_QuestStart;
68        mes "[Billy-Bob]";
69        mes "Arrrg!... Those Bastard Bugs have eaten everything, this place donest even look like my farm anymore!!";
70        close;
71N_QuestComp:
72        mes "[Billy-Bob]";
73        mes "Ohhh, thank you thats a good start for me.";
74        mes "Well those bugs can bugger off...";
75        mes " ";
76        mes "Well here take these 2 Treasure Tokens.";
77        set one_qset,0;
78        set #Treasure_Token,#Treasure_Token+2;
79        set On_Quest,0;
80        delitem 909,20;
81        delitem 955,20;
82        delitem 914,20;
83        delitem 705,20;
84        close;
85N_QuestStart:
86        mes "[Billy-Bob]";
87        mes "Those Bastard Bugs are Everywere!!!";
88        mes "You must be from the guild! OK, bring me 20 Worm Peelings, 20 Jellopys, 20 fluff and 20 Clovers.";
89        close;
90}
91//1-4
92prontera,264,353,6      script  Old Lady#thq    103,{
93        if (one_qset == 4 && countitem(934) > 14) goto N_QuestComp;
94        if (one_qset == 4) goto N_QuestStart;
95        mes "[Old Lady]";
96        mes "This is my husbands grave... I'm just paying him a little visit.";
97        close;
98N_QuestComp:
99        mes "[Old Lady]";
100        mes "You have them?!";
101        next;
102        mes "[Old Lady]";
103        mes "Thank you sooo much here have these 3 Treasure Tokens.";
104        set #Treasure_Token,#Treasure_Token+3;
105        delitem 934,15;
106        set one_qset,0;
107        set On_Quest,0;
108        close;
109N_QuestStart:
110        mes "[Old Lady]";
111        mes "So your the one that has come to help me?";
112        mes " ";
113        mes "Ok well this is what I wanted you to do,this greave beside me is my husbands grave and I promised him that I would bury some Mementos with him, The problem is that I have no Mementos...";
114        next;
115        mes "[Old Lady]";
116        mes "Bring me 15 Mementos, please.";
117        close;
118}
119///////Job list 2///////
120//2-1;
121morocc,59,109,6 script  Erika   700,{
122        if (two_qset == 1 && countitem(1072) > 0) goto N_QuestComp;
123        if (two_qset == 1) goto N_QuestStart;
124        mes "[Erika]";
125        mes "Hello my name is Erika.";
126        close;
127N_QuestComp:
128        mes "[Erika]";
129        mes "What's that? You have a letter for me!!";
130        mes "Oooooh I just love,love letters :D. next here will I open it.";
131        next;
132        mes "[Letter]";
133        mes "Dear Erika";
134        mes " ";
135        mes "Sorry to inform you but you have been evicted, please move out within 3-5 days.";
136        mes " ";
137        mes "-Managment";
138        next;
139        mes "[Erika]";
140        mes "Oh... um... Well fuck, that bastard thinks he can kick me out!!!!! He's got another thing coming!";
141        mes " ";
142        mes "Well thank you for delivering this anyway have this Treasure Token.";
143        delitem 1072,1;
144        set two_qset,0;
145        set #Treasure_Token,#Treasure_Token+1;
146        set On_Quest,0;
147        close;
148N_QuestStart:
149        mes "[Erika]";
150        mes "So your the one that has a letter for me?";
151        mes " ";
152        mes "Ok well where's the letter?";
153        close;
154}
155//2-2;
156in_moc_16,15,30,6       script  Jeramiah        730,{
157        if (two_qset == 2 && countitem(1998) > 0) goto N_QuestComp;
158        if (two_qset == 2) goto N_QuestStart;
159        mes "[Jeramiah]";
160        mes "Its so boring when you have to next on people...";
161        close;
162N_QuestComp:
163        mes "[Jeramiah]";
164        mes "Ahh hello, you must be from the Treasure Hunter Guild.";
165        mes "Do you have my Jur? Ahh good good. Thank you.";
166        mes "Here have this Treasure Hunter Token.";
167        set two_qset,0;
168        set On_Quest,0;
169        delitem 1998,1;
170        set #Treasure_Token,#Treasure_Token+1;
171        close;
172N_QuestStart:
173        mes "[Jeramiah]";
174        mes "So your the one that is supposed to bring my Jur?";
175        mes "So where's my Jur?";
176        close;
177}
178//2-3;
179prt_fild07,316,263,6    script  Marsh Man       84,{
180        if (two_qset == 3 && countitem(518) > 19) goto N_QuestComp;
181        if (two_qset == 3) goto N_QuestStart;
182        mes "[Lenith]";
183        mes "Hello, sorry I don't have much time to talk I'm waiting for someone.";
184        close;
185N_QuestComp:
186        mes "[Lenith]";
187        mes "Oh hello, OH you have my honey, my bees and I thank you.";
188        mes " ";
189        mes "Here have these 2 Treasure Hunter Tokens.";
190        delitem 518,20;
191        set #Treasure_Token,#Treasure_Token+2;
192        set two_qset,0;
193        set On_Quest,0;
194        close;
195N_QuestStart:
196        mes "[Lenith]";
197        mes "Hello, my name is Lenith and I have a quest for you.";
198        mes "Well resently a bunch of stupid bears stole the supers off all my bee's nests...Stupid bears.";
199        mes " ";
200        mes "What I need you to do is find me some more honey so these bee's can get through the winter. I will need about 20 Honey.";
201        close;
202}
203//2-4;
204payon,161,72,6  script  Molly   714,{
205        if (two_qset == 4 && countitem(7005) > 0) goto N_QuestComp;
206        if (two_qset == 4) goto N_QuestStart;
207        mes "[Molly]";
208        mes "Sorry can't talk, I'm waiting for someone.";
209        close;
210N_QuestComp:
211        mes "[Molly]";
212        mes "WOW YOU DID IT!!!";
213        mes " ";
214        mes "I knew you looked strong, I have no idea how you could have killed that monster though.";
215        mes "thank you so much, here have these 3 Guild Tokens as a reward.";
216        set two_qset,0;
217        set On_Quest,0;
218        set #Treasure_Token,#Treasure_Token+3;
219        delitem 7005,1;
220        close;
221N_QuestStart:
222        mes "[Molly]";
223        mes "Wow you must be the brave man from the treasure hunter guild!";
224        mes "Ok here is whats happening, I don't know what started it but there is a strange Ronan Skeleton running aroung the woods 2 East from here.";
225        next;
226        mes "[Molly]";
227        mes "We have try to kill him in the past but it was not...ummm...It was a bad idea. What I want you to do is go there and bring me back his Skull as proof of you killing him.";
228        mes " ";
229        mes "Good Luck";
230        close;
231}
232///////Job list 3///////
233//3-1;
234moc_fild04,208,322,6    script  Clark   65,{
235        if (three_qset == 1 && countitem(1040) > 29) goto N_QuestComp;
236        if (three_qset == 1) goto N_QuestStart;
237        mes "[Clark]";
238        mes "Love to chat, but I'm waiting for someone.";
239        close;
240N_QuestComp:
241        mes "[Clark]";
242        mes "Ok well this is a start.";
243        mes " ";
244        mes "I hope that this hole will go away 1 day, and I might have another quest for you in the future.";
245        mes "here take these 2 Treasure Tokens.";
246        set #Treasure_Token,#Treasure_Token+2;
247        delitem 1040,30;
248        set three_qset,0;
249        set On_Quest,0;
250        close;
251N_QuestStart:
252        mes "[Clark]";
253        mes "Well hello to you.";
254        mes "You must be from the Treasure Hunter Guild.";
255        mes " ";
256        mes "Ok well this is my problem, yah see that hole in the ground? Yah that thing just popped out of nowhere a couple years ago, inside its full of these ugly ants and these monsters called Giearths.";
257        next;
258        mes "[Clark]";
259        mes "What I want you to do is kill some of the Giearths.Bring me 30 of there little Moustaches.";
260        close;
261}
262//3-2;
263yuno_fild01,186,162,6   script  Flank   73,{
264        if (three_qset == 2 && countitem(1082) > 0) goto N_QuestComp;
265        if (three_qset == 2) goto N_QuestStart;
266        mes "[Flank]";
267        mes "Sorry I'm waiting for my package so I don't want to talk.";
268        close;
269N_QuestComp:
270        mes "[Flank]";
271        mes "Perfect right on time, now I must be going to plant this bomb.... Err I meen give this package to my mother for her birthday.";
272        next;
273        mes "[Flank]";
274        mes "Thanks";
275        mes "Have this Treasure Token";
276        set three_qset,0;
277        delitem 1082,1;
278        set #Treasure_Token,#Treasure_Token+1;
279        set On_Quest,0;
280        close;
281N_QuestStart:
282        mes "[Flank]";
283        mes "So you have my packages?";
284        mes "Well where is it then?";
285        close;
286}
287//3-3 Goes to 7-3 using callfunc
288prt_sewb1,120,245,6     script  Sewer Managment Knight  705,{
289        if (three_qset == 3 && countitem(955) > 149) goto N_QuestComp;
290        if (three_qset == 3) goto N_QuestStart;
291        if (seven_qset == 3) goto N_QuestStart2;
292        mes "[Sewer Managmant]";
293        mes "Live dosent get any worse for me,working in the bug filled Culvert every day...";
294        close;
295N_QuestComp:
296        mes "[Sewer Managment]";
297        mes "Well that looked like it was no trouble for you.";
298        mes "Thanks have these 4 Treause Tokens.";
299        delitem 955,150;
300        set #Treasure_Token,#Treasure_Token+4;
301        set three_qset,0;
302        set On_Quest,0;
303        close;
304N_QuestStart:
305        mes "[Sewer Managmant]";
306        mes "For a while now we have had monster, mostly bugs infesting the culvert...";
307        mes " ";
308        mes "What I want you to do is kinda clean some of it out, every little bit counts.";
309        mes "Bring me 150 Worm Peelings.";
310        close;
311N_QuestStart2:
312        callfunc "seven_qset-3";
313        close;
314}
315//3-4
316mjolnir_02,87,357,6     script  Man#01  51,{
317        if (three_qset == 4 && countitem(1041) > 49) goto N_QuestComp;
318        if (three_qset == 4) goto N_QuestStart;
319        mes "[Rudolfo]";
320        mes "Danger, the Coal Mine is now a hostile area.";
321        close;
322N_QuestComp:
323        mes "[Rudolfo]";
324        mes "Well its good to see that you have come back alive.";
325        mes "I had my doughts but thank you for your help.";
326        mes " ";
327        mes "Here have these 4 Treasure Tokens.";
328        set three_qset,0;
329        set On_Quest,0;
330        delitem 1041,50;
331        set #Treasure_Token,#Treasure_Token+4;
332        close;
333N_QuestStart:
334        mes "[Rudolfo]";
335        mes "Hello, you must be from the Treasure Hunter Guild.";
336        mes " ";
337        mes "They must have filled you in on what is happening on the lower levels of this Coal Mine, I know its desturbing and we are still trying to figure out why and how 2 Evil Druids got down there.";
338        mes " ";
339        mes "Well what I want you to do is bring me 50 Lantern's as proof that you have cleaned some of them out, any loot you find down there you may keep other then what I have asked you to get for me.";
340        close;
341}
342///////Job list 4///////
343//4-1;
344pay_arche,45,138,6      script  Flora   724,{
345        if (four_qset == 1 && countitem(957) > 49) goto N_QuestComp;
346        if (four_qset == 1) goto N_QuestStart;
347        mes "[Flora]";
348        mes "Well hello be carfull in the cave, we have heard reports of Undead monster funning around.";
349        close;
350N_QuestComp:
351        mes "[Flora]";
352        mes "Welcome back, good job you did it. (I wonder if that Flaming Bastard is still alive)";
353        mes "Well I hope that cut down a bit on the monsters and here have these 2 Tokens.";
354        set #Treasure_Token,#Treasure_Token+2;
355        delitem 957,50;
356        set four_qset,0;
357        set On_Quest,0;
358        killmonster "pay_dun00","Flora::OnMobDead";
359        close;
360N_QuestStart:
361        mes "[Flora]";
362        mes "Well hello there.";
363        mes " ";
364        mes "Well this is what I need you to do, bring me 50 Decayed Nails - awile back Payon Cave used to be a safe place to go...But now things have gone out of controll and Zombies have invaded the first floor...";
365        mes " ";
366        mes "There is also these new monsters that have just poped out of no were, we call them Flaming Bastards...Be carfull if you arn't powerfull yet because they are very strong.";
367        next;
368        mes "[Flora]";
369        mes "Good Luck";
370        mes "Remember I need 50 Nail's";
371        monster "pay_dun00",0,0,"Flaming Bastard",1072,1,"Flora::OnMobDead";
372        monster "pay_dun00",0,0,"Flaming Bastard",1072,1,"Flora::OnMobDead";
373        close;
374OnMobDead:
375        end;
376}
377//4-2;
378yuno,45,138,6   script  Zed     735,{
379        if (four_qset == 2 && countitem(1999) > 0) goto N_QuestComp;
380        if (four_qset == 2) goto N_QuestStart;
381        mes "[Zed]";
382        mes "Get out of my face you flake.";
383        close;
384N_QuestComp:
385        mes "[Zed]";
386        mes "Dear god took you long enough you bastard!";
387        mes "You know how much my time is worth!!!!";
388        mes "Your slow and I'm never gona recomend a job for you, Gimmie my staff and get out of me face!";
389        next;
390        mes "[Zed]";
391        mes "Well you can take this crapy Treausre Token.";
392        set On_Quest,0;
393        set four_qset,0;
394        delitem 1999,1;
395        set #Treasure_Token,#Treasure_Token+1;
396        close;
397N_QuestStart:
398        mes "[Zed]";
399        mes "Where's my staff?";
400        close;
401}
402//4-3;
403prontera,176,204,6      script  Dassy   95,{
404        if (four_qset == 3 && countitem(711) > 19) goto N_QuestComp;
405        if (four_qset == 3) goto N_QuestStart;
406        mes "[Dassy]";
407        mes "Hello!";
408        close;
409N_QuestComp:
410        mes "[Dassy]";
411        mes "Yes! Now my pet will not starve!";
412        mes "Thank you so much!";
413        mes "Have this Treasure Token.";
414        set On_Quest,0;
415        set four_qset,0;
416        delitem 711,20;
417        set #Treasure_Token,#Treasure_Token+1;
418        close;
419N_QuestStart:
420        mes "[Dassy]";
421        mes "Hello person!!";
422        mes "You have come to help me? Yes, yes.";
423        mes " ";
424        mes "Ok I don't want to talk about it but I need you to fine me 20 Shoot's";
425        mes "Thank you!";
426        close;
427}
428//4-4;
429prt_gld,157,99,6        script  Czhore  752,{
430        if (four_qset == 4 && countitem(714) > 0) goto N_QuestComp;
431        if (four_qset == 4) goto N_QuestStart;
432        mes "[Czhore]";
433        mes "Hello friend";
434        mes "Have you come to check out one of these guild halls?";
435        close;
436N_QuestComp:
437        mes "[Czhore]";
438        mes "Thank god!";
439        mes " ";
440        mes "I'm so happy to see one of these Emperiums! Thank you "+strcharinfo(0)+".";
441        next;
442        mes "[Czhore]";
443        mes "Here have these 2 Treasure Tokens.";
444        mes "And some of my old treasure...";
445        monster "prt_gld",155,99,"Old Man's Treasure",1324,1;
446        set four_qset,0;
447        set On_Quest,0;
448        delitem 714,1;
449        set #Treasure_Token,#Treasure_Token+2;
450        close;
451N_QuestStart:
452        mes "[Czhore]";
453        mes "Hello friend";
454        mes "I know this may sound stupid but ever since I was a boy I have dreamed of having an Emperium...";
455        mes "As I know I look old, I have just never been able to find one, now that I am retired from the Treasure Hunter Guild there is no more action for me...";
456        mes " ";
457        mes "If you can get me one I shall reward you.";
458        close;
459}
460///////Job list 5///////
461//5-1;
462prt_maze01,18,184,6     script  Lithin#01       752,{
463        if (five_qset == 1 && countitem(1028) > 14) goto N_QuestComp;
464        if (five_qset == 1) goto N_QuestStart;
465        mes "[Lithin]";
466        mes "Well hello.";
467        mes "Welcome to the Forest Maze.";
468        close;
469N_QuestComp:
470        mes "[Lithin]";
471        mes "Oh thank you so much, but they will be back...";
472        next;
473        mes "Take these 2 Treasure Tokens";
474        set five_qset,0;
475        set On_Quest,0;
476        set #Treasure_Token,#Treasure_Token+2;
477        delitem 1028,15;
478        close;
479N_QuestStart:
480        mes "[Lithin]";
481        mes "Well hello.";
482        mes "Welcome to the Forest Maze, I have a task for you.";
483        mes " ";
484        mes "Ever heard of a moster called a Savage? It looks like a boar but it makes very annoying noices.";
485        mes "What I want you to do is bring me 15 Manes from the savages.";
486        close;
487}
488//5-2 goes to 6-2 using callfunc;
489moc_ruins,75,167,6      script  Lithin#02       87,{
490        if (five_qset == 2 && countitem(932) > 29) goto N_QuestComp;
491        if (five_qset == 2) goto N_QuestStart;
492        if (six_qset == 2) goto N_QuestStart2;
493        mes "[Strange Man]";
494        mes "...";
495        close;
496N_QuestComp:
497        mes "[Strange Man]";
498        mes "Much thanks I have for you.";
499        next;
500        mes "Take with you these 2 Treasure Token's.";
501        set #Treasure_Token,#Treasure_Token+2;
502        set five_qset,0;
503        set On_Quest,0;
504        delitem 932,30;
505        close;
506N_QuestStart:
507        mes "[Strange Man]";
508        mes "Must do for me you shall.Venture through the Pyramid.";
509        mes "When second floor you have reached,slay skeletons of evil.";
510        mes "Bring me back there bones you must.";
511        mes "It is 30 that I desire.";
512        close;
513N_QuestStart2:
514        callfunc "six_qset2";
515}
516//5-3;
517geffen,57,130,6 script  Blonde Girl     724,{
518        if (five_qset == 3 && countitem(744) > 0) goto N_QuestComp;
519        if (five_qset == 3) goto N_QuestStart;
520        mes "[Blonde Girl]";
521        mes "I wonder what happened to my flowers";
522        close;
523N_QuestComp:
524        mes "[Blonde Girl]";
525        mes "Oh are these my flower! To bad I don't want them anymore...";
526        mes " ";
527        mes "You can keep them is you want.";
528        next;
529        mes "[Blonde Girl]";
530        mes "Here take this Treasure Token as a reward.";
531        set five_qset,0;
532        set On_Quest,0;
533        set #Treasure_Token,#Treasure_Token+1;
534        close;
535N_QuestStart:
536        mes "[Blonde Girl]";
537        mes "Hello, did you bring me flowers!?!";
538        close;
539}
540//5-4;
541gef_tower,49,27,6       script  Wizard#01       735,{
542        if (five_qset == 4 && countitem(1059) > 49) goto N_QuestComp;
543        if (five_qset == 4) goto N_QuestStart;
544        mes "[Wizard]";
545        mes "Hello, have you seen my Whisper friend?";
546        close;
547N_QuestComp:
548        mes "[Wizard]";
549        mes "Thank you for helping me, I presume the worse.";
550        next;
551        mes "[Wizard]";
552        mes "Here take these 4 Treasure Tokens.";
553        set five_qset,0;
554        set On_Quest,0;
555        delitem 1059,50;
556        set #Treasure_Token,#Treasure_Token+4;
557        close;
558N_QuestStart:
559        mes "[Wizard]";
560        mes "Hello, the reason why I brought you here was because of a long time ago I made a friend, which happened to be a Whipser.";
561        mes "He told me that he was always bullied by the other ghosts down there and I haven't seen him in a while.";
562        mes "Thinking of the worse case here, I want vengance!";
563        mes " ";
564        mes "Bring me 50 Fabrics!";
565        close;
566}
567///////Job list 6///////
568//6-1;
569moc_prydb1,47,132,6     script  Thief   48,{
570        if (six_qset == 1 && countitem(1083) > 0) goto N_QuestComp;
571        if (six_qset == 1) goto N_QuestStart;
572        mes "[Thief]";
573        mes "Welcome to the Thiefs Guild.";
574        close;
575N_QuestComp:
576        mes "[Thief]";
577        mes "Thank you for this delivery.";
578        next;
579        mes "[Thief]";
580        mes "Here take this Treasure Token as a reward.";
581        set six_qset,0;
582        delitem 1083,1;
583        set On_Quest,0;
584        set #Treasure_Token,#Treasure_Token+1;
585        close;
586N_QuestStart:
587        mes "[Thief]";
588        mes "Where's my delivery?";
589        close;
590}
591//6-2
592function        script  six_qset2       {
593        if (six_qset == 2 && countitem(930) > 29) goto N_QuestComp2;
594        mes "[Strange Man]";
595        mes "Another quest for you I have.";
596        mes "Futher into the pyramid you must go.";
597        mes "Fighting Mummys is future for you.";
598        mes " ";
599        mes "Bring back for me their wrappings you must.";
600        mes "It is 30 Rotten bandages I desire.";
601        close;
602N_QuestComp2:
603        mes "[Strange Man]";
604        mes "Much thanks for you that I have.";
605        next;
606        mes "[Strange Man]";
607        mes "Take with you these 3 tokens.";
608        set #Treasure_Token,#Treasure_Token+3;
609        delitem 930,30;
610        set On_Quest,0;
611        set six_qset,0;
612        close;
613}
614//6-3;
615xmas,144,136,6  script  Chirach 48,{
616        if (six_qset == 3 && countitem(1083) > 0) goto N_QuestComp;
617        if (six_qset == 3) goto N_QuestStart;
618        mes "[Chirach]";
619        mes "Welcome.";
620        close;
621N_QuestComp:
622        mes "[Chirach]";
623        mes "Thank you for this delivery.";
624        next;
625        mes "[Chirach]";
626        mes "Here take this Treasure Token as a reward.";
627        set six_qset,0;
628        delitem 1083,1;
629        set On_Quest,0;
630        set #Treasure_Token,#Treasure_Token+1;
631        close;
632N_QuestStart:
633        mes "[Chirach]";
634        mes "Where's my delivery?";
635        close;
636}
637//6-4;
638gef_tower,52,87,6       script  Wizard#02       735,{
639        if (six_qset == 4 && countitem(944) > 19) goto N_QuestComp;
640        if (six_qset == 4) goto N_QuestStart;
641        mes "[Zuuzuu]";
642        mes "Hello, welcome to geffen tower.";
643        close;
644N_QuestComp:
645        mes "[Wizard]";
646        mes "Thank you for helping me.";
647        next;
648        mes "Here take these 4 Treasure Tokens.";
649        set six_qset,0;
650        set On_Quest,0;
651        delitem 944,20;
652        set #Treasure_Token,#Treasure_Token+4;
653        next;
654        mes "[Zuuzuu]";
655        mes "Oh dear god!!!";
656        mes "One of those evil mosters has followed you up here, Kill it, Kill it!!!";
657        next;
658        monster "gef_tower",42,89,"Evil Nightmare",1061,1;
659        close;
660N_QuestStart:
661        mes "[Zuuzuu]";
662        mes "Hello, the reason I sent for a young adventurer was because of the problems we are having under the tower.";
663        mes "There seem to be more ghosts day after day down there. What I need you to do is go down there and find these mosters we call Nightmares.";
664        mes " ";
665        mes "You must slay them and bring me 20 of there horse shoes.";
666        close;
667}
668///////Job list 7///////
669//7-1 goes to 8-1 using callfunc;
670prontera,123,208,6      script  Little Girl     717,{
671        if (seven_qset == 1 && countitem(531) > 4) goto N_QuestComp;
672        if (seven_qset == 1) goto N_QuestStart;
673        if (eight_qset == 1) goto N_QuestStart2;
674        mes "[Girl]";
675        mes "Hello mister "+strcharinfo(0)+".";
676        close;
677N_QuestComp:
678        mes "[Girl]";
679        mes "Thank you so much!";
680        next;
681        mes "[Girl]";
682        mes "Have these 1 Treasure Tokens.";
683        set seven_qset,0;
684        set On_Quest,0;
685        delitem 531,5;
686        set #Treasure_Token,#Treasure_Token+1;
687        close;
688N_QuestStart:
689        mes "[Girl]";
690        mes "Hi mister person. Can you get me some apple juice?";
691        mes "I want 5 of them.";
692        close;
693N_QuestStart2:
694        callfunc "eight_qset1";
695}
696//7-2;
697alberta,101,84,6        script  Charles 48,{
698        if (seven_qset == 2 && countitem(1082) > 0) goto N_QuestComp;
699        if (seven_qset == 2) goto N_QuestStart;
700        mes "[Charles]";
701        mes "Hello "+strcharinfo(0)+" welcome to Alberta.";
702        close;
703N_QuestComp:
704        mes "[Charles]";
705        mes "Thank you for this delivery.";
706        next;
707        mes "[Charles]";
708        mes "Here take this Treasure Token as a reward.";
709        set seven_qset,0;
710        delitem 1082,1;
711        set On_Quest,0;
712        set #Treasure_Token,#Treasure_Token+1;
713        close;
714N_QuestStart:
715        mes "[Charles]";
716        mes "So where is my package?";
717        close;
718}
719//7-3
720function        script  seven_qset-3    {
721        if (seven_qset == 3 && countitem(969) > 0) goto N_QuestComp2;
722        mes "[Sewer Managment]";
723        mes "Well there have been reports of a Golden Thief Bug running around the bottem on the Culvert";
724        mes " ";
725        mes "Bring me 1 Gold Bar from him.";
726        close;
727N_QuestComp2:
728        mes "[Sewer Managment]";
729        mes "Thank you for helping me.";
730        next;
731        mes "[Sewer Managment]";
732        mes "Here take these 4 Treasure Tokens.";
733        set seven_qset,0;
734        set On_Quest,0;
735        delitem 969,1;
736        set #Treasure_Token,#Treasure_Token+4;
737        close;
738}
739//7-4;
740alb2trea,94,102,6       script  Scarlet 725,{
741        if (seven_qset == 4 && countitem(1127) > 0) goto N_QuestComp;
742        if (seven_qset == 4) goto N_QuestStart;
743        mes "[Scarlet]";
744        mes "Sorry, busy.";
745        close;
746N_QuestComp:
747        mes "[Scarlet]";
748        mes "Thank you for helping me, I presume the worse.";
749        next;
750        mes "[Scarlet]";
751        mes "Here take these 4 Treasure Tokens.";
752        set seven_qset,0;
753        set On_Quest,0;
754        delitem 1127,1;
755        set #Treasure_Token,#Treasure_Token+4;
756        close;
757N_QuestStart:
758        mes "[Scarlet]";
759        mes "Good your here. Ok there are reports of an old captain named Drake abored this ship. Kill Him!";
760        mes " ";
761        mes "Bring me his Saber as proof!";
762        close;
763}
764///////Job list 8///////
765//8-1
766function        script  eight_qset1     {
767        if (eight_qset == 1 && countitem(532) > 4) goto N_QuestComp2;
768        mes "[Girl]";
769        mes "Hi mister person. Can you get me some Banana juice?";
770        mes "I want 5 of them.";
771        close;
772N_QuestComp2:
773        mes "[Girl]";
774        mes "Thank you so much!";
775        next;
776        mes "[Girl]";
777        mes "Have these 1 Treasure Tokens.";
778        set eight_qset,0;
779        set On_Quest,0;
780        delitem 532,5;
781        set #Treasure_Token,#Treasure_Token+1;
782        close;
783}
784//8-2;
785morocc,165,55,6 script  Klye    48,{
786        if (eight_qset == 2 && countitem(1081) > 0) goto N_QuestComp;
787        if (eight_qset == 2) goto N_QuestStart;
788        mes "[Klye]";
789        mes "Hello "+strcharinfo(0)+".";
790        close;
791N_QuestComp:
792        mes "[Klye]";
793        mes "Thank you for this delivery.";
794        next;
795        mes "[Klye]";
796        mes "Here take this Treasure Token as a reward.";
797        set eight_qset,0;
798        delitem 1081,1;
799        set On_Quest,0;
800        set #Treasure_Token,#Treasure_Token+1;
801        close;
802N_QuestStart:
803        mes "[Kyle]";
804        mes "So where's my Delivery";
805        close;
806
807}
808//8-3;
809prt_maze02,103,86,6     script  Zack    751,{
810        if (eight_qset == 3 && countitem(923) > 0) goto N_QuestComp;
811        if (eight_qset == 3) goto N_QuestStart;
812        mes "[Zack]";
813        mes "Hello, have you seen my Whisper friend?";
814        close;
815N_QuestComp:
816        mes "[Zack]";
817        mes "Thank you for helping me, I presume the worse.";
818        next;
819        mes "[Zack]";
820        mes "Here take these 5 Treasure Tokens.";
821        set eight_qset,0;
822        set On_Quest,0;
823        delitem 923,1;
824        set #Treasure_Token,#Treasure_Token+5;
825        close;
826N_QuestStart:
827        mes "[Zack]";
828        mes "Hello,the reason why I brought you here was because of a very strange monster known as Baphomet.";
829        mes "People say that Baphomet guilds the gate to the under-world but I don't belive them, Kill Baphomet!";
830        mes " ";
831        mes "Bring me his Evil Horn!";
832        close;
833}
834//8-4;
835payon,136,129,6 script  Flower  703,{
836        if (eight_qset == 4 && countitem(746) > 9) goto N_QuestComp;
837        if (eight_qset == 4) goto N_QuestStart;
838        mes "[Flower]";
839        mes "Sorry I'm waiting for someone. You will have to come back later.";
840        close;
841N_QuestComp:
842        mes "[Flower]";
843        mes "Thank you for helping me, I presume the worse.";
844        next;
845        mes "[Flower]";
846        mes "Here take these 2 Treasure Tokens.";
847        set eight_qset,0;
848        set On_Quest,0;
849        delitem 746,10;
850        set #Treasure_Token,#Treasure_Token+2;
851        close;
852N_QuestStart:
853        mes "[Flower]";
854        mes "Help, help I have lost my Beads!! My brother Bush is going to kill me please help";
855        mes " ";
856        mes "Bring me 10 Glass Beads!";
857        close;
858}
859///////Job list 9///////
860//9-1;
861geffen_in,168,124,6     script  Mage    48,{
862        if (nine_qset == 1 && countitem(1082) > 0) goto N_QuestComp;
863        if (nine_qset == 1) goto N_QuestStart;
864        mes "[Mage]";
865        mes "Hello "+strcharinfo(0)+" welcome to the Mage Guild.";
866        close;
867N_QuestComp:
868        mes "[Mage]";
869        mes "Thank you for this delivery. Sorry about the smell, Its a box of Toad Tounges";
870        next;
871        mes "[Mage]";
872        mes "Here take this Treasure Token as a reward.";
873        set nine_qset,0;
874        delitem 1082,1;
875        set On_Quest,0;
876        set #Treasure_Token,#Treasure_Token+1;
877        close;
878N_QuestStart:
879        mes "[Mage]";
880        mes "Hello "+strcharinfo(0)+", Where is my box of Toad Tounges?.";
881        close;
882}
883//9-2;
884pay_arche,98,74,6       script  School Girl     703,{
885        if (nine_qset == 2 && countitem(1020) > 19) goto N_QuestComp;
886        if (nine_qset == 2) goto N_QuestStart;
887        mes "[School Girl]";
888        mes "Sorry I'm waiting for someone, you will have to come back later";
889        close;
890N_QuestComp:
891        mes "[School Girl]";
892        mes "Thank you for helping me.";
893        next;
894        mes "[School Girl]";
895        mes "Here take these 4 Treasure Tokens.";
896        set nine_qset,0;
897        set On_Quest,0;
898        delitem 1020,20;
899        set #Treasure_Token,#Treasure_Token+4;
900        close;
901N_QuestStart:
902        mes "[School Girl]";
903        mes "Help, Well what we know about Payon is that a while ago there was a freak fire that burnt down the old school.";
904        next;
905        mes "[School Girl]";
906        mes "The strange thing about what happened was that the children inside did not seem to die from the flames. They have taken over the entire 3rd floor of Payon Cave.";
907        mes " ";
908        mes "Bring me 20 Black Hair!";
909        close;
910}
911//9-3
912payon_in02,19,33,6      script  Jack    740,{
913        if (nine_qset == 3 && countitem(1022) > 0) goto N_QuestComp;
914        if (nine_qset == 3) goto N_QuestStart;
915        if (nine_qset == 4) goto N_QuestStart2;
916        mes "[Jack]";
917        mes "Sorry I'm waiting for someone, you will have to come back later";
918        close;
919N_QuestComp:
920        mes "[Jack]";
921        mes "Thank you for helping me.";
922        next;
923        mes "[Jack]";
924        mes "Here take these 4 Treasure Tokens.";
925        set nine_qset,0;
926        set On_Quest,0;
927        delitem 1022,1;
928        set #Treasure_Token,#Treasure_Token+4;
929        close;
930N_QuestStart:
931        mes "[Jack]";
932        mes "Well I don't know much about this, it has to do with the deepest reagions of Payon Cave. We don't know much because no one ever seems to make it back alive. We suspect a monster we call the Moonlight Flower";
933        mes " ";
934        mes "Bring me back 1 Nine Tales!";
935        close;
936N_QuestStart2:
937//9-4
938        if (nine_qset == 4 && countitem(901) > 39) goto N_QuestComp2;
939        mes "[Jack]";
940        mes "Hello, we need you to investigate some crap in the 3rd level of payon.";
941        mes " ";
942        mes "Bring me back 40 Daenggie's.";
943        close;
944N_QuestComp2:
945        mes "[Jack]";
946        mes "Thank you for helping me.";
947        next;
948        mes "[Jack]";
949        mes "Here take these 3 Treasure Tokens.";
950        set nine_qset,0;
951        set On_Quest,0;
952        delitem 901,40;
953        set #Treasure_Token,#Treasure_Token+3;
954        close;
955}
956///////Job list 10///////
957//10-1
958morocc,193,51,6 script  Kreg    48,{
959        if (ten_qset == 1 && countitem(1082) > 0) goto N_QuestComp;
960        if (ten_qset == 1) goto N_QuestStart;
961        mes "[Kreg]";
962        mes "Hello "+strcharinfo(0)+" welcome to Morroc.";
963        close;
964N_QuestComp:
965        mes "[Kreg]";
966        mes "Thank you for this delivery.";
967        next;
968        mes "[Kreg]";
969        mes "Here take this Treasure Token as a reward.";
970        set ten_qset,0;
971        delitem 1082,1;
972        set On_Quest,0;
973        set #Treasure_Token,#Treasure_Token+1;
974        close;
975N_QuestStart:
976        mes "[Kreg]";
977        mes "So where's my Delivery";
978        close;
979}
980//10-2;
981pay_fild10,145,252,6    script  Man#02  122,{
982        if (ten_qset == 2 && countitem(1029) > 0) goto N_QuestComp;
983        if (ten_qset == 2) goto N_QuestStart;
984        mes "[Man]";
985        mes "Sorry I'm waiting for someone, you will have to come back later";
986        close;
987N_QuestComp:
988        mes "[Man]";
989        mes "Thank you for helping me.";
990        next;
991        mes "[Man]";
992        mes "Here take these 4 Treasure Tokens.";
993        set ten_qset,0;
994        set On_Quest,0;
995        delitem 1029,1;
996        set #Treasure_Token,#Treasure_Token+4;
997        close;
998N_QuestStart:
999        mes "[Man]";
1000        mes "Tony the Tiger is on Crack! He must be stoped, KILL HIM!";
1001        mes " ";
1002        mes "Bring me back 1 Tiger's_Skin!";
1003        close;
1004}
1005//10-3;
1006moc_fild04,193,51,6     script  Caral   119,{
1007        if (ten_qset == 3 && countitem(1015) > 0) goto N_QuestComp;
1008        if (ten_qset == 3) goto N_QuestStart;
1009        mes "[Caral]";
1010        mes "Sorry I'm waiting for someone, you will have to come back later.";
1011        close;
1012N_QuestComp:
1013        mes "[Caral]";
1014        mes "Thank you for helping me.";
1015        next;
1016        mes "[Caral]";
1017        mes "Here take these 4 Treasure Tokens.";
1018        set ten_qset,0;
1019        set On_Quest,0;
1020        delitem 1015,1;
1021        set #Treasure_Token,#Treasure_Token+4;
1022        close;
1023N_QuestStart:
1024        mes "[Caral]";
1025        mes "Phreeoni the Pink Fluff is terrorizing little novices! He must be stoped, KILL HIM!";
1026        mes " ";
1027        mes "Bring me back 1 Tounge!";
1028        close;
1029}
1030//10-4
1031moc_fild15,250,251,6    script  Jeni    727,{
1032        if (ten_qset == 4 && countitem(1096) > 0) goto N_QuestComp;
1033        if (ten_qset == 4) goto N_QuestStart;
1034        mes "[Jeni]";
1035        mes "Sorry I'm waiting for someone, You will have to come back later";
1036        close;
1037N_QuestComp:
1038        mes "[Jeni]";
1039        mes "Thank you for helping me.";
1040        next;
1041        mes "[Jeni]";
1042        mes "Here take these 3 Treasure Tokens.";
1043        set ten_qset,0;
1044        set On_Quest,0;
1045        delitem 1096,1;
1046        set #Treasure_Token,#Treasure_Token+3;
1047        close;
1048N_QuestStart:
1049        mes "[Jeni]";
1050        mes "This half naked freak need an army to take down, now its your job,good luck.";
1051        mes " ";
1052        mes "Bring me back 1 Round Shell!";
1053        close;
1054}
Note: See TracBrowser for help on using the browser.