ｄおｒ - 経済統計練習帳

class jin{
 
play():void{
 
var c1,c2:number;
 
 
c1=this.count(fight);
c2=this.count(def);   
 
 
 
var p1,mat:number;
p1=(c1+c2)*Math.random();
mat=1;
if(p1>c1)mat=2;
if(mat==1)this.rev(def);
if(mat==1)this.plus(fight,def);   
if(mat==2)this.rev(fight);
if(mat==2)this.plus(def,fight);      
 
}    
 
count(delta:number):number{
 
var check_count:number[]=new Array();
var s,s1,s2:number;    
 
for(s=1;s<number_card+1;s++){    
check_count[s]=0;
}
 
check_count[delta]=100;
 
var tr,cc:number;    
 
for(tr=1;tr<11;tr++){    
for(s=1;s<number_link+1;s++){    
h=0;
s1=link_parent[s];
s2=link_child[s]; 
cc=check_count[s1];
if(link_check[s]<60)cc=0;    
if(cc>50)check_count[s2]=100;
}    
}    
 
var c1:number;    
c1=0;
for(s=1;s<number_card+1;s++){      
if(check_count[s]>50)c1=c1+power[s];
}    
return c1;
}
 
rev(delta:number):void{
 
var s:number;    
 
for(s=1;s<number_link+1;s++){    
if(link_child[s]==delta)link_check[s]=0;
}    
 
}
 
plus(de1:number,de2:number):void{
 
number_link=number_link+1;
link_check[number_link]=100;    
link_parent[number_link]=de1;
link_child[number_link]=de2;    
 
}
 
select_fight():void{
 
var n1:number;
 
n1=number_card*Math.random();
fight=Math.floor(n1)+1;
 
 
}
 
select_def():void{
 
var s,h,sx:number;
 
var px:number[]=new Array();    
var gs:number;
 
gs=group[fight];    
 
var number_def:number;
 
def=0;   
 
sx=0;    
for(s=1;s<number_card+1;s++){
h=100;
g1=group[s];  
if(g1==gs)h=0;
if(h>50)sx=sx+1;
if(h>50)px[sx]=s;        
}
 
number_def=sx;
 
var n1,n2:number;    
 
n1=number_def*Math.random();
n2=Math.floor(n1)+1;
 
def=px[n2];       
 
}
 
 
 
divide():void{
 
 
 
var s,s1,s2,sx:number;    
var mode_divide:number;
 
for(s=1;s<number_card+1;s++){    
group[s]=0;
}
 
 
var h,ch:number;    
 
sx=this.search();    
 
mode_divide=0;    
if(sx==0)mode_divide=100;
number_group=0;    
while(mode_divide<50){    
number_group=number_group+1;
group[sx]=number_group;    
for(tr=1;tr<11;tr++){
for(s=1;s<number_link+1;s++){
s1=link_parent[s];
s2=link_child[s];    
ch=0;    
if(group[s1]==number_group)ch=100;
if(group[s2]==number_group)ch=100;    
if(link_check[s]<50)ch=0;
if(ch>60)group[s1]=number_group;
if(ch>60)group[s2]=number_group;       
}
}
 
sx=this.search();
if(sx==0)mode_divide=100;
}
 
}
 
search():number{
 
var sx:number;    
 
sx=0;    
for(s=1;s<number_card+1;s++){    
if(group[s]==0)sx=s;
}
 
return sx;
}
 
}