summaryrefslogtreecommitdiff
path: root/world/map/npc/007-1/voltain.txt
blob: 380326b29078e79cb1adbee6af7a330d319ffe0e (plain) (blame)
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
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
// # NPC Name: Voltain
// # LEAD AUTHOR: Pjotr Orial
// # AUTHORS: MrDudle, tarq, Salmondine, Jenalya, Pjotr Orial
// # REVIEWERS: Jenalya
// #
// # Basic Idea: A Person with lots of dark minds requires different stuff. 
// # Basically he tries to figure out, how to poison moobous, since he doesn't like the nature at all
// #
// # The variables are not attached to a player but to an npc variable, so it is more or less random, which
// # quest comes up, when a player asks him.
// # 
// # used Variables: global variable $state
// # $state = 0: bring bottles
// # $state = 1: bring black scorpion stinger
// # $state = 2: bring bug legs
// # $state = 3: bring another black scorpion stinger
// # $state = 4: bring mauve herbs
// # $state = 5: bring raw logs
// # $state = 6: bring red apples
// # $state = 7: bring cobalt herbs
// # $state = 8: bring snake tongues
// # $state = 9: bring alizarin herbs
// # $state = 10:bring steak
// # $state = 11: bring arrows
// # $state = 12: bring gamboge herbs
// # $state = 13 bring chocolate cake

