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
|
// TMW2 Script
// Author:
// Jesusalva
// Description:
// Begs for food. Lots of it. And in the end, an armor piece awaits you.
// Enliven Reva Foxhound is an anagram of Lunovox Heavenfinder
009-1,89,57,0 script Enliven Reva Foxhound NPC_IVAN,{
.@q=getq(HalinarzoQuest_Foxhound);
if (BaseLevel < .@q+30) {
mesn;
mesq l("Ah, living in Halinarzo is so difficult...");
next;
mesn;
mesq l("If there were strong people to give us food, ah, how that would be good...");
next;
mesn;
mesq l("Sorry for making you listen my rambles. I need someone strong, you see...");
close;
}
mesn;
mesq l("Please traveler, help my starving family!");
next;
mesn;
mesq l("We from Halinarzo are very poor, and in constant need of food. You have to help us!");
mes "";
menu
l("I'll help you."), -,
l("Sorry, I am so hungry as you."), L_Close;
switch (.@q) {
case 0:
mesn;
mesq l("There's a long time we don't eat anything. Bring us @@! Five should do it.", getitemlink(Bread));
select
rif(countitem(Bread) >= 5, l("I have it right here. You can take it!")),
l("I'm sorry... I can't help you either...");
if (@menu == 1) {
delitem Bread, 5;
getexp 20, 0;
Zeny=Zeny+25*5;
mes "";
mesn;
mesq lg("Thank you! Thank you! Savior!");
setq(HalinarzoQuest_Foxhound, 1);
next;
}
break;
case 1:
mesn;
mesq l("Bread is fine, but it would taste better with @@. Could you bring us three?", getitemlink(Cheese));
select
rif(countitem(Cheese) >= 3, l("I have it right here. You can take it!")),
l("I'm sorry... I can't help you either...");
if (@menu == 1) {
delitem Cheese, 3;
getexp 25, 0;
Zeny=Zeny+25*3;
mes "";
mesn;
mesq lg("Thank you! Thank you! Savior!");
setq(HalinarzoQuest_Foxhound, .@q+1);
next;
}
break;
case 2:
mesn;
mesq l("Do you know @@? It's a poisonous food you can't find around here. It can be made edible with special prepare.", getitemlink(PinkBlobime));
select
rif(countitem(PinkBlobime) >= 1, l("I have it right here. You can take it!")),
l("I'm sorry... I can't help you either...");
if (@menu == 1) {
delitem PinkBlobime, 1;
getexp 30, 0;
Zeny=Zeny+10*1;
mes "";
mesn;
mesq lg("Thank you! Thank you! Savior!");
setq(HalinarzoQuest_Foxhound, .@q+1);
next;
}
break;
case 3:
mesn;
mesq l("I saw Purple the other day... Ah, now I want to eat @@... A dozen should do...", getitemlink(Plushroom));
select
rif(countitem(Plushroom) >= 12, l("I have it right here. You can take it!")),
l("I'm sorry... I can't help you either...");
if (@menu == 1) {
delitem Plushroom, 12;
getexp 35, 0;
Zeny=Zeny+15*12;
mes "";
mesn;
mesq lg("Thank you! Thank you! Savior!");
setq(HalinarzoQuest_Foxhound, .@q+1);
next;
}
break;
case 4:
mesn;
mesq l("There exist more food than you know. But this time I don't want anything extravagant, just 6 @@ should be fine.", getitemlink(CaveSnakeEgg));
select
rif(countitem(CaveSnakeEgg) >= 6, l("I have it right here. You can take it!")),
l("I'm sorry... I can't help you either...");
if (@menu == 1) {
delitem CaveSnakeEgg, 6;
getexp 40, 0;
Zeny=Zeny+27*6;
mes "";
mesn;
mesq lg("Thank you! Thank you! Savior!");
setq(HalinarzoQuest_Foxhound, .@q+1);
next;
}
break;
case 5:
mesn;
mes l("Thanks for feeding us earlier. I wanted to give a great dinner to my family, even if just once.");
mes l("Could you please give us a full meal, with 5 @@, 5 @@, 5@@, 5 @@ and 5 @@?", getitemlink(SnakeEgg), getitemlink(Bread), getitemlink(Cheese), getitemlink(Aquada), getitemlink(Manana));
select
rif(countitem(SnakeEgg) >= 5 && countitem(Bread) >= 5 && countitem(Cheese) >= 5 && countitem(Aquada) >= 5 && countitem(Manana) >= 5, l("I have it right here. You can take it!")),
l("I'm sorry... I can't help you either...");
if (@menu == 1) {
mes "";
mesn;
mesq l("Thanks for attending even this selfish request of mine.");
next;
delitem SnakeEgg, 5;
delitem Bread, 5;
delitem Cheese, 5;
delitem Aquada, 5;
delitem Manana, 5;
getexp 500, 15;
getitem Bucket, 1;
mesn;
mesq l("This is just a bucket, but I did some cuts on it so you can see though it. It protects your whole face.");
next;
mesn;
mesq l("This is the least I could do for you. Many thanks. And if you have more food, you can keep feeding my family.");
setq(HalinarzoQuest_Foxhound, .@q+1);
setq2(HalinarzoQuest_Foxhound, .@q+1);
next;
}
break;
default:
.@q=getq2(HalinarzoQuest_Foxhound);
// Manana (Death Penalty) or Aquadas (Hard to get item)?
mesn;
mesq l("I only need @@ @@. Please! You have to help me!", .@q, getitemlink(Manana));
select
rif(countitem(Manana) >= .@q, l("I have it right here. You can take it!")),
l("I'm sorry... I can't help you either...");
if (@menu == 1) {
delitem Manana, .@q;
Zeny=Zeny+((60*.@q)-.@q); // If you repeat too much, you get less and less money...
mes "";
mesn;
mesq lg("Thank you! Thank you! Savior!");
setq(HalinarzoQuest_Foxhound, .@q+1);
next;
}
}
goto L_Close;
L_Close:
closedialog;
goodbye;
close;
OnInit:
//.@npcId = getnpcid(0, .name$);
//setunitdata(.@npcId, UDT_HEADTOP, NPCEyes);
//setunitdata(.@npcId, UDT_HEADMIDDLE, VneckJumper);
//setunitdata(.@npcId, UDT_HEADBOTTOM, RaidTrousers);
//setunitdata(.@npcId, UDT_WEAPON, LousyMoccasins); // Boots
//setunitdata(.@npcId, UDT_HAIRSTYLE, 6);
//setunitdata(.@npcId, UDT_HAIRCOLOR, 3);
.sex = G_MALE;
.distance = 5;
end;
}
|
