path: root/npc/019-1/well.txt

// TMW2/LOF Script.
// Author:
//    Jesusalva
// Description:
//  Better to skip this quest. It is too poor and would require more work,
//  eg. rope and something to make the player take part on it... Probably?
//  TODO: We could also throw random stuff (dig script), and use makeitem() to
//  make it pop at Terranite Cave, near the lake, suggesting that's where the water
//  comes from.
//  TODO: We also need to figure out who was there, and why to save that person.
//  Is it related to the episode?

019-1,110,101,0	script	Well#Nivalis	NPC_SWORDS_SIGN,{
    mesc l("ERROR, missing sprite: Snowland.Well"), 1;
    mesc l("Blame Saulc"), 1;
    mesc "-------------------------------------", 1;

    // Begin here
    .@q=getq(NivalisQuest_Well);
    mesn l("The Self-Serving Ice Well!");
    mesc l("Hello, my name is Mahid, and this well belongs to me!");
    mesc l("You are allowed to fill your bottles, but BE SURE TO PAY!");
    mesc l("Otherwise, ##BYOU'LL DIE.##b Have a nice day!");
    next;

    menu
        l("Fill Water Bottles"), L_Bottle,
        rif(.@q == 2, l("Jump inside!")), L_Reckless,
        rif(.@q == 1, l("Steal bucket!")), L_Bucket,
        rif(.@q != 1, l("Throw something inside!")), L_Throw,
        l("Leave."), -;
    close;

// Fill a water bottle
L_Bottle:
    mes "";
    mesc l("Temporaly out of order."), 1;
    close;

// Jump to Terranite Cave (requires 55 vitality minimum)
L_Reckless:
    closedialog;
    warp "015-6", 363, 109;
    percentheal -155+readparam(bVit), 0;
    dispbottom l("Ouch! That was kinda reckless!");
    close;

// Easter Egg
L_Bucket:
    mes "";
    percentheal -rand(10,20), 0;
    mesn strcharinfo(0);
    mesq l("Ouch, the bucket BITE me!");
    close;

// Main Quest
L_Throw:
    close;

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