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
|
// Evol scripts.
// Authors:
// Hal9000
// Reid
// Description:
// Elmo's twin
// Charged of an important quest from Nard, he asks you to help other sailors to keep their box to the ship.
// Variable:
// 0 ShipQuests_Couwan
// 1 ShipQuests_Nard
// 2 ShipQuests_Gugli
// Values:
// 00 Never talked with Couwan.
// 01 Spoke, and received the quest scam.
// 02 Done quest scam.
// 10 Introduction of the box and Nard. This is displayed when the player never spoke to Nard or his box.
// 11 Nard spoke and gave access to the outdoor of the ship.
// 12 Completed the quest.
// 13 Opened the chest and finished the introduction.
// 20 Never talked with Gugli.
// 21 Gugli gives you the task.
// 22 Gave all of the box to Gugli.
000-1.gat,85,108,0,1 script Gugli 313;2,{
OnTalk:
mesn;
set @nard, getq(ShipQuests_Nard);
set @gugli, getq(ShipQuests_Gugli);
set @gado, getq(ShipQuests_ChefGado);
if (@gado > 3 && @nard == 3) goto l_AllComplete;
if (@nard > 1 || @gugli == 2) goto l_TaskCompleted;
if (@gugli == 1) goto l_TaskGiven;
mesq lg("Hi @@, I heard the captain sent you down here, uh?", strcharinfo(0));
next;
mesq l("An unexpected help is always welcome!");
next;
mesq l("As you may know, we are long distance travelers and our whole crew needs to store enough food to survive. You don't know how dangerous the sea life can be.");
next;
menu
l("Actually, I have an in-depth knowledge of this type of life."), -;
mes "";
mesn;
mesq l("Well, even though you have been rescued by us, it doesn't make you an expert sailor, am I right?");
next;
mesq l("But let's talk more about this island. We're docking here to find some fine quality food.");
next;
mesq l("We usually dock around these small pieces of land because they provide us some of the best food of all the archipelago.");
next;
mesq l("At the moment, our crew is busy collecting @@s, @@s and @@s.", getitemlink("Croconut"), getitemlink("Plushroom"), getitemlink("Aquada"));
next;
menu
l("So what can I do for you?"), -;
mes "";
mesn;
mesq l("Right! Sailors are pretty quick with their job. They just take too much time bringing all the food back to the ship. Maybe you can help them.");
next;
mesq l("The captain wants:");
mesq l("- 2 @@", getitemlink("AquadaBox"));
mesq l("- 2 @@", getitemlink("CroconutBox"));
mesq l("- 2 @@", getitemlink("PlushroomBox"));
next;
mesq l("Ask sailors around here they shouldn't be so far away.");
next;
setq ShipQuests_Gugli, 1;
goto l_Menu;
l_TaskGiven:
mesq l("Great to see you! What can I do for you today?");
next;
l_Menu:
menu
rif(getq(ShipQuests_Couwan) == 1, l("Couwan gave me this box, it is for you.")), l_Couwan,
rif(countitem("AquadaBox") > 1 && countitem("CroconutBox") > 1 && countitem("PlushroomBox") > 1, l("I have collected all the boxes you needed.")), l_TaskDone,
l("Where can I find your crew?"), l_Location,
l("See you!"), -;
close;
l_Couwan:
mes "";
mesn;
mesq l("What?! This tritan is the worse shirker I ever met!");
next;
mesq l("Well, thanks for the box. But... He was supposed to bring it back to me himself. I never asked him to give it to you!");
next;
mesq l("Take these coins in exchange and be careful.");
next;
mesq l("Not everybody has a kind mind. Scammers can be anywhere, even among us!");
next;
mesq l("May this be a lesson for you.");
setq ShipQuests_Couwan, 2;
set zeny, zeny+50;
if (countitem("FishBox") > 0) delitem "FishBox", 1;
message strcharinfo(0), l("You receive 50GP!");
close;
l_Location:
mes "";
mesn;
mesq l("There're 6 sailors who will need your help. They're all around the island.");
next;
mesq l("I can't really help you find them since I've been checking the... Hmm... Landscape, since morning...");
next;
mesq l("You can try talking with some other sailors to get some information about that.");
next;
set @r, rand(3000)/1000;
if (@r == 1) goto l_Silvio;
if (@r == 2) goto l_Lean;
setcamnpc "Sapartan";
mesq l("Max and Sapartan for example?");
next;
restorecam;
close;
l_Silvio:
setcamnpc "Silvio";
mesq l("Silvio for example?");
next;
restorecam;
close;
l_Lean:
setcamnpc "Lean";
mesq l("Lean for example?");
next;
restorecam;
close;
l_TaskDone:
if (countitem("AquadaBox") > 1) delitem "AquadaBox", 2;
if (countitem("CroconutBox") > 1) delitem "CroconutBox", 2;
if (countitem("PlushroomBox") > 1) delitem "PlushroomBox", 2;
setq ShipQuests_Gugli, 2;
mesq l("Well done! The ship is now ready to sail again!");
next;
mesq l("You should inform Nard about the loading progress of the merchandise on to the boat. He will be pleased to hear that good news!");
close;
l_TaskCompleted:
mesq l("You are now part of the crew... At least for us down here!");
next;
mesq l("You should inform Nard about the loading progress of the merchandise on to the ship. He will be pleased to hear that good news.");
next;
mesq l("Tell him that everything went fine and that we're almost done with the food.");
close;
l_AllComplete:
mesq l("Elmo told me what Nard said, congrats!");
next;
mesq g(l("You're one of us now, that's great! I was sure that you were a kind lady when I first saw you!"),
l("You're one of us now, that's great! I was sure that you were a good man when I first saw you!"));
goto l_Menu;
}
000-1.gat,83,107,0,1 script GugliBarrierCheck 0,2,0,{
set @gugli, getq(ShipQuests_Gugli);
if (@gugli > 0) close;
doevent "Gugli::OnTalk";
close;
}
|
