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
|
// TMW2/LoF scripts.
// Authors:
// TMW-LoF Team
// Jesusalva
// Description:
// Permanently repeatable quest, without any special limit
017-1,123,58,0 script Boring NPC NPC_RUMLY,{
.@price=35;
mesn;
mesq l("Hwellow. I am a boring NPC which makes green dye."); // Typo on purpose: Uwhaaaaah (as in waking up) + hello
next;
mesn;
mesq l("Hwaaaah... Man, I'm bored. Will you be getting @@?", getitemlink(GreenDye));
if ($EVENT$ == "St. Patrick") {
mesc l("It's St. Patrick Day, so be warned everyone wants a green dye... So, I raise the prices.");
.@price*=2;
}
next;
mesn;
mes l("For you, boring person like me, It'll cost the small amount of:");
mes l("* @@/@@ @@", countitem(CobaltHerb), .@price+10, getitemlink(CobaltHerb));
mes l("* @@/@@ @@", countitem(GambogeHerb), .@price+10, getitemlink(GambogeHerb));
mes l("* @@/@@ @@", countitem(BugLeg), .@price-10, getitemlink(BugLeg));
mes l("@@/@@ GP", format_number(Zeny), format_number(.@price*2));
next;
select
l("Do it!"),
l("What a rip-off!");
mes "";
if (@menu == 2) {
mesn;
mesq l("Aha! I knew you were a boring person...");
close;
}
if (
countitem(CobaltHerb) < .@price+10 ||
countitem(GambogeHerb) < .@price+10 ||
countitem(BugLeg) < .@price-10 ||
Zeny < .@price*2
)
goto L_NotEnough;
inventoryplace GreenDye, 1;
delitem CobaltHerb, .@price+10;
delitem GambogeHerb, .@price+10;
delitem BugLeg, .@price-10;
Zeny-=.@price*2;
getitem GreenDye, 1;
getexp 200, 100; // Job Experience >>> Base Experience
mesn;
mesq l("There you go, boring person... You will look like the trees here. Ugh, disgusting.");
close;
L_NotEnough:
mesn;
mesq l("Please don't bore me even more... That's clearly not everything.");
next;
mesn;
mesq l("I wonder if anyone will notice or care if I take a nap here...");
close;
OnInit:
.sex=G_MALE;
.distance=5;
end;
}
|