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

// Evol scripts.
// Authors:
//    Alige
//    Qwerty Dragon
//    Reid
// Description:
//    Cookie NPC, beware, if you don't take your cookie, she'll keep it!

000-1,97,50,0	script	Cookie Master	419,{
    if (getq(General_Cookies) == 1)
        goto L_GetCookie;

    mesn;
    mesq lg("Hey! Adventurer! Are you enjoying your life on Aemil?");
    next;

    menu
        l("Well in fact..."), -;

    mes "";
    mesn;
    mesq l("Shht shht!");
    next;
    mesq l("Don't tell me more, I know what you want...");
    next;
    mesq l("A cookie!");
    next;

    menu
        l("I'd love one!"), -,
        l("No thank you, I'm fine. I'll come back later."), L_Bye;

    mes "";
    mesn;
    mesq lg("Of course you do! Just listen carefully to these words my dear.");
    next;
    mesq l("Cookies are a source of life.");
    next;
    mesq l("Cookies provide you strength, health and cuteness.");
    next;
    mesq l("Cookies are awesome, so am I.");

    menu
        l("Uhm... Your story seems..."), L_StorySeems,
        l("Wait... That's not the place for a chef, what are you doing here?"), L_Presentation,
        l("Exactly! Can I have one now?"), -;

L_Check:
    mes "";
    mesn;
    mesq l("Let me check my cookie list...");
    next;

// Beta3 Contributors.
    if (strcharinfo(0) == "4144")
        goto L_Reward;
    if (strcharinfo(0) == "Alige")
        goto L_Reward;
    if (strcharinfo(0) == "enchilado")
        goto L_Reward;
    if (strcharinfo(0) == "hal9000")
        goto L_Reward;
    if (strcharinfo(0) == "Reid")
        goto L_Reward;
    if (strcharinfo(0) == "Socapex")
        goto L_Reward;
    if (strcharinfo(0) == "Kenny690")
        goto L_Reward;
    if (strcharinfo(0) == "Nelson6e65")
        goto L_Reward;
    if (strcharinfo(0) == "Steel Zenn")
        goto L_Reward;

    mesq l("I'm sorry but I can't see your name anywhere.");
    next;
    mesq l("You see, my cookies are restricted to a certain type of people...");
    next;

    menu
        l("Seriously? It's just a cookie you know... Tell me what I should do to get one."), L_TaskExpanation,
        l("Yes, yes I know... Too bad then. See you soon!"), L_Bye;

L_StorySeems:
    mes "";
    mesn;
    mesq l("What about my story?");
    next;

    menu
        l("It's interesting and exciting at the same time!"), -,
        l("Honestly, it's quite far-fetched according to me."), L_Kick;

    mes "";
    menu
        l("Too bad I'm not hungry enough right now for these... cookies. I'll maybe come back later."), L_Bye,
        l("How can I get one of these cookies?"), -;

    mes "";
    mesn;
    mesq g(l("Yummy bakery aromas have stirred madam's curiosity, am I right?"),
           l("Yummy bakery aromas have roused monsieur's curiosity, is it not so?"));
    next;
    mesq lg("Well, if you want to be one of those who can have a cookie...");
    next;

L_TaskExpanation:
    mes "";
    mesn;
    mesq l("You'll first need to help my friends.");
    next;
    mesq l("It is to them I look to, for it is them, who tell me to whom I can give cookies.");
    next;

    menu
        l("So you're under the control of dictators, that's... reassuring."), L_Control,
        l("Who are these friends?"), L_Friends;

L_Friends:
    mes "";
    mesn;
    mesq l("Shht shht!");
    next;
    mesq l("Don't say it too loud, other people could hear us.");
    next;
    mesq l("My friends are... Well, you know... The creators... Programmers, Scripters, Mappers, Pixel Artists, Soundscapers... The Most Skilled Sages of the Tentacled Dance.");
    next;
    mesq l("I can't help you to be on my list, nor can I give you a cookie for free.");
    next;
    mesq l("All I can do is tell you that...");
    next;
    mesq l("If you see weird things, or things that shouldn't be here, or even things that you would like to see there...");
    next;
    mesq l("Simply contact them, help them and be kind. They might surely add you to my cookie list!");
    next;

    mesn "Narrator";
    mes col(l("This Cookie Master rewards people who contribute and develop this world."), 9);
    next;
    mes col(lg("If you want to be rewarded, help us in making this world a better place."), 9);
    next;
    mes col(l("When you see something that looks more like a bug than a feature, report it on http://bugs.evolonline.org or try to contact a game contributor."), 9);
    next;
    mes col(l("Any contribution to the game (translations, graphics creation/edition, concepts, coding/scripting, etc...) is rewarded!"), 9);

    mes "";
    mesn;
    mesq l("So, do you still want a cookie now?");
    next;

    menu
        l("I wish I helped your friends, because I'd really, really like a cookie."), -,
        l("You tell me. Do I deserve a cookie?"), L_Check;

    mes "";
    mesn;
    mesq l("Don't worry, I'm sure you will help them soon enough!");
    next;

    goto L_Bye;

L_Presentation:
    mes "";
    mesn;
    mesq l("For a chef? Who said I was a... Oh right, I am.");
    next;
    mesq l("I was sent here with a task. I can give you a perfect, wonderful, magnificent, superbly well shaped... Cookie!");
    next;
    mesq l("But...");
    next;

    goto L_TaskExpanation;

L_Reward:
    mesq l("Yes! @@ is written on my cookie list.", strcharinfo(0));
    next;
    mesq lg("That's quite surprising... You don't look very helpful.");
    next;
    mesq l("Anyway, here, have a cookie!");

    set .@item, 517;
    set .@count, 1;
    callfunc "InventoryPlace", 517, 1;

    setq General_Cookies, 1;
    getitem "DeliciousCookie", 1;
    npctalk3 l("You receive a @@!", getitemlink("DeliciousCookie"));

    next;
    mesq lg("I'm sure you'll appreciate its effect, but be careful, these cookies are rare, and you'll need to help the community again before being able to receive another one.");
    next;

    goto L_Bye;

L_Control:
    mes "";
    mesn;
    mesq l("C'mon, don't be like that and loosen up! Don't you want to know who's behind all of this?!");
    next;

    menu
        l("Why not, this might get interesting."), L_Friends,
        l("Fine, tell me, who are these mysterious aliens?"), -,
        l("No, and I gotta go, see you."), L_Kick;

    mes "";
    mesn;
    mesq l("Don't mock me, my work is admirable.");
    next;

L_Kick:
    closedialog;

    npctalk3 l("No cookie for you!");
    warp "000-1.gat", 99, 52;

    close;

L_GetCookie:
    mesq l("How was the cookie? Tasty, wasn't it?");
    next;
    mesq l("If you want another one, you know what to do!");
    next;

L_Bye:
    closedialog;

    npctalk3 l("See you later!");

    close;

OnInit:
    setnpcsex 0;
    setnpcdistance 2;
    end;
}