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
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
|
//===== eAthena Script =======================================
//= Hair Dyer
//===== By: ==================================================
//= kobra_k88
//===== Current Version: =====================================
//= 1.1
//===== Compatible With: =====================================
//= eAthena 7.15 +
//===== Description: =========================================
//= Hair Dyer with standard palletes
//===== Additional Comments: =================================
//= Fully working
//= 1.1 Bugfix: fixed missing menu label LEnd->M_End [Lupus]
//============================================================
// HairDyer Jovovich -----------------------------------------------------
prt_in,243,168,4 script HairDyer Jovovich 91,{
mes "[HairDyer Jovovich]";
mes "Welcome to my Hair Dying shop.";
next;
mes "[HairDyer Jovovich]";
mes "Oh my..... your hair does not look like it's in good condition. I think it needs some special care. Come have a seat.";
qMenu0:
next;
menu "-Dye Hair.",M_0, "-Price List",M_1, "-Hair Tips",M_2, "-Cancel",M_End;
M_0:
mes "[HairDyer Jovovich]";
mes "Hohoho~ That's a good choice~~ Any time is a good time to change your hair color.";
next;
mes "[HairDyer Jovovich]";
mes "Please choose a color that suits you";
next;
menu "-Red please.",sM_a, "-Yellow please.",sM_b, "-Violet please.",sM_c, "-Orange please.",sM_d, "-Green please.",sM_e,
"-Blue please.",sM_f, "-White please.",sM_g, "-Black please.",sM_h, "-Sorry, I changed my mind.",M_End;
sM_a:
mes "[HairDyer Jovovich]";
if(countitem(975) < 1) goto sL_NoDye;
if(Zeny < 1000) goto sL_Zeny;
set Zeny, Zeny - 1000;
delitem 975,1;
mes "Ok. I will dye you hair red.";
setlook 6,8;
close;
sM_b:
mes "[HairDyer Jovovich]";
if(countitem(976) < 1) goto sL_NoDye;
if(Zeny < 1000) goto sL_Zeny;
mes "Ok. I will dye you hair yellow.";
setlook 6,1;
delitem 976,1;
set Zeny, Zeny - 1000;
close;
sM_c:
mes "[HairDyer Jovovich]";
if(countitem(981) < 1) goto sL_NoDye;
if(Zeny < 1000) goto sL_Zeny;
mes "Ok. I will dye you hair Violet.";
setlook 6,2;
delitem 981,1;
set Zeny, Zeny - 1000;
close;
sM_d:
mes "[HairDyer Jovovich]";
if(countitem(980) < 1) goto sL_NoDye;
if(Zeny < 1000) goto sL_Zeny;
mes "Ok. I will dye you hair Orange.";
setlook 6,3;
delitem 980,1;
set Zeny, Zeny - 1000;
close;
sM_e:
mes "[HairDyer Jovovich]";
if(countitem(979) < 1) goto sL_NoDye;
if(Zeny < 1000) goto sL_Zeny;
mes "Ok. I will dye you hair Green.";
setlook 6,4;
delitem 979,1;
set Zeny, Zeny - 1000;
close;
sM_f:
mes "[HairDyer Jovovich]";
if(countitem(978) < 1) goto sL_NoDye;
if(Zeny < 1000) goto sL_Zeny;
mes "Ok. I will dye you hair blue.";
setlook 6,5;
delitem 978,1;
set Zeny, Zeny - 1000;
close;
sM_g:
mes "[HairDyer Jovovich]";
if(countitem(982) < 1) goto sL_NoDye;
if(Zeny < 1000) goto sL_Zeny;
mes "Ok. I will dye you hair white.";
setlook 6,6;
delitem 982,1;
set Zeny, Zeny - 1000;
close;
sM_h:
mes "[HairDyer Jovovich]";
if(countitem(983) < 1) goto sL_NoDye;
if(Zeny < 1000) goto sL_Zeny;
mes "Ok. I will dye you hair black.";
setlook 6,7;
delitem 983,1;
set Zeny, Zeny - 1000;
close;
sL_NoDye:
mes "For me to dye your hair, I'll need the appropriate Dyestuff. Please check my price list for the information.";
close;
sL_Zeny:
mes "I'm sorry but you don't have enough money.";
close;
M_1:
mes "[HairDyer Jovovich]";
mes "Here is the list of colors you can choose from and their prices:";
mes " - Red: 1000 zeny, 1 Scarlet Dyestuff";
mes " - Yellow: 1000 zeny, 1 Lemon Dyestuff";
mes " - Violet: 1000 zeny, 1 Violet Dyestuff";
mes " - Orange: 1000 zeny, 1 Orange Dyestuff";
mes " - Green: 1000 zeny, 1 DarkGreen Dyestuff";
mes " - Blue: 1000 zeny, 1 CobaltBlue Dyestuff";
mes " - White: 1000 zeny, 1 White Dyestuff";
mes " - Black: 1000 zeny, 1 Black Dyestuff";
goto qMenu0;
M_2:
mes "[HairDyer Jovovich]";
mes "When your just feeling gloomy, of if you just got dumped... if you want to look hot, or when you just need to look better.....";
next;
mes "[HairDyer Jovovich]";
mes "Change the color of your hair and your bound to regain your confidence and add an extra bounce to your step!!";
next;
mes "[HairDyer Jovovich]";
mes "For the small price of 1000 zeny and a Dyestuff, I can give you the haircolor you've been dreaming of!";
next;
goto qMenu0;
M_End:
mes "[HairDyer Jovovich]";
mes "I think... every human being has the right to become beautiful......";
close;
}
|
