path: root/npc/001-1/calypsan.txt

// Evol scripts.
// Authors:
//    Reid
// Description:
//    Dye seller.
// Variables:
//    ArtisQuests_Fexil
// Quest states:
//    0  -- not started
//    1  -- Lloyd warned about the quest
//    2  -- Fexil explain what he needs
//    3  -- Fexil buy every fur that the pc bring to him

001-1,47,126,0	script	Calypsan#001-1	NPC_CALYPSAN,{

    speech 4,
        l("Yoiis is jealous of rainbow sky? It is possible to yeye your cloth with my dyes."),
        l("What does yoiis want today?");

    .@fexil = getq(ArtisQuests_Fexil);
    menuint
        rif(.@fexil == 1, l("Have you seen Fexil?")), 0,
        l("Let's trade."), 1,
        l("I want to make my own dyes."), 2,
        l("How does these dyes works?"), 3,
        l("Bye."), 4;

    switch (@menuret)
    {
        case 0:
            setcamnpc "Fexil#001-1";
            speech 5,
                l("Oh yeye did, his store is just aside me!"),
                l("Yoiis should look there.");
            restorecam;

            break;
        case 1:
            closedialog;
            shop "Store#Calypsan001-1";
            close;
        case 2:
            speech 5,
                l("Yoiis is not yet ready to make his own dye."),
                l("But in the future I might help you to create your own ones.");
            break;
        case 3:
            speech 5,
                l("Yeye is not complicated, there are different kind of dyes that yeye sells."),
                l("");
            break;
        case 4:
            break;
    }

    closedialog;
    goodbye;
    close;

OnInit:
    .sex = G_FEMALE;
    .distance = 3;
    end;
}