ぽｎぽｎ - 経済統計練習帳

class pon{
 
step():void{
 
n=n+1;
tab=tab+1;
if(tab>4)tab=1;
 
var sx:number;
var s:number;
 
sx=point[n];
 
delta[sx]=tab;
 
sx=0;
for(s=1;s<number_card+1;s++){
if(delta[s]==tab)sx=s;
}
 
delta[sx]=0;
 
}
 
getcard():void{
 
var s:number;
var sx:number;
 
for(s=1;s<number_card+1;s++){
delta[s]=0;
}
 
for(s=1;s<9;s++){
sx=point[s];
delta[sx]=1;
}
 
for(s=9;s<17;s++){
sx=point[s];
delta[sx]=2;
}
 
for(s=17;s<25;s++){
sx=point[s];
delta[sx]=3;
}
 
 
 
for(s=25;s<33;s++){
sx=point[s];
delta[sx]=4;
}
 
n=32;
tab=4;
 
}
 
shuffle():void{
 
var px:number[]=new Array(); 
var s:number;
 
for(s=1;s<number_card+1;s++){
px[s]=Math.random();
}
 
 
 
var ch:number[] =new Array();
var maxu:number;
var r:number;
var sx:number;
 
for(s=1;s<number_card+1;s++){
ch[s]=0;
}
 
 
 
for(r=1;r<number_card+1;r++){ 
sx=0; 
maxu=-999; 
for(s=1;s<number_card+1;s++){ 
h=0; 
if(px[s]>maxu)h=h+1; 
if(ch[s]<50)h=h+1; 
if(h==2)maxu=px[s]; 
if(h==2)sx=s; 
}
point[r]=sx; 
ch[sx]=100; 
}
 
 
 
 
 
 
 
 
}
 
faststep():void{
 
var s:number;
var sx:number;
var tx:number;
 
tx=0;
for(s=1;s<10;s++){
for(sx=1;sx<10;sx++){
tx=tx+1;
card[tx]=s;
}}
 
number_card=tx;
 
}
 
 
 
}