// TMW2 Script
// Author:
//  Jesusalva
//  Saulc
// Description:
//      Guard ask you to clean the cave of red scorpion. bring him some red scorpion stingers to prove you do it well.
// Variable:
//      TulimsharQuest_Devoir

003-10,25,60,0	script	Guard Devoir	NPC_ELF_F,{

    mesn;
    mesq l("that's incredible! Monsters are now close to city gate! We need to stop them progression.");
    if (BaseLevel >= 25) goto L_Menu;
    close;

L_Menu:
    mes "[Guard Devoir]";
    mesq l("Would you like to help us a protection the town of red scorpion invasion ??");
    mes "";
    menu
        l("Yeah sure ! I'm brave as Simon"),L_Quest,
        l("Where can i found them?"),L_Where,
        l("No, thanks."),L_Close;

L_Quest:
    mes "";
    .@q=getq(TulimsharQuest_Devoir);
    mesq l("Nice ! I want you to kill some red scorpion! Mostly male!");
    next;
    if (.@q == 0) goto L_Continue;
    if (.@q == 1 && gettimetick(2) >= DEVOIR_TIMER + 60 * 60 * 40) setq TulimsharQuest_Devoir, 2;
    if (.@q == 2) goto L_Repeat;
    close;

L_Continue:
    mesq l("Red Scorpion breed fast as Ratto! With small amount of guard, it's impossible to take over.");
    next;
    mesq l("To prove you help us in this purge i ask you to bring me 14 @@? I will reward you for your bravor.", getitemlink(RedScorpionStinger));
    mes "";
    menu
        rif(countitem(MaggotSlime) >= 7, l("Here they are miss!")), L_Finish,
        l("I'll get to it."), L_Close;
    close; // double sure

L_Repeat:
    mesq l("How your purge was ? i hope you success it!.");
    next;
    mesq l("Bring me 7 @@?", getitemlink(RedScorpionStinger));
    mes "";
    menu
        rif(countitem(RedScorpionStinger) >= 7, l("Here they are miss!")), L_Finish2,
        l("I'll get to it."), L_Close;
    close;

L_Finish2:
    delitem RedScorpionStinger, 7;
    getexp 999, 0;
    Zeny = (Zeny + 680); // 70*7 = 490 base
    setq TulimsharQuest_Devoir, 1;
    set DEVOIR_TIMER, gettimetick(2);
    mes "";
    mesn;
    mesq l("Many thanks! Come back later to bring me extra @@!", getitemlink(RedScorpionStinger));
    close;

L_Finish:
    delitem RedScorpionStinger, 14;
    getexp 1555, 10;
    Zeny = (Zeny + 1410); // 70*14 = 980 base
    setq TulimsharQuest_Devoir, 1;
    set DEVOIR_TIMER, gettimetick(2);
    mes "";
    mesn;
    mesq l("Many thanks! Come back later to bring me extra @@!", getitemlink(RedScorpionStinger));
    close;

L_Where:
    mes "";
    mesq l("Ah, their is lot of in miner cave?");
    next;
    mes l("Be aware to don't attack them when they are in group!.");
    next;
    mes l("Good luck.");
    goto L_Close;

L_Close:
    closedialog;
    goodbye;
    close;
}