root/npc/kafras/cool_event_corp.txt @ 9

Revision 1, 11.2 kB (checked in by jinshiro, 17 years ago)
Line 
1//===== eAthena Script =======================================
2//= Cool Event Corp. Staff
3//===== By: ==================================================
4//= Gepard
5//===== Current Version: =====================================
6//= 1.4
7//===== Compatible With: =====================================
8//= eAthena
9//===== Description: =========================================
10//= Cool Event Corp. Staff (Save, Storage & Pushcart Service)
11//= in Arunafeltz Region.
12//===== Additional Comments: =================================
13//= 1.0 First version, iRO Sakray X.4 [Gepard]
14//= 1.1 Optimized, fixed a conditional bug [Lupus]
15//= 1.1a Redo back. It wasn't a bug [Lupus]
16//= 1.2 Added Rachel Cool Event Corp. Staff [Playtester]
17//= 1.3 Added cutins, closed Kafra Password exploit
18//=     until we got a client/packet based password support [Lupus]
19//= 1.4 Added Veins Cool Event Corp. Staff. [L0ne_W0lf]
20//============================================================
21
22hugel,88,168,4  script  Cool Event Corp. Staff::CoolEventCorpStaffHugel 874,{
23
24        cutin "zonda_01",2;
25        mes "[Cool Event Corp. Staff]";
26        mes "Welcome to Cool Event Corp.";
27        mes "Our staff is always working";
28        mes "to surpass your expactations";
29        mes "for quality service. So how";
30        mes "may I assist you today?";
31        next;
32
33        switch(select("Save:Use Storage:Rent a Pushcart:Storage Password Service:Cancel")){
34        case 1:
35                mes "[Cool Event Corp. Staff]";
36                mes "Your Respawn Point";
37                mes "has been saved here";
38                mes "in the village of Hugel.";
39                mes "Thank you for using the";
40                mes "Cool Event Corp. service~";
41                emotion e_thx;
42                savepoint "hugel",96,155;
43                close2;
44                cutin "", 255;
45                end;
46        case 2:
47                mes "[Cool Event Corp. Staff]";
48                if(basicskillcheck() && getskilllv("NV_BASIC") < 6){
49                        mes "I'm sorry, but you";
50                        mes "need the Novice's";
51                        mes "Basic Skill Level 6 to";
52                        mes "use the Storage Service.";
53                        emotion e_sry;
54                        close2;
55                        cutin "", 255;
56                        end;
57                }
58                if(Zeny < 40){
59                        mes "I'm sorry, but you don't";
60                        mes "have enough Zeny to use";
61                        mes "the Storage Service. Our";
62                        mes "Storage access fee is 40 Zeny.";
63                        emotion e_cash;
64                        close2;
65                        cutin "", 255;
66                        end;
67                }
68                set Zeny, Zeny - 40;
69                set RESRVPTS, RESRVPTS + 4;
70                mes "Let me open your personal";
71                mes "storage for you right away.";
72                mes "Thanks for supporting Cool";
73                mes "Event Corp. by using our";
74                mes "services. Have a good day~";
75
76                callfunc("F_CheckKafCode");     //check your storage password, if set
77                close2;
78                openstorage;
79                cutin "", 255;
80                end;
81
82        case 3:
83                mes "[Cool Event Corp. Staff]";
84                if(BaseClass != Job_Merchant){
85                        mes "I'm sorry, but the";
86                        mes "Pushcart rental service";
87                        mes "is only available to Merchants,";
88                        mes "Blacksmiths, White Smiths,";
89                        mes "Alchemists and Creators.";
90                        emotion e_sry;
91                        close2;
92                        cutin "", 255;
93                        end;
94                }
95                if(getskilllv("MC_PUSHCART") == 0){
96                        mes "You can only rent a cart after";
97                        mes "learning the Pushcart Skill.";
98                        close2;
99                        cutin "", 255;
100                        end;
101                }
102                if(checkcart() == 1){
103                        mes "You already have";
104                        mes "a Pushcart equipped.";
105                        mes "Unfortunately, we can't";
106                        mes "rent more than one to";
107                        mes "each customer at a time.";
108                        close2;
109                        cutin "", 255;
110                        end;
111                }
112                if(countitem(7061)){
113                        delitem 7061,1;
114                        setcart;
115                        close2;
116                        cutin "", 255;
117                        end;
118                }
119                mes "The Pushcart rental";
120                mes "fee is 800 Zeny. Would";
121                mes "you like to rent a Pushcart?";
122                next;
123                if(select("Rent a Pushcart:Cancel") == 1){
124                        if(Zeny < 800){
125                                mes "[Cool Event Corp. Staff]";
126                                mes "I'm sorry, but you";
127                                mes "don't have enough";
128                                mes "Zeny to pay the Pushcart";
129                                mes "rental fee of 800 Zeny.";
130                                emotion e_cash;
131                                close2;
132                                cutin "", 255;
133                                end;
134                        } else {
135                                set Zeny, Zeny - 800;
136                                set RESRVPTS, RESRVPTS + 80;
137                                setcart;
138                                close2;
139                                cutin "", 255;
140                                end;
141                        }
142                }
143                close2;
144                cutin "", 255;
145                end;
146        case 4:
147                callfunc("F_SetKafCode","[Cool Event Corp. Staff]","Cool Event Corp.");
148                //the function closes msg and remoes cutins
149        case 5:
150        default:
151                mes "[Cool Event Corp. Staff]";
152                mes "Cool Event Corp. is always";
153                mes "striving to provide the best";
154                mes "services for our customers.";
155                mes "Help us become the best by";
156                mes "providing us with your opinions";
157                mes "and honest feedback. Thank you.";
158                close2;
159                cutin "", 255;
160                end;
161        }
162}
163
164rachel,109,138,5        script  Cool Event Corp. Staff::CoolEventCorpStaffRachel        874,{
165
166        cutin "zonda_01",2;
167        mes "[Cool Event Corp. Staff]";
168        mes "Welcome to Cool Event Corp.";
169        mes "Our staff is always working";
170        mes "to surpass your expactations";
171        mes "for quality service. So how";
172        mes "may I assist you today?";
173        next;
174
175        switch(select("Save:Use Storage:Rent a Pushcart:Storage Password Service:Cancel")){
176        case 1:
177                mes "[Cool Event Corp. Staff]";
178                mes "Your Respawn Point";
179                mes "has been saved here";
180                mes "in the town of Rachel.";
181                mes "Thank you for using the";
182                mes "Cool Event Corp. service~";
183                emotion e_thx;
184                savepoint "rachel",113,137;
185                close2;
186                cutin "", 255;
187                end;
188        case 2:
189                mes "[Cool Event Corp. Staff]";
190                if(basicskillcheck() && getskilllv("NV_BASIC") < 6){
191                        mes "I'm sorry, but you";
192                        mes "need the Novice's";
193                        mes "Basic Skill Level 6 to";
194                        mes "use the Storage Service.";
195                        emotion e_sry;
196                        close2;
197                        cutin "", 255;
198                        end;
199                }
200                if(Zeny < 40){
201                        mes "I'm sorry, but you don't";
202                        mes "have enough Zeny to use";
203                        mes "the Storage Service. Our";
204                        mes "Storage access fee is 40 Zeny.";
205                        emotion e_cash;
206                        close2;
207                        cutin "", 255;
208                        end;
209                }
210                set Zeny, Zeny - 40;
211                set RESRVPTS, RESRVPTS + 4;
212                mes "Let me open your personal";
213                mes "storage for you right away.";
214                mes "Thanks for supporting Cool";
215                mes "Event Corp. by using our";
216                mes "services. Have a good day~";
217                callfunc("F_CheckKafCode");     //check your storage password, if set
218                close2;
219                openstorage;
220                cutin "", 255;
221                end;
222        case 3:
223                mes "[Cool Event Corp. Staff]";
224                if(BaseClass != Job_Merchant){
225                        mes "I'm sorry, but the";
226                        mes "Pushcart rental service";
227                        mes "is only available to Merchants,";
228                        mes "Blacksmiths, White Smiths,";
229                        mes "Alchemists and Creators.";
230                        emotion e_sry;
231                        close2;
232                        cutin "", 255;
233                        end;
234                }
235                if(getskilllv("MC_PUSHCART") == 0){
236                        mes "You can only rent a cart after";
237                        mes "learning the Pushcart Skill.";
238                        close2;
239                        cutin "", 255;
240                        end;
241                }
242                if(checkcart() == 1){
243                        mes "You already have";
244                        mes "a Pushcart equipped.";
245                        mes "Unfortunately, we can't";
246                        mes "rent more than one to";
247                        mes "each customer at a time.";
248                        close2;
249                        cutin "", 255;
250                        end;
251                }
252                if(countitem(7061)){
253                        delitem 7061,1;
254                        setcart;
255                        close2;
256                        cutin "", 255;
257                        end;
258                }
259                mes "The Pushcart rental";
260                mes "fee is 800 Zeny. Would";
261                mes "you like to rent a Pushcart?";
262                next;
263                if(select("Rent a Pushcart:Cancel") == 1){
264                        if(Zeny < 800){
265                                mes "[Cool Event Corp. Staff]";
266                                mes "I'm sorry, but you";
267                                mes "don't have enough";
268                                mes "Zeny to pay the Pushcart";
269                                mes "rental fee of 800 Zeny.";
270                                emotion e_cash;
271                                close2;
272                                cutin "", 255;
273                                end;
274                        } else {
275                                set Zeny, Zeny - 800;
276                                set RESRVPTS, RESRVPTS + 80;
277                                setcart;
278                                close2;
279                                cutin "", 255;
280                                end;
281                        }
282                }
283                close2;
284                cutin "", 255;
285                end;
286        case 4:
287                callfunc("F_SetKafCode","[Cool Event Corp. Staff]","Cool Event Corp.");
288                //the function closes msg and remoes cutins
289        case 5:
290        default:
291                mes "[Cool Event Corp. Staff]";
292                mes "Cool Event Corp. is always";
293                mes "striving to provide the best";
294                mes "services for our customers.";
295                mes "Help us become the best by";
296                mes "providing us with your opinions";
297                mes "and honest feedback. Thank you.";
298                close2;
299                cutin "", 255;
300                end;
301        }
302}
303
304veins,208,128,5 script  Cool Event Corp. Staff::CoolEventCorpStaffVeins 874,{
305
306        cutin "zonda_01",2;
307        mes "[Cool Event Corp. Staff]";
308        mes "Welcome to Cool Event Corp.";
309        mes "Our staff is always working";
310        mes "to surpass your expactations";
311        mes "for quality service. So how";
312        mes "may I assist you today?";
313        next;
314
315        switch(select("Save:Use Storage:Rent a Pushcart:Storage Password Service:Cancel")){
316        case 1:
317                mes "[Cool Event Corp. Staff]";
318                mes "Your Respawn Point";
319                mes "has been saved here";
320                mes "in the town of Veins.";
321                mes "Thank you for using the";
322                mes "Cool Event Corp. service~";
323                emotion e_thx;
324                savepoint "veins",204,103;
325                close2;
326                cutin "", 255;
327                end;
328        case 2:
329                mes "[Cool Event Corp. Staff]";
330                if(basicskillcheck() && getskilllv("NV_BASIC") < 6){
331                        mes "I'm sorry, but you";
332                        mes "need the Novice's";
333                        mes "Basic Skill Level 6 to";
334                        mes "use the Storage Service.";
335                        emotion e_sry;
336                        close2;
337                        cutin "", 255;
338                        end;
339                }
340                if(Zeny < 40){
341                        mes "I'm sorry, but you don't";
342                        mes "have enough Zeny to use";
343                        mes "the Storage Service. Our";
344                        mes "Storage access fee is 40 Zeny.";
345                        emotion e_cash;
346                        close2;
347                        cutin "", 255;
348                        end;
349                }
350                set Zeny, Zeny - 40;
351                set RESRVPTS, RESRVPTS + 4;
352                mes "Let me open your personal";
353                mes "storage for you right away.";
354                mes "Thanks for supporting Cool";
355                mes "Event Corp. by using our";
356                mes "services. Have a good day~";
357                callfunc("F_CheckKafCode");     //check your storage password, if set
358                close2;
359                openstorage;
360                cutin "", 255;
361                end;
362        case 3:
363                mes "[Cool Event Corp. Staff]";
364                if(BaseClass != Job_Merchant){
365                        mes "I'm sorry, but the";
366                        mes "Pushcart rental service";
367                        mes "is only available to Merchants,";
368                        mes "Blacksmiths, White Smiths,";
369                        mes "Alchemists and Creators.";
370                        emotion e_sry;
371                        close2;
372                        cutin "", 255;
373                        end;
374                }
375                if(getskilllv("MC_PUSHCART") == 0){
376                        mes "You can only rent a cart after";
377                        mes "learning the Pushcart Skill.";
378                        close2;
379                        cutin "", 255;
380                        end;
381                }
382                if(checkcart() == 1){
383                        mes "You already have";
384                        mes "a Pushcart equipped.";
385                        mes "Unfortunately, we can't";
386                        mes "rent more than one to";
387                        mes "each customer at a time.";
388                        close2;
389                        cutin "", 255;
390                        end;
391                }
392                if(countitem(7061)){
393                        delitem 7061,1;
394                        setcart;
395                        close2;
396                        cutin "", 255;
397                        end;
398                }
399                mes "The Pushcart rental";
400                mes "fee is 800 Zeny. Would";
401                mes "you like to rent a Pushcart?";
402                next;
403                if(select("Rent a Pushcart:Cancel") == 1){
404                        if(Zeny < 800){
405                                mes "[Cool Event Corp. Staff]";
406                                mes "I'm sorry, but you";
407                                mes "don't have enough";
408                                mes "Zeny to pay the Pushcart";
409                                mes "rental fee of 800 Zeny.";
410                                emotion e_cash;
411                                close2;
412                                cutin "", 255;
413                                end;
414                        } else {
415                                set Zeny, Zeny - 800;
416                                set RESRVPTS, RESRVPTS + 80;
417                                setcart;
418                                close2;
419                                cutin "", 255;
420                                end;
421                        }
422                }
423                close2;
424                cutin "", 255;
425                end;
426        case 4:
427                callfunc("F_SetKafCode","[Cool Event Corp. Staff]","Cool Event Corp.");
428                //the function closes msg and remoes cutins
429        case 5:
430        default:
431                mes "[Cool Event Corp. Staff]";
432                mes "Cool Event Corp. is always";
433                mes "striving to provide the best";
434                mes "services for our customers.";
435                mes "Help us become the best by";
436                mes "providing us with your opinions";
437                mes "and honest feedback. Thank you.";
438                close2;
439                cutin "", 255;
440                end;
441        }
442}
Note: See TracBrowser for help on using the browser.