/*=========================================================
Lighthalzen Aura Quest
by Zephy
===========================================================
Description:
===========================================================
Simple quest NPC to obtain the Lighthalzen Aura item.
===========================================================
Additional Notes:
===========================================================
Changelog
    - Edited line 88. Switched the options.
    - Added more dialogue.
    - Changed dialogue a little.
=========================================================*/
 
amatsu,97,121,4 script  Nekomata    421,{
 
 
    mes .npc_name$;
    if(#DoneQuest == 1)
    {
    mes "I am sorry it seems that you used me once";
    close;
    end;
    }
    for(set .@i,0; .@i < getarraysize(.qitem); set .@i,.@i+1)
    {
        // Check if current item fails to meet prerequisite
        if(countitem(.qitem[.@i]) < .qamt)
        {
            
        mes "I am the Blue Queen's Guardian. I was born to protect and guard the forest... But now I have failed due to my lack of discipline the Queen's dragon died.";
            next;
 
            mes .npc_name$;
            mes "Do you wish to help me gather the materials needed for the resurrection of the Blue Queen's Dragon?";
                    next;
    
            if(select("I will help you in your holy task.:Sorry, I don't want to help.") == 2)
            {
                mes .npc_name$;
                mes "Stop wasting my time!";
                close;
            }
 
            mes .npc_name$;
            mes "You are quite determined! Ha ha! I like your spirit!";
            next;
 
            mes .npc_name$;
            mes "Here are the materials needed for the Blue Queen's Dragon awaited resurrection.";
 
            // Loop to print out item requirements
            for(set .@j,0; .@j < getarraysize(.qitem); set .@j,.@j+1)
            {
                mes "^FF0000"+ .qamt[.@j] +"x - "+ getitemname(.qitem[.@j]) +"^000000";
            }
            
            close;
            
        }
    }
    
 
 
    // If player meets the required amount of items
    mes "EXCELLENT! Now we can revive the dragon! Let's make haste and prepare for the revival of the Blue Queen's Dragon!";
    next;
 
    mes .npc_name$;
    mes "Show me the materials!"; // change the dialogue
    next;
 
    if(select("No:Yes") == 1)
    {
        mes .npc_name$;
        mes "WHAT?! I told you! STOP WASTING MY TIME!"; 
        close;
    }
 
    mes .npc_name$;
    mes "I will go get your reward for the hard work and dedication for the Blue Queen."; 
 
    // Loop to delete all quest items
    for (set .@i,0; .@i < getarraysize(.qitem); set .@i,.@i+1)
    {
        delitem .qitem[.@i], .qamt[.@i];
    }
    
    next;
    
    mes .npc_name$;
    mes "......."; 
    next;
    mes "*CLANK* *CLINK* *CLANK*";
    next;
    mes "......";
    next;
    
    specialeffect 100;
    mes .npc_name$;
    mes "You will not be forgotten Noble wanderer, you name will now be included in the Blue Queen's kingdom history.";
    getitem .pitem, .pamt; // Get prize item
    set #DoneQuest, 1;
    next;
    close;
 
    
OnInit: 
    // Configuration
        // General
        set .npc_name$,"[^008800Nekomata^000000]"; // NPC's dialogue name
 
        // Items
        set .pitem,21605; // Prize item for completing the quest
        set .pamt,1; // Prize item amount
        setarray .qitem[0], 21606; // Quest items (IDs)
        setarray .qamt[0], 5; // Quest item amount
    end;
 
}