ｋｈｇ９８ - 経済統計練習帳

var namex = new Array();
var x = new Array();
var y = new Array();
var dir = new Array();
var number_dir = new Array();
var pref=new Array(); 
var area=new Array();
var a=new Array();
var b=new Array();
 
 
function sample(){
 
 for(s=0;s<48;s++){
 area[s]=0;    
 }
 
for(s=1;s<11;s++){
a[s]=13;
b[s]=40;
}
 
    geo();
 
    faststep();
   var timer;
var delay = 100;
 
 
 
var loop = function () {
 
 move();
 
 
 
 for(s=1;s<11;s++){
 sx=a[s];
 area[sx]=100;
 }
 
for(s=1;s<11;s++){
 sx=b[s];
 area[sx]=50;
 } 
 
 
    paint();
 
    clearTimeout(timer);
    timer = setTimeout(loop, delay);
}
 
loop();
 
 
 
}
 
 
 function move(){
 
   for(s=1;s<11;s++){
        sx =a[s];
        var n1 = number_dir[sx] * Math.random();
        var n2 = Math.floor(n1) + 1;
        a[s] = dir[sx][n2];
    }   
 
     for(s=1;s<11;s++){
        sx =b[s];
        var n1 = number_dir[sx] * Math.random();
        var n2 = Math.floor(n1) + 1;
        b[s] = dir[sx][n2];
    }   
 
 
}
 
 
 function geo(){
 
 var data;
 
  data = new XMLHttpRequest();
  data.open("GET", "map.txt", false);
  data.send(null);
 
  var str=data.responseText;
 
var g=str.split("\n");
 
number=g.length;
for(s=0;s<number;s++){
var g1=g[s].split(",");
y[s+1]=g1[0];
x[s+1]=g1[1];    
pref[s+1]=g1[2]; 
}
 
 
} 
 
 
 
