/*=========================================================
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,{

	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 "Why hello there young " + ((Sex)?"boy":"girl") + ".";
			mes "My name is ^008800Winslow^000000 and I have a very special talent...";
			next;
			
			mes .npc_name$;
			mes "...you see...I can see auras. Yes, before you ask, I can see your aura as well...";
			next;
			
			mes .npc_name$;
			mes "If you would like, I can read your aura for you?";
			next;
	
			if(select("Sure!?:Sorry, not interested.") == 2)
			{
				mes .npc_name$;
				mes "I see...you must be a skeptic. Off with you then...";
				close;
			}
 
			mes .npc_name$;
			mes "Let's take a look shall we?";
			next;
			mes "......";
			next;
			mes "......";
			mes "......";
			next;
			mes "......";
			mes "......";
			mes "......";
			next;
 
			mes .npc_name$;
			mes "Ah, your aura is very pure and clean. I can see that you are surrounded by a white aura.";
			next;
 
			mes .npc_name$;
			mes "Almost all auras are invisible to most people.";
			mes "However, I have been taught to make certain auras visible to those even so young such as yourself.";
			next;
			
			mes .npc_name$;
			mes "It's an old secret that has been passed down from generation to generation in my family.";
			next;
			
			mes .npc_name$;
			mes "It requires a set of very unique items...a soul from each of the Queen's dragons.";
			next;
 
			mes .npc_name$;
			mes "I will need:";
 
			// Loop to print out item requirements
			for(set .@j,0; .@j < getarraysize(.qitem); set .@j,.@j+1)
			{
				mes "^FF0000"+ .qamt +"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)
		set .qamt,1,1,1,1,1,1,1,1,1,1; // Quest item amount
	end;
}