1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
|
//
001-1.gat,27,53,0 script Candide 156,{
mes "[Candide]";
mes "\"I've figured out how that volcanic ash bleaches cloth.";
mes "I could do it for you, but I'll need three piles of ash and 5,000 GP for supplies per item.\"";
next;
if (countitem(701) < 3) goto L_no_ash;
if (zeny < 5000) goto L_no_money;
menu "I'd like to bleach something", -,
"No thanks", L_close;
L_bleach_menu:
mes "[Candide]";
mes "\"What would you like to bleach?\"";
next;
menu "Cotton shirt", L_cottonshirt,
"V-Neck sweater", L_vneck,
"Turtleneck sweater", L_tneck,
"Cotton shorts", L_shorts,
"Cotton skirt", L_skirt,
"Tank top ", L_tanktop,
"Short tank top", L_tanktop_short,
"Silk robe", L_robe,
"Nevermind", -;
goto L_close;
L_cottonshirt:
set @normal, 1202;
set @dyeBase, 2050;
goto L_choose_color;
L_vneck:
set @normal, 624;
set @dyeBase, 2060;
goto L_choose_color;
L_tneck:
set @normal, 564;
set @dyeBase, 2070;
goto L_choose_color;
L_shorts:
set @normal, 586;
set @dyeBase, 2110;
goto L_choose_color;
L_skirt:
set @normal, 632;
set @dyeBase, 2100;
goto L_choose_color;
L_tanktop:
set @normal, 688;
set @dyeBase, 2090;
goto L_choose_color;
L_tanktop_short:
set @normal, 689;
set @dyeBase, 2120;
goto L_choose_color;
L_robe: set @normal, 720;
set @dyeBase, 2080;
goto L_choose_color;
L_choose_color:
mes "[Candide]";
mes "\"And the color?\"";
next;
menu "Red", -,
"Green", -,
"Dark Blue", -,
"Yellow", -,
"Light Blue", -,
"Pink", -,
"Black", -,
"Orange", -,
"Purple", -,
"Dark Green", -;
set @del, @dyeBase + @menu - 1;
if (countitem(@del) == 0) goto L_no_item;
if (countitem(701) < 3) goto L_no_ash;
if (zeny < 5000) goto L_no_money;
delitem @del, 1;
getitem @normal, 1;
delitem 701, 3;
set zeny, zeny - 5000;
L_again:
mes "[Candide]";
mes "\"Would you like to bleach something else?\"";
next;
menu "Yes", L_bleach_menu,
"No", L_close;
L_no_item:
mes "[Candide]";
mes "\"You don't have one of those.\"";
next;
goto L_again;
L_no_ash:
mes "[Candide]";
mes "\"You don't have enough ash for me to bleach anything.";
mes "I need three piles.\"";
next;
goto L_close;
L_no_money:
mes "[Candide]";
mes "\"You don't have enough gold for me to bleach anything.";
mes "I need 5,000 GP for supplies.\"";
next;
L_close:
mes "[Candide]";
mes "\"Come again.\"";
close;
}
|
