ダウンロード０９ - 経済統計練習帳

function myFunction() {
 
for(yy=1974;yy<1999;yy++){
 
  uu="http://www.allnightnippon.com/our_ann/history/"+yy+".html";
 
 
     str="";
      try {
 
 var res = UrlFetchApp.fetch(uu);
        str=res.getContentText("euc-jp");
 
    } catch (e) { Logger.log("Fail");}
 
 
 
 
  var x=str.split("\n"); 
 
  var a=new Array();
  var b=new Array();
 
  sx=0;
  for(s=0;s<x.length;s++){
  if(x[s].indexOf("<table")>-1)sx=sx+1;
   if(x[s].indexOf("<table")>-1)a[sx]=s;
  }
 
 
   sx=0;
  for(s=0;s<x.length;s++){
  if(x[s].indexOf("</table")>-1)sx=sx+1;
   if(x[s].indexOf("</table")>-1)b[sx]=s;
 
  }
 
  number=sx;
 
  var tab="";
 
  for(s=1;s<number+1;s++){
  strx="";
  for(sx=a[s];sx<b[s];sx++){
  strx=strx+x[sx];
  }
  if(strx.indexOf("月曜日")>-1)tab=strx;
  }
 
 
 
  var x1=tab.split("</tr>");
 
  pp="<!-- P -->";
 
  var cr=new Array();
 
  sx=0;
  for(s=0;s<x1.length;s++){
   if(x1[s].indexOf(pp)>-1)sx=sx+1;
    if(x1[s].indexOf(pp)>-1)cr[sx]=x1[s];
 
   }
  delta=sx;
 
var week=new Array();  
var part=new Array(); 
 
for(s=1;s<delta+1;s++){
for(sx=1;sx<10;sx++){
cr[s]=cr[s].replace("th","td");
}
week[s]="";
if(cr[s].indexOf("月曜")>-1)week[s]="月";
if(cr[s].indexOf("火曜")>-1)week[s]="火";
if(cr[s].indexOf("水曜")>-1)week[s]="水";
if(cr[s].indexOf("木曜")>-1)week[s]="木";
if(cr[s].indexOf("金曜")>-1)week[s]="金";
if(cr[s].indexOf("土曜")>-1)week[s]="土";
part[s]="2部";
if(cr[s].indexOf("week")>-1)part[s]="1部";
 }
 
 
for(s=1;s<delta+1;s++){
if(week[s].length<1)week[s]=week[s-1];
 
 }
 
 
  var w=new Array();
  var p=new Array();
  var subx=new Array();
  var namex=new Array();
  var month=new Array();
 
  tx=0;
  for(s=1;s<delta+1;s++){
var x2=cr[s].split("</td>");
 for(sx=0;sx<x2.length;sx++){
  if(x2[sx].indexOf("<td colspan=")>-1)tx=tx+1;
 if(x2[sx].indexOf("<td colspan=")>-1)subx[tx]=x2[sx];
 if(x2[sx].indexOf("<td colspan=")>-1)p[tx]=part[s];
 if(x2[sx].indexOf("<td colspan=")>-1)w[tx]=week[s];
 }
 }
 
 
  sig=tx;
 
  Logger.log(tx);
 
 
   for(s=1;s<sig+1;s++){
  namex[s]=play(subx[s]);
 
  }
   for(s=1;s<sig+1;s++){
  p1=subx[s].indexOf("colspan=");
  p1=subx[s].indexOf("\"",p1);
  p2=subx[s].indexOf("\"",p1+1);
  month[s]=subx[s].substring(p1+1,p2);
  }
 
 
 
   var v=new Array();
  for(s=0;s<sig+1;s++){
  v[s]=new Array();
  }
 
  v[0][3]="a";
for(s=1;s<sig+1;s++){
  v[s][0]=w[s];
   v[s][1]=p[s];
   v[s][2]=namex[s];
   v[s][3]=month[s];
}
 
 
 
  var id="1Q4xmLJKzXPl3WcJzsCfUO8wPn_RYKnTNPrEovLmPhT0";
 
 var ex1 = SpreadsheetApp.openById(id);
 
 nn="a"+yy;
 
  ex1.insertSheet(nn);
 
 var sheet = ex1.getSheetByName(nn);  
 
 
sheet.getRange(1,1,sig+1,4).setValues(v);
 
  }
 
 
 
 
 
 
 
}
function play(str){
 
  strx=str;
  for(m=1;m<11;m++){
  strx=fresh(strx);
  }
 
  strx=strx.replace("&nbsp","");
  strx=strx.replace("&nbsp","");
  strx=strx.replace(";","");
  return strx;
}
 
function fresh(str){
 
  p1=str.indexOf("<");
  p2=str.indexOf(">",p1);
  sp="";
  if(p1>-1)sp=str.substring(p1,p2+1);
 
  k=str.replace(sp,"");
  return k;
}