var mcount;
function agecalc(){
  setTimeout("agecalc()",1000);
  cd = new Date();
  y = cd.getYear();
  if (y <2000){
    y = y + 1900;
  }
  m = cd.getMonth()+1;
  d = cd.getDate();
  h = cd.getHours();
  mn = cd.getMinutes();
  se = cd.getSeconds();
  zone = cd.getTimezoneOffset();
  zone = zone / 60;
  document.forms[0].elements[2].value=y;
  document.forms[0].elements[0].value=m;
  document.forms[0].elements[1].value=d;
  document.forms[0].elements[3].value=h;
  document.forms[0].elements[4].value=mn;
  document.forms[0].elements[5].value=se;
  document.forms[0].elements[6].value=zone*-1;

    if (m <= 2){
      y=y-1;
      m=m+12;
    }
  a=Math.floor(y/100);
  b=2 - a + Math.floor(a / 4);
  c=Math.floor(365.25 * y);
  j = 1720994.5 + Math.floor(30.6001 * (m + 1)) +b + c + d;
  td = (j - 2451545) / 36525;
  dd = ((((se + 63) / 60 + mn)/60 + h + zone)/24);
  t=td + (dd / 36525);
  yuri[0] = j + dd;
  document.forms[0].elements[7].value=yuri[0];

    for (i=1;i<10;i++){
      if (yuri[i] > yuri[0])break;
    }

  document.forms[0].elements[8].value=yuri[0] - yuri[i-1];
  tl = 218.316 + 481267.8809 * t;
  tl = tl + 6.2888 * Math.cos((477198.868 * t + 44.963) *0.017453292519943);
  tl = tl + 1.274 * Math.cos((413335.35 * t + 10.74) *0.017453292519943);
  tl = tl + 0.6583 * Math.cos((890534.22 * t + 145.7) *0.017453292519943);
  tl = tl + 0.2136 * Math.cos((954397.74 * t + 179.93) *0.017453292519943);
  tl = tl + 0.1851 * Math.cos((35999.05 * t + 87.53) *0.017453292519943);
  tl = tl + 0.1144 * Math.cos((966404 * t + 276.5) *0.017453292519943);
  tl = tl + 0.0588 * Math.cos((63863.5 * t + 124.2) *0.017453292519943);
  tl = tl + 0.0571 * Math.cos((377336.3 * t + 13.2) *0.017453292519943);
  tl = tl + 0.0533 * Math.cos((1367733.1 * t + 280.7) *0.017453292519943);
  tl = tl + 0.0458 * Math.cos((854535.2 * t + 148.2) *0.017453292519943);
  tl = tl + 0.0409 * Math.cos((441199.8 * t + 47.4) *0.017453292519943);
  tl = tl + 0.0347 * Math.cos((445267.1 * t + 27.9) *0.017453292519943);
  tl = tl + 0.0304 * Math.cos((513197.9 * t + 222.5) *0.017453292519943);
  tl = tl + 0.0154 * Math.cos((75870 * t + 41) *0.017453292519943);
  tl = tl + 0.0125 * Math.cos((1443603 * t + 52) *0.017453292519943);
  tl = tl + 0.011 * Math.cos((489205 * t + 142) *0.017453292519943);
  tl = tl + 0.0107 * Math.cos((1303870 * t + 246) *0.017453292519943);
  tl = tl + 0.01 * Math.cos((1431597 * t + 315) *0.017453292519943);
  tl = tl + 0.0085 * Math.cos((826671 * t + 111) *0.017453292519943);
  tl = tl + 0.0079 * Math.cos((449334 * t + 188) *0.017453292519943);
  tl = tl + 0.0068 * Math.cos((926533 * t + 323) *0.017453292519943);
  tl = tl + 0.0052 * Math.cos((31932 * t + 107) *0.017453292519943);
  tl = tl + 0.005 * Math.cos((481266 * t + 205) *0.017453292519943);
  tl = tl + 0.004 * Math.cos((1331734 * t + 283) *0.017453292519943);
  tl = tl + 0.004 * Math.cos((1844932 * t + 56) *0.017453292519943);
  tl = tl + 0.004 * Math.cos((133 * t + 29) *0.017453292519943);
  tl = tl + 0.0038 * Math.cos((1781068 * t + 21) *0.017453292519943);
  tl = tl + 0.0037 * Math.cos((541062 * t + 259) *0.017453292519943);
  tl = tl + 0.0028 * Math.cos((1934 * t + 145) *0.017453292519943);
  tl = tl + 0.0027 * Math.cos((918399 * t + 182) *0.017453292519943);
  tl = tl + 0.0026 * Math.cos((1379739 * t + 17) *0.017453292519943);
  tl = tl + 0.0024 * Math.cos((99863 * t + 122) *0.017453292519943);
  tl = tl + 0.0023 * Math.cos((922466 * t + 163) *0.017453292519943);
  tl = tl + 0.0022 * Math.cos((818536 * t + 151) *0.017453292519943);
  tl = tl + 0.0021 * Math.cos((990397 * t + 357) *0.017453292519943);
  tl = tl + 0.0021 * Math.cos((71998 * t + 85) *0.017453292519943);
  tl = tl + 0.0021 * Math.cos((341337 * t + 16) *0.017453292519943);
  tl = tl + 0.0018 * Math.cos((401329 * t + 274) *0.017453292519943);
  tl = tl + 0.0016 * Math.cos((1856938 * t + 152) *0.017453292519943);
  tl = tl + 0.0012 * Math.cos((1267871 * t + 249) *0.017453292519943);
  tl = tl + 0.0011 * Math.cos((1920802 * t + 186) *0.017453292519943);
  tl = tl + 0.0009 * Math.cos((858602 * t + 129) *0.017453292519943);
  tl = tl + 0.0008 * Math.cos((1403732 * t + 98) *0.017453292519943);
  tl = tl + 0.0007 * Math.cos((790672 * t + 114) *0.017453292519943);
  tl = tl + 0.0007 * Math.cos((405201 * t + 50) *0.017453292519943);
  tl = tl + 0.0007 * Math.cos((485333 * t + 186) *0.017453292519943);
  tl = tl + 0.0007 * Math.cos((27864 * t + 127) *0.017453292519943);
  tl = tl + 0.0006 * Math.cos((111869 * t + 38) *0.017453292519943);
  tl = tl + 0.0006 * Math.cos((2258267 * t + 156) *0.017453292519943);
  tl = tl + 0.0005 * Math.cos((1908795 * t + 90) *0.017453292519943);
  tl = tl + 0.0005 * Math.cos((1745069 * t + 24) *0.017453292519943);
  tl = tl + 0.0005 * Math.cos((509131 * t + 242) *0.017453292519943);
  tl = tl + 0.0004 * Math.cos((39871 * t + 223) *0.017453292519943);
  tl = tl + 0.0004 * Math.cos((12006 * t + 187) *0.017453292519943);
  tl = tl + 0.0003 * Math.cos((958465 * t + 340) *0.017453292519943);
  tl = tl + 0.0003 * Math.cos((381404 * t + 354) *0.017453292519943);
  tl = tl + 0.0003 * Math.cos((349472 * t + 337) *0.017453292519943);
  tl = tl + 0.0003 * Math.cos((1808933 * t + 58) *0.017453292519943);
  tl = tl + 0.0003 * Math.cos((549197 * t + 220) *0.017453292519943);
  tl = tl + 0.0003 * Math.cos((4067 * t + 70) *0.017453292519943);
  tl = tl + 0.0003 * Math.cos((2322131 * t + 191) *0.017453292519943);
  ws = tl / 360;
  ws = ws - Math.floor(ws) + 1;
  tl = (ws - Math.floor(ws)) * 360;
  document.forms[0].elements[11].value=tl;

  tb = 5.1281 * Math.cos((483202.019 * t + 3.273) * 0.017453292519943);
  tb = tb + 0.2806 * Math.cos((960400.89 * t + 138.24) * 0.017453292519943);
  tb = tb + 0.2777 * Math.cos((6003.15 * t + 48.31) * 0.017453292519943);
  tb = tb + 0.1733 * Math.cos((407332.2 * t + 52.43) * 0.017453292519943);
  tb = tb + 0.0554 * Math.cos((896537.4 * t + 104) * 0.017453292519943);
  tb = tb + 0.0463 * Math.cos((69866.7 * t + 82.5) * 0.017453292519943);
  tb = tb + 0.0326 * Math.cos((1373736.2 * t + 239) * 0.017453292519943);
  tb = tb + 0.0172 * Math.cos((1437599.8 * t + 273.2) * 0.017453292519943);
  tb = tb + 0.0093 * Math.cos((884531 * t + 187) * 0.017453292519943);
  tb = tb + 0.0088 * Math.cos((471196 * t + 87) * 0.017453292519943);
  tb = tb + 0.0082 * Math.cos((371333 * t + 55) * 0.017453292519943);
  tb = tb + 0.0043 * Math.cos((547066 * t + 217) * 0.017453292519943);
  tb = tb + 0.0042 * Math.cos((1850935 * t + 14) * 0.017453292519943);
  tb = tb + 0.0034 * Math.cos((443331 * t + 230) * 0.017453292519943);
  tb = tb + 0.0025 * Math.cos((860538 * t + 106) * 0.017453292519943);
  tb = tb + 0.0022 * Math.cos((481268 * t + 308) * 0.017453292519943);
  tb = tb + 0.0022 * Math.cos((1337737 * t + 241) * 0.017453292519943);
  tb = tb + 0.0021 * Math.cos((105866 * t + 80) * 0.017453292519943);
  tb = tb + 0.0019 * Math.cos((924402 * t + 141) * 0.017453292519943);
  tb = tb + 0.0018 * Math.cos((820668 * t + 153) * 0.017453292519943);
  tb = tb + 0.0018 * Math.cos((519201 * t + 181) * 0.017453292519943);
  tb = tb + 0.0018 * Math.cos((1449606 * t + 10) * 0.017453292519943);
  tb = tb + 0.0015 * Math.cos((42002 * t + 46) * 0.017453292519943);
  tb = tb + 0.0015 * Math.cos((928469 * t + 121) * 0.017453292519943);
  tb = tb + 0.0015 * Math.cos((996400 * t + 316) * 0.017453292519943);
  tb = tb + 0.0014 * Math.cos((29996 * t + 129) * 0.017453292519943);
  tb = tb + 0.0013 * Math.cos((447203 * t + 6) * 0.017453292519943);
  tb = tb + 0.0013 * Math.cos((37935 * t + 65) * 0.017453292519943);
  tb = tb + 0.0011 * Math.cos((1914799 * t + 48) * 0.017453292519943);
  tb = tb + 0.001 * Math.cos((1297866 * t + 288) * 0.017453292519943);
  tb = tb + 0.0009 * Math.cos((1787072 * t + 340) * 0.017453292519943);
  tb = tb + 0.0008 * Math.cos((972407 * t + 235) * 0.017453292519943);
  tb = tb + 0.0007 * Math.cos((1309873 * t + 205) * 0.017453292519943);
  tb = tb + 0.0006 * Math.cos((559072 * t + 134) * 0.017453292519943);
  tb = tb + 0.0006 * Math.cos((1361730 * t + 322) * 0.017453292519943);
  tb = tb + 0.0005 * Math.cos((848532 * t + 190) * 0.017453292519943);
  tb = tb + 0.0005 * Math.cos((419339 * t + 149) * 0.017453292519943);
  tb = tb + 0.0005 * Math.cos((948395 * t + 222) * 0.017453292519943);
  tb = tb + 0.0004 * Math.cos((2328134 * t + 149) * 0.017453292519943);
  tb = tb + 0.0004 * Math.cos((1024264 * t + 352) * 0.017453292519943);
  tb = tb + 0.0003 * Math.cos((932536 * t + 282) * 0.017453292519943);
  tb = tb + 0.0003 * Math.cos((1409735 * t + 57) * 0.017453292519943);
  tb = tb + 0.0003 * Math.cos((2264270 * t + 115) * 0.017453292519943);
  tb = tb + 0.0003 * Math.cos((1814936 * t + 16) * 0.017453292519943);
  tb = tb + 0.0003 * Math.cos((335334 * t + 57) * 0.017453292519943);
  document.forms[0].elements[12].value=tb;

  s = 280.4659 + 36000.7695 * t;
  s = s + 1.9147 * Math.cos((35999.05 * t + 267.52) * 0.017453292519943);
  s = s - 0.0048 * t * Math.cos((35999.05 * t + 267.52) * 0.017453292519943);
  s = s + 0.02 * Math.cos((71998.1 * t + 265.1) * 0.017453292519943);
  s = s + 0.002 * Math.cos((32964 * t + 158) * 0.017453292519943);
  s = s + 0.0018 * Math.cos((19 * t + 159) * 0.017453292519943);
  s = s + 0.0018 * Math.cos((445267 * t + 208) * 0.017453292519943);
  s = s + 0.0015 * Math.cos((45038 * t + 254) * 0.017453292519943);
  s = s + 0.0013 * Math.cos((22519 * t + 352) * 0.017453292519943);
  s = s + 0.0007 * Math.cos((65929 * t + 45) * 0.017453292519943);
  s = s + 0.0007 * Math.cos((3035 * t + 110) * 0.017453292519943);
  s = s + 0.0007 * Math.cos((9038 * t + 64) * 0.017453292519943);
  s = s + 0.0006 * Math.cos((33718 * t + 316) * 0.017453292519943);
  s = s + 0.0005 * Math.cos((155 * t + 118) * 0.017453292519943);
  s = s + 0.0005 * Math.cos((2281 * t + 221) * 0.017453292519943);
  s = s + 0.0004 * Math.cos((29930 * t + 48) * 0.017453292519943);
  s = s + 0.0004 * Math.cos((31557 * t + 161) * 0.017453292519943);
  ws = s / 360;
  ws = ws - Math.floor(ws) + 1;
  s = (ws - Math.floor(ws)) * 360;
  document.forms[0].elements[15].value=s;

  if (tl - s > 0){
    document.forms[0].elements[9].value = tl-s;
    document.forms[0].elements[10].value = ((1 - Math.cos((tl - s)* 0.017453292519943)) / 2)*100;
  }
  if (tl - s <= 0){
    document.forms[0].elements[9].value = (tl + 360) - s;
    document.forms[0].elements[10].value = ((1 - Math.cos(((tl + 360) - s)* 0.017453292519943)) / 2)*100;
  }

  if (mcount >=6){
  mcount=0;
  }
  if (mcount == 0){
  km=0;
  km=document.forms[0].elements[10].value;
  if (document.forms[0].elements[9].value >=180){
  km=100;
  km=km+(100-document.forms[0].elements[10].value);
  }
  document.images[2].src="./filesafe/tfsafe.cgi/moon" + Math.floor(km) + ".jpg";
  }
  mcount=mcount+1;

  c = 1.00014;
  c = c + 0.016706 * Math.cos((35999.05 * t + 177.53)* 0.017453292519943);
  c = c - 0.000042 * t * Math.cos((35999.05 * t + 177.53)* 0.017453292519943);
  c = c + 0.000139 * Math.cos((71998 * t + 175)* 0.017453292519943);
  c = c + 0.000031 * Math.cos((445267 * t + 298)* 0.017453292519943);
  c = c + 0.000016 * Math.cos((32964 * t + 68)* 0.017453292519943);
  c = c + 0.000016 * Math.cos((45038 * t + 164)* 0.017453292519943);
  c = c + 0.000005 * Math.cos((22519 * t + 233)* 0.017453292519943);
  c = c + 0.000005 * Math.cos((33718 * t + 226)* 0.017453292519943);
  document.forms[0].elements[17].value = c / 0.01;
  c = c * 149597870;
  document.forms[0].elements[16].value = c;

  tp = 0.950725
  tp = tp + 0.05182 * Math.cos((477198.868 * t + 134.963)* 0.017453292519943);
  tp = tp + 0.00953 * Math.cos((413335.35 * t + 100.74)* 0.017453292519943);
  tp = tp + 0.007842 * Math.cos((890534.22 * t + 235.7)* 0.017453292519943);
  tp = tp + 0.002824 * Math.cos((954397.74 * t + 269.93)* 0.017453292519943);
  tp = tp + 0.000858 * Math.cos((1367733.1 * t + 10.7)* 0.017453292519943);
  tp = tp + 0.000531 * Math.cos((854535.2 * t + 238.2)* 0.017453292519943);
  tp = tp + 0.0004 * Math.cos((377336.3 * t + 103.2)* 0.017453292519943);
  tp = tp + 0.000319 * Math.cos((441199.8 * t + 137.4)* 0.017453292519943);
  tp = tp + 0.000271 * Math.cos((445267 * t + 118)* 0.017453292519943);
  tp = tp + 0.000263 * Math.cos((513198 * t + 312)* 0.017453292519943);
  tp = tp + 0.000197 * Math.cos((489205 * t + 232)* 0.017453292519943);
  tp = tp + 0.000173 * Math.cos((1431597 * t + 45)* 0.017453292519943);
  tp = tp + 0.000167 * Math.cos((1303870 * t + 336)* 0.017453292519943);
  tp = tp + 0.000111 * Math.cos((35999 * t + 178)* 0.017453292519943);
  tp = tp + 0.000103 * Math.cos((826671 * t + 201)* 0.017453292519943);
  tp = tp + 0.000084 * Math.cos((63864 * t + 214)* 0.017453292519943);
  tp = tp + 0.000083 * Math.cos((926533 * t + 53)* 0.017453292519943);
  tp = tp + 0.000078 * Math.cos((1844932 * t + 146)* 0.017453292519943);
  tp = tp + 0.000073 * Math.cos((1781068 * t + 111)* 0.017453292519943);
  tp = tp + 0.000064 * Math.cos((1331734 * t + 13)* 0.017453292519943);
  tp = tp + 0.000063 * Math.cos((449334 * t + 278)* 0.017453292519943);
  tp = tp + 0.000041 * Math.cos((481266 * t + 295)* 0.017453292519943);
  tp = tp + 0.000034 * Math.cos((918399 * t + 272)* 0.017453292519943);
  tp = tp + 0.000033 * Math.cos((541062 * t + 349)* 0.017453292519943);
  tp = tp + 0.000031 * Math.cos((922466 * t + 253)* 0.017453292519943);
  tp = tp + 0.00003 * Math.cos((75870 * t + 131)* 0.017453292519943);
  tp = tp + 0.000029 * Math.cos((990397 * t + 87)* 0.017453292519943);
  tp = tp + 0.000026 * Math.cos((818536 * t + 241)* 0.017453292519943);
  tp = tp + 0.000023 * Math.cos((553069 * t + 266)* 0.017453292519943);
  tp = tp + 0.000019 * Math.cos((1267871 * t + 339)* 0.017453292519943);
  tp = tp + 0.000013 * Math.cos((1403732 * t + 188)* 0.017453292519943);
  tp = tp + 0.000013 * Math.cos((341337 * t + 106)* 0.017453292519943);
  tp = tp + 0.000013 * Math.cos((401329 * t + 4)* 0.017453292519943);
  tp = tp + 0.000012 * Math.cos((2258267 * t + 246)* 0.017453292519943);
  tp = tp + 0.000011 * Math.cos((1908795 * t + 180)* 0.017453292519943);
  tp = tp + 0.000011 * Math.cos((858602 * t + 219)* 0.017453292519943);
  tp = tp + 0.00001 * Math.cos((1745069 * t + 114)* 0.017453292519943);
  tp = tp + 0.000009 * Math.cos((790672 * t + 204)* 0.017453292519943);
  tp = tp + 0.000007 * Math.cos((2322131 * t + 281)* 0.017453292519943);
  tp = tp + 0.000007 * Math.cos((1808933 * t + 148)* 0.017453292519943);
  tp = tp + 0.000006 * Math.cos((485333 * t + 276)* 0.017453292519943);
  tp = tp + 0.000006 * Math.cos((99863 * t + 212)* 0.017453292519943);
  tp = tp + 0.000005 * Math.cos((405201 * t + 140)* 0.017453292519943);
  tp = 1 / Math.sin((tp)* 0.017453292519943);
  tp = tp * 6378.14;
  document.forms[0].elements[13].value=tp;
  document.forms[0].elements[14].value=tp / 3844.01;
}


function makearray(n){
  this.length=n;
  for(i=0;i<n;i++)this[i]=0;
}

yuri=new makearray(10);
yuri[0]=0;
yuri[1]=2452347.5868287;
yuri[2]=2452377.30797454;
yuri[3]=2452406.94962963;
yuri[4]=2452436.49238426;
yuri[5]=2452465.93646991;
yuri[6]=2452495.30383102;
yuri[7]=2452524.63371528;
yuri[8]=2452553.97204861;
yuri[9]=2452583.35873843;

