将軍４ - 経済統計練習帳

var pos=new Array();
var age=new Array();
var number;
var life=new Array();
var postx=new Array();
 
function sample(){    
 
var timer;
var delay = 5000;
 
 
faststep();
 
var loop = function(){
 
for(a1=1;a1<7;a1++){
death(a1);
}
 
for(s=1;s<number+1;s++){    
age[s]=age[s]+1;
}
 
rep();    
 
fresh();    
 
 
paint();
 
clearTimeout(timer);
timer = setTimeout(loop,delay);
}
 
loop();
 
}
 
function fresh(){
 
for(s=number+1;s<number+7;s++){
pos[s]=new Array();
age[s]=1;
life[s]=100;
}
 
 
 
for(s=number+1;s<number+7;s++){
for(sx=1;sx<7;sx++){
pos[s][sx]=0;   
}}      
 
v=15;    
for(s=number+1;s<number+7;s++){
v=v+1;
pos[s][1]=v;
}    
 
number=number+6;
 
 
}
 
function rep(){
 
var px=new Array();
var delta=new Array();
 
for(s=1;s<number+1;s++){
px[s]=0;
if(life[s]>50)px[s]=100;
}
 
for(tr=1;tr<16;tr++){    
 
c=0;    
for(s=1;s<number+1;s++){
if(px[s]>50)c=c+1;
if(px[s]>50)delta[c]=s;
}    
 
m1=c*Math.random();
m2=Math.floor(m1)+1;
m3=delta[m2];    
 
a3=age[m3];
 
px[m3]=0;    
pos[m3][a3]=tr;    
}
 
 
 
 
 
}
 
 
function death(aa){
 
var xx=new Array();
 
var n;    
for(s=1;s<number+1;s++){
h=0;
if(life[s]>50)h=h+1;
if(age[s]==aa)h=h+1;    
if(h==2)n=n+1;
if(h==2)xx[n]=s;    
}
 
m1=n*Math.random();
m2=Math.floor(m1)+1;
m3=xx[m2];    
life[m3]=0;    
}
 
 
 
function faststep(){
 
 
postx[0]="";    
postx[1]="将軍";
postx[2]="大老";
postx[3]="駿河城代";
postx[4]="美濃藩主";
postx[5]="伊勢藩主";
postx[6]="信濃藩主";
postx[7]="老中";
postx[8]="駿河老中";
postx[9]="美濃守護";
postx[10]="伊勢守護";
postx[11]="信濃守護";
postx[12]="勘定奉行";
postx[13]="町奉行";
postx[14]="寺社奉行 ";
postx[15]="外国奉行";
postx[16]="美濃代官";
postx[17]="大垣代官";
postx[18]="伊勢代官";
postx[19]="松坂代官";
postx[20]="信濃代官";
postx[21]="松本代官";    
 
number=21;
 
for(s=1;s<number+1;s++){
pos[s]=new Array();
}       
 
 
 
tx=0;    
for(s=1;s<7;s++){
for(sx=1;sx<s+1;sx++){
tx=tx+1;
age[tx]=7-s;    
}
}
 
 
 
for(s=1;s<number+1;s++){
for(sx=1;sx<7;sx++){
pos[s][sx]=0;   
}}     
 
 
for(s=1;s<number+1;s++){
a1=age[s];
pos[s][a1]=s;
life[s]=100;    
}     
 
 
}
 
function paint(){
 
var str;
 
str="<table>";
for(s=1;s<number+1;s++){
str=str+"<tr>";    
for(sx=1;sx<7;sx++){  
str=str+"<td>";
n1=pos[s][sx];
str=str+postx[n1];    
str=str+"</td>";            
}
str=str+"</tr>";
}
str=str+"</table>";   
 
$("#memo").html(str);    
 
 
}