root/npc/custom/quests/event_6_new_hats.txt @ 6

Revision 1, 10.7 kB (checked in by jinshiro, 17 years ago)
Line 
1//===== eAthena Script =======================================
2//= Custom Quest For New Headgears
3//===== By: ==================================================
4//= RedxSwordxHero, Lupus
5//===== Current Version: =====================================
6//= 1.4b
7//===== Compatible With: =====================================
8//= eAthena 1.0
9//===== Description: =========================================
10//= 4 brothers give you quests to get 6 new hats (missing
11//=     from official quests)
12//= Use this custom quest instead of event_32_new_hats.txt
13//= -Bongun Hat
14//= -Poring Hat, Sphinx Hat
15//= -Kafra Band, Panda Hat
16//= -Crescent Hairpin
17//===== Additional Comments: =================================
18//= Event New Hats by RedxSwordxHero
19//= Ported and improved with timers [Lupus]
20//= Thanks to x[tsk],fixed all item requirements to iRO specs exept
21//= for hats which cannot be made on the real server. [Lupus]
22//= 1.2 removed already existing official hat quests [Lupus]
23//= 1.3 Spiffed up the NPC coords and their appearance [Lupus]
24//= 1.4 Fixed exploits. 1.4a fixed wrong item ID [Lupus]
25//============================================================
26
27
28prt_in,130,66,5 script  Zac     704,{
29        mes "[Zac]";
30        mes "I am the oldest and strongest of the 4 brothers that makes all the newer hats. You will need to bring me the correct items for each hat, so I can make them.";
31        next;
32        mes "[Zac]";
33        mes "I provide 1 hat and my brothers provides the other 5.";
34        next;
35        menu "Join",L1,"Information",L2,"Cancel",L3;
36L1:     
37        mes "[Zac]";
38        mes "What hat do you want me to make?";
39        next;
40        menu "Bongun Hat",L1_4;
41L1_4:
42        mes "[Zac]";
43        mes "Let me check the items you have brought here.";
44        next;
45        if(countitem(609) < 10) goto L_ITEM_1c;//Items: Amulet,
46        if(countitem(978) < 1) goto L_ITEM_2c;//Items: Cobaltblue Dyestuff,
47        if(countitem(2264) < 1) goto L_ITEM_3c;//Items: Munak Hat,
48        delitem 609,10;//Items: Amulet,
49        delitem 978,1;//Items: Cobaltblue Dyestuff,
50        delitem 2264,1; //Items: Munak Hat,
51        mes "[Zac]";
52        mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Bongun Hat for you right away. Please Wait a Moment.";
53        next;
54        mes "[Zac]";
55        mes "Tah Dah! ^FF0000Bongun Hat^000000...! Please Take it!";
56        getitem 5046,1;//Items: Bongun Hat,
57        next;
58        mes "[Zac]";
59        mes "I liked that, I look forward to making more. Thank you.";
60        close;
61L_ITEM_1c:
62        mes "[Zac]";
63        mes "Oh, dear. You need 10 Amulets...";
64        close;
65L_ITEM_2c:
66        mes "[Zac]";
67        mes "Oh, dear. You need 1 Cobaltblue Dyestuffs...";
68        close;
69L_ITEM_3c:
70        mes "[Zac]";
71        mes "Oh, dear. You need 1 Munak Hat...";
72        close;
73L2:     
74        mes "[Zac]";
75        mes "Which hat materials do you wish to know?";
76        next;
77        menu "Bongun Hat",L2_4;
78L2_4:
79        mes "[Zac]";
80        mes "You need 10 Amulets, 1 Cobaltblue Dyestuffs and 1 Munak Hat for Bongun Hat.";
81        close;
82L3:
83        mes "[Zac]";
84        mes "Stop by some other time with the right materials, so I can make the hats for you.";
85        close;
86}
87
88prt_in,162,131,5        script  Blac    732,{
89        mes "[Blac]";
90        mes "I am the youngest and sexiest of the 4 brothers that makes all the newer hats. You will need to bring me the correct items for each hat, so I can make them.";
91        next;
92        mes "[Blac]";
93        mes "I provide 1 hat and my brothers provides the other 5.";
94        next;
95        menu "Join",L1,"Information",L2,"Cancel",L3;
96L1:     
97        mes "[Blac]";
98        mes "What hat do you want me to make?";
99        next;
100        menu "Crescent Hairpin",L1_9;
101L1_9:
102        mes "[Blac]";
103        mes "Let me check the items you have brought here.";
104        next;
105        if(countitem(5041) < 1) goto L_ITEM_1;//Items: Heart Hairpin,
106        if(countitem(999) < 10) goto L_ITEM_2;//Items: Steel,
107        delitem 5041,1;//Items: Heart Hairpin,
108        delitem 999,10; //Items: Steel,
109        mes "[Blac]";
110        mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Crescent Hairpin for you right away. Please Wait a Moment.";
111        next;
112        mes "[Blac]";
113        mes "Tah Dah! ^FF0000Crescent Hairpin^000000...! Please Take it!";
114        getitem 5048,1;//Items: Cresent Hairpin,
115        next;
116        mes "[Blac]";
117        mes "I liked that, I look forward to making more. Thank you.";
118        close;
119L_ITEM_1:
120        mes "[Blac]";
121        mes "Oh, dear. You need 1 Heart Hairpin...";
122        close;
123L_ITEM_2:
124        mes "[Blac]";
125        mes "Oh, dear. You need 10 Steels...";
126        close;
127L2:     
128        mes "[Blac]";
129        mes "Which hat materials do you wish to know?";
130        next;
131        menu "Crescent Hairpin",L2_9;
132L2_9:
133        mes "[Blac]";
134        mes "You need 1 Heart Hairpin and 10 Steels for Crescent Hairpin.";
135        close;
136L3:
137        mes "[Blac]";
138        mes "Stop by some other time with the right materials, so I can make the hats for you.";
139        close;
140}
141
142prt_in,53,56,5  script  Jac     107,{
143        mes "[Jac]";
144        mes "I am the 2nd oldest and calmest of the 4 brothers that makes all the newer hats. You will need to bring me the correct items for each hat, so I can make them.";
145        next;
146        mes "[Jac]";
147        mes "I provide 2 hats and my brothers provides the other 4.";
148        next;
149        menu "Join",L1,"Information",L2,"Cancel",L3;
150L1:     
151        mes "[Jac]";
152        mes "What hat do you want me to make?";
153        next;
154        menu "Kafra Band",L1_19,"Panda Hat",L1_24;
155L1_19:
156        mes "[Jac]";
157        mes "Let me check the items you have brought here.";
158        next;
159        if(countitem(10007) < 1) goto L_ITEM_1b;//Items: Silk Ribbon,
160        if(countitem(10009) < 1) goto L_ITEM_2b;//Items: Wild Flower,
161        delitem 10007,1;//Items: Silk Ribbon,
162        delitem 10009,1;        //Items: Wild Flower,
163        mes "[Jac]";
164        mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Kafra Band for you right away. Please Wait a Moment.";
165        next;
166        mes "[Jac]";
167        mes "Tah Dah! ^FF0000Kafra Band^000000...! Please Take it!";
168        getitem 5020,1;//Items: Kafra's Band,
169        next;
170        mes "[Jac]";
171        mes "I liked that, I look forward to making more. Thank you.";
172        close;
173L_ITEM_1b:
174        mes "[Jac]";
175        mes "Oh, dear. You need 1 Silk Ribbon...";
176        close;
177L_ITEM_2b:
178        mes "[Jac]";
179        mes "Oh, dear. You need 1 Wild Flower...";
180        close;
181L1_24:
182        mes "[Jac]";
183        mes "Let me check the items you have brought here.";
184        next;
185        if(countitem(999) < 10) goto L_ITEM_1g;//Items: Steel,
186        if(countitem(948) < 200) goto L_ITEM_2g;//Items: Bears Footskin,
187        delitem 999,10;//Items: Steel,
188        delitem 948,200;        //Items: Bears Footskin,
189        mes "[Jac]";
190        mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Panda Hat for you right away. Please Wait a Moment.";
191        next;
192        mes "[Jac]";
193        mes "Tah Dah! ^FF0000Panda Hat^000000...! Please Take it!";
194        getitem 5030,1;//Items: Panda Hat,
195        next;
196        mes "[Jac]";
197        mes "I liked that, I look forward to making more. Thank you.";
198        close;
199L_ITEM_1g:
200        mes "[Jac]";
201        mes "Oh, dear. You need 10 Steels...";
202        close;
203L_ITEM_2g:
204        mes "[Jac]";
205        mes "Oh, dear. You need 200 Bear Footskins...";
206        close; 
207L2:     
208        mes "[Jac]";
209        mes "Which hat materials do you wish to know?";
210        next;
211        menu "Kafra Band",L2_19,"Panda Hat",L2_24;
212L2_19:
213        mes "[Jac]";
214        mes "You need 1 Silk Ribbon and 1 Wild Flower for Kafra Band.";
215        close;
216L2_24:
217        mes "[Jac]";
218        mes "You need 10 Steels and 200 Bear Footskins for Panda Hat.";
219        close;         
220L3:
221        mes "[Jac]";
222        mes "Stop by some other time with the right materials, so I can make the hats for you.";
223        close;
224}
225
226prt_in,45,113,5 script  Pac     705,{
227        mes "[Pac]";
228        mes "I am 3rd oldest and wisest of the 4 brothers that makes all the newer hats. You will need to bring me the correct items for each hat so I can make them.";
229        next;
230        mes "[Pac]";
231        mes "I provide 2 hats and my brothers provides the other 4.";
232        next;
233        menu "Join",L1,"Information",L2,"Cancel",L3;
234L1:     
235        mes "[Pac]";
236        mes "What hat do you want me to make?";
237        next;
238        menu "Poring Hat",L1_26,"Sphinx Hat",L1_29;
239L1_26:
240        mes "[Pac]";
241        mes "Let me check the items you have brought here.";
242        next;
243        if(countitem(741) < 1) goto L_ITEM_1a;//Items: Poring Doll,
244        if(countitem(909) < 300) goto L_ITEM_2a;//Items: Jellopy,
245        delitem 741,1;//Items: Poring Doll,
246        delitem 909,300;//Items: Jellopy,
247        mes "[Pac]";
248        mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Poring Hat for you right away. Please Wait a Moment.";
249        next;
250        mes "[Pac]";
251        mes "Tah Dah! ^FF0000Poring Hat^000000...! Please Take it!";
252        getitem 5035,1;//Items: Poring Hat,
253        next;
254        mes "[Pac]";
255        mes "I liked that, I look forward to making more. Thank you.";
256        close;
257L_ITEM_1a:
258        mes "[Pac]";
259        mes "Oh, dear. You need 1 Poring Doll...";
260        close;
261L_ITEM_2a:
262        mes "[Pac]";
263        mes "Oh, dear. You need 300 Jellopys...";
264        close;
265L1_29:
266        mes "[Pac]";
267        mes "Let me check the items you have brought here.";
268        next;
269        if(countitem(999) < 25) goto L_ITEM_1d;//Items: Steel,
270        if(countitem(979) < 1) goto L_ITEM_2d;//Items: Darkgreen Dyestuff,
271        if(countitem(976) < 1) goto L_ITEM_3d;//Items: Lemon Dyestuffs,
272        if(countitem(1059) < 150) goto L_ITEM_4d;//Items: Fabric,
273        if(countitem(969) < 2) goto L_ITEM_5d;//Items: Gold,
274        delitem 999,25;//Items: Steel,
275        delitem 979,1;//Items: Darkgreen Dyestuff,
276        delitem 976,1;//Items: Lemon Dyestuffs,
277        delitem 1059,150;//Items: Fabric,
278        delitem 969,2;  //Items: Gold,
279        mes "[Pac]";
280        mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Sphinx Hat for you right away. Please Wait a Moment.";
281        next;
282        mes "[Pac]";
283        mes "Tah Dah! ^FF0000Sphinx Hat^000000...! Please Take it!";
284        getitem 5053,1;//Items: Sphinx Hat,
285        next;
286        mes "[Pac]";
287        mes "I liked that, I look forward to making more. Thank you.";
288        close;
289L_ITEM_1d:
290        mes "[Pac]";
291        mes "Oh, dear. You need 25 Steels...";
292        close;
293L_ITEM_2d:
294        mes "[Pac]";
295        mes "Oh, dear. You need 1 DarkGreen Dyestuffs...";
296        close;
297L_ITEM_3d:
298        mes "[Pac]";
299        mes "Oh, dear. You need 1 Lemon Dyestuffs...";
300        close;
301L_ITEM_4d:
302        mes "[Pac]";
303        mes "Oh, dear. You need 150 Fabric...";
304        close;
305L_ITEM_5d:
306        mes "[Pac]";
307        mes "Oh, dear. You need 2 Gold Bar's...";
308        close;
309L2:     
310        mes "[Pac]";
311        mes "Which hat materials do you wish to know?";
312        next;
313        menu "Poring Hat",L2_26,"Sphinx Hat",L2_29;
314L2_26:
315        mes "[Pac]";
316        mes "You need 1 Poring Doll and 300 Jellopys for Poring Hat.";
317        close;
318L2_29:
319        mes "[Pac]";
320        mes "You need 25 Steels, 1 DarkGreen Dyestuffs, 1 Lemon Dyestuffs, 150 Fabric and 2 Gold Bar's for Sphinx Hat.";
321        close;
322L3:
323        mes "[Pac]";
324        mes "Stop by some other time with the right materials, so I can make the hats for you.";
325        close;
326}
327
328
329//these scripts make our brothers to appear and disappear in order
330-       script  EDZac   -1,{
331OnInit:
332OnMinute15:
333        disablenpc "Zac";
334        end;
335OnMinute01:
336        if(rand(2)) end;
337        enablenpc "Zac";
338        end;
339}
340
341-       script  EDJac   -1,{
342OnInit:
343OnMinute30:
344        disablenpc "Jac";
345        end;
346OnMinute16:
347        if(rand(2)) end;
348        enablenpc "Jac";
349        end;
350}
351
352-       script  EDPac   -1,{
353OnInit:
354OnMinute45:
355        disablenpc "Pac";
356        end;
357OnMinute31:
358        if(rand(2)) end;
359        enablenpc "Pac";
360        end;
361}
362
363-       script  EDBlac  -1,{
364OnInit:
365OnMinute00:
366        disablenpc "Blac";
367        end;
368OnMinute46:
369        if(rand(2)) end;
370        enablenpc "Blac";
371        end;
372}
Note: See TracBrowser for help on using the browser.