AutoPickEvent

-   script  AutoPickEvent   -1,{

OnClock2100:
OnClock0600:
OnClock1200:

while(1)
{
  query_sql "select account_id from `char` where online = 1 order by rand() limit 1", .@aid;
  attachrid .@aid;
  if(CheckVending())
  {
   DetachRID();
   continue;
  }
  announce strcharinfo(0) +" won in Lucky Pick Event.", 0;
  getitem 7227,100;
  break;
}
end;
}