prontera,155,181	script	Sample	757,{
if( #Day == gettime(4) ){
	mes "You have claimed the item for today.";
}else{
	mes "Please online 5 hours continuously....";
}
close;

OnUpdate:
if( !checkvending() ){
		set @Hour,@Hour + 1;
		if( @Hour % 5 == 0 && #Day != gettime(4) ){
			getitem,512,5;
			set #Day,gettime(4);
			dispbottom "Online 5 Hours continuously...gained 1 item for today.";
		}
}
OnPCLoginEvent:
if( #Day != gettime(4) ) addtimer 60000,strnpcinfo(0)+"::OnUpdate";
end;
}