function MM_findObj(n, d) { //v4.01
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function MM_changeProp(objName,x,theProp,theValue) { //v3.0
  var obj = MM_findObj(objName);
  if (obj && (theProp.indexOf("style.")==-1 || obj.style)) eval("obj."+theProp+"='"+theValue+"'");
}

function Laske(){
MM_changeProp('lampoa2','','value',Math.round(1700*parseFloat(hyotysuhde.value)*kuutiot.value),'INPUT/TEXT');
MM_changeProp('lampoa3','','value',Math.round(1360*parseFloat(hyotysuhde.value)*kuutiot.value),'INPUT/TEXT');
MM_changeProp('lampoa4','','value',Math.round(1320*parseFloat(hyotysuhde.value)*kuutiot.value),'INPUT/TEXT');
MM_changeProp('lampoa5','','value',Math.round(1230*parseFloat(hyotysuhde.value)*kuutiot.value),'INPUT/TEXT');
MM_changeProp('lampoa6','','value',Math.round(1330*parseFloat(hyotysuhde.value)*kuutiot.value),'INPUT/TEXT')
}

 // Vertailutulokset 140 m2 pientalolle
  var vertTalous = new Array(6000, 6000, 6000);
  var vertYoPros = new Array(0.6, 0.7, 0.8);
  var vertLammitys = new Array(16000/140, 17000/140, 19000/140); 
  
  var yhteensa = new Array(3);
  var yhtYo    = new Array(3);
  var talous   = new Array(3);
  var vesi     = new Array(3);
  var lammitys = new Array(3);

  var ala;
  var hloLkm;

  function round(n, d) {
    var kerroin = Math.pow(10, d);
    return kerroin * Math.round(n / kerroin);
  }

  function laskeYhteensa() {
    for(i=0; i<3; i++) {
      yhteensa[i] = round( 0.5*(140 + ala)*vertLammitys[i] + talous[i] + (hloLkm-4)*850, 2 );
      document.ennuste.yhteensa[i].value = yhteensa[i];
    }
  }

  function laskePaivaJaYo() {
    for(i=0; i<3; i++) {
      yhtYo[i] = round( vertYoPros[i]*yhteensa[i], 2 );
      document.ennuste.yht_yo[i].value    = yhtYo[i];
      document.ennuste.yht_paiva[i].value = yhteensa[i] - yhtYo[i];
    }
  }

  function laskeTalous() {
    for(i=0; i<3; i++) {
      talous[i] = round( vertTalous[i] + (ala-140)*20 + (hloLkm-4)*150, 2 );
      document.ennuste.talous[i].value = talous[i];
    }
  }

  function laskeVesi() {
    vesi[0] = round( (yhteensa[0]-talous[0]) * (2/7), 2 );
    vesi[1] = vesi[0];
    vesi[2] = round( vesi[0]*1.1, 2 );
    for(i=0; i<3; i++)
      document.ennuste.vesi[i].value = vesi[i];
  }

  function laskeLammitys() {
    for(i=0; i<3; i++) {
      lammitys[i] = yhteensa[i] - talous[i] - vesi[i];
      document.ennuste.lammitys[i].value = lammitys[i];
    }
  }

  function laske() {
    ala    = parseInt( document.ennuste.ala.value );
    hloLkm = parseInt( document.ennuste.hlo_lkm.value );

    if(isNaN(ala) || isNaN(hloLkm))
      for(i=0; i<3; i++) {
        document.ennuste.yhteensa[i].value  = "--";
	document.ennuste.yht_paiva[i].value = "--";
	document.ennuste.yht_yo[i].value    = "--";
	document.ennuste.talous[i].value    = "--";
	document.ennuste.vesi[i].value      = "--";
	document.ennuste.lammitys[i].value  = "--";
      }
    else {  
      laskeTalous();
      laskeYhteensa();
      laskeVesi();
      laskeLammitys();
      laskePaivaJaYo();
    }
  }

  function kasitteleSyote(element) {
    value = parseInt(element.value);
    if(isNaN(value))
      alert("Kenttään voi syöttää vain lukuarvoja");
    else
      element.value = value;
    laske();  
  }
function getObj(name)
{
  if (document.getElementById)
  {
    out =  document.getElementById(name);
  }
  else if (document.all)
  {
    out = document.all[name];
  }
  else if (document.layers)
  {
    out = document.layers[name];
  }
  return out;
}
