root/npc/custom/dye.txt @ 1

Revision 1, 5.6 kB (checked in by jinshiro, 17 years ago)
RevLine 
[1]1//===== eAthena Script =======================================
2//= Stylist Script
3//===== By: ==================================================
4//= eAthena Dev team
5//= Revised by Nekosume [pyRO v3.0]
6//===== Current Version: =====================================
7//= 4.2
8//===== Compatible With: =====================================
9//= Any eAthena Version
10//===== Description: =========================================
11//= Revised dye NPC
12//===== Additional Comments: =================================
13//= v4.2 - Renamed to avoid conflict [Paradox924X]
14//= v4.1 - New hairstyles added [Mass Zero]
15//= v4.0 - Refined and Combined [Darkchild]
16//= v3.0 - Added the 'Browse' options
17//= v2.5 - Added more hair colors
18//= v2.0 - Changed palette and hair style select
19//= v1.5 - Revised script / different dialog
20//= v1.0 - Split into two NPCs
21//============================================================
22
23
24//Stylist------------------------------------------------------------------------------------------------------------
25prontera,170,180,1      script  Stylist#custom_stylist  122,{
26        mes "[^FF8000Stylist^000000]";
27        mes "I'm the greatest stylist in all of Rune-Midgard~~!";
28        mes "I can change your hair style or color!";
29        mes "What do you wish to change?";
30        next;
31        menu "Hair style",Lstyle,"Hair color",Lcolor,"Cloth Color",Lcloth,"Nothing",LCancel;
32
33        Lstyle:
34                mes "[^FF8000Stylist^000000]";
35                mes "Do you want to browse through the choices, or do you know what you want?";
36                next;
37                menu "Browse",Lbrowsesty,"I know what I want",Lwantsty;
38
39        Lwantsty:
40                mes "[^FF8000Stylist^000000]";
41                mes "Great!  Now just pick a style and I'll get started!";
42                next;
43                mes "[^FF8000Stylist^000000]";
44                mes "Please pick a style number ^0000FFbetween 0 and 23^000000.";
45                mes "Number 0, by the way, is the default style for your character.";
46                next;
47                input @sty;
48                if (@sty>23) close;
49                if (@sty<0) close;
50                setlook 1,@sty;
51                next;
52                mes "[^FF8000Stylist^000000]";
53                mes "Is this good, or do you want a different style?";
54                next;
55                menu "This is good",-,"Different style, please",Lwantsty;
56                next;
57                mes "[^FF8000Stylist^000000]";
58                mes "You look great~!  Come back again, okay?";
59                close;
60
61        Lbrowsesty:
62                set @look, -1;
63                mes "[^FF8000Stylist^000000]";
64                mes "Okay, here we go~!  Just stop me when you see something you like, okay?";
65                next;
66
67        Lbrowserep:
68                set @look,@look+1;
69                setlook 1,@look;
70                mes "This is Pallete Number^FF9009 "+@look+" ^000000!";
71                if(@look == 23) menu "Back To The Begin",Lbrowsesty,"I like this one",Lstop;
72                if(@look != 23) menu "Keep going",Lbrowserep,"I like this one",Lstop;
73               
74        Lcolor:
75                mes "[^FF8000Stylist^000000]";
76                mes "Do you want to browse through the choices, or do you know what you want?";
77                next;
78                menu "Browse",Lbrowsecolor,"I know what I want",Lwantcolor;
79
80        Lwantcolor:
81                mes "[^FF8000Stylist^000000]";
82                mes "Just pick a color and we can get started.";
83                next;
84                mes "[^FF8000Stylist^000000]";
85                mes "Please pick a style number ^0000FFbetween 0 and 20^000000.";
86                mes "Number 0, by the way, is the default color for your character.";
87                next;
88                mes "[^FF8000Stylist^000000]";
89                mes "0 is default...";
90                mes "1 is blonde...";
91                mes "2 is lavender...";
92                mes "3 is brown...";
93                mes "4 is green...";
94                mes "5 is blue...";
95                mes "6 is white...";
96                mes "7 is black...";
97                mes "8 is red...";
98                mes "and 9-20 are new colors.";
99                input @color;
100                if (@color>20) close;
101                if (@color<0) close;
102                setlook 6,@color;
103                next;
104                mes "[^FF8000Stylist^000000]";
105                mes "Is this good, or do you want a different color?";
106                next;
107                menu "This is good",-,"Different color, please",Lwantcolor;
108                next;
109                mes "[^FF8000Stylist^000000]";
110                mes "You look great~!  Come back again, okay?";
111                close;
112
113        Lbrowsecolor:
114                set @look, -1;
115                mes "[^FF8000Stylist^000000]";
116                mes "Okay, here we go~!  Just stop me when you see something you like, okay?";
117                next;
118
119        Lbrowsecolorrep:
120                set @look,@look+1;
121                setlook 6,@look;
122                mes "This is Pallete Number^FF9009 "+@look+" ^000000!";
123                if(@look == 20) menu "Back To The Begin",Lbrowsecolor,"I like this one",Lstop;
124                if(@look != 20) menu "Keep going",Lbrowsecolorrep,"I like this one",Lstop;
125
126                Lstop:
127                        mes "[^FF8000Stylist^000000]";
128                        mes "You look great~!  I love it~! ^_^";
129                        close;
130
131        LCancel:
132                mes "[^FF8000Stylist^000000]";
133                mes "Well come again.";
134                close;
135
136        Lcloth:
137                mes "[^FF8000Stylist^000000]";
138                mes "Do you want to browse through the choices, or do you know what you want?";
139                next;
140                menu "Browse",Lbrowsecloth,"I know what I want",Lwantcloth;
141
142        Lwantcloth:
143                mes "[^FF8000Stylist^000000]";
144                mes "Great!  Now just pick a pallete and I'll get started!";
145                next;
146                mes "[^FF8000Stylist^000000]";
147                mes "Please pick a style number ^0000FFbetween 0 and 77^000000.";
148                mes "Number 0, by the way, is the default style for your character.";
149                next;
150                input @pal;
151                if (@pal>77) close;
152                if (@pal<0) close;
153                setlook 7,@pal;
154                next;
155                mes "[^FF8000Stylist^000000]";
156                mes "Is this good, or do you want a different pallet";
157                next;
158                menu "This is good",-,"Different pallet, please",Lwantcloth;
159                next;
160                mes "[^FF8000Stylist^000000]";
161                mes "You look great~!  Come back again, okay?";
162                close;
163
164        Lbrowsecloth:
165                set @look, -1;
166                mes "[^FF8000Stylist^000000]";
167                mes "Okay, here we go~!  Just stop me when you see something you like, okay?";
168                next;
169
170        Lbrowseclothrep:
171                set @look,@look+1;
172                setlook 7,@look;
173                mes "This is Pallete Number^FF9009 "+@look+" ^000000!";
174                if(@look == 77) menu "Back To The Begin",Lbrowsecloth,"I like this one",Lstop;
175                if(@look != 77) menu "Keep going",Lbrowseclothrep,"I like this one",Lstop;
176}
Note: See TracBrowser for help on using the browser.