function faststep(){
 
    for (s = 1; s < 48;s++ ){
    dir[s]=new Array();    
    }
 
namex[1] = "北海道";
dir[1][1] = 2;
number_dir[1] = 1;
 
namex[2]="青森県";
dir[2][1] = 1;
dir[2][2] = 3;
dir[2][3] = 5;
number_dir[2] = 3;
 
namex[3]="岩手県";
dir[3][1] = 2;
dir[3][2] = 4;
number_dir[3] = 2;
 
namex[4]="宮城県";
dir[4][1] = 3;
dir[4][2] = 6;
dir[4][3] = 7;
number_dir[4] = 3;
 
namex[5]="秋田県";
dir[5][1] = 2;
number_dir[5] = 1;
 
namex[6]="山形県";
dir[6][1] = 4;
number_dir[6] = 1;
 
namex[7]="福島県";
dir[7][1] = 4;
dir[7][2] = 9;
number_dir[7] = 2;
namex[8]="茨城県";
dir[8][1] = 13;
number_dir[8] = 1;
namex[9]="栃木県";
dir[9][1] = 7;
dir[9][2] = 11;
number_dir[9] = 2;
namex[10]="群馬県";
dir[10][1] = 15;
dir[10][2] = 11;
number_dir[10] = 2;
namex[11]="埼玉県";
dir[11][1] = 9;
dir[11][2] = 10;
dir[11][3] = 13;
number_dir[11] = 3;
namex[12]="千葉県";
dir[12][1] = 13;
number_dir[12] = 1;
namex[13]="東京都";
dir[13][1] = 11;
dir[13][2] = 12;
dir[13][3] = 8;
dir[13][4] = 14;
dir[13][5] = 19;
number_dir[13] = 5;
namex[14]="神奈川県";
dir[14][1] = 13;
dir[14][2] = 22;
number_dir[14] = 2;
namex[15]="新潟県";
dir[15][1] = 10;
number_dir[15] = 1;
namex[16]="富山県";
dir[16][1] = 17;
number_dir[16] = 1;
namex[17]="石川県";
dir[17][1] = 16;
dir[17][2] = 18;
number_dir[17] = 2;
namex[18]="福井県";
dir[18][1] = 17;
dir[18][2] = 25;
number_dir[18] = 2;
namex[19]="山梨県";
dir[19][1] = 13;
dir[19][2] = 20;
number_dir[19] = 2;
 
namex[20]="長野県";
dir[20][1] = 21;
dir[20][2] = 19;
number_dir[20] = 2;
 
namex[21]="岐阜県";
dir[21][1] = 20;
dir[21][2] = 25;
dir[21][3] = 23;
number_dir[21] = 3;
 
namex[22]="静岡県";
dir[22][1] = 14;
dir[22][2] = 23;
number_dir[22] = 2;
 
 
namex[23]="愛知県";
dir[23][1] = 22;
dir[23][2] = 21;
dir[23][3] = 24;
number_dir[23] = 3;
 
namex[24]="三重県";
dir[24][1] = 23;
number_dir[24] = 1;
 
namex[25]="滋賀県";
dir[25][1] = 26;
dir[25][2] = 21;
dir[25][3] = 18;
number_dir[25] = 3;
 
namex[26]="京都府";
dir[26][1] = 27;
dir[26][2] = 25;
number_dir[26] = 2;
 
 
namex[27]="大阪府";
dir[27][1] = 26;
dir[27][2] = 28;
dir[27][3] = 29;
dir[27][4] = 30;
number_dir[27] = 4;
 
 
namex[28]="兵庫県";
dir[28][1] = 27;
dir[28][2] = 33;
number_dir[28] = 2;
 
namex[29]="奈良県";
dir[29][1] = 27;
number_dir[29] = 1;
 
namex[30]="和歌山県";
dir[30][1] = 27;
number_dir[30] = 1;
 
namex[31]="鳥取県";
dir[31][1] = 32;
dir[31][2] = 33;
number_dir[31] = 2;
 
namex[32]="島根県";
dir[32][1] = 31;
number_dir[32] = 1;
 
namex[33]="岡山県";
dir[33][1] = 28;
dir[33][2] = 34;
dir[33][3] = 37;
dir[33][4] = 31;
number_dir[33] = 4;
 
namex[34]="広島県";
dir[34][1] = 33;
dir[34][2] = 35;
number_dir[34] = 2;
 
namex[35]="山口県";
dir[35][1] = 34;
dir[35][2] = 40;
number_dir[35] = 2;
 
 
namex[36]="徳島県";
dir[36][1] = 37;
dir[36][2] = 39;
number_dir[36] = 2;
 
namex[37]="香川県";
dir[37][1] = 36;
dir[37][2] = 38;
dir[37][3] = 33;
number_dir[37] = 3;
 
namex[38]="愛媛県";
dir[38][1] = 37;
number_dir[38] = 1;
 
namex[39]="高知県";
dir[39][1] = 36;
number_dir[39] = 1;
 
namex[40]="福岡県";
dir[40][1] = 35;
dir[40][2] = 41;
dir[40][3] = 44;
number_dir[40] = 3;
 
namex[41]="佐賀県";
dir[41][1] = 40;
dir[41][2] = 42;
dir[41][3] = 43;
number_dir[41] = 3;
 
namex[42]="長崎県";
dir[42][1] = 41;
number_dir[42] = 1; 
 
namex[43]="熊本県";
dir[43][1] = 41;
dir[43][2] = 46;
number_dir[43] = 2;
 
namex[44]="大分県";
dir[44][1] = 40;
dir[44][2] = 45;
number_dir[44] = 2;
 
namex[45]="宮崎県";
dir[45][1] = 44;
number_dir[45] = 1;
 
namex[46]="鹿児島県";
dir[46][1] = 47;
dir[46][2] = 43;
number_dir[46] = 2; 
 
namex[47]="沖縄県";
dir[47][1] = 46;
number_dir[47] = 1; 
 
}
 
 
function paint(){
 
var sub=new svgpaint();
 
str="<svg width=\"500\" height=\"500\">";
str=str+sub.rect(0,0,500,500,"blue");
for(s=1;s<number+1;s++){    
if(pref[s]>0)str=str+sub.rect(5*x[s],500-5*y[s],5,5,"red");
} 
 
 
for(s=1;s<number+1;s++){    
n1=pref[s];
n2=0;
for(sx=1;sx<48;sx++){
if(n1>sx)n2=sx;    
if(n1==sx)n2=sx; 
}
if(area[n2]>30)str=str+sub.rect(5*x[s],500-5*y[s],5,5,"green");
if(area[n2]>70)str=str+sub.rect(5*x[s],500-5*y[s],5,5,"pink");
} 
 
str=str+"</svg>";
 
 
$("#memo").html(str);   
 
 }