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
|
// TMW2 Script
// Author:
// Jesusalva
// Description:
// Hurnscald farmer
014-3,187,84,0 script Oscar NPC_RAIJIN,{
.@q1=getq(HurnscaldQuest_Farmers);
.@q2=getq2(HurnscaldQuest_Farmers);
mesn;
if (strcharinfo(0) == $MOST_HEROIC$) mesq l("Ah, if it isn't @@? You're the talk of the town!", $MOST_HEROIC$);
if (strcharinfo(0) == $MOST_HEROIC$) next;
if (.@q1 == 2) goto L_Hello;
if (.@q1 == 3) goto L_Check;
if (.@q1 == 4) goto L_Letter;
if (.@q1 == 5) goto L_Thanks;
mesq l("Don't bother me, I'm busy right now. Since the Monster King left, I barely got a night of rest...");
close;
L_Hello:
mesq l("Ah! @@! I heard you helped Hinnak with his Pinkies problem!", strcharinfo(0));
next;
mesn;
mesq l("Wouldn't you like to help me too?");
if (askyesno() != ASK_YES) {
mesq l("Sorry, I have to go.");
close;
}
next;
mesn;
mesq l("Great! Excellent! Because I am also diving in problems!!");
next;
if (readparam(bAgi) < 30) goto L_Slow;
if (BaseLevel < 20) goto L_Weak;
mesn;
// Est. kill 400 Pinkies
mesq l("I hate so much the Pinkies on my fields, I want to do a soup! Can you provide me 10 @@? Many thanks.", getitemlink(PinkieLeg));
setq HurnscaldQuest_Farmers, 3, 0;
close;
L_Slow:
mesn;
mesq l("But you're too slow. Sorry.");
next;
mesc l("Raise agility to do this quest.");
close;
L_Weak:
mesn;
mesq l("But you're too weak. Sorry.");
close;
L_Check:
mesq l("Hey, how is the monster extermination going?");
next;
mesn;
// You in average need to kill 400 Pinkies. But ya killed 200~250 previously. You get this bonus for not leaving the fields.
if (.@q2 >= 250)
mesq l("You killed so many Pinkies! My wife and I love you!");
else if (.@q2 >= 200)
mesq l("You are doing GREAT! Keep slaying them, hahaah!");
else if (.@q2 >= 150)
mesq l("I see you are doing good. Keep slaying them, hahaah!");
else if (.@q2 >= 100)
mesq l("Good job, you already killed over 100! Hahah, that sure teach them a lesson!");
else if (.@q2 >= 50)
mesq l("Yeah, teach them a lesson! Keep going!");
else
mesq l("Go kill them!!");
next;
menu
rif (.@q2 >= 250 && countitem(PinkieLeg) >= 10, l("Today is soup of Pinkie Legs!")), L_RealHelp,
rif (.@q2 >= 250 && countitem(PinkieLeg) < 10, l("Thanks, they hate to drop their Legs.")), L_TrueHelp,
rif (.@q2 >= 100 && .@q2 < 250 && countitem(PinkieLeg) >= 10, l("Here are the Pinkie Legs.")), L_Help,
rif (.@q2 < 100 && countitem(PinkieLeg) >= 10, l("Here are the Pinkie Legs.")), L_NoKill,
l("I'm not done yet. I'll be back."), -;
close;
L_RealHelp:
delitem PinkieLeg, 10;
getexp 1600, 60;
Zeny=Zeny+5000;
setq HurnscaldQuest_Farmers, 4, 0;
mes "";
mesn;
mesq l("Waw! You really did it, you're the savior of my farm!! You have my eternal gratitute. Here is 5000 GP for your troubles!");
close;
L_TrueHelp:
mes "";
mesn;
mesq l("I know how hard it is! I hate them with all my heart, only seeing you killing them left and right was GREAT!");
next;
getexp 1000, 0;
Zeny=Zeny+2500;
setq HurnscaldQuest_Farmers, 4, 0;
mesn;
mesq l("You have my eternal gratitute. Here is 2500 GP for your troubles.");
close;
L_Help:
delitem PinkieLeg, 10;
getexp 1100, 0;
Zeny=Zeny+2000;
setq HurnscaldQuest_Farmers, 4, 0;
mes "";
mesn;
mesq l("Many thanks. You have my eternal gratitute. Here is 2000 GP for your troubles.");
close;
L_NoKill:
mesn;
mesq l("Ahahahah, do you really think I'll accept legs if you don't help me cleaning my fields?");
next;
mesn;
mesq l("Kill at least a hundred of Pinkies here, and then we can talk.");
close;
L_Letter:
mesq l("You're the savior of Hurnscald crops. Half from the world would die from famine, weren't for you.");
next;
mesn;
mesq l("@@ and I signed this letter. Deliver it to Airlia on the Town Hall, and she'll reward you correctly.", l("Hinnak"));
close;
L_Thanks:
mesq l("Many thanks for all the help!");
close;
OnKillPinkie:
.@q1=getq(HurnscaldQuest_Farmers);
.@q2=getq2(HurnscaldQuest_Farmers);
if (.@q1 == 3) {
setq2 HurnscaldQuest_Farmers, .@q2+1;
if (! (.@q2+1) % 10)
dispbottom l("@@ pinkies killed on @@'s field.", .@q2+1, l("Oscar"));
}
end;
OnInit:
.@npcId = getnpcid(0, .name$);
setunitdata(.@npcId, UDT_HEADTOP, FarmerHat);
setunitdata(.@npcId, UDT_HEADMIDDLE, LeatherShirt);
setunitdata(.@npcId, UDT_HEADBOTTOM, TulimsharGuardBoots);
setunitdata(.@npcId, UDT_WEAPON, CottonTrousers);
setunitdata(.@npcId, UDT_HAIRSTYLE, 2);
setunitdata(.@npcId, UDT_HAIRCOLOR, 0);
.sex = G_MALE;
.distance = 5;
end;
}
|
