viewing paste Unknown #16809 | Athena

Posted on the
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17
-       script  AutoFunEvent    -1,{
OnMinute30:
        while(1) {
                query_sql "select account_id from `char` where online = 1 order by rand() limit 1", .@aid;
                attachrid .@aid;
                if ( .@aid == 0 ) end;
                if( checkvending() || checkchatting() ) {
                        detachrid();
                        continue;
                }
                        announce strcharinfo(0) +" has won 1 Event Ticket  in our Lucky Pick Event.", 0;
                        getitem 7227,1;
                        dispbottom "Help our server grow by writing a review on ratemyserver.net Thank you.";
                        break;
                }
        end;
}
Viewed 315 times, submitted by unknown.