-	script	Sample	757,{
function	CheckInfo;

function	CheckInfo	{
	if( getd(.VariableName$) < 0 ){
		mes "You already done this Quest before.";
	}else if( getd(.VariableName$) < .MobDB[1] ){
		mes "Please kill ^0055FF"+.MobDB[1]+" x "+getmonsterinfo(.MobDB[0],0)+"^000000.";
	}	
return (( getd(.VariableName$) < 0 || getd(.VariableName$) < .MobDB[1] )?0:1 );
}


OnTalk:
if( CheckInfo() )
	mes "Please refer to ^FF0000Reward NPC^000000 to get your reward.";
close;

OnReward:
if( CheckInfo() ){
	setd(.VariableName$),-1;
	setd("@Count"+.MobDB[0]),0;
	mes "You have done the Quest and "+.ItemDB[1]+" x "+getitemname(.ItemDB[0])+" will be your reward.";
	getitem .ItemDB[0],.ItemDB[1];
}
close;

OnInit:
// Variable Name
set .VariableName$,"#Halloween";
// Required Monster ID + Amount
setarray .MobDB[0],1002,20;
// Reward Item + Amount
setarray .ItemDB[0],607,10;
end;

OnNPCKillEvent:
if( killedrid == .MobDB[0] && getd(.VariableName$) < .MobDB[1] ){
	setd(.VariableName$),getd(.VariableName$) + 1;
	dispbottom "[ "+getmonsterinfo(.MobDB[0],0)+" Killed ] : "+getd(.VariableName$)+" / "+.MobDB[1];
}
end;
}


// ===========================================================================

prontera,155,181,5	script	Quest NPC	757,{
	doevent "Sample::OnTalk";
}

prontera,155,178,5	script	Reward NPC	757,{
	doevent "Sample::OnReward";
}