// TMW2 script.
// Authors:
//    Jesusalva
// Description:
//    Milly here is mixed with Crastur's almanach quest.
//    She controls "World's Hero quest", which is now her MAIN QUEST;
//    But maybe later she'll get nodes about Khafar etc but not like in TMW
//
//    Her reward is a Plush Mouboo. Along about 1000 Mouboo Figurines, and whatever
//    grand reward for completing Main Storyline, and a mega blaster level at magic,
//    and probably within another general quest, YOU CAN SUMMON THE MOUBOOTAUR
//    Eh... I think you need all seven Mana Fragments to control it, though.
//    Without these fragments, you'll just face the baddest boss fight ever and die
//    miserably, because the moubootaur is... well... Simply put... THE MOUBOOTAUR.

012-1,111,66,0	script	Milly	NPC_TEDDYGIRL,{
    .@q=getq(General_Milly);
    mesn;
    if (.@q >= 1) mesq lg("Hello my hero!");
    else mesq l("Hello.");
    if (.@q == 0) goto L_Assign;
    else if (.@q == 1) goto L_Feat;
    close;

L_Assign:
    next;
    mesn;
    mesq lg("hey, hey, are you a hero, are you a hero?");
    next;
    mesn;
    mesq l("I want to meet a hero!");
    next;
    mesc b(l(".:: World's Hero Quest ::.")), 3;
    msObjective(reputation("Candor") >= 100, l("* become @@ Hero", l("Candor")));
    msObjective(reputation("Tulim") >= 100, l("* become @@ Hero", l("Tulimshar")));
    msObjective(reputation("Halin") >= 100, l("* become @@ Hero", l("Halinarzo")));
    msObjective(reputation("Hurns") >= 100, l("* become @@ Hero", l("Hurnscald")));
    msObjective(reputation("LoF") >= 100, l("* become @@ Hero", l("Land Of Fire")));
    msObjective(reputation("Nival") >= 100, l("* become @@ Hero", l("Nivalis")));
    msObjective(reputation("Frostia") >= 100, l("* become @@ Hero", l("Frostia")));
    next;
    if (reputation("Candor") >= 100 &&
        reputation("Tulim") >= 100 &&
        reputation("Halin") >= 100 &&
        reputation("Hurns") >= 100 &&
        reputation("LoF") >= 100 &&
        reputation("Nival") >= 100 &&
        reputation("Frostia") >= 100) goto L_Finish;
    mesc l("You can become a hero by completing every quest in a certain location.");
    close;

L_Finish:
    mesn;
    mesq lg("Wo-wo-wow! You really did it! You're the best!");
    next;
    mesn;
    mesq l("But the game still is in development, so not every quest was added yet.");
    next;
    mesn;
    mesq l("Do you want to get a reward nonetheless? You will lose @@.", b(l("any planned experience and gold reward.")));
    mesc l("Also note that, under team's discretion, all rewards from this quest might be erasen along quest state.");
    mesc l("This would mean you might need to complete this quest again in the future.");
    next;
    // Debug
    percentheal 100, 100;
	sc_start SC_ATTHASTE_POTION1, 1800000, 30;
    /*
    mesn;
    mesc l("Saulc was here"), 1;
    close;
    */
    // / Debug
    if (askyesno() == ASK_YES) {
        mes "";
        inventoryplace PlushMouboo, 1;
        setq General_Milly, 1;
        getitem PlushMouboo, 1;
        getexp 100, 100; // No, not really.
        mesn;
        mesq lg("Here you go, miss! Thanks for being my hero! <3", "Here you go, mister! Thanks for being my hero! <3");
    }
    close;

L_Feat:
    next;
    mesn;
    mesq l("Hey hey, can you impress me? Can you impress me?");
    next;
    mesn;
    mesq l("I want you to impress me, so I can brag about you to all my friends!");
    next;
    mesc b(l(".:: Impressive Hero Quest ::.")), 3;
    msObjective(YETIKING_WINNER, l("* Impress %s", l("the Yeti King")));
    msObjective(HEROESHOLD_WINNER, l("* Impress %s", l("Colonel Dustman")));
    msObjective(REBIRTH_WINNER, l("* Impress %s", l("Sir Phoenix")));
    msObjective(QUIRINO_WINNER, l("* Impress %s", l("Quirin Voraz")));
    msObjective(GEMINI_WINNER, l("* Impress %s", l("Valia Gemini")));
    msObjective(GHQ_WINNER, l("* Impress %s", l("Aidan and Pet Detective")));
    msObjective(EPISODE_WINNER, l("* Impress %s", l("The Doctor")));
    msObjective(FORT_1ST_VISIT, l("* Impress %s", l("The Alliance")));
    msObjective(MOUBOOTAUR_WINNER, l("* Impress %s", l("Andrei Sakar")));
    mes "";
    mesc l("You need to finish at least %d/%d tasks.", 7, 9);
    .@t = 0;
    if (YETIKING_WINNER) .@t += 1;
    if (HEROESHOLD_WINNER) .@t += 1;
    if (REBIRTH_WINNER) .@t += 1;
    if (QUIRINO_WINNER) .@t += 1;
    if (GEMINI_WINNER) .@t += 1;
    if (GHQ_WINNER) .@t += 1;
    if (EPISODE_WINNER) .@t += 1;
    if (FORT_1ST_VISIT) .@t += 1;
    if (MOUBOOTAUR_WINNER) .@t += 1;
    if (.@t >= 7) goto L_Epic;
    close;

L_Epic:
    next;
    mesn;
    mesq lg("Wo-wo-wow! You really did it! You're the best!");
    next;
    mesn;
    mesq l("But the game still is in development, so not every great feat was added yet.");
    next;
    mesn;
    mesq l("Do you want to get a reward nonetheless? You will lose @@.", b(l("any planned experience and gold reward.")));
    mesc l("Also note that, under team's discretion, all rewards from this quest might be erasen along quest state.");
    mesc l("This would mean you might need to complete this quest again in the future.");
    next;
    // Debug
    percentheal 100, 100;
	sc_start SC_ATTHASTE_POTION1, 1800000, 30;
    /*
    mesn;
    mesc l("Saulc was here"), 1;
    close;
    */
    // / Debug
    if (askyesno() == ASK_YES) {
        mes "";
        inventoryplace SunnyCrystal, 1;
        setq General_Milly, 2;
        getitem SunnyCrystal, 1;
        getexp 100, 100; // No, not really.
        mesn;
        mesq lg("Here you go, miss! Thanks for being my hero! <3", "Here you go, mister! Thanks for being my hero! <3");
    }
    close;

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