viewing paste Unknown #5834 | Plain text

Posted on the
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25
prontera,155,181,5      script  Sample  757,{
if( select("Enter Gold Room:Cancel") == 1 )
        if( #Daily == gettime(5) )
                mes "You cant enter again by today";
        else{
                set #Daily,gettime(5);
                addtimer 5000,strnpcinfo(0)+"::OnTimeLimit";
                warp "poring_c01",100,100
        }
close;
 
OnTimeLimit:
        message strcharinfo(0),"Time's Up.";
        sleep2 3000;
        warp "SavePoint",0,0;
        end;
       
OnInit:
while( 1 ){
        if( getmapusers("poring_c01") )
                makeitem 969,1,"poring_c01",rand(87,119),rand(86,115);
        sleep 100;
}
end;
}
Viewed 290 times, submitted by unknown.