root/npc/merchants/clothes_dyer.txt @ 1

Revision 1, 16.1 kB (checked in by jinshiro, 17 years ago)
Line 
1//===== eAthena Script =======================================
2//= Clothes Dyer
3//===== By: ==================================================
4//= Usnul
5//===== Current Version: =====================================
6//= 2.4
7//===== Compatible With: =====================================
8//= eAthena 1.0+
9//===== Description: =========================================
10//= Clothes dyer with standard palletes
11//===== Additional Comments: =================================
12//= Fully working
13//= 2.1 Shortened some labels to make this script loading,
14//= Added Black+White Colors desc [Lupus]
15//= 2.1a - added adv classes + abby class support [Lupus]
16//= 2.2 – Spell checked. [Nexon]
17//= 2.3 - Fixed dis $hit! [Poki#3]
18//= 2.4 - Disabled cloth dyeing since it's not implemented
19//        on official servers and cause your client to crash
20//        [Playtester]
21//============================================================
22//Note: To enable it, replace L_Busy with L_Dye
23//============================================================
24
25
26// Dyer Ginedin Rephere ---------------------------------------------------
27prt_in,284,168,2        script  Dyer Ginedin Rephere    55,{
28        mes "[Dyer Ginedin Rephere]";
29        mes "11... 12... Mmm... good. I think I'll be able to finish before tonight’s party. Oh! I didn't notice that you were here. Anyway how may I assist you?";
30M_Menu:
31        next;
32        menu "-Talk",L_Talk,"-Dye Clothing",L_Busy,"-Price list",L_PriceList,"-Cancel",L_End;
33       
34L_Talk:
35        mes "[Dyer Ginedin Rephere]";
36        mes "Life may have gotten a little better.... but when I look at all of the orders I've received... Whew!";
37        mes "It seems that the young women of Rune Midgard must be very well off these days.";
38        next;
39        mes "[Dyer Ginedin Rephere]";
40        mes "Not that I think that they are indulging in anything luxurious mind you.";
41        mes "I don't think there is anything wrong with the pursuit of beauty and being fashionable.";
42        next;
43        mes "[Dyer Ginedin Rephere]";
44        mes "For us humans, who have no colorful fur or decorative scales, clothes are one of the few ways we have to display our personality, style, and beauty.";
45        next;
46        mes "[Dyer Ginedin Rephere]";
47        mes "Haha... When I think about it, I really feel that my job is worthwhile.  I believe that I provide a service that the people desire.";
48        next;
49        mes "[Dyer Ginedin Rephere]";
50        mes "Can you feel it too? The energy that is released when rough fabric and leather are brought to life with color?.....";
51        next;
52        mes "[Dyer Ginedin Rephere]";
53        mes "Although the process is very tedious and time consuming, the joy and happiness I feel when a dress is finished.....";
54        mes "more than makes up for all of the hard work!!";
55        goto M_Menu;
56
57L_Dye:
58        mes "[Dyer Ginedin Rephere]";
59        mes "Oh... you need my work? Well... okay sounds good.";
60        next;
61        mes "[Dyer Ginedin Rephere]";
62        mes "Please choose a color that suits you.";
63        next;
64        if(Sex==0) goto Female_dye;
65//=================================
66// Clothing Dyeing for Males
67//=================================
68
69Male_dye:
70        if(BaseJob==Job_Novice || BaseJob==Job_Novice_High || BaseJob==Job_Baby) goto L_Novice_M;
71        if(BaseJob==Job_Swordman || BaseJob==Job_Swordman_High || BaseJob==Job_Baby_Swordman) goto L_Swordman_M;
72        if(BaseJob==Job_Mage || BaseJob==Job_Mage_High || BaseJob==Job_Baby_Mage) goto L_Mage_M;
73        if(BaseJob==Job_Archer || BaseJob==Job_Archer_High || BaseJob==Job_Baby_Archer) goto L_Archer_M;
74        if(BaseJob==Job_Acolyte || BaseJob==Job_Acolyte_High || BaseJob==Job_Baby_Acolyte) goto L_Acolyte_M;
75        if(BaseJob==Job_Merchant || BaseJob==Job_Merchant_High || BaseJob==Job_Baby_Merchant) goto L_Merchant_M;
76        if(BaseJob==Job_Thief || BaseJob==Job_Thief_High || BaseJob==Job_Baby_Thief) goto L_Thief_M;
77        if(BaseJob==Job_Knight || BaseJob==Job_Knight2 || BaseJob==Job_Crusader || BaseJob==Job_Crusader2 || BaseJob==Job_Lord_Knight || BaseJob==Job_Lord_Knight2 || BaseJob==Job_Paladin || BaseJob==Job_Paladin2 || BaseJob==Job_Stalker || BaseJob==Job_Baby_Knight || BaseJob==Job_Baby_Knight2 || BaseJob==Job_Baby_Crusader || BaseJob==Job_Baby_Crusader2) goto L_Swordman2_M;
78        if(BaseJob==Job_Priest || BaseJob==Job_Monk || BaseJob==Job_High_Priest || BaseJob==Job_Champion || BaseJob==Job_Baby_Priest || BaseJob==Job_Baby_Monk) goto L_Acolyte2_M;
79        if(BaseJob==Job_Wizard || BaseJob==Job_High_Wizard || BaseJob==Job_Baby_Wizard) goto L_Mage2_M;
80        if(BaseJob==Job_Blacksmith || BaseJob==Job_Alchemist || BaseJob==Job_Whitesmith || BaseJob==Job_Creator || BaseJob==Job_Baby_Blacksmith || BaseJob==Job_Baby_Alchemist) goto L_Merchant2_M;
81        if(BaseJob==Job_Hunter || BaseJob==Job_Bard || BaseJob==Job_Sniper || BaseJob==Job_Clown || BaseJob==Job_Baby_Hunter || BaseJob==Job_Baby_Bard) goto L_Archer2_M;
82        if(BaseJob==Job_Assassin || BaseJob==Job_Rogue || BaseJob==Job_Assassin_Cross || BaseJob==Job_Baby_Assassin || BaseJob==Job_Baby_Rogue) goto L_Thief2_M;
83        if(BaseJob==Job_SuperNovice || BaseJob==Job_Super_Baby) goto L_Super_Novice_M;
84        goto sL_Sorry;
85//NOTE: Although Sages have pellets, they color non existent piece's of clothing. They are not listed, so players won't waste their items and zeny.
86//Professors also have a problem <.< The only thing that changes is a part of there Fox scarf. The Stalker Placement is not a bug!
87
88L_Novice_M:
89        set @black, 1;
90        set @blue, 2;
91        set @green, 3;
92        menu "- Default",L_Dye_Default,"- Black",L_Dye_Black,"- Blue",L_Dye_Blue,"- Green",L_Dye_Green,"- Cancel",L_End;
93L_Swordman_M:
94        set @black, 1;
95        set @blue, 2;
96        set @green, 3;
97        menu "- Default",L_Dye_Default,"- Black",L_Dye_Black,"- Blue",L_Dye_Blue,"- Green",L_Dye_Green,"- Cancel",L_End;
98L_Mage_M:
99        set @red, 1;
100        set @violet, 2;
101        set @orange, 3;
102        set @white, 4;
103        menu "- Default",L_Dye_Default,"- Red",L_Dye_Red,"- Violet",L_Dye_Violet,"- Orange",L_Dye_Orange,"- White",L_Dye_White,"- Cancel",L_End;
104L_Archer_M:
105        set @black, 1;
106        set @violet, 2;
107        set @green, 3;
108        menu "- Default",L_Dye_Default,"- Black",L_Dye_Black,"- Violet",L_Dye_Violet,"- Green",L_Dye_Green,"- Cancel",L_End;
109L_Acolyte_M:
110        set @blue, 1;
111        set @red, 2;
112        set @white, 3;
113        set @black, 4;
114        menu "- Default",L_Dye_Default,"- Blue",L_Dye_Blue,"- Red",L_Dye_Red,"- White",L_Dye_White,"- Black",L_Dye_Black,"- Cancel",L_End;
115L_Merchant_M:
116        set @black, 1;
117        set @blue, 2;
118        set @green, 3;
119        menu "- Default",L_Dye_Default,"- Black",L_Dye_Black,"- Blue",L_Dye_Blue,"- Green",L_Dye_Green,"- Cancel",L_End;
120L_Thief_M:
121        set @green, 1;
122        set @red, 2;
123        set @white, 4;
124        menu "- Default",L_Dye_Default,"- Green",L_Dye_Green,"- Red",L_Dye_Red,"- White",L_Dye_White,"- Cancel",L_End;
125L_Swordman2_M:
126        set @violet, 1;
127        set @red, 3;
128        set @black, 4;
129        menu "- Default",L_Dye_Default,"- Violet",L_Dye_Violet,"- Red",L_Dye_Red,"- Black",L_Dye_Black,"- Cancel",L_End;
130L_Acolyte2_M:
131        set @blue, 1;
132        set @green, 2;
133        set @red, 3;
134        set @white, 4;
135        menu "- Default",L_Dye_Default,"- Blue",L_Dye_Blue,"- Green",L_Dye_Green,"- Red",L_Dye_Red,"- White",L_Dye_White,"- Cancel",L_End;
136L_Mage2_M:
137        set @blue, 1;
138        set @green, 3;
139        set @black, 4;
140        menu "- Default",L_Dye_Default,"- Blue",L_Dye_Blue,"- Green",L_Dye_Green,"- Black",L_Dye_Black,"- Cancel",L_End;
141L_Merchant2_M:
142        set @black, 1;
143        set @green, 2;
144        set @white, 3;
145        menu "- Default",L_Dye_Default,"- Black",L_Dye_Black,"- Green",L_Dye_Green,"- White",L_Dye_White,"- Cancel",L_End;
146L_Archer2_M:
147        set @black, 1;
148        set @blue, 2;
149        set @green, 3;
150        menu "- Default",L_Dye_Default,"- Black",L_Dye_Black,"- Blue",L_Dye_Blue,"- Green",L_Dye_Green,"- Cancel",L_End;
151L_Thief2_M:
152        set @blue, 1;
153        menu "- Default",L_Dye_Default,"- Blue",L_Dye_Blue,"- Cancel",L_End;
154L_Super_Novice_M:
155        set @violet, 1;
156        set @blue, 2;
157        set @green, 3;
158        set @black, 4;
159        menu "- Default",L_Dye_Default,"- Violet",L_Dye_Violet,"- Blue",L_Dye_Blue,"- Green",L_Dye_Green,"- Black",L_Dye_Black,"- Cancel",L_End;
160
161
162//=================================
163// Clothing Dyeing for Females
164//=================================     
165Female_dye:
166        if(BaseJob==Job_Novice || BaseJob==Job_Novice_High || BaseJob==Job_Baby) goto L_Novice_F;
167        if(BaseJob==Job_Swordman || BaseJob==Job_Swordman_High || BaseJob==Job_Baby_Swordman) goto L_Swordman_F;
168        if(BaseJob==Job_Mage || BaseJob==Job_Mage_High || BaseJob==Job_Baby_Mage) goto L_Mage_F;
169        if(BaseJob==Job_Archer || BaseJob==Job_Archer_High || BaseJob==Job_Baby_Archer) goto L_Archer_F;
170        if(BaseJob==Job_Acolyte || BaseJob==Job_Acolyte_High || BaseJob==Job_Baby_Acolyte) goto L_Acolyte_F;
171        if(BaseJob==Job_Merchant || BaseJob==Job_Merchant_High || BaseJob==Job_Baby_Merchant) goto L_Merchant_F;
172        if(BaseJob==Job_Thief || BaseJob==Job_Thief_High || BaseJob==Job_Baby_Thief) goto L_Thief_F;
173        if(BaseJob==Job_Knight || BaseJob==Job_Knight2 || BaseJob==Job_Crusader || BaseJob==Job_Crusader2 || BaseJob==Job_Lord_Knight || BaseJob==Job_Lord_Knight2 || BaseJob==Job_Paladin || BaseJob==Job_Paladin2 || BaseJob==Job_Stalker || BaseJob==Job_Baby_Knight || BaseJob==Job_Baby_Knight2 || BaseJob==Job_Baby_Crusader || BaseJob==Job_Baby_Crusader2) goto L_Swordman2_F;
174        if(BaseJob==Job_Priest || BaseJob==Job_Baby_Priest) goto L_Acolyte2_F;
175        if(BaseJob==Job_Wizard || BaseJob==Job_Sage || BaseJob==Job_High_Wizard || BaseJob==Job_Professor || BaseJob==Job_Baby_Wizard || BaseJob==Job_Baby_Sage) goto L_Mage2_F;
176        if(BaseJob==Job_Blacksmith || BaseJob==Job_Alchemist || BaseJob==Job_Whitesmith || BaseJob==Job_Creator || BaseJob==Job_Baby_Blacksmith || BaseJob==Job_Baby_Alchemist) goto L_Merchant2_F;
177        if(BaseJob==Job_Hunter || BaseJob==Job_Dancer || BaseJob==Job_Sniper || BaseJob==Job_Gypsy || BaseJob==Job_Baby_Hunter || BaseJob==Job_Baby_Dancer) goto L_Archer2_F;
178        if(BaseJob==Job_Assassin || BaseJob==Job_Baby_Assassin) goto L_Thief2_F;
179        if(BaseJob==Job_Rogue || BaseJob==Job_Assassin_Cross || BaseJob==Job_Baby_Rogue) goto L_Thief3_F;
180        if(BaseJob==Job_SuperNovice || BaseJob==Job_Super_Baby) goto L_Super_Novice_F;
181        goto sL_Sorry;
182//NOTE: Same problems as with Males. This time: Monk, High Priest, Champion.
183//Rogue and Assassin Cross have her own check, because the default dye is black <.< The Stalker Placement is not a bug!
184
185L_Novice_F:
186        set @blue, 1;
187        set @red, 2;
188        set @green, 3;
189        set @black, 4;
190        menu "- Default",L_Dye_Default,"- Blue",L_Dye_Blue,"- Red",L_Dye_Red,"- Green",L_Dye_Green,"- Black",L_Dye_Black,"- Cancel",L_End;
191L_Swordman_F:
192        set @red, 1;
193        set @green, 3;
194        set @black, 4;
195        menu "- Default",L_Dye_Default,"- Red",L_Dye_Red,"- Green",L_Dye_Green,"- Black",L_Dye_Black,"- Cancel",L_End;
196L_Mage_F:
197        set @red, 1;
198        set @violet, 2;
199        set @white, 3;
200        set @black, 4;
201        menu "- Default",L_Dye_Default,"- Red",L_Dye_Red,"- Violet",L_Dye_Violet,"- White",L_Dye_White,"- Black",L_Dye_Black,"- Cancel",L_End;
202L_Archer_F:
203        set @red, 1;
204        set @green, 2;
205        set @white, 3;
206        set @black, 4;
207        menu "- Default",L_Dye_Default,"- Red",L_Dye_Red,"- Green",L_Dye_Green,"- White",L_Dye_White,"- Black",L_Dye_Black,"- Cancel",L_End;
208L_Acolyte_F:
209        set @red, 1;
210        set @green, 3;
211        set @black, 4;
212        menu "- Default",L_Dye_Default,"- Red",L_Dye_Red,"- Green",L_Dye_Green,"- Black",L_Dye_Black,"- Cancel",L_End;
213L_Merchant_F:
214        set @violet, 1;
215        set @green, 3;
216        set @black, 4;
217        menu "- Default",L_Dye_Default,"- Violet",L_Dye_Violet,"- Green",L_Dye_Green,"- Black",L_Dye_Black,"- Cancel",L_End;
218L_Thief_F:
219        set @red, 1;
220        set @white, 3;
221        set @black, 4;
222        menu "- Default",L_Dye_Default,"- Red",L_Dye_Red,"- White",L_Dye_White,"- Black",L_Dye_Black,"- Cancel",L_End;
223L_Swordman2_F:
224        set @blue, 1;
225        set @white, 3;
226        set @black, 4;
227        menu "- Default",L_Dye_Default,"- Blue",L_Dye_Blue,"- White",L_Dye_White,"- Black",L_Dye_Black,"- Cancel",L_End;
228L_Acolyte2_F:
229        set @red, 1;
230        set @green, 2;
231        set @white, 3;
232        set @black, 4;
233        menu "- Default",L_Dye_Default,"- Red",L_Dye_Red,"- Green",L_Dye_Green,"- White",L_Dye_White,"- Black",L_Dye_Black,"- Cancel",L_End;
234L_Mage2_F:
235        set @red, 1;
236        set @blue, 2;
237        set @white, 3;
238        set @green, 4;
239        menu "- Default",L_Dye_Default,"- Red",L_Dye_Red,"- Blue",L_Dye_Blue,"- White",L_Dye_White,"- Green",L_Dye_Green,"- Cancel",L_End;
240L_Merchant2_F:
241        set @red, 1;
242        set @green, 2;
243        set @violet, 3;
244        set @black, 4;
245        menu "- Default",L_Dye_Default,"- Red",L_Dye_Red,"- Green",L_Dye_Green,"- Violet",L_Dye_Violet,"- Black",L_Dye_Black,"- Cancel",L_End;
246L_Archer2_F:
247        set @blue, 1;
248        set @green, 3;
249        set @violet, 4;
250        menu "- Default",L_Dye_Default,"- Blue",L_Dye_Blue,"- Green",L_Dye_Green,"- Violet",L_Dye_Violet,"- Cancel",L_End;
251L_Thief2_F:
252        set @black, 1;
253        set @yellow, 2;
254        set @white, 3;
255        menu "- Default",L_Dye_Default,"- Black",L_Dye_Black,"- Yellow",L_Dye_Yellow,"- White",L_Dye_White,"- Cancel",L_End;
256L_Thief3_F:
257        set @yellow, 2;
258        set @white, 3;
259        menu "- Default",L_Dye_Default,"- Yellow",L_Dye_Yellow,"- White",L_Dye_White,"- Cancel",L_End;
260L_Super_Novice_F:
261        set @blue, 1;
262        set @red, 2;
263        set @green, 3;
264        set @black, 4;
265        menu "- Default",L_Dye_Default,"- Blue",L_Dye_Blue,"- Red",L_Dye_Red,"- Green",L_Dye_Green,"- Black",L_Dye_Black,"- Cancel",L_End;
266
267//=================================
268// Rest of the script
269//=================================
270
271L_Dye_Default:
272        mes "[Dyer Ginedin Rephere]";
273        mes "I can change your dye to the default one for free.";
274        mes "Are you sure?";
275        next;
276        menu "Yes",-,"No",L_End;
277        mes "[Dyer Ginedin Rephere]";
278        mes "OK. Here goes nothing.";
279        setlook 7,0;
280        close;
281L_Dye_Orange:
282        mes "[Dyer Ginedin Rephere]";
283        if(countitem(980) < 1) goto sL_NoDye;
284        if(Zeny < 10000) goto sL_Zeny;
285        delitem 980,1;
286        set Zeny, Zeny - 10000;
287        mes "Ok. I will dye you clothes orange.";
288        setlook 7,@orange;
289        close;
290L_Dye_Violet:
291        mes "[Dyer Ginedin Rephere]";
292        if(countitem(981) < 1) goto  sL_NoDye;
293        if(Zeny < 10000) goto sL_Zeny;
294        delitem 981,1;
295        set Zeny, Zeny - 10000;
296        mes "Ok. I will dye you clothes Violet.";
297        setlook 7,@violet;
298        close;
299L_Dye_Red:
300        mes "[Dyer Ginedin Rephere]";
301        if(countitem(975) < 1) goto sL_NoDye;
302        if(Zeny < 10000) goto sL_Zeny;
303        delitem 975,1;
304        set Zeny, Zeny - 10000;
305        mes "Ok. I will dye you clothes red.";
306        setlook 7,@red;
307        close;
308L_Dye_Black:
309        mes "[Dyer Ginedin Rephere]";
310        if(countitem(983) < 1) goto sL_NoDye;
311        if(Zeny < 10000) goto sL_Zeny;
312        delitem 983,1;
313        set Zeny, Zeny - 10000;
314        mes "Ok. I will dye you clothes black.";
315        setlook 7,@black;
316        close;
317L_Dye_Green:
318        mes "[Dyer Ginedin Rephere]";
319        if(countitem(979) < 1) goto sL_NoDye;
320        if(Zeny < 10000) goto sL_Zeny;
321        delitem 979,1;
322        set Zeny, Zeny - 10000;
323        mes "Ok. I will dye you clothes green.";
324        setlook 7,@green;
325        close;
326L_Dye_Blue:
327        mes "[Dyer Ginedin Rephere]";
328        if(countitem(978) < 1) goto sL_NoDye;
329        if(Zeny < 10000) goto sL_Zeny;
330        delitem 978,1;
331        set Zeny, Zeny - 10000;
332        mes "Ok. I will dye you clothes blue.";
333        setlook 7,@blue;
334        close;
335L_Dye_White:
336        mes "[Dyer Ginedin Rephere]";
337        if(countitem(982) < 1) goto sL_NoDye;
338        if(Zeny < 10000) goto sL_Zeny;
339        delitem 982,1;
340        set Zeny, Zeny - 10000;
341        mes "Ok. I will dye you clothes white.";
342        setlook 7,@white;
343        close;
344L_Dye_Yellow:
345        mes "[Dyer Ginedin Rephere]";
346        if(countitem(976) < 1) goto sL_NoDye;
347        if(Zeny < 10000) goto sL_Zeny;
348        delitem 976,1;
349        set Zeny, Zeny - 10000;
350        mes "Ok. I will dye you clothes yellow.";
351        setlook 7,@yellow;
352        close;
353
354sL_Sorry:
355        mes "Wow, your clothes is very strange, I haven't seen anything like it before. Hmmm... I'm sorry, but there is no way I can paint it.";
356        close;
357
358sL_Zeny:
359        mes "I'm sorry but you don't have enough money.";
360        close;
361
362sL_NoDye:
363        mes "For me to dye your clothes, I'll need the appropriate Dyestuffs. Please check my price list for the information.";
364        next;
365
366L_Busy:
367        mes "Sorry, I'm too busy with other jobs to dye your clothes.";
368        goto M_Menu;
369
370L_PriceList:
371        mes "[Dyer Ginedin Rephere]";
372        mes "Here is the list of colors you can choose from and their prices:";
373        mes " ";
374        mes " - ^FF4422Red^000000: 10000 zeny, 1 Scarlet Dyestuffs";
375        mes " - ^D5A500Yellow^000000: 10000 zeny, 1 Lemon Dyestuffs";
376        mes " - ^AA00AAViolet^000000: 10000 zeny, 1 Violet Dyestuffs";
377        mes " - ^FF8800Orange^000000: 10000 zeny, 1 Orange Dyestuffs";
378        mes " - ^4422FFBlue^000000: 10000 zeny, 1 CobaltBlue Dyestuffs";
379        mes " - ^009500Green^000000: 10000 zeny, 1 DarkGreen Dyestuffs";
380        mes " - Black: 10000 zeny, 1 Black Dyestuffs";
381        mes " - White: 10000 zeny, 1 White Dyestuffs";
382        goto M_Menu;
383
384L_End:
385        mes "[Dyer Ginedin Rephere]";
386        mes "Make yourself at home. Even though I don't have time for you.";
387        close;
388}
Note: See TracBrowser for help on using the browser.