 function verifyCompatibleBrowser(){ 
    this.ver=navigator.appVersion 
    this.dom=document.getElementById?1:0 
    this.ie5=(this.ver.indexOf("MSIE 5")>-1 && this.dom)?1:0; 
    this.ie4=(document.all && !this.dom)?1:0; 
    this.ns5=(this.dom && parseInt(this.ver) >= 5) ?1:0; 
 
    this.ns4=(document.layers && !this.dom)?1:0; 
    this.bw=(this.ie5 || this.ie4 || this.ns4 || this.ns5) 
    return this 
} 
bw=new verifyCompatibleBrowser();

function MM_findObj(n, d) { //v3.0
  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); return x;
}
 
//
// matematiksel
//
FLOATDEEP = 5;  // floatnmr derinligi


//
// maximum soru 
// sayilari
//
var SAYMAX = 100;
var SOZMAX = 100;

//
// alan tipine gore
// puanlamalar
//
var EA_SAY = 0.831;
var EA_SOZ = 1.009;
var SAY_SAY = 1.425;
var SAY_SOZ = 0.316;
var SOZ_SAY = 0.365;
var SOZ_SOZ = 1.621;
var BSRPUAN = 0.6;

//
// maximum basari
// puani
//
var BSRPUAN_MAX = 80;


//
// hata degerleri
//
var e_header = "Lütfen aşağıdaki bilgileri\n"
       +"kontrol ediniz:\n\n";

var e_atv_invalid    = "Alan tipi bilgisi.\n";
var e_saynet_invalid = "Sayısal Net bilgisi.\n";
var e_soznet_invalid = "Sözel Net bilgisi.\n";
var e_osspuani_invalid = "ÖSS Puanı bilgisi.\n";
var e_bpuani_invalid = "Başarı Puanı bilgisi.\n";

var e_bpuani_max = "\nBaşarı Puanı Hakkında Önemli Not:\n"
  +"----------------------------------------------------------\n"
  +"Önlisans Ağırlıklı Başarı Puanı daha önce\n"
   +"sınava giren adayların sınav sonuç\n"
   +"belgelerinde hesaplanmıştır. İlk defa\n"
   +"sınava girecek adayların Ö.A.B.P. en fazla\n"
   +BSRPUAN_MAX +" olarak değerlendirilecektir.\n"
   +"Mezun olduğunuz üniversite, bölüm ve bölüm\n"
   +"birincisi bu değerlendirmede etkili\n"
   +"olacaktır.";


// -=-=-=--=-=-=--=-=-=--=-=-=--=-=-=--=-=-=--=-=-=-
//                     HESAPLA
// -=-=-=--=-=-=--=-=-=--=-=-=--=-=-=--=-=-=--=-=-=-

function hesapla()
{
  e = "";  // hata degiskeni

  //
  // formdan degerleri
  // al
  //

  atv     = getAlanTipiValue();
  saynet  = getSayisalNet();
  soznet  = getSozelNet();
  //osspuani= getOSSPuani();
  bpuani  = getBasariPuani();
  
  //alert(atv + ' - ' + saynet + ' - ' + soznet + ' - '  + bpuani)

  //
  // hata kontrol
  //

  if ( isEmpty(atv) )
    e += e_atv_invalid;
  if ( isEmpty(saynet) )
    e += e_saynet_invalid;
  if ( isEmpty(soznet) )
    e += e_soznet_invalid;
  //if ( isEmpty(osspuani) )
  //  e += e_osspuani_invalid;
  if ( isEmpty(bpuani) )
    e += e_bpuani_invalid;
  if (parseInt(bpuani) > BSRPUAN_MAX)
    e += e_bpuani_max;
  if (checkError(e, true)) return false;


  //
  // hata yok
  //
  // alana gore
  // puani hesapla
  //

  switch (atv)
  {
    case "EA":
      setSonuc(
        saynet * EA_SAY, 
        soznet * EA_SOZ,
        //osspuani * OSSPUAN,
        bpuani * BSRPUAN
      );
      break;

    case "SAY":
      setSonuc(
        saynet * SAY_SAY, 
        soznet * SAY_SOZ,
        //osspuani * OSSPUAN,
        bpuani * BSRPUAN
      );
      break;

    case "SOZ":
      setSonuc(
        saynet * SOZ_SAY, 
        soznet * SOZ_SOZ,
        //osspuani * OSSPUAN,
        bpuani * BSRPUAN
      );
      break;
  }

}



