/*=========================================================
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,265,236,4	script	Winslow	922,{
 set @name$,strcharinfo(0);
	mes .npc_name$;
 
	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 "Halt! Who goes there?";
	   
            next;
            
            mes .npc_name$;
            
	    mes "Ah, The Red Queen sent you? I told her that I can do my job without any help.";
            next;
            
            mes .npc_name$;
      
	    mes "Tch, well I guess I have no choice but.."
            next;
			
	
	    mes "**Looks down with embarrassment**;
            next;
			
			mes .npc_name$;
            mes "The Red Queen needs all the help she needs to defeat the Monsters responsible for the death of her precious dragon.";
			next;
			mes "Bring us the proof that you have defeated the Monsters and you will receive a great prize."
			next;
			mes "are you up for it?"
            next;
    
            if(select("Yes, I'm ready!:Sorry, I need more time.") == 2)
            {
                mes .npc_name$;
                mes "Then go home while you're at it. I don't need cowards like you.";
                close;
            }
 
            mes .npc_name$;
            mes "I am amazed young one, you showed great spirits and dedication... Now, we must put it into the ultimate test.";
            next;
 
            mes .npc_name$;
            mes "Bring me these materials as a proof you have avenged our Red Queen's dragon.";
 
            // 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 "Wow, looks like you have gathered many dragon souls recently.";
	next;
 
	mes .npc_name$;
	mes "May I have them?";
	next;
 
	if(select("No:Yes") == 1)
	{
		mes .npc_name$;
		mes "Ah I see...on your way then young traveler.";
		close;
	}
 
	mes .npc_name$;
	mes "Ah I see....these are the 8 dragon souls I need to make the aura...";
 
	// Loop to delete all quest items
	for (set .@i,0; .@i < getarraysize(.qitem); set .@i,.@i+1)
	{
		delitem .qitem[.@i], .qamt;
	}
	
	next;
	
	mes .npc_name$;
	mes "Now...all we need to do is...";
	next;
	mes "......";
	next;
	mes "......";
	mes "......";
	next;
	mes "......";
	mes "......";
	mes "......";
	close2;
	
	sleep2 1000;
	specialeffect 100;
	sleep2 500;

	mes .npc_name$;
	mes "Ah...wonderful. The dragon souls have accepted eachother and merged into a beautiful...white aura.";
	getitem .pitem, .pamt; // Get prize item
	next;
	
	mes .npc_name$;
	mes "The white aura signifies wholeness, being in-sync with yourself.";
	next;
	
	mes .npc_name$;
	mes "Right then...off you go.";
	close;

OnInit:
	// Configuration
		// General
		set .npc_name$,"[^008800Winslow^000000]"; // NPC's dialogue name
 
		// Items
		set .pitem,17456; // Prize item for completing the quest
		set .pamt,1; // Prize item amount
		setarray .qitem[0], 17462, 17463, 17464, 17465, 17466, 17467, 17468, 17469, 22373, 8063; // Quest items (IDs)
		setarray .qamt[0], 5, 5, 5, 5, 10, 5, 50, 30, 50, 80, 50, 50, 45, 100, 1; // Quest item amount
	end;
}