Try this;
prontera,200,180,4 script Prize Sender Test 123,{
if(!getgmlevel())end;
set .@itemtoonlineplayers$,strcharinfo(0);
mes "Input Item ID";
Input .@item;
if (getitemname(.@item) == "null") {
mes "Invalid Item ID";
close;
}
mes "Input Amount";
input .@inum;
if( .@inum <= 0 ) {
mes "Invalid Amount";
close;
}
while( .@V < $PlayerNumber ){
set .@V,.@V+1;
message getd("$RecordAID"+.@V),"[[[ System ]]] : "+.@itemtoonlineplayers$+" give you "+getitemname(.@item)+"x"+.@inum;
getitem .@item,.@inum,getd("$RecordAID"+.@V);
}
close;
}
- script PrizeSenderEvent -1,{
OnInit:
if(!getusers(1))while($PlayerNumber)setd "$RecordAID"+(set($PlayerNumber,
$PlayerNumber-1)+1),0;
end;
OnPCLoginEvent:
setd "$RecordAID"+set(@AIDNumber,set($PlayerNumber,$PlayerNumber+1)),getcharid(3);
end;
OnPCLogoutEvent:
setd "$RecordAID"+@AIDNumber,getd("$RecordAID"+(set(.@AIDNumber,set($PlayerNumber,
$PlayerNumber-1)+1)));
attachrid getd("$RecordAID"+@AIDNumber);
setd "$RecordAID"+@AIDNumber,0;
set @AIDNumber,.@AIDNumber;
}