// TMW2 Script
// Author:
//   Unknown
// Description:
//   Saxso's widow. Asks new players to trigger a bug bomb in the storehouse.

005-1,43,85,0	script	Zegas	NPC_MONA,{
    function lagTutorial;
    .@q = getq(CandorQuest_Barrel);
    if (BaseLevel < 5)
        goto L_Weak;
    if (.@q == 1)
        goto L_Find;
    if (.@q == 2)
        goto L_Looking;
    if (.@q == 3)
        goto L_QuestEnd;
    if (.@q == 4)
        goto L_Thanks;
    goto L_Meet;

L_Weak:
    mesn;
    mesq l("Please don't go inside this storehouse, it is infested with aggressive maggots.");
    close;

L_Meet:
    mesn;
    mesq l("Excuse me! Do you have a second?");
    next;
    mesq l("The storehouse here is overrun with house maggots. Those little wretches are eating and destroying everything inside.");
    next;
    mesq l("Luckily, professor Eomie of the Tulimshar Magic Academy gave us a bug bomb to deal with them. Its inside one of the store room barrels but i don't remember which is.");
    next;
    mesq l("Can you search ##Bthe barrels##b for the bug bomb and set it off when you find it?");
    setq CandorQuest_Barrel, 1;
    menu
        l("Sure."),L_Start,
        l("Maybe some other time."),L_Close;

L_Find:
    mesn;
    mesq l("Excuse me! The storehouse is still overrun with house maggots.");
    next;
    mesq l("Please get it done quickly. The villagers' livelihood is depending on this storehouse!");
    menu
        l("I'll finish it in no time. Don't worry."),L_Start,
        l("I need more time to prepare."),L_Close;

L_Start:
    mesn;
    mesq l("Thanks, come back and see me once you found the bug bomb and set it off.");
    setq CandorQuest_Barrel, 2;
    lagTutorial();
    close;

L_Looking:
    mesn;
    mesq l("Still haven't found it? Well, keep looking the barrels at this storehouse. I know it's in there, somewhere.");
    if (TUTORIAL) {
        mesc l("Read the tutorial again?");
        if (askyesno() == ASK_YES)
            lagTutorial();
    }
    close;

L_QuestEnd:
    mesn;
    mesq l("From the smell I know you found the bug bomb!");
    mesq l("Thanks once again, I know it's not much but here are %d GP and a pair of self-sewn shorts for your troubles.", 350);
    getexp 63, 0;
    getitem CandorShorts, 1;
    Zeny = (Zeny + 350);
    setq CandorQuest_Barrel, 4, 0;
    close;

L_Thanks:
    mesn;
    mesq l("Thank you very much! You are a great help.");
    if (!getq(CandorQuest_Chest)) {
        next;
        mesn;
        mesq l("Do you see that fancy house over there? My husband, %%s, used to live there.", b(l("Saxso")));
        next;
        mesn;
        mesq l("Strangely enough, when he died, he became a ghost. This shouldn't happen, but yet...");
        next;
        mesn;
        if ( BaseLevel < 25) {
            mesq l("Anyway, conspiratory theories aside, his ghost is a powerful boss. I would not attack him yet if I were you!");
            mesc l("You should come back when you are stronger, ideally at ") + b(l("level 25 or above") + ".");
        } else {
            mesq l("Anyway, conspiratory theories aside, his ghost is a powerful boss.");
            mesq l("You look ready to take him on.");
        }
    }
    close;

L_Close:
    closedialog;
    goodbye;
    close;

function lagTutorial {
    // TUTORIAL block
    tutmes l("The bugs there can be pretty vicious. Do you know what's worse though? Lag.");
    tutmes l("By pressing %s, you can open the Shortcut menu. And by pressing %s, you open the skill menu!", b("F8"), b("F5"));
    tutmes l("If you drag the \"Resync\" skill from the skill list to the shortcut list, you'll be able to rapidly solve some lag issues!");
    tutmes l("Of course, lag might always be a problem. Remember to drag healing items to the shortcut list too. %%2");
    return;
}

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

005-1,32,73,0	script	ZegasDebug	NPC_MONA,{
    showavatar NPC_MONA;  // this is handled by avatars.xml
    mesn;
    mesq l("Reset?");
    next;
    menu
        l("Yes."),  L_Reset,
        l("No."),   L_Close;

L_Reset:
    setq CandorQuest_Barrel, 0, 0;
    mes l("Reset!");
    close;

L_Close:
    //showavatar;  // Use this to hide the showavatar
    close;

// Use @shownpc to enable ZegasDebug
OnInit:
    if (!debug)
        disablenpc "ZegasDebug";
    end;
}