prontera,155,181,5	script	Sample	757,{
mes "Wan to be Premium Users for 1 week ?";
mes "Then give me "+.Amount+" x "+getitemname(.ItemID);
if( countitem( .ItemID ) >= .Amount ){
	if( select("YES:NO") == 1 ){
		delitem .ItemID,.Amount;
		set #PremiumUser,gettimetick(2) + ( .Day * 3600 * 24 );
		sc_start SC_ITEMBOOST,( #PremiumUser * 1000 ),200;
		sc_start SC_EXPBOOST,( #PremiumUser * 1000 ),200;
		mes "Done. enjoy your Premium Services for 1 Week.";
	}
}
close;

OnPCLoginEvent:
if( #PremiumUser > gettimetick(2) ){
	sc_start SC_ITEMBOOST,( ( #PremiumUser - gettimetick(2) ) * 1000 ),200;
	sc_start SC_EXPBOOST,( ( #PremiumUser - gettimetick(2) ) * 1000 ),200;
}
end;
}