Can someone help me with this script?
I want the hourly reward to give reward items,
can someone help me with this script?
- script hourlypoints -1,{
//--Start of the Script
OnPCLoginEvent:
attachnpctimer ""+strcharinfo(0)+"";
initnpctimer;
end;
OnTimer30000:
//Check if Vending (normal or @at)
if(checkvending() >= 1 || checkchatting() == 1) {
dispbottom "The Ragnarok Online hourly cash points event stopped because you were vending / chatting. Please relog if you wish to start again.";
stopnpctimer;
end;
}
//Check if Idle
//getmapxy( .@map$, .@x, .@y, 0 );
//if(@map$ == .@map$ && @x == .@x && @y == .@y) {
set @afk, @afk + 1;
//}
//If move timer resets
//else {
// set @afk, 0;
//}
set @map$, .@map$; set @x, .@x; set @y, .@y;
//Idle Check for 5 Minutes
if(@afk == 5) {
dispbottom "The Ragnarok hourly points event stopped because you were idle for 5 minutes. Please relog if you wish to start again.";
stopnpctimer;
end;
}
end;
OnTimer10000:
set @minute, @minute + 1;
//Check for 1 Minute
if(@minute == 1){
set @minute,0;
set .@point_amt, 0; //Points to get every hour (default: 10)
.@Rand = rand(1,3);
switch(.@Rand) {
case 1:
getitem 1001,1;
end;
case 2:
getitem 1002,1;
end;
case 3:
getitem 1003,1;
dispbottom "You will receive random items by staying ingame for 1 hour";
set @consecutive_hour, @consecutive_hour + 1;
}
stopnpctimer;
initnpctimer;
end;
}
//--End of the Script
Thank you