// TMW2 Script
// Author: 
//  Crazyfefe
//  Jesusalva
// Description:
//  Dark Invocator Quest

007-1,152,155,0	script	Zarkor	NPC_MIRAJ,{
    .@q=getq(TulimsharQuest_DarkInvocator);
    if (BaseLevel <= 30)
        goto L_Weak;
    switch (.@q) {
        case 0:
            goto L_Start;
            break;
        case 1:
            mesn "Zarkor, the Dark Summoner";
            mesq l("Talk to Zitoni, the Alchemist of Candor. He may look humble, but he is the greatest alchemist of this world. I need five @@.", getitemlink(EverburnPowder));
            close;
            break;
    }
    mesn;
    mesq l("One day... One day! ONE DAY I'LL GET REVENGE ON YOU, MONSTER KING!");
    close;

L_Weak:
    mesn;
    mesq lg("Stay out of harm way. Nothing to see here. Stay away, pathetically weak human.");
    close;

L_Start:
    mesn;
    mesq l("Hey... You... Come here.");
    next;
    mesn "Zarkor, the Dark Summoner";
    mesq l("I am Zarkor, the Dark Summoner. I want to do a dark summoning ritual, but there are strings attached.");
    next;
    mesn "Zarkor, the Dark Summoner";
    mesq l("I need to buy your silence. I'll reward you greatly when I'm done. But first, I need to know if you'll be loyal to me.");
    next;
    mesn "Zarkor, the Dark Summoner";
    mesq l("To prove me your faith, bring me 1 @@ or 1 @@.",getitemlink(Ruby),getitemlink(Topaz));
    mesq l("Such precious gem, is not something you would give for free, unless you are interested on my... rituals.");
    next;
    mesn strcharinfo(0);
    select
        l("Indeed. Sorry. I'm not giving you anything."),
        rif(countitem(Ruby) >= 1, l("I swear silence, over this bloody ruby."),
        rif(countitem(Topaz) >= 1, l("I swear silence, over this shining topaz.");

    mes "";
    switch (@menu) {
        case 1:
            mesn;
            mesq l("Very well. This conversation never happened.");
            next;
            mesn;
            mesq l("But if you regret this choice later... You know where you can find me.");
            close;
            break;
        case 2:
            delitem Ruby, 1; // Acc: 667 GP
            setq TulimsharQuest_DarkInvocator, 1;
            break;
        case 3:
            delitem Topaz, 1; // Acc: 800 GP
            setq TulimsharQuest_DarkInvocator, 1;
            break;
    }
    mesn "Zarkor, the Dark Summoner";
    mesq l("Very well. I shall now share with you the details of this rite.");
    next;
    mesn "Zarkor, the Dark Summoner";
    mesq l("I will summon the Monster King. Don't ask me my reasons. I know this will put Tulimshar in danger. But I will still do it.");
    next;
    mesn "Zarkor, the Dark Summoner";
    mesq l("For that, I need to light five torches. The pentagram, the magic, and all the else are with me. Just light the torches.");
    next;
    mesn "Zarkor, the Dark Summoner";
    mesq l("Talk to Zitoni, the Alchemist of Candor. He may look humble, but he is the greatest alchemist of this world. I need five @@.", getitemlink(EverburnPowder));
    close;

OnInit:
    .sex = G_MALE;
    .distance = 6;
    end;

}