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
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
|
//===== eAthena Script =======================================
//= Quest NPCs related to Payon
//===== By: ==================================================
//= kobra_k88
//===== Current Version: =====================================
//= 1.4
//===== Compatible With: =====================================
//= eAthena 7.15 +
//===== Description: =========================================
//= Pretend Murder, Ear Muffs, Oxygen, Derivuchi Cap, Helm of Angel Quests.
//===== Additional Comments: =================================
//= Fully working
//= 1.1 Helm of Angel bug fixed [Lupus]
//= 1.2 Fixed skirt of virgin [Lupus]
//= 1.3 Fixed exploits [Lupus]
//= 1.4 Removed Duplicates [Silent]
//= 1.5 Updated Dialogs from "Pretend Murdered Quest" [Samuray22]
//============================================================
//==========================================================================================//
// Pretend Murdered quest
//==========================================================================================//
payon,154,170,4 script Granny 78,{
if(countitem("Skirt_Of_Virgin") > 3 ) {
mes "[Granny in Payon]";
mes "Hey... Is this the item for Skirt of Virgin tHat my children will wear for the coming festival...";
mes "Could you give me some ^3355FF' Skirt of Virgin '^000000 for young girl... I need four of it... please ?";
mes "I am begging you, please!";
next;
switch(select( "Give it to her.","No way!")) {
case 1:
delitem "Skirt_Of_Virgin",4;
mes "[Granny in Payon]";
mes "Uh-uh... Thank you very much! Now I can make Skirt of Virgin for my children.";
mes "Hey... Oh! Yeah! I was in a stage play when I was young...";
mes "This is the overcoat I kept when I left the troupe after I got married...";
next;
mes "[Granny in Payon]";
mes "Take it if you like it... please!";
mes "Good bye! Nice meeting you...";
getitem "Pretend_Murdered",1;
close;
case 2:
mes "[Granny in Payon]";
mes "Uh-uh... How can I get ^3355FF'Skirt of Virgin '^000000 by myself... I am so weak and tired.";
mes "It's such a cold world...";
close;
}
}
mes "[Granny in Payon]";
mes "I gather Mushrooms on the Mountain of Payon Everyday for my living. I don't know how I will survive this month.";
mes "... But festive is coming next month!";
mes "My children requested for Skirt of Virgin for this festival.";
mes "For Skirt of Virgin, I need ^3355FF' Skirt of Virgin '^000000 ...";
next;
mes "[Granny in Payon]";
mes "Young man, I have a favor to ask... If you ever find ^3355FF' Skirt of Virgin '^000000... ";
mes "Please come back to me. I will never forget your kindness...";
close;
}
//========================================================================================//
// Ear Muffs Quest
//========================================================================================//
payon_in01,18,10,4 script Mystic Lady 75,{
mes "[Mystic Lady]";
mes "Hi there.";
next;
menu "Hello.",-,"Please make me a pair of Ear Muffs.",M_Muffs, "End",M_End;
mes "[Mystic Lady]";
mes "My family and I recently came to Payon.";
mes "Where we came from the weather was very cold so we started a business hand making a special type of ^5555FF'Ear Muffs'^000000";
next;
mes "[Mystic Lady]";
mes "I have tried to continue the family business here in Payon but it has proven to be difficult because of the warm whether.";
next;
mes "[Mystic Lady]";
mes "Although the 'Ear Muffs' aren't very usefull here, if you plan on going somewhere that's cold our 'Ear Muffs' are a must have.";
next;
mes "[Mystic Lady]";
mes "All I need are:";
mes "^5555FF1 Cursed Ruby,";
mes "1 Headset,";
mes "200 Feathers,";
mes "and a 5,000 zeny fee^000000 for my labor.";
next;
mes "[Mystic Lady]";
mes "With those items I can make you a pair of 'Ear Muffs'. Believe me, they are of the highest quality and look good on just about anybody!";
close;
M_Muffs:
if(countitem(724)<1 || countitem(5001)<1 || countitem(949)<200 || zeny<5000) goto sL_NotEnuf;
delitem 724,1;
delitem 5001,1;
delitem 949,200;
set Zeny, Zeny-5000;
mes "[Mystic Lady]";
mes "Oh, I see that you have brought all of the required items. Just a moment please...";
next;
mes "[Mystic Lady]";
mes "... this goes here... that goes there...... some glue here... a couple stitches over there..........";
next;
getitem 2283,1;
mes "[Mystic Lady]";
mes "Ah, there you are! One pair of my familys' specialty Ear Muffs. Enjoy!";
close;
sL_NotEnuf:
mes "[Mystic Lady]";
mes "I'm sorry but you don't have the required items for me to make you a pair of my familys' specialty Ear Muffs.";
close;
M_End:
close;
}
//========================================================================================//
// Oxygen Mask Quest
//========================================================================================//
payon_in02,25,71,4 script Young Man#11 86,{
mes "[Young Man]";
if(countitem(701) >= 5) goto L_GotOra;
mes "Blahhhhhh! I... I... I JUST CAN'T take it anymore!! You little stinky, filthy, BASTARDS!!!";
emotion e_an;
next;
menu "Continue.",M_Cont, "End Conversation.",M_End;
M_Cont:
mes "[Young Man]";
mes "~Sigh~ I've had a rough life. You see, both my parents passed away when I was a kid, so I had to work to support myself at a young age.";
next;
mes "[Young Man]";
mes "It sure was rough. But after 10 years of hard work I was able to save up and finally buy myself a home!";
next;
mes "[Young Man]";
mes "Unfortunately I didn't have that much money, so I couldn't buy the home I really wanted.";
mes "Instead, I found this house..... It was big and cheap.... so I bought without really thinking my decision through.....";
next;
mes "[Young Man]";
mes "Jeez was that a mistake...... The house turned out to be a HAVEN for THIEF BUGS!!!";
emotion e_omg;
next;
mes "[Young Man]";
mes "I tried EVERYTHING to get rid of them! I sprayed them, I smashed them, I lured them out with food.........";
mes "Finally as a last resort.... I even tried to burn the house down!!";
next;
mes "[Young Man]";
mes "Grrr! What will it take to get rid of these vile creatures???";
emotion e_pif;
next;
mes "[Young Man]";
mes "I've heard there is something called ^3355FF'Ora Ora'^000000, that people in other countries use to fight bugs.....";
mes "But will it work for my situation?";
next;
mes "[Young Man]";
mes "I'm willing to give anything a try at this point. I don't have much money so I can only afford ^5555FF'5 Ora Oras'^000000.";
mes "If you happen to come across some 'Ora Ora' please let me know.";
close;
M_End:
mes "[Young Man]";
mes "I'm just so tired of fighting this never ending battle against these bugs...... those dirty scumbags!!";
emotion e_pif;
close;
L_GotOra:
mes "ArrrGgghhh!! No!... It can't be!..... I think I'm going mad... they're starting to look so cute... ArrrGgghhh!!... Nooooooo!!";
emotion e_omg;
M_Menu:
next;
menu "Continue",M_Cont, "Show Ora Ora",-, "Give Ora Ora",M_Give, "Cancel",M_End2;
mes "[Young Man]";
mes "Oooooohhhh..... is.. is this... is this... Ora Ora...??? If you give it to me I'll give you my prized treasure in return!";
mes "What do you say?? Is it a deal?";
goto M_Menu;
M_Give:
if(countitem(701) < 5) goto L_Cheater;
delitem 701,5;
mes "[Young Man]";
mes "Muhahahahah!!! Finally, I have it.... Ora Ora! Stupid and distgusting Thief Bugs.... you'll pay for invading MY HOME!!!";
emotion e_gg;
next;
mes "[Young Man]";
mes "..... Eh em... sorry. I was a little outa control there.... Ah, let me give you my valuable treasure......";
emotion e_swt;
next;
getitem 5004,1;
mes "[Young Man]";
mes "By wearing this over your mouth, the air you breathe will be filltered so that you can breathe clean air.";
mes "I picked it up while I was a Sailor out at sea. I really have no need for it.";
next;
mes "[Young Man]";
mes "Hehehehe!! I can't wait to use this Ora Ora!!!";
close;
L_Cheater:
mes "Oh... Where is it?!";
next;
M_End2:
mes "[Young Man]";
mes "What if I CAN'T get rid of these thief bugs???... I guess the only other thing I could do is fall in love with them...... heh... heh... heh....";
emotion e_swt;
close;
}
//========================================================================================//
// Derivuchi Cap(Hat of Petite Diablo), Helm of Angel
//========================================================================================//
payon_in01,56,12,4 script Young Man#12 89,{
mes "[Young Man]";
mes "What is it?............";
next;
menu "Can you make me a special item?",-, "Nothing.",M_End;
mes "[Young Man]";
mes "I see.... so you know about me huh?.... Ok, tell me what you want.";
next;
menu "-Helm of Angel",-, "-Deviruchi Hat",sM_Devir, "-I'll come back later.",M_End;
mes "[Young Man]";
mes "For the Helm of Angel I will need:";
mes "- ^5555FF1 Helm (slotted)^000000.";
mes "- ^5555FF1 Angel Wing^000000.";
mes "- ^5555FF5 Fang of Garm^000000.";
set @HAT, 1;
next;
goto sL_GetHat;
sM_Devir:
mes "[Young Man]";
mes "For the Deviruchi Hat I will need:";
mes "- ^5555FF600 Little Evil Horn^000000.";
mes "- ^5555FF40 Talon of Griffon^000000.";
set @HAT, 2;
sL_GetHat:
mes "[Young Man]";
mes "Wait a moment! Be carefull about what items you give me.";
mes "I do not distinguish between equipment that has been forged or has cards attached to them.";
mes "If you don't want to loose a precious card or piece of equipment, make sure you don't have it equiped.";
next;
mes "[Young Man]";
mes "Do you have all of the items needed?";
menu "-Give him the items.",-, "Nevermind.",M_End;
if(@HAT == 2) goto ssL_Devir;
if(countitem(2229)<1 || countitem(2254)<1 || countitem(7036)<5) goto ssL_NotEnuf;
delitem 2229, 1;
delitem 2254, 1;
delitem 7036, 5;
mes "[Young Man]";
mes "Here is your Helm of Angel.";
getitem 5025, 1;
close;
ssL_Devir:
if(countitem(1038)<600 || countitem(7048)<40) goto ssL_NotEnuf;
delitem 1038, 600;
delitem 7048, 40;
mes "[Young Man]";
mes "Here is your Deviruchi Hat.";
getitem 5038, 1;
close;
ssL_NotEnuf:
mes "[Young Man]";
mes "You don't have enough items for me to make what you want.";
close;
M_End:
mes "[Young Man]";
mes "Fine then.....";
close;
}
|