007-1.gat,37,21,0|script|Voltain|103,{

    set @BOTTLE_NEEDED,  3;
    set @BOTTLE_REWARD_XP,  100;
    set @BOTTLE_REWARD_GOLD,  450;

    set @BLACK_SC_ST_NEEDED,  5;
    set @BLACK_SC_ST_REWARD_XP,  500;
    set @BLACK_SC_ST_REWARD_GOLD,  250;

    set @BUGLEG_NEEDED,  10;
    set @BUGLEG_REWARD_XP,  200;
    set @BUGLEG_REWARD_GOLD,  150;

    set @HERBS_NEEDED,  7;
    set @HERBS_REWARD_XP,  200;
    set @HERBS_REWARD_GOLD,  250;

    set @RAWLOG_NEEDED,  5;
    set @RAWLOG_REWARD_XP,  330;
    set @RAWLOG_REWARD_GOLD,  300;

    set @REDAPPLE_NEEDED,  7;
    set @REDAPPLE_REWARD_XP,  330;
    set @REDAPPLE_REWARD_GOLD,  300;

    set @STEAK_NEEDED,  2;
    set @STEAK_REWARD_XP,  330;
    set @STEAK_REWARD_GOLD,  280;

    set @ARROW_NEEDED,  25;
    set @ARROW_REWARD_XP,  330;
    set @ARROW_REWARD_GOLD,  100;

    set @SNAKETONGUE_NEEDED,  3;
    set @SNAKETONGUE_REWARD_XP,  330;
    set @SNAKETONGUE_REWARD_GOLD,  100;

    set @CHOCOLATECAKE_NEEDED,  3;
    set @CHOCOLATECAKE_REWARD_XP,  330;
    set @CHOCOLATECAKE_REWARD_GOLD,  180;

    if ($state == 1) goto state1;
    if ($state == 2) goto state2;
    if ($state == 3) goto state3;
    if ($state == 4) goto state4;
    if ($state == 5) goto state5;
    if ($state == 6) goto state6;
    if ($state == 7) goto state7;
    if ($state == 8) goto state8;
    if ($state == 9) goto state9;
    if ($state == 10) goto state10;
    if ($state == 11) goto state11;
    if ($state == 12) goto state12;
    if ($state == 13) goto state13;
//    default: trap through to state0!

state0:
    mes "[Voltain]";
    mes "\"What are you doing bothering me? Can't you see I'm busy! Oh, I'm sorry, I thought you were my assistant. Never mind that... would you care to help me?\"";
    next;
    menu
        "Sure I do!", -,
        "No, you creep me out.", L_NOHELP;
    mes "[Voltain]";
    mes "\"I'm working on a very special potion. I need some empty bottles to keep the ingredients in. Care to go find me " + @BOTTLE_NEEDED + " empty bottles?!\"";
    next;
    menu
        "I've got the bottles.", -,
        "I don't feel like helping you get garbage...", L_CLOSE;

    if (countitem("EmptyBottle") < @BOTTLE_NEEDED)
        goto L_NOT_ENOUGH;
    delitem "EmptyBottle", @BOTTLE_NEEDED;
    set zeny, zeny + @BOTTLE_REWARD_GOLD;
    getexp @BOTTLE_REWARD_XP, 0;
    set $state, 1;
    mes "\"Thanks for the bottles. Much easier to carry liquid in them.\"";
    close;

state1:
mes "[Voltain]";
mes "\"I'm making a potion that requires lots of venom. I'm in need of " + @BLACK_SC_ST_NEEDED + " black scorpion stingers.\"";
next;

menu
    "I've got the stingers!", -,
    "I'll go search for them.", L_CLOSE;
    mes "[Voltain]";
    if (countitem("BlackScorpionStinger") < @BLACK_SC_ST_NEEDED)
        goto L_NOT_ENOUGH;
    delitem "BlackScorpionStinger", @BLACK_SC_ST_NEEDED;
    set zeny, zeny + @BLACK_SC_ST_REWARD_GOLD;
    getexp @BLACK_SC_ST_REWARD_XP, 0;
    set $state, 2;
    mes "\"Well, since you went to the trouble of getting me these here's a little something for your time...\"";
    close;


state2:
    mes "[Voltain]";
    mes "\"Care to to help me with my potion? I need " + @BUGLEG_NEEDED + " bug legs so that I can thicken the potion.\"";
    next;
    menu
        "I've got the bug legs.", -,
        "I'd rather not carry around dead bugs for you.", L_NOHELP ;
    mes "[Voltain]";
    if (countitem("BugLeg") < @BUGLEG_NEEDED)
        goto L_NOT_ENOUGH;
    delitem "BugLeg", @BUGLEG_NEEDED;
    set zeny, zeny + @BUGLEG_REWARD_GOLD;
    getexp @BUGLEG_REWARD_XP, 0;
    set $state, 3;
    mes "\"Great! My potion is ready to poison the moub...I mean cure scorpion stings. \"";
    close;

state3:
    mes "[Voltain]";
    mes "\"I find myself in need of a black scorpion stinger... Damn mouboo are hard to kill...forget you heard that.\"";
    next;
    menu
        "Here's the stinger.", -,
        "I DID HEAR THAT! I will not help you KILL mouboo!", L_CLOSE;
    mes "[Voltain]";
    if (countitem("BlackScorpionStinger") < 1)
        goto L_NOT_ENOUGH;
    delitem "BlackScorpionStinger", 1;
    getexp @BLACK_SC_ST_REWARD_XP, 0;
    set $state, 4;
    mes "\"Great! Now I can really kill that monster!\"";
    close;

state4:
    mes "[Voltain]";
    mes "\"I need to thicken a veno.. Oh, a potion actually. I want to try mauve herbs for that, so can you bring me " + @HERBS_NEEDED + ", please?\"";
    next;
    menu
        "Here are the herbs.", -,
        "So you want to do a venom? I will not help you!", L_CLOSE;
    mes "[Voltain]";
    if (countitem("MauveHerb") < @HERBS_NEEDED)
        goto L_NOT_ENOUGH;
    delitem "MauveHerb", @HERBS_NEEDED;
    getexp @HERBS_REWARD_XP, 0;
    set zeny, zeny + @HERBS_REWARD_GOLD;    
    set $state, 5;
    mes "\"Great! Now I can thicken the potion! I will try directly.\"";
    close;

state5:
    mes "[Voltain]";
    mes "\"Hello I am looking for " + @RAWLOG_NEEDED + " raw logs, maybe you could help me getting some? I want to try to build a mouboo trap.. Uhm actually no! I want to build a device to destroy these traps. So can you help me?\"";
    next;
    menu
        "Here are the raw logs.", -,
        "So you want build traps for mouboos? NO WAY!", L_CLOSE;
    mes "[Voltain]";
    if (countitem("RawLog") < @RAWLOG_NEEDED)
        goto L_NOT_ENOUGH;
    delitem "RawLog", @RAWLOG_NEEDED;
    getexp @RAWLOG_REWARD_XP, 0;
    set zeny, zeny + @RAWLOG_REWARD_GOLD;    
    set $state, 6;
    mes "\"Great! Now I can thicken the potion! I will try directly.\"";
    close;
    
state6:
    mes "[Voltain]";
    mes "\"Hello I am looking for " + @REDAPPLE_NEEDED + " red apples, maybe I can inject some venoms.. DOH not this again! Of course I meant a strength potion. Did you hear about the new potions from Caul? He is a pretty good alchimist. He can do strength potions, can't he?\"";
    next;
    menu
        "Here are the red apples.", -,
        "I am not sure...", L_CLOSE;
    mes "[Voltain]";
    if (countitem("RedApple") < @REDAPPLE_NEEDED)
        goto L_NOT_ENOUGH;
    delitem "RedApple", @REDAPPLE_NEEDED;
    getexp @REDAPPLE_REWARD_XP, 0;
    set zeny, zeny + @REDAPPLE_REWARD_GOLD;    
    set $state,7;
    mes "\"Very well, this will be useful.\"";
    close;

state7:
    mes "[Voltain]";
    mes "\"I need to thicken a veno.. Oh, a potion actually. Cobalt herbs might be good for that, so can you bring me " + @HERBS_NEEDED + ", please?\"";
    next;
    menu
        "Here are the herbs.", -,
        "So you want to do a venom? I will not help you!", L_CLOSE;
    mes "[Voltain]";
    if (countitem("CobaltHerb") < @HERBS_NEEDED)
        goto L_NOT_ENOUGH;
    delitem "CobaltHerb", @HERBS_NEEDED;
    getexp @HERBS_REWARD_XP, 0;
    set zeny, zeny + @HERBS_REWARD_GOLD;    
    set $state, 8;
    mes "\"Great! Now I can go on with the ven-  the experiments for the welfare of humanity, i mean.\"";
    close;

state8:
    mes "[Voltain]";
    mes "\"I am in need of snake tongues. They can help me getting very strong venom extracts. So I would like you to bring me " + @SNAKETONGUE_NEEDED + " snake tongues.\"";
    next;
    menu
        "Sure, here you go!", -,
        "Maybe you will find someone else, I got stuff to do on my own!", L_CLOSE;
    mes "[Voltain]";
    if (countitem("SnakeTongue") < @SNAKETONGUE_NEEDED)
        goto L_NOT_ENOUGH;
    delitem "SnakeTongue", @SNAKETONGUE_NEEDED;
    getexp @SNAKETONGUE_REWARD_XP, 0;
    set zeny, zeny + @SNAKETONGUE_REWARD_GOLD;    
    set $state, 9;
    mes "\"Excellent, now I can extract the venom to- uhm, nevermind. Thanks for your help.\"";
    close;

state9:
    mes "[Voltain]";
    mes "\"I need to thicken a veno.. Oh, a potion actually. I want to try alizarin herbs for that, so can you bring me " + @HERBS_NEEDED + ", please?\"";
    next;
    menu
        "Here are the herbs.", -,
        "So you want to do a venom? I will not help you!", L_CLOSE;
    mes "[Voltain]";
    if (countitem("AlizarinHerb") < @HERBS_NEEDED)
        goto L_NOT_ENOUGH;
    delitem "AlizarinHerb", @HERBS_NEEDED;
    getexp @HERBS_REWARD_XP, 0;
    set zeny, zeny + @HERBS_REWARD_GOLD;    
    set $state, 10;
    mes "\"Great! Now I can thicken the potion! I will try directly.\"";
    close;

state10:
    mes "[Voltain]";
    mes "\"Oh I am hungry. Maybe I can eat some steaks. Could you bring me a steak,  please?\"";
    next;
    mes "\"Oh, I just wonder if i can inject some ven... Forget about that! Bring me " + @STEAK_NEEDED + "steaks!\"";
    next;
    menu
        "Here you go.", -,
        "Help yourself! In the Hurnscald Inn you can get some meals for sure!", L_CLOSE;
    mes "[Voltain]";
    if (countitem("Steak") < @STEAK_NEEDED)
        goto L_NOT_ENOUGH;
    delitem "Steak", @STEAK_NEEDED;
    getexp @STEAK_REWARD_XP, 0;
    set zeny, zeny + @STEAK_REWARD_GOLD;    
    set $state, 11;
    mes "\"Thanks a lot. I will really enjoy my meal.\"";
    close;

state11:
    mes "[Voltain]";
    mes "\"Could I have some arrows please? I have lost my hunting equipment when I was in the caves. Some dark creatures were chasing me!\"";
    next;
    mes "\"Acually I wonder if I can use these arrows for building a mouboo trap.... Oh wait! I need some" + @ARROW_NEEDED + " arrows for my self defence right? So do not talk about it!\"";
    menu
        "Here you go.", -,
        "Sorry I don't have arrows here!", L_CLOSE;
    mes "[Voltain]";
    if (countitem("Arrow") < @ARROW_NEEDED)
        goto L_NOT_ENOUGH;
    delitem "Arrow", @ARROW_NEEDED;
    getexp @ARROW_REWARD_XP, 0;
    set zeny, zeny + @ARROW_REWARD_GOLD;    
    set $state, 12;
    mes "\"Thanks a lot. Now I feel more secure here in the outdoors.\"";
    close;

state12:
    mes "[Voltain]";
    mes "\"I need to thicken a veno.. Oh, a potion actually. I want to try gamboge herbs for that, so can you bring me " + @HERBS_NEEDED + ", please?\"";
    next;
    menu
        "Here are the herbs.", -,
        "So you want to do a venom? I will not help you!", L_CLOSE;
    mes "[Voltain]";
    if (countitem("GambogeHerb") < @HERBS_NEEDED)
        goto L_NOT_ENOUGH;
    delitem "GambogeHerb", @HERBS_NEEDED;
    getexp @HERBS_REWARD_XP, 0;
    set zeny, zeny + @HERBS_REWARD_GOLD;    
    set $state, 13;
    mes "\"Great! Now I can thicken the potion! I will try directly.\"";
    close;

state13:
    mes "[Voltain]";
    mes "\"Doing so many ev- good things makes me hungry. I feel in the mood for a Chocolate Cake. Can you bring me " + @CHOCOLATECAKE_NEEDED + " ,  please? \"";
    next;
    menu
        "Here it is.", -,
        "I don't feel in the mood to bring you a cake.", L_CLOSE;
    mes "[Voltain]";
    if (countitem("ChocolateCake") < @CHOCOLATECAKE_NEEDED)
        goto L_NOT_ENOUGH;
    delitem "ChocolateCake", @CHOCOLATECAKE_NEEDED;
    getexp @CHOCOLATECAKE_REWARD_XP, 0;
    set zeny, zeny + @CHOCOLATECAKE_REWARD_GOLD;    
    set $state, 0;
    mes "\"I love chocolate cakes. I wonder, if I can use my ven- \"";
    emotion 5;
    close;

L_NOHELP:
    mes "\"If you don't want to help me, then away with you. Bothering me won't help me get my work done.\"";
    mes "Voltain then mumbles something under his breath that you cannot quite make out";
    mes "\"... These damn kids. \"";
    close;

L_CLOSE:
    close;

L_NOT_ENOUGH:
    mes "\"Can't you count!? I need more. \"";
    close;
}