solppo- - 経済統計練習帳

var y = new Array();
var x = new Array();
var z = new Array();
var car=new Array();
var num;
var d1,d2; 
var point=new Array();
 
var card=new Array();
var p=new Array();
var pr=new Array();
 
function sample(){
 
 
card[	1	]="	GO	";
card[	2	]="	地中海通り	";
card[	3	]="	共同基金	";
card[	4	]="	バルティック通り	";
card[	5	]="	所得税	";
card[	6	]="	リーディング鉄道	";
card[	7	]="	オリエンタル通り	";
card[	8	]="	チャンス	";
card[	9	]="	バーモント通り	";
card[	10	]="	コネチカット通り	";
card[	11	]="	刑務所、刑務所見学	";
card[	12	]="	セントチャールズプレース	";
card[	13	]="	電力会社	";
card[	14	]="	ステーツ通り	";
card[	15	]="	バージニア通り	";
card[	16	]="	ペンシルバニア鉄道	";
card[	17	]="	セントジェームスプレース	";
card[	18	]="	共同基金	";
card[	19	]="	テネシー通り	";
card[	20	]="	ニューヨーク通り	";
card[	21	]="	フリーパーキング	";
card[	22	]="	ケンタッキー通り	";
card[	23	]="	チャンス	";
card[	24	]="	インディアナ通り	";
card[	25	]="	イリノイ通り	";
card[	26	]="	B&O 鉄道	";
card[	27	]="	アトランティック通り	";
card[	28	]="	ベントノール通り	";
card[	29	]="	水道会社	";
card[	30	]="	マービンガーデン	";
card[	31	]="	GO TO JAIL	";
card[	32	]="	パシフィック通り	";
card[	33	]="	ノースキャロライナ通り	";
card[	34	]="	共同基金	";
card[	35	]="	ペンシルバニア通り	";
card[	36	]="	ショートライン鉄道	";
card[	37	]="	チャンス	";
card[	38	]="	パークプレース	";
card[	39	]="	物品税	";
card[	40	]="	ボードウォーク	";
 
p[	1	]=	0	;
p[	2	]=	60	;
p[	3	]=	0	;
p[	4	]=	60	;
p[	5	]=	0	;
p[	6	]=	200	;
p[	7	]=	100	;
p[	8	]=	0	;
p[	9	]=	100	;
p[	10	]=	120	;
p[	11	]=	0	;
p[	12	]=	140	;
p[	13	]=	150	;
p[	14	]=	140	;
p[	15	]=	160	;
p[	16	]=	200	;
p[	17	]=	180	;
p[	18	]=	0	;
p[	19	]=	180	;
p[	20	]=	200	;
p[	21	]=	0	;
p[	22	]=	220	;
p[	23	]=	0	;
p[	24	]=	220	;
p[	25	]=	240	;
p[	26	]=	200	;
p[	27	]=	260	;
p[	28	]=	260	;
p[	29	]=	150	;
p[	30	]=	280	;
p[	31	]=	0	;
p[	32	]=	300	;
p[	33	]=	300	;
p[	34	]=	0	;
p[	35	]=	320	;
p[	36	]=	200	;
p[	37	]=	0	;
p[	38	]=	350	;
p[	39	]=	0	;
p[	40	]=	400	;
p[	41	]=	0	;
 
pr[	1	]=	0	;
pr[	2	]=	50	;
pr[	3	]=	0	;
pr[	4	]=	50	;
pr[	5	]=	0	;
pr[	6	]=	0	;
pr[	7	]=	50	;
pr[	8	]=	0	;
pr[	9	]=	50	;
pr[	10	]=	50	;
pr[	11	]=	0	;
pr[	12	]=	100	;
pr[	13	]=	0	;
pr[	14	]=	100	;
pr[	15	]=	100	;
pr[	16	]=	0	;
pr[	17	]=	100	;
pr[	18	]=	0	;
pr[	19	]=	100	;
pr[	20	]=	100	;
pr[	21	]=	0	;
pr[	22	]=	150	;
pr[	23	]=	0	;
pr[	24	]=	150	;
pr[	25	]=	150	;
pr[	26	]=	0	;
pr[	27	]=	150	;
pr[	28	]=	150	;
pr[	29	]=	0	;
pr[	30	]=	150	;
pr[	31	]=	0	;
pr[	32	]=	200	;
pr[	33	]=	200	;
pr[	34	]=	0	;
pr[	35	]=	200	;
pr[	36	]=	0	;
pr[	37	]=	0	;
pr[	38	]=	200	;
pr[	39	]=	0	;
pr[	40	]=	200	;
pr[	41	]=	0	;
 
 
 
 
   mode=4;
 
 
   car[1]=1;
   car[2]=1;
   car[3]=1;
   car[4]=1;
 
 
    tx = 0;
    for (s=1;s<6;s++ ){
    for(sx=1;sx<9;sx++){
        tx = tx + 1;
        x[tx] = sx;
        y[tx] = s;
        z[tx] = 0;
    }    
    }
 
 
for(s=1;s<41;s++){
point[s]=0;    
}
 
 
var timer;
var delay = 1000;
 
var loop = function () {
 
  mode=mode+1;
  if(mode>4)mode=1;
 
  randx();
 
  dx=d1+d2;
 
  z=0;
  if(d1==d2)z=100;
  if(z>50){
  randx();
dx=dx+d1+d2;  
}
 
  car[mode]=car[mode]+dx;
 
  if(car[mode]>40)car[mode]=car[mode]-40;
 
 x1=car[mode];
 h=0;
 if(point[x1]==0)h=h+1;
 if(p[x1]>0)h=h+1;
 if(h==2)point[x1]=mode;
 
    paint();
 
    clearTimeout(timer);
    timer = setTimeout(loop, delay);
}
 
loop();           
 
 
 
}
 
function randx(){
 
  n1=6*Math.random();
  d1=Math.floor(n1)+1;
 
  n1=6*Math.random();
  d2=Math.floor(n1)+1;
 
 
} 
 
 
function paint(){ 
 
    var sub=new svgpaint();
 
str="<svg width=\"500\" height=\"500\">";
 
for(s=1;s<41;s++){
if(point[s]==1)str=str+sub.rect(50*x[s]-50,50*y[s]-50,50,50,"blue"); 
if(point[s]==2)str=str+sub.rect(50*x[s]-50,50*y[s]-50,50,50,"red"); 
if(point[s]==3)str=str+sub.rect(50*x[s]-50,50*y[s]-50,50,50,"green"); 
if(point[s]==4)str=str+sub.rect(50*x[s]-50,50*y[s]-50,50,50,"yellow"); 
}
 
 
sx=car[1];
str=str+sub.rect(50*x[sx]-50,50*y[sx]-50,50,50,"blue"); 
sx=car[2];
str=str+sub.rect(50*x[sx]-50,50*y[sx]-50,50,50,"red"); 
sx=car[3];
str=str+sub.rect(50*x[sx]-50,50*y[sx]-50,50,50,"green"); 
sx=car[4];
str=str+sub.rect(50*x[sx]-50,50*y[sx]-50,50,50,"yellow"); 
 
str=str+"</svg>";
 
    $("#memo").html(str);   
 
}