パチンコ８７ - 経済統計練習帳

var number_ball;
var ball=new Array();
var bx=new Array();
var by=new Array();
var dx=new Array();
var dy=new Array();
 
class pac{
 
faststep():void{
 
number_ball=100;
 
var s:number;
for(s=1;s<101;s++){
ball[s]=0;
}
 
}
 
hit():void{
 
var s:number;
var sx:number;
sx=0;
for(s=1;s<101;s++){
if(ball[s]<50)sx=s;
}
if(sx>0)number_ball=number_ball-1;
if(sx>0)bx[sx]=50;
if(sx>0)by[sx]=0;
if(sx>0)dx[sx]=0;
if(sx>0)dy[sx]=1;
 
}
mouse():void{
 
var s:number;
var h:number;
 
for(s=1;s<101;s++){
h=0;
if(by[s]>100)h=h+1;
if(ball[s]>50)h=h+1;
if(h==2)ball[s]=0;
}
 
}
 
move():void{
 
var s:number;
 
for(s=1;s<101;s++){
by[s]=by[s]+dy[s];
bx[s]=bx[s]+dx[s];
}
 
}
}
 
function sample(){
 
var timer;
var delay = 100;
 
var s,tr;
 
var sub=new pac();
sub.faststep();  
 
var loop = function(){
 
if(Math.random()>0.6)sub.hit();
sub.move();
sub.mouse();
if(number_ball<1)sub.faststep();
 
var str;
str="<table>";
str=str+"<tr>";
str=str+"<td>";
str=str+"玉";
str=str+"</td>";
str=str+"<td>";
str=str+number_ball;
str=str+"</td>";
str=str+"</tr>";
str=str+"</table>";
 
$("#memo").html(str);
 
 
clearTimeout(timer);
timer = setTimeout(loop,delay);
}
 
loop();
 
}