prontera,150,150,3	script	test	100,{

set .@dnpc$,"[ ^009900Daily Random Quest^000000 ]";

// ==========================================================
// Simple Daily Random Quest by JkaiZu a.k.a jong puno :p
// Please edit the npc conversation here.
// Don't hesitate to add mes "Message"; if neccessary.
// A little configuration starting on setarray
// ==========================================================

if(#Daily+86399 > gettimetick(2)) {
	mes "Please wait 24 hours.";
	mes " ";
	close;
}
	mes .@dnpc$;
	mes "Hello, "+strcharinfo(0)+".";
	mes " ";
	mes "^FF0000!!!!!^000000 ^009900Daily Quest Available^000000 ^FF0000!!!!!^000000";
	mes " ";
	mes "Required Item: ^0000FF"+getitemname($QuestReq)+"^000000";
	mes "Required Amount: ( ^0000FF"+$QuestReqAmount+"^000000 )";
	menu "~ I already have that",L_GiveReq,"Just Passing by.",L_Close;

L_GiveReq:
	if(countitem($QuestReq) >= $QuestReqAmount) {
		next;
		mes .@dnpc$;
		mes "Great ! Here's your reward.";
		next;
		delitem $QuestReq,$QuestReqAmount;
		getitem 7539,1;
		set #Daily,gettimetick(2);
		close;
	}
		next;
		mes .@dnpc$;
		mes "You currently have.";
		mes " ";
		mes "Required Item: ^0000FF"+getitemname($QuestReq)+"^000000";
		mes "Required Amount: ( ^FF0000"+countitem($QuestReq)+"^000000 / ^0000FF"+$QuestReqAmount+"^000000 )";
		close;


// Configuration setarray add the item id you wanted to be in the queue for the random pick.

OnClock0000:
	setarray .@rr[0],501,502,503,504;
	set $QuestReq,.@rr[rand(getarraysize(.@rr))];
	set $QuestReqAmount,rand(10,30);


L_Close:
	mes " ";
	close;

}