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
|
//===== Hercules Script ======================================
//= Cash Hair Stylist
//===== By: ==================================================
//= Kisuka
//===== Current Version: =====================================
//= 1.0
//===== Description: =========================================
//= Exchange cash item, New_Style_Coupon, for new hair styles.
//===== Additional Comments: =================================
//= 1.0 First Version. [Kisuka]
//============================================================
itemmall,19,74,5 script Stylist#cash 4_F_02,{
mes "[Stylist]";
mes "Hey, I'm Kaniki.";
mes "I'm here to start a new";
mes "trend by introducing my";
mes "special new hairstyles!";
mes "Give me a ^FF0000New Style Coupon^000000,";
mes "and I'll change your hair~";
next;
if (Sex == 1) {
mes "[Kaniki]";
mes "I have two special";
mes "hairstyles for men, the";
mes "Emergency Heal Perm";
mes "and the Aura Blade Cut.";
mes "and aura blade cut.";
next;
cutin "hair_m_24.bmp",4;
mes "[Kaniki]";
mes "This is the Emergency";
mes "Heal Perm. It's a brand";
mes "new style I invented recently.";
mes "What do you think? Cool, huh?";
next;
cutin "",255;
cutin "hair_m_25.bmp",4;
mes "[Kaniki]";
mes "Now this is the Aura";
mes "Blade Cut. You haven't";
mes "seen anything like it";
mes "before, haven't you?";
next;
cutin "",255;
}else{
mes "[Kaniki]";
mes "I have two new hairstyles for";
mes "women, the Assumptio Perm";
mes "and the Soul Changer Cut.";
mes "Do you want to see how";
mes "these styles look?";
next;
cutin "hair_f_24.bmp",4;
mes "[Kaniki]";
mes "This is the Assumptio";
mes "Perm. It'd really good";
mes "on you, wouldn't it?";
next;
cutin "",255;
cutin "hair_f_25.bmp",4;
mes "[Kaniki]";
mes "Next is the Soul";
mes "Changer Cut. What do";
mes "you think? Isn't it nice?";
next;
cutin "",255;
}
mes "[Kaniki]";
mes "Have you decided";
mes "if you'd like me to";
mes "change your hairstyle?";
next;
if(select("Change Hairstyle:Don't Change") == 1) {
if (countitem(7622) > 0) {
mes "[Kaniki]";
mes "Great, you brought";
mes "a New Style Coupon!";
mes "Alright, which hairstyle";
mes "did you want to have?";
next;
if (Sex == 1) {
if(select("Emergency Heal Perm:Aura Blade Cut") == 1) {
delitem 7622,1; // New_Style_Coupon
setlook 1,24;
}else{
delitem 7622,1; // New_Style_Coupon
setlook 1,25;
}
}else{
if(select("Assumptio Perm:Soul Changer Cut") == 1) {
delitem 7622,1; // New_Style_Coupon
setlook 1,24;
}else{
delitem 7622,1; // New_Style_Coupon
setlook 1,25;
}
}
mes "[Kaniki]";
mes "There--! It's done!";
mes "How do you like your";
mes "new hair? Well, I hope";
mes "to see you again. Take care!";
close;
}else{
mes "[Kaniki]";
mes "I'm sorry, but I can";
mes "only provide my hairstyling";
mes "service if you bring a New";
mes "Style Coupon. Please come";
mes "back to me after you manage to";
mes "get one of those coupons, okay?";
close;
}
}
mes "[Kaniki]";
mes "Really? Oh, that's too bad.";
mes "Well, if you ever change your";
mes "mind about updating your";
mes "hairstyle, come back";
mes "and let me know, okay?";
close;
}
|
