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
|
// TMW2 Scripts
// Author:
// Jesusalva
// Description:
// The Mana Tree Quest (unlocks after Fires of Steam events)
029-0,30,129,0 script Amelia NPC_CHILD4,{
.@q = getq(FortressQuest_ManaTree);
.@q2 = getq2(FortressQuest_ManaTree);
// Cycle
if (.@q == 0) goto L_Start;
if (.@q == 1) goto L_Cheerful;
if (.@q == 2) goto L_Short;
// Generic reply
npctalk3 l("*sigh*");
end;
L_Start:
mesc l("The kid is not paying attention to you.");
if ($FIRESOFSTEAM < 10) end;
mesc l("She is staring at the empty sea and sighing. She seems to be really down after Andrei Sakar passed away.");
next;
mesc l("Maybe we can give her something, to cheer her up?");
mes "##B" + l("Drag and drop an item from your inventory.") + "##b";
.@id = requestitem();
// No item supplied
if (.@id < 1) {
closeclientdialog;
end;
}
if (array_find(.gifts, .@id) < 0) {
mesc l("This doesn't looks like a toy.");
mesc l("Maybe we could give her a %s instead.", getitemlink(any(Doll, PlushMouboo, LeatherBall, ReinbooWand, SantaGlobe, RubberDucky, CandorBola))); // Suggest only the most rare and expensive toys
}
mesc l("Really give the %s to %s?", getitemlink(.@id), .name$), 1;
mesc b(l("The item will be lost forever!")), 1;
next;
if (askyesno() != ASK_YES) {
closeclientdialog;
end;
}
delitem .@id, 1;
getexp 27000, 0; // 1% of Level 80 EXP
setq FortressQuest_ManaTree, 1, .@id;
mesn;
mesq l("...Thanks, kind person.");
next;
mesn;
mesq l("My name is Amelia, and I am Elora's daughter.");
close;
L_Cheerful:
mesc l("Amelia looks much more cheerful than the last time you've met her.");
next;
mesn;
mesq l("Hey, %s! Welcome back!", strcharinfo(0));
next;
mesn;
mesq l("Thanks for the %s you gave me the other day.", getitemlink(.@q2));
if (getq(General_Narrator) < 20)
close;
next;
mesn;
mesq l("Here, lemme tell you something good: Do you know that fortress island which all the adventurers are talking about nowadays?");
next;
if (askyesno() == ASK_NO) {
mesn;
mesq lg("Uh, how come? I thought you were an adventurer too! That island which trusted adventurers can reach using Pihro & Pyndragon's personal airship is so popular... Anyway!");
next;
}
mesn;
mesq l("I visited it with my mother, the other day, and I found a tree in a cave!");
next;
mesn;
mesq l("It was so lovely, and it had some very tasty fruits, too! But the cave was so dangerous...");
next;
mesn;
mesq l("I saw some flower adorns, too. I hope it is not some traveler's grave. This war, it makes me so sad... I'm sure the tree was sad, too.");
next;
mesn;
mesq l("If you ever go there, you should pay it a visit. It is most definitely alive! I'm sure it'll like you, too.");
setq1 FortressQuest_ManaTree, 2;
close;
L_Short:
mesn;
mesq l("Thanks for the %s you gave me the other day.", getitemlink(.@q2));
if (getq(General_Narrator) < 20)
close;
next;
if ($AEGIS_HOLDER$ == "" && !rand2(4)) {
mesn;
mesq l("I heard a rumor the other day. About the tree I had found!");
next;
mesn;
mesq l("It is said that if someone dies to the pinkies but is then avenged and mourned, the avenger may claim from the tree the shield of the world!");
next;
mesn;
mesq l("The story was so cool!");
close;
}
mesn;
mesq l("If you ever visit the fortress island, be sure to visit the friendly tree at the cave. I'm sure it'll like you.");
close;
OnInit:
setarray .gifts, BrokenDoll, Doll, PlushMouboo, LeatherBall, ReinbooWand, MoubooFigurine, ChocolateBunny, RedStocking, SantaGlobe, SnowmanGlobe, RubberDucky, CandorBola, KidBola;
.sex = G_FEMALE;
.distance = 4;
end;
}
|
