-	script	quest_npc	-1,{
set .@npc_part,( atoi( strnpcinfo(2) ) - 1 );

mes "[ Quest Part#"+( .@npc_part + 1 )+" ]";
if( .@npc_part != quest_progress ){
	mes "You're not ready for this, or perhap you already finish this part.";
	mes " ";
	if( !quest_progress ){
		mes "You havent start the Quest yet.";
	}else{
		mes "^777777Please proceed to Part#"+( quest_progress+1 )+"^000000";
	}
}else{
	mes "Quest Requirements : ";
	if( !callsub( OnCheckItem,quest_progress,1 ) ){
		if( select( "Continue","Cancel" ) == 1 ){
			if( !callsub( OnCheckItem,quest_progress,0 ) ){
				set .@size,getarraysize( .reward_list );
				mes "You have finished the Quest.";
				if( quest_progress >= 4 ){
				set quest_progress,0;
				for( set .@i,0; .@i < ( .@size - 1 ); set .@i,.@i + 2 )
					getitem .reward_list[.@i],.reward_list[.@i+1];
				}else{
					set quest_progress,quest_progress + 1;
				}
			}
		}
	}
}
close;

OnCheckItem:
	set .@quest_progress,getarg(0);
	set .@quest_check,getarg(1);
	set .@size,getarraysize( getd( ".itemlist_"+.@quest_progress ) );
	while( .@i < ( .@size - 1 ) ){
		set .@itemid,getd( ".itemlist_"+.@quest_progress+"["+.@i+"]" );
		set .@count,getd( ".itemlist_"+.@quest_progress+"["+( .@i+1 )+"]" );
		if( .@quest_check ){
			mes getitemname( .@itemid )+" x "+.@count;
			if( countitem( .@itemid ) < .@count )
				set .@failed,.@failed + 1;
		}else{
			delitem .@itemid,.@count;
		}
		set .@i,.@i + 2;
	}
	return .@failed;

OnInit:
if( strnpcinfo(2) != "" ) end;

setarray .itemlist_0,607,14;
setarray .itemlist_1,607,10,608,20;
setarray .itemlist_2,607,21,608,11,609,21;
setarray .itemlist_3,607,12,608,22,609,12;
setarray .itemlist_4,607,23,608,13,609,23;
// Reward + Amounts
setarray .reward_list,607,100;
end;
}

prontera,151,181,4	duplicate(quest_npc)	Quest NPC 1#1	757
prontera,153,181,4	duplicate(quest_npc)	Quest NPC 2#2	757
prontera,155,181,4	duplicate(quest_npc)	Quest NPC 3#3	757
prontera,157,181,4	duplicate(quest_npc)	Quest NPC 4#4	757
prontera,159,181,4	duplicate(quest_npc)	Quest NPC 5#5	757