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
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
|
//===== rAthena Script =======================================
//= Stylist
//===== By: ==================================================
//= Nekosume
//===== Current Version: =====================================
//= 4.2
//===== Compatible With: =====================================
//= rAthena SVN
//===== Description: =========================================
//= Changes your hair style, hair color, and cloth color.
//===== Additional Comments: =================================
//= 1.0 - Split into two NPCs
//= 1.5 - Revised script / different dialog
//= 2.0 - Changed palette and hair style select
//= 2.5 - Added more hair colors
//= 3.0 - Added the 'Browse' options
//= 4.0 - Refined and Combined [Darkchild]
//= 4.1 - New hairstyles added [Mass Zero]
//= 4.2 - Renamed to avoid conflict [Paradox924X]
//============================================================
prontera,170,180,1 script Stylist#custom_stylist 122,{
mes "[^FF8000Stylist^000000]";
mes "I'm the greatest stylist in all of Rune-Midgard~~!";
mes "I can change your hair style or color!";
mes "What do you wish to change?";
next;
menu "Hair style",Lstyle,"Hair color",Lcolor,"Cloth Color",Lcloth,"Nothing",LCancel;
Lstyle:
mes "[^FF8000Stylist^000000]";
mes "Do you want to browse through the choices, or do you know what you want?";
next;
menu "Browse",Lbrowsesty,"I know what I want",Lwantsty;
Lwantsty:
mes "[^FF8000Stylist^000000]";
mes "Great! Now just pick a style and I'll get started!";
next;
mes "[^FF8000Stylist^000000]";
mes "Please pick a style number ^0000FFbetween 0 and 23^000000.";
mes "Number 0, by the way, is the default style for your character.";
next;
input @sty;
if (@sty>23) close;
if (@sty<0) close;
setlook 1,@sty;
next;
mes "[^FF8000Stylist^000000]";
mes "Is this good, or do you want a different style?";
next;
menu "This is good",-,"Different style, please",Lwantsty;
next;
mes "[^FF8000Stylist^000000]";
mes "You look great~! Come back again, okay?";
close;
Lbrowsesty:
set @look, -1;
mes "[^FF8000Stylist^000000]";
mes "Okay, here we go~! Just stop me when you see something you like, okay?";
next;
Lbrowserep:
set @look,@look+1;
setlook 1,@look;
mes "This is Pallete Number^FF9009 "+@look+" ^000000!";
if(@look == 23) menu "Back To The Begin",Lbrowsesty,"I like this one",Lstop;
if(@look != 23) menu "Keep going",Lbrowserep,"I like this one",Lstop;
Lcolor:
mes "[^FF8000Stylist^000000]";
mes "Do you want to browse through the choices, or do you know what you want?";
next;
menu "Browse",Lbrowsecolor,"I know what I want",Lwantcolor;
Lwantcolor:
mes "[^FF8000Stylist^000000]";
mes "Just pick a color and we can get started.";
next;
mes "[^FF8000Stylist^000000]";
mes "Please pick a style number ^0000FFbetween 0 and 20^000000.";
mes "Number 0, by the way, is the default color for your character.";
next;
mes "[^FF8000Stylist^000000]";
mes "0 is default...";
mes "1 is blonde...";
mes "2 is lavender...";
mes "3 is brown...";
mes "4 is green...";
mes "5 is blue...";
mes "6 is white...";
mes "7 is black...";
mes "8 is red...";
mes "and 9-20 are new colors.";
input @color;
if (@color>20) close;
if (@color<0) close;
setlook 6,@color;
next;
mes "[^FF8000Stylist^000000]";
mes "Is this good, or do you want a different color?";
next;
menu "This is good",-,"Different color, please",Lwantcolor;
next;
mes "[^FF8000Stylist^000000]";
mes "You look great~! Come back again, okay?";
close;
Lbrowsecolor:
set @look, -1;
mes "[^FF8000Stylist^000000]";
mes "Okay, here we go~! Just stop me when you see something you like, okay?";
next;
Lbrowsecolorrep:
set @look,@look+1;
setlook 6,@look;
mes "This is Pallete Number^FF9009 "+@look+" ^000000!";
if(@look == 20) menu "Back To The Begin",Lbrowsecolor,"I like this one",Lstop;
if(@look != 20) menu "Keep going",Lbrowsecolorrep,"I like this one",Lstop;
Lstop:
mes "[^FF8000Stylist^000000]";
mes "You look great~! I love it~! ^_^";
close;
LCancel:
mes "[^FF8000Stylist^000000]";
mes "Well come again.";
close;
Lcloth:
mes "[^FF8000Stylist^000000]";
mes "Do you want to browse through the choices, or do you know what you want?";
next;
menu "Browse",Lbrowsecloth,"I know what I want",Lwantcloth;
Lwantcloth:
mes "[^FF8000Stylist^000000]";
mes "Great! Now just pick a pallete and I'll get started!";
next;
mes "[^FF8000Stylist^000000]";
mes "Please pick a style number ^0000FFbetween 0 and 77^000000.";
mes "Number 0, by the way, is the default style for your character.";
next;
input @pal;
if (@pal>77) close;
if (@pal<0) close;
setlook 7,@pal;
next;
mes "[^FF8000Stylist^000000]";
mes "Is this good, or do you want a different pallet";
next;
menu "This is good",-,"Different pallet, please",Lwantcloth;
next;
mes "[^FF8000Stylist^000000]";
mes "You look great~! Come back again, okay?";
close;
Lbrowsecloth:
set @look, -1;
mes "[^FF8000Stylist^000000]";
mes "Okay, here we go~! Just stop me when you see something you like, okay?";
next;
Lbrowseclothrep:
set @look,@look+1;
setlook 7,@look;
mes "This is Pallete Number^FF9009 "+@look+" ^000000!";
if(@look == 77) menu "Back To The Begin",Lbrowsecloth,"I like this one",Lstop;
if(@look != 77) menu "Keep going",Lbrowseclothrep,"I like this one",Lstop;
}
|
