名門９８８ - 経済統計練習帳

var postx=new Array();
var pointx=new Array();
var pos=new Array();
var age=new Array();
var number;
var life=new Array();
 
function sample(){
 
faststep();
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 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);    
 
 
}
 
 
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 s,sx;
 
 
var ch=new Array();
 
for(sx=1;sx<number+1;sx++){
ch[sx]=0;    
}
 
 
for(s=1;s<16;s++){
    sxs=0;
    maxp=0;
for(sx=1;sx<number+1;sx++){
a1=age[sx]-1;
p1=0;
h=0;
if(life[sx]>50)p2=pos[sx][a1];
if(life[sx]>50)p1=pointx[s][p2];    
if(p1>maxp)h=h+1;
if(ch[sx]<50)h=h+1;
if(h==2)sxs=sx;
if(h==2)maxp=p1;
}    
ch[sxs]=100; 
a1=age[sxs];
pos[sxs][a1]=s;    
}
 
 
}
 
 
 
function death(aa){
 
var xx=new Array();
 
var n;    
n=0;
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;    
}     
 
 
for(s=1;s<16;s++){
pointx[s]=new Array();
}
 
 
for(s=1;s<16;s++){
for(sx=1;sx<22;sx++){
pointx[s][sx]=1
}}    
 
for(s=1;s<16;s++){    
pointx[s][s]=10000;
}
 
pointx[1][4]=100;
pointx[1][5]=100;    
pointx[1][6]=100;
 
pointx[2][4]=100;
pointx[2][5]=100;    
pointx[2][6]=100;    
 
pointx[3][4]=100;
pointx[3][5]=100;    
pointx[3][6]=100;       
 
pointx[4][7]=100;
pointx[4][8]=100;    
pointx[4][9]=50;
 
pointx[5][7]=100;
pointx[5][8]=100;    
pointx[5][10]=50;    
 
pointx[6][7]=100;
pointx[6][8]=100;    
pointx[6][11]=50;    
 
pointx[7][9]=100;
pointx[7][10]=100;    
pointx[7][11]=100;    
pointx[7][12]=10;
pointx[7][13]=10;    
 
pointx[8][9]=100;
pointx[8][10]=100;    
pointx[8][11]=100;    
pointx[8][14]=10;
pointx[8][15]=10;      
 
pointx[9][12]=100;    
pointx[9][13]=100;
pointx[9][14]=100;    
pointx[9][15]=100;    
pointx[9][16]=10;
pointx[9][17]=10;   
 
pointx[10][12]=100;    
pointx[10][13]=100;
pointx[10][14]=100;    
pointx[10][15]=100;    
pointx[10][18]=10;
pointx[10][19]=10;     
 
pointx[11][12]=100;    
pointx[11][13]=100;
pointx[11][14]=100;    
pointx[11][15]=100;    
pointx[11][20]=10;
pointx[11][21]=10;    
 
}