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
174
175
176
|
//===== Hercules Script ======================================
//= Quests: Bird Nest, Lion Mask, Skeleton Manteau,
//= Fashion Hip Sack & Sales Banner
//===== By: ==================================================
//= Lupus
//===== Current Version: =====================================
//= 1.01
//===== Description: =========================================
//= Custom quest for some RO mobile game bonus items
//===== Additional Comments: =================================
//= 1 May, 2006
//= 1.01 translated the rest of dialogues
//============================================================
gonryun,187,140,4 script Yakima 4_F_EINWOMAN,{
mes "[Yakima]";
mes callfunc("F_Hi");
mes "I can make some items for you.";
mes "They are quite rare novadays...";
specialeffect 417;
next;
switch (select("Bird Nest", "Lion Mask", "Skeleton Manteau", "Fashion Hip Sack", "Sales Banner", "Leave")) {
case 1:
mes "[Yakima]";
mes "Oh.. it's an excellent item for any beast hunter.";
emotion e_rock;
next;
mes "[Yakima]";
mes "For the hat I'll need:";
mes "1 Sombrero,";
mes "920 Feathers of Birds and";
mes "310 Bills of Birds.";
next;
mes "[Yakima]";
mes "Do you have all the items?";
next;
if (select("Yeah.", "Nay." != 1))
break;
if(countitem(Sombrero) < 1 || countitem(Feather_Of_Birds) < 920 || countitem(Bill_Of_Birds) < 310) goto l_noitem;//Items: Sombrero, Feather_of_Birds, Bill_of_Birds,
delitem Sombrero,1;//Items: Sombrero,
delitem Feather_Of_Birds,920;//Items: Feather_of_Birds,
delitem Bill_Of_Birds,310;//Items: Bill_of_Birds,
getitem Bird_Nest,1;//Items: Bird_Nest,
mes "[Yakima]";
mes "Thank you very very much!";
mes callfunc("F_Bye");
close;
case 2:
mes "[Yakima]";
mes "Bingo! Many people are afraid of lions... to the muteness...";
emotion e_slur;
next;
mes "[Yakima]";
mes "For the hat I'll need:";
mes "1 Tiger Mask,";
mes "10 Tiger's Footskins,";
mes "30 Tiger Skins and";
mes "300 Tiger Panties.";
next;
mes "[Yakima]";
mes "Do you have all the items?";
next;
if (select("Yeah.", "Nay." != 1))
break;
if(countitem(Tiger_Mask) < 1 || countitem(Tiger_Footskin) < 10 || countitem(Tiger's_Skin) < 30 || countitem(Tiger_Skin_Panties) < 300) goto l_noitem;//Items: Tiger_Mask, Tiger_Skin, Tiger's_Footskin, Tiger_Panty,
delitem Tiger_Mask,1;//Items: Tiger_Mask,
delitem Tiger_Footskin,10;//Items: Tiger's_Footskin,
delitem Tiger's_Skin,30;//Items: Tiger_Skin,
delitem Tiger_Skin_Panties,300;//Items: Tiger_Panty,
getitem Lion_Mask,1;//Items: Lion_Mask,
mes "[Yakima]";
mes "Thank you very very much!";
mes callfunc("F_Bye");
close;
case 3:
mes "[Yakima]";
mes "I wish I sold this filthy manteau faster...";
mes "Guess it isn't so plain as it looks... Hmm.";
emotion e_wah;
next;
mes "[Yakima]";
mes "I'm giving it almost for free:";
mes "10 Old Manteaus,";
mes "3 Skull Rings,";
mes "2 Manteau[1] and";
mes "1 Ragamuffin Manteau.";
next;
mes "[Yakima]";
mes "Do you have all the items?";
next;
if (select("Yeah.", "Nay." != 1))
break;
if(countitem(Ragamuffin_Cape) < 1 || countitem(Manteau_) < 2 || countitem(Skul_Ring) < 3 || countitem(Old_Manteau) < 10) goto l_noitem;//Items: Ragamuffin_Manteau, Manteau_, Skull_Ring, Old_Manteau,
delitem Ragamuffin_Cape,1;//Items: Ragamuffin_Manteau,
delitem Manteau_,2;//Items: Manteau_,
delitem Skul_Ring,3;//Items: Skull_Ring,
delitem Old_Manteau,10;//Items: Old_Manteau,
getitem Skeleton's_Cape,1;//Items: Skeleton_Manteau,
mes "[Yakima]";
mes "Thank you very very much!";
mes callfunc("F_Bye");
close;
case 4:
mes "[Yakima]";
mes "It's a fresh style! Ancessory and a bag all in one! You'd get +2 STR... It's different from that sabby nest!";
mes "It fits to Merchant classonly.";
emotion e_heh;
next;
mes "[Yakima]";
mes "Now my stock is full of those bags... So I'll make it from 3 flower things and a rough piece of clothes:";
mes "3 Romantic Flowers,";
mes "3 Fancy Flowers,";
mes "2 Flower Rings and";
mes "3 Pirate Bandanas.";
next;
mes "[Yakima]";
mes "Do you have all the items?";
next;
if (select("Yeah.", "Nay." != 1))
break;
if(countitem(Centimental_Flower) < 3 || countitem(Fancy_Flower) < 3 || countitem(Flower_Ring) < 2 || countitem(Pirate_Bandana)<3 ) goto l_noitem;//Items: Romantic_Flower, Fancy_Flower, Flower_Ring,
delitem Centimental_Flower,3;//Items: Romantic_Flower,
delitem Fancy_Flower,3;//Items: Fancy_Flower,
delitem Flower_Ring,2;//Items: Flower_Ring,
delitem Pirate_Bandana,3;//Items: Pirate_Bandana
getitem Fashionable_Sack,1;//Items: Fashion_Hip_Sack,
mes "[Yakima]";
mes "Thank you very very much!";
mes callfunc("F_Bye");
close;
case 5:
mes "[Yakima]";
mes "Well, well, well... this sign fits any class from a certain level!";
mes "Your foes'd be dazzled!";
emotion e_no1;
next;
mes "[Yakima]";
mes "Well... we construct it from some common items:";
mes "1 Scarlet Dyestuffs,";
mes "1 Orange Dyestuffs,";
mes "2 Stop Posts,";
mes "3 Clown Noses,";
mes "180 Fig Leaves and";
mes "20 Solid Peaches.";
next;
mes "[Yakima]";
mes "Do you have all the items?";
next;
if (select("Yeah.", "Nay." != 1))
break;
if(countitem(Scarlet_Dyestuffs) < 1 || countitem(Orange_Dyestuffs) < 1 || countitem(Stop_Post) < 2 || countitem(Pierrot_Nose) < 3 || countitem(Leaf_Clothes) < 180 || countitem(Hard_Peach) < 20) goto l_noitem;//Items: Scarlet_Dyestuff, Orange_Dyestuff, Stop_Post, Clown_Nose, Fig_Leaf, Solid_Peach,
delitem Scarlet_Dyestuffs,1;//Items: Scarlet_Dyestuff,
delitem Orange_Dyestuffs,1;//Items: Orange_Dyestuff,
delitem Stop_Post,2;//Items: Stop_Post,
delitem Pierrot_Nose,3;//Items: Clown_Nose,
delitem Leaf_Clothes,180;//Items: Fig_Leaf,
delitem Hard_Peach,20;//Items: Solid_Peach,
getitem Sales_Signboard,1;//Items: Sales_Banner,
mes "[Yakima]";
mes "Thank you very very much!";
mes callfunc("F_Bye");
close;
case 6:
break;
}
mes "[Yakima]";
mes callfunc("F_Bye");
close;
l_noitem:
mes "[Yakima]";
mes "You are lack of items. Please, get all the items.";
emotion e_sry;
close;
}
|
