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

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;

}