// -=-=-=--=-=-=--=-=-=--=-=-=--=-=-=--=-=-=--=-=-=-
//              HESAPLAMA PARCALARI
// -=-=-=--=-=-=--=-=-=--=-=-=--=-=-=--=-=-=--=-=-=-

//
// puan turu
//
function getAlanTipiValue()
{
  at = MM_findObj("AlanTipi");
  for (i = 0; i < at.length; i++) {
    if (at[i].checked)
      return at[i].value;
  }
  return null;
}


//
// sayisal net
//
function getSayisalNet()
{
  sn = MM_findObj("SAYNET").value;
  if (isEmpty(sn))
    return null;
  return (sn <= SAYMAX ? sn : null);
}


//
// sozel net
//
function getSozelNet()
{
  sn = MM_findObj("SOZNET").value;
  if (isEmpty(sn))
    return null;
  return (sn <= SOZMAX ? sn : null);
}


//
// basari puani
//
function getBasariPuani()
{
  sn = MM_findObj("BASARIPUANI").value;
  if (isEmpty(sn))
    return null;
  return sn;
}


//
// oss puani
//
function getOSSPuani()
{
  sn = MM_findObj("OSSPUANI").value;
  if (isEmpty(sn))
    return null;
  return sn;
}


// -=-=-=--=-=-=--=-=-=--=-=-=--=-=-=--=-=-=--=-=-=-
//                SONUC FONKSIYONU
// -=-=-=--=-=-=--=-=-=--=-=-=--=-=-=--=-=-=--=-=-=-

function setSonuc(saypuan, sozpuan,  basaripuan) //osspuan,
{
// -=-=-=--=-=-=--=-=-=--=-=-=--=-=-=--=-=-=--=-=-=-
//                isa 'nın eklentisi
// -=-=-=--=-=-=--=-=-=--=-=-=--=-=-=--=-=-=--=-=-=-
//alert(saypuan + ' ' + sozpuan + ' ' + basaripuan)

switch (atv)
  {
    case "EA":
      tp = parseFloat(saypuan + sozpuan + basaripuan+117.563); //osspuan + 
      ;
      break;

    case "SAY":
      tp = parseFloat(saypuan + sozpuan + basaripuan+125.125); //osspuan + 
	;
      break;

    case "SOZ":
      tp = parseFloat(saypuan + sozpuan + basaripuan+105.004); //osspuan +
	;
      break;
  }    
  //alert(tp)
  cf = cutFloatties(saypuan, sozpuan, basaripuan, tp);  //osspuan, 
  
	//alert(cf[4])
	
  o = MM_findObj("SONUCKUTUSU");
  o.value = 
    
    + cf[3]
  ;
}
 
function checkError(e, dispwarn)
{
  if ( isEmpty(e) )
    return false;
  if (dispwarn)
    alert(e_header + e);
  return true;
}
function isEmpty(ieo)
{
  return (
      ieo == "undefined" || 
      ieo == null || 
      ieo.toString().length <= 0
  );
}
function cutFloatties()
{
  arg = cutFloatties.arguments;
  argl = arg.length;

  if (argl <= 0) return;

  for (i = 0; i < argl; i++)
    if (arg[i].toString().length > FLOATDEEP)
      arg[i] = arg[i].toString().substr(0, FLOATDEEP);

  return arg;
}

