修正番組表９ - 経済統計練習帳

google.charts.load('current', {'packages': ['corechart']});
google.charts.setOnLoadCallback(sample);

var sta=new Array();
var y1=new Array();
var m1=new Array();
var y2=new Array();
var m2=new Array();
var week=new Array();
var code_time=new Array();
var title=new Array();

function sample(){




        var query = new google.visualization.Query(
            'https://docs.google.com/spreadsheets/d/1VjCi0k-98P_3YmlHyHb3up0zPl9mp1tbYsJUJxmqegg/edit#gid=0');
        query.send(draw);
      }
      function draw(r) {
      
      
        if (r.isError()) {
          alert('Error in query');
        }

        var tc = r.getDataTable();
      
number=tc.getNumberOfRows()



for(s=1;s<number+1;s++){
sta[s]=tc.getValue(s-1, 0);
y1[s]=tc.getValue(s-1, 1);
m1[s]=tc.getValue(s-1, 2);
y2[s]=tc.getValue(s-1, 3);
m2[s]=tc.getValue(s-1, 4);
week[s]=tc.getValue(s-1, 5);
code_time[s]=tc.getValue(s-1, 6);
title[s]=tc.getValue(s-1, 7);
}



$("select").change(function () {

  
var v1 = $("#sel").val();

var v2 = $("#sel2").val();

var v3 = $("#sel3").val();

play(v1,v2,v3);

});


}

function play(n1,n2,n3) {



var subx=new Array();
var suby1=new Array();
var suby2=new Array();
var subm1=new Array();
var subm2=new Array();

sx=0;
for(s=1;s<number+1;s++){
h=0;
if(e(n3,code_time[s])>60)h=h+1;
if(sta[s]==n1)h=h+1;
if(week[s].indexOf(n2)>-1)h=h+1;
if(h==3)sx=sx+1;
if(h==3)subx[sx]=title[s];
if(h==3)suby1[sx]=y1[s];
if(h==3)subm1[sx]=m1[s];
if(h==3)suby2[sx]=y2[s];
if(h==3)subm2[sx]=m2[s];
}


var point=new Array();
for(s=1;s<451;s++){
point[s]="";  
}


for(s=1;s<sx+1;s++){
s1=12*(suby1[s]-1980)+subm1[s]/1;
if(s1<0)s1=0;
s2=12*(suby2[s]-1980)+subm2[s]/1;
if(s2>450)s2=450;
for(k=s1;k<s2+1;k++){
point[k]=point[k]+"縲�"+subx[s];  
}
}


  


str="<table>";
yy=1979;
mm=12;

for(s=1;s<450;s++){
mm=mm+1;
if(mm>12)yy=yy+1;
if(mm>12)mm=1;
    str=str+"<tr>";
    str=str+"<td>";
    str=str+yy+"蟷ｴ"+mm+"譛�";
    str=str+"</td>"
str=str+"<td>";
      str=str+point[s];
    str=str+"</td></tr>"
}
str=str+"</table>";


$("#memo").html(str);




        
      }

function e(tt,ee){

  e1=0;
if(tt==8)e1=e8(ee);
  if(tt==9)e1=e9(ee);
   if(tt==101)e1=e101(ee);
   if(tt==102)e1=e102(ee);
  if(tt==71)e1=e71(ee);
   if(tt==72)e1=e72(ee);

  return e1;
}

function e8(ee){
  z=0;
   if(ee==728)z=100;
  if(ee==8)z=100;
  if(ee==89)z=100;
if(ee==78)z=100;
  if(ee==789)z=100;
  return z;

}



function e9(ee){
  z=0;
  if(ee==9)z=100;
  if(ee==89)z=100;
if(ee==910)z=100;
  if(ee==9101)z=100;
   if(ee==789)z=100;
  return z;

}

function e10(ee){
  z=0;

  if(ee==10)z=100;
if(ee==910)z=100;
  if(ee==103)z=100;
   if(ee==10111)z=100;
  if(ee==1011)z=100;
  return z;

}

function e101(ee){
  z=0;
   if(ee==101)z=100;
  if(ee==10)z=100;
if(ee==910)z=100;
   if(ee==9101)z=100;
  if(ee==1011)z=100;
  return z;

}

function e102(ee){
  z=0;
  if(ee==10)z=100;
if(ee==910)z=100;
  if(ee==102)z=100;
  if(ee==10211)z=100;
   if(ee==1011)z=100;
  return z;

}


function e72(ee){
  z=0;
if(ee==72)z=100;
if(ee==7)z=100;
  if(ee==627)z=100;
  if(ee==67)z=100;
   if(ee==728)z=100;
   if(ee==78)z=100;
  return z;

}


function e71(ee){
  z=0;
if(ee==671)z=100;
if(ee==67)z=100;
if(ee==627)z=100;
if(ee==6271)z=100;
if(ee==71)z=100;
if(ee==7)z=100;
   if(ee==78)z=100;
return z;

}