p00p99 - 経済統計練習帳

<!DOCTYPE html>
<html lang="ja">
 <head>
 <meta charset="utf-8" />
 <title>将軍</title>
     <script src="sample.js" ></script>
    <script src="jquery.js" ></script>
  <script src="sho.js" ></script>
    <link rel="stylesheet" href="https://storage.googleapis.com/code.getmdl.io/1.0.6/material.indigo-pink.min.css">
<script src="https://storage.googleapis.com/code.getmdl.io/1.0.6/material.min.js"></script>
<link rel="stylesheet" href="https://fonts.googleapis.com/icon?family=Material+Icons">
 
 
    </head>
 
    <body onload="sample()">
       <p id="memo"></p>
    </body>
</html>
 
 
var postx = new Array();
var age = new Array();
var life = new Array();
var number_sho;
var pos = new Array();
 
function sample(){
 
    var sub = new sho();
    sub.faststep();
    postx = sub.postx;
    age = sub.age;
    life = sub.life;
    pos = sub.pos;
    number_sho = sub.number_sho;
 
    for (tr = 1; tr < 4; tr++) {
 
        for (a1 = 1; a1 < 7; a1++) {
            var sub2 = new sho();
            sub2.life = life;
            sub2.age = age;
            sub2.number_sho = number_sho;
            sub2.death(a1);
            life = sub2.life;
        }
 
        var sub3 = new sho();
        sub3.pos = pos;
        sub3.life = life;
        sub3.number_sho = number_sho;
        sub3.change();
        pos = sub3.pos;
 
        var sub4 = new sho();
        sub4.pos = pos;
        sub4.life = life;
        sub4.age = age;
        sub4.number_sho = number_sho;
        sub4.fresh();
        age = sub4.age;
        life = sub4.life;
        pos = sub4.pos;
        number_sho = sub4.number_sho;
 
    }
 
        paint();
 
 
}
 
function paint(){
 
 
   str1="<table class=\"mdl-data-table mdl-js-data-table mdl-data-table--selectable mdl-shadow--2dp\">";
  str2="<th class=\"mdl-data-table__cell--non-numeric\">";
  str3="<td class=\"mdl-data-table__cell--non-numeric\">";
 
    str=str1;
    str=str+"<thead>";
   str=str+"<tr>";
   str=str+"<th>会社</th>";
   str=str+"<th>大学</th>";
   str=str+"<th>数</th>";
    str=str+"</tr>"
  str=str+"</thead>";
 
  str=str+"<tbody>";
   for(s=1;s<number_sho+1;s++){
       if (life[s] > 50) {
           str = str + "<tr>";
           str = str + "<td>" + age[s] + "</td>";
           str = str + "<td>" + life[s] + "</td>";
           s1 = pos[s];
           str = str + "<td>" + postx[s1] + "</td>";
           str = str + "</tr>";
       }
   }
str=str+"</table>";
 
 
 
 $("#memo").html(str);
 
 
 
 
}
 
 
class sho{
 
postx:string[]=new Array();
age:number[]=new Array();
life:number[]=new Array();
number_sho:number;
pos:number[]=new Array();
 
fresh():void{
 
var s:number;
 
for(s=1;s<this.number_sho+1;s++){
this.age[s]=this.age[s]+1;
}
 
for(s=1;s<7;s++){
this.age[this.number_sho+s]=1;
this.pos[this.number_sho+s]=15+s;
this.life[this.number_sho+s]=100;
}
 
this.number_sho=this.number_sho+6;
 
}
 
change():void{
 
var s,sx:number;
var point=new Array();
var pon=new Array();
var ch=new Array();
 
for(s=1;s<16;s++){
pon[s]=0;
}
 
 
for(s=1;s<this.number_sho+1;s++){
ch[s]=0;
if(this.life[s]<50)ch[s]=100;
}
 
for(s=1;s<17;s++){
point[s]=new Array();
}
 
 
for(s=1;s<16;s++){
for(sx=1;sx<22;sx++){
point[s][sx]=100;
}
}
 
var r,p1,maxp,sxs:number;
 
for(r=1;r<16;r++){
maxp=-9999;
sxs=0;
for(s=1;s<this.number_sho+1;s++){
sx=this.pos[s];
p1=point[r][sx];
if(ch[s]>50)p1=0;
if(p1>maxp)sxs=s;
if(p1>maxp)maxp=p1;
}
ch[sxs]=100;
pon[r]=sxs;
}
 
for(s=1;s<16;s++){
sx=pon[s];
this.pos[sx]=s;
}
 
 
 
}
 
 
death(a1:number):void{
 
var s,sx,h,m1,m2,m3:number;
var x:number[]=new Array();
 
sx=0;
for(s=1;s<this.number_sho+1;s++){
h=0;
if(this.age[s]==a1)h=h+1;
if(this.life[s]>50)h=h+1;
if(h==2)sx=sx+1;
if(h==2)x[sx]=s;
}
 
m1=sx*Math.random();
m2=Math.floor(m1)+1;
m3=x[m2];
 
this.life[m3]=0;
 
}
 
faststep():void{
 
this.number_sho=21;
 
var s,sx,tx:number;
 
tx=0;
for(s=1;s<7;s++){
for(sx=1;sx<s+1;sx++){
tx=tx+1;
this.age[tx]=7-s;
this.life[tx]=100;
this.pos[tx]=tx;
}
}
 
this.postx[0]="";    
this.postx[1]="将軍";
this.postx[2]="大老";
this.postx[3]="駿河城代";
this.postx[4]="美濃藩主";
this.postx[5]="伊勢藩主";
this.postx[6]="信濃藩主";
this.postx[7]="老中";
this.postx[8]="駿河老中";
this.postx[9]="美濃守護";
this.postx[10]="伊勢守護";
this.postx[11]="信濃守護";
this.postx[12]="勘定奉行";
this.postx[13]="町奉行";
this.postx[14]="寺社奉行 ";
this.postx[15]="外国奉行";
this.postx[16]="美濃代官";
this.postx[17]="大垣代官";
this.postx[18]="伊勢代官";
this.postx[19]="松坂代官";
this.postx[20]="信濃代官";
this.postx[21]="松本代官"; 
 
 
 
 
}
 
 
 
 
}