path: root/npc/000-1/jalad.txt

// Evol scripts.
// Author:
//    Reid
// Description:
//    Sailor part of the Gugli's quest.

000-1.gat,46,35,0,1	script	Jalad	110;2,{

    set @q, getq(ShipQuests_Jalad);
    if (@q == 1) goto l_CallFunc;

// Some dialogues will be here.
    setq ShipQuests_Jalad, 1;
// And here too.

l_CallFunc:
    callfunc "SailorFood";

    menu
        rif(getq(ShipQuests_Jalad) == 1, l("I'm still busy, I need to find the other sailors.")), -,
        l("What's this fruit?"), OnAquada;

    mes "";
    mesn;
    mesq l("Who are you searching?");
    next;

    menu
        rif(getq(ShipQuests_Ale) == 0, l("Ale.")), l_Ale,
        rif(getq(ShipQuests_Astapolos) == 0, l("Astapolos.")), l_Bottom,
        rif(getq(ShipQuests_Gulukan) == 0, l("Gulukan.")), l_Bottom,
        rif(getq(ShipQuests_QMuller) == 0, l("QMuller.")), l_Bottom,
        rif(getq(ShipQuests_Tibbo) == 0, l("Tibbo.")), l_Bottom,
        l("Nobody."), -;

    close;

l_Bottom:
    mes "";
    mesn;
    mesq l("I've seen him on the bottom of the island, check around.");

    close;

l_Ale:
    setcamnpc "Ale";

    next;
    mesn;
    mesq l("Look, he's there!");
    next;

    restorecam;
    close;

OnPlushroom:
    mes "";
    mesn;
    mesq l("A @@? There're plenty on this island!", getitemlink("Plushroom"));
    next;
    mesq l("It's a kind of mushroom, we call it plush because of it's taste, a real marshmallow. It also got this name because of it's look, it got the appearance of a toy.");
    next;
    mesq l("There're some regrouping of these @@'s all around this island, just pick some and test it by yourself.", getitemlink("Plushroom"));

    close;

}