// Evol scripts.
// Authors:
//    Vasily_Makarov


000-2-2.gat,32,29,0,1	script	Bacchus	NPC_BACCHUS,{

    mesn;
    mesq l("Hahahaha!");
    mesq l("Happy Halloween!!");
    next;

L_Intro:
    mesq l("Let me introduce myself, I'm Bacchus, the ladies man, the sir of your dream, the pumpkin of the jack, the star of the your sky, the...");
    next;

    menu
        rif(countitem("Pumpkin") > 0, l("I have a pumpkin!")), L_DoHat,
        l("Where did you get that hat?"), L_Hat,
        l("Forgive me, but... who are you?"), -,
        l("Where can I find this pumpkin?"), L_Where,
        l("Goodbye..."), L_Bye;

    mes "";
    mesn;
    mesq l("I... I said you, I'm the ladies man, the...");
    next;

    menu
        l("No, not this."), -,
        l("Ok, see you."), L_Bye;

    mes "";
    mesn;
    mesq l("The sir of your dream?");
    next;
    mesq l("The pumpkin of the jack?");
    next;

    menu
        l("Could you just tell me who you are?"), -,
        l("Pumpkin of the jack."), L_Hat,
        l("Nothing..."), L_Bye;

    mes "";
    mesn;
    mesq l("You're not funny...");
    next;
    mesq l("I'm Bacchus! The...");
    next;
    mesq l("Ok, that's enough.");
    next;
    mesq l("I'm just a random stranger, just passing by this ship, in this wonderful day of Halloween.");
    next;
    mesq l("Hmm...");
    next;
    mesq l("Who're you?");
    next;
    goto L_Intro;

L_Hat:
    mes "";
    mesn;
    mesq l("My hat! do you like it? I do love it, I made it by myself, it's such a beauty, isn't it? Oh wait, I can light fire inside, it's the most beautiful!");
    next;
    mesq l("Do you want one as well?");
    next;

    menu
        l("I would like one too, indeed."), -,
        l("No thanks, I think that I'll leave you alone..."), L_Bye;

    mes "";
    mesn;
    mesq l("You would like... ? So I think that's... Possible, let's say... yes! Yes, it's possible.");
    next;
    mesq l("You just need to bring me... one @@, that's all. I'll carve it myself.", getitemlink("Pumpkin"));
    next;

    menu
        l("Deal! I'll bring you one."), -,
        l("Where can I find this pumpkin?"), L_Where,
        l("I changed my mind, I don't want it anymore."), L_Bye;

    mes "";
    mesn;
    mesq l("Nice! I'll wait you here.");

    close;

L_Where:
    mes "";
    mesn;
    mesq l("Oh... That's a hard thing to find, only the Cuco can give it to you...");
    next;
    mesq l("It's an evil pumpkin, and... You're half lucky, there's one here!");
    next;
    mesq l("Don't be scared, he's on the other room, nobody is there.");
    next;
    mesq l("Just go to the left, you'll see a rusty door, knock it hard, and defeat this vegetable!");

    close;

L_Bye:
    mes "";
    mesn;
    mesq l("You miss something...");

    close;

L_DoHat:
    mes "";
    mesn;
    mesq l("Nice nice... Wait few seconds...");
    next;

    mesn "Narrator";
    mes "The squary pumpkinman is sculpting your pumpkin while talking to you.";
    next;

    if (countitem("Pumpkin") > 0) delitem "Pumpkin", 1;
    getitem "PumpkinHat", 1;

    mesn;
    mesq l("Did I told you that a long time ago... Oh, I'm done.");
    next;
    mesq l("That's remarkable, I've never made anything like that one before, consider yourself lucky!");

    close;

}