// Evol scripts.
// Authors:
// Hal9000
// Reid
// Description:
// Sailor part of the Gugli's quest.
// Croconut box.
000-1.gat,54,90,0,1 script Gulukan 113;2,{
set @g, getq(ShipQuests_Gugli);
if (@g == 0) goto l_NoTask;
set @q, getq(ShipQuests_Gulukan);
if (@q == 1) goto l_Func;
mesn;
mesq l("Yeye @@!", strcharinfo(0));
next;
mesq l("How are you feeying, now that you walk on steady land? Yeye better?");
next;
menu
l("Wow, it seems everyone knows my name!"), -,
l("Well, it's not bad to finally feel something beneath my feet."), l_Continue,
l("Not so good actually... I would feel better on Nard's ship."), l_Quit;
l_Name:
mes "";
mesn;
mesq l("You know, yeyes love to chat while working.");
next;
goto l_Continue2;
l_Continue:
mes "";
mesn;
l_Continue2:
mesq lg("Are you yaying here to explore the island?");
next;
menu
lg("Actually Gugli asked me if I could help you bringing him some of your boxes."), -,
l("Yes, indeed. I prefer to explore places I have never been to, before doing anything else."), l_Quit;
mes "";
mesn;
mesq l("Gugli? Oh I see. Yes, Gugli yeye pretty used to shout orders to everybody down here.");
next;
mesq l("Anyway I am glad I can give you some of these yoyoxs.");
next;
set @item, 715;
set @count, 1;
callfunc "InventoryPlace", 715, 1;
setq ShipQuests_Gulukan, 1;
getitem "CroconutBox", 1;
mes "";
mesn;
mesq lg("Thank you my friend.");
close;
l_Func:
mesn;
set @q, rand(0, 400) / 100;
if (@q == 0) goto l_RandomA;
if (@q == 1) goto l_RandomB;
if (@q > 1) goto l_RandomC;
l_RandomA:
mesq l("Hey.");
next;
mesq l("What did Gugli yayaid about the box? Was it ok?");
next;
menu
l("It's ok."), l_Fine,
l("He needs more food."), -;
mes "";
mesn;
mesq lg("Yeye sure? I'll yaye some more food in the next box then.");
close;
l_Fine:
mes "";
mesn;
mesq l("Alright! Yoyone more box and it'll be good.");
close;
l_RandomB:
mesq l("Thanks for the help!");
next;
mesq l("These yeye boxes are way too heavy to be carried alone onto the ship.");
close;
l_RandomC:
mesq l("I think that yeye's soon be done. Yeye'll soon have a full box of @@s!", getitemlink("CrocClaw"));
next;
mesq l("And you? How's it yaying on your side?");
next;
menu
rif(getq(ShipQuests_Gugli) > 1, l("Task is done.")), l_TaskDone,
rif(getq(ShipQuests_Gulukan) == 1 && (getq(ShipQuests_Ale) == 0 || getq(ShipQuests_Astapolos) == 0 || getq(ShipQuests_Jalad) == 0 || getq(ShipQuests_QMuller) == 0 || getq(ShipQuests_Tibbo) == 0), l("I'm still busy, I need to find the other sailors.")), -;
mes "";
mesn;
mesq l("Who are yeye looking for?");
next;
menu
rif(getq(ShipQuests_Ale) == 0, l("Ale.")), l_Top,
rif(getq(ShipQuests_Astapolos) == 0, l("Astapolos.")), l_Top,
rif(getq(ShipQuests_Jalad) == 0, l("Jalad.")), l_Top,
rif(getq(ShipQuests_QMuller) == 0, l("Q'Muller.")), l_Top,
rif(getq(ShipQuests_Tibbo) == 0, l("Tibbo.")), l_Bottom,
l("Nobody."), l_Quit;
l_Bottom:
mes "";
mesn;
mesq l("Yeye seen this yoiis at the bottom of the island, check around.");
close;
l_Top:
mes "";
mesn;
mesq l("Yeye seen this yoiis at the top of the island.");
next;
mesq l("You yoiis should walk to the north.");
close;
l_NoTask:
mes "";
mesn;
mesq l("*Uff*... And another box of @@s for our starving colleagues is ready.", getitemlink("Croconut"));
close;
l_TaskDone:
mes "";
mesn;
mesq lg("That's perfect, yoiis.");
close;
l_Quit:
closedialog;
close;
}