﻿/* complete explanation can be found at: http://members.aol.com/grassblad
*/
var agt=navigator.userAgent.toLowerCase();
var isMajor = parseInt(navigator.appVersion);

var isIE   = (agt.indexOf("msie") != -1);
var isIE4  = (isIE && (isMajor == 4) && (agt.indexOf("msie 5.0")==-1) );
var isIE4up  = (isIE  && (isMajor >= 4));
var isAOL   = (agt.indexOf("aol") != -1);
var isAOL4  = (isAOL && isIE4);
var isOk = (isIE4up || isAOL4);


BodrogList = new Array("- Bodrog -", "0","Felsőberecki 51,0 km", "51","Alsóberecki 48,1 km","48.1","Sárospatak 33,5 km","33.5","Bodrogolaszi 29,9 km","29.9","Olaszliszka 20,5 km","20.5","Bodrogkeresztúr 5,7 km","5.7","Tokaj 0 km","0","- Nincs szállítás - ","0");
DravaList = new Array("- Dráva -", "0","Kerkaszentkirály 57,7 km", "57.7","Molnári 37,4 km","37.4","Örtilos 5,0 km","5","Vízvár 44,2 km","44.2","Heresznye 48,2 km","48.2","Barcs 69,6 km","69.6","Szentborbás 98,4 km","98.4","Drávasztára 114,3 km","114.3","Vejti 125,6 km","125.6","Drávaszabolcs 163,0 km","163","- Nincs szállítás - ","0");
HernadList = new Array("- Hernád -","0","Felsőkéked 65,4 km", "65.4","Abaújvár 61,8 km", "61.8","Hidasnémeti 61,3","61.3","Hernádszurdok 58,1 km","58.1","Vizsoly 41,5 km","41.5","Gibárt 35,7 km","35.7","Pere 33,6 km","33.6","Felsődobsza 37,0 km","37","Kiskinizs 42,9 km","42.9","Ócsanálos 40,4 km","40.4","Gesztely 41,6 km","41.6","Bőcs 46.7 km","46.7","Sajóhídvég 51,9 km","51.9","- Nincs szállítás -","0");
MosoniList = new Array("- Mosoni-Duna -","0","Rajka 15,1 km", "15.1","Halászi 5,6 km", "5.6","Mosonmagyaróvár 1,5 km","1.5","Kimle 12,6 km","12.6","Hédervár 16,4 km","16.4","Mecsér 23,1 km","23.1","Dunaszentpál 31,0 km","31.0","Dunaszeg 30,1 km","30.1","Győrladamér 32,7 km","32.7","Győrzámoly 35,1 km","35.1","Győr 37,0 km","37.0","- Nincs szállítás -","0");
RabaList = new Array("- Rába -","0","Szentgotthárd 163,0 km","163.0","Csörötnek 154,8 km","154.8","Ivánc 146,4 km","146.4","Csákánydoroszló 142,5 km","142.5","Körmend 133,0 km","133.0","Rábahídvég 122,1 km","122.1","Rum 109,5 km","109.5","Ikervár 100,5 km","100.5","Sárvár 93,7 km","93.7","Nick 71,0 km","71.0","Vág 59,1 km","59.1","Várkesző 61,6 km","61.6","Árpás 52,0 km","52.0","Rábaújfalu 43,5 km","43.5","Rábapatona 43,2 km","43.2","Győr 37,0 km","37","- Nincs szállítás -","0");
SajoList = new Array("- Sajó -","0","Sajópüspöki 98,0 km","98","Putnok 90,5 km","90.5","Sajóvelezd 89,9 km","89.9","Sajókaza 82,0 km","82","Kazincbarcika 73,8 km","73.8","Sajószentpéter 68,0 km","68","Sajóecseg 64,9 km","64.9","Sajókeresztúr 62,9 km","62.9","Szirmabesenyő 60,8 km","60.8","Miskolc 54,1 km","54.1","Felsőzsolca 48,4 km","48.4","Alsózsolca 53,1 km","53.1","Sajólád/Sajópetri 53,9 km","53.9","Ónod 57,1 km","57.1","Muhi 51,9 km","51.9","Nagycsécs 55,5 km","55.5","Sajóörös 61,0 km","61","Kesznyéten 50,2 km","50.2","Tiszaújváros 52,1 km","52.1","- Nincs szállítás -","0");
SzigetkozList = new Array("- Szigetköz -","0","Dunakiliti 11,1 km", "11.1","Doborgaz 16,0 km", "16.0","Cikolasziget 12,0","12.0","Kisbodak 12,9 km","12.9","Ásványráró 19,9 km","19.9","Nagybajcs 48,5 km","48.5","- Nincs szállítás -","0");
FelsoTiszaList = new Array("- Felső-Tisza -","0","Tiszabecs 129,1 km","129.1","Szatmárcseke 112,9 km","112.9","Tivadar 101,4 km ","101.4","Jánd 89,6 km","89.6","Vásárosnamény 84,4 km","84.4","Tiszaadony 95,7 km","95.7","Benk 94,9 km","94.9","Tiszamogyorós 85,1 km","85.1","Tuzsér 90,2 km","90.2","Tiszakanyár 52,7 km","52.7","Dombrád 49,7 km","49.7","Tiszabercel 25,9 km","25.9","Gávavencsellő 17,6 km","17.6","Tokaj 0 km","0","- Nincs szállítás -","0");
KozepTiszaList = new Array("- Közép-Tisza -","0","Tokaj 0 km","0","Tiszatardos 10,9 km","10.9","Tiszalök 13,6 km ","13.6","Tiszadada 25,9 km","25.9","Tiszadob 32,6 km","32.6","Tiszaújváros 52,1 km","52.1","Tiszakeszi 80,6 km","80.6","Tiszacsege 72,0 km","72","Tiszafüred 98,1 km","98.1","Poroszló 122,9 km","122.9","Sarud 132,2 km","132.2","Kisköre 149,1 km","149.1","Tiszasüly 179,2 km","179.2","Tiszaroff 166,8 km","166.8","Nagykörû 190,5 km","190.5","Tiszapüspöki 200,3 km","200.3","Szolnok 209,1 km","209.1","- Nincs szállítás -","0");
mondtam = false;
mondtam2 = false;
var FtKm = 190;
var mindij = 6000;
evszam = 2010;
keretdij = 35000;


function fillSel(selObj)
{
   var i = j = 0;
   var newItem;
   var src;
   var srcName = "";

   for (i = 0; i < selObj.length; i++)
      if (selObj.options[i].selected)
         srcName = selObj.options[i].value;

   src = eval(srcName);

   with (document.cascade.destList)
   {
      options.length = 0;
      for (i = 0; i < src.length; i++)
      {

         newItem = options.length;
             options[newItem] = new Option(src[i]);
         options[newItem].value = src[i+1];
   i++;
      }
      options[0].selected = true;
   }
   with (document.cascade.destList2)
   {
      options.length = 0;
      for (i = 0; i < src.length; i++)
      {

         newItem = options.length;
             options[newItem] = new Option(src[i]);
         options[newItem].value = src[i+1];
         i++;
      }
      options[0].selected = true;
   }
   //if (!isOk) history.go(0);
}


function doSel(selObj,IndulE)                                          /* szallitasi dij szamolo */
{
   for (i = 1; i < selObj.length; i++)                                 /* nezzuk vegig a telepuleseket */
      if (selObj.options[i].selected)   KKm = selObj.options[i].value; /* tavolsag, amelyiket valasztotta */
      if (IndulE<2)                                                    /* 1=indulast kell szamolni */
         {document.cascade.KmOda.value = KKm
         document.cascade.FtOda.value = Math.round((document.cascade.KmOda.value * 2* FtKm )/10-0.5)*10
         if(document.cascade.FtOda.value < mindij) {document.cascade.FtOda.value=mindij}
         if(document.cascade.KmOda.value == 0) {document.cascade.FtOda.value= 0}
         }
      else                                                             /* 2=erkezest kell szamolni */
         {document.cascade.KmVissza.value = KKm
         document.cascade.FtVissza.value = Math.round((document.cascade.KmVissza.value  * 2* FtKm )/10-0.5)*10
         if(document.cascade.FtVissza.value < mindij) {document.cascade.FtVissza.value=mindij}
         if(document.cascade.KmVissza.value == 0) {document.cascade.FtVissza.value=0}
         }
      UxU = Math.round (document.cascade.FtVissza.value) + Math.round(document.cascade.FtOda.value)
      document.cascade.SumSz.value = ( UxU)
      szamol(false)
}


function szamol(gombra)   {
   FoSzezon = 0
   AlSzezon = 0
   today = new Date()
   dFoTol = new Date(evszam,6,10)            /*2010 juli 10-tol*/   /*a honap ugye 0-tol szamozodik, nem 1-tol*/
   dFoIg = new Date(evszam,7,22)            /*2010 aug 22-ig*/

   for (i = 0; i < document.cascade.KHonap.length; i++)
      if (document.cascade.KHonap.options[i].selected)
         srcName = document.cascade.KHonap.options[i].value;
   src = eval(srcName);
   dEleje = new Date(evszam,src ,document.cascade.KNap.value)  /*eleje datum osszeallitva*/
   for (i = 0; i < document.cascade.VHonap.length; i++)
      if (document.cascade.VHonap.options[i].selected)
         srcName = document.cascade.VHonap.options[i].value;
   src = eval(srcName);
   dVege = new Date(evszam,src ,document.cascade.VNap.value)   /*vege datum osszeallitva*/

if (dVege < dEleje-1)
   {
   alert("Vigyázz, hamarabb végződik a túra, minthogy elkezdődne.")
   korabban = true
   }
else
  {korabban = false}

dOssz = (eval((dVege-dEleje)/(60*60*24*1000))+1)                        /* a tura teljes idotartama*/

/*----------------------------------------------------------------------*/
if ((dVege - dFoTol) <0 ) {DV = dVege } else { DV = dFoTol-(60*60*24*1000)} /* ha a Foszezon
                                                                           kezdete elott befejezodik a tura,
                                                                           akkor DV= a tura vege, egyebkent DV= a
                                                                           Foszezon elott 1 nappal*/
dKiEleje = ((DV - dEleje)/(60*60*24*1000)+1)                            /* Foszezon elotti napok szama */
if (dKiEleje < 0) {dKiEleje = 0}                                        /* minusz azert ne legyen */

/*valami miatt maskepp kell szamolni, mint az elotte napokat .?.?.?*/
if ((dEleje - dFoIg) >0 ) {DE = dEleje-(60*60*24*1000)} else { DE = dFoIg} /* ha a Foszezon
                                                                           vege utan indul a tura, akkor DE= a
                                                                           tura eleje elott 1 nappal, egyebkent
                                                                           DE= a Foszezon vege*/
dKiVege = ((dVege - DE)/(60*60*24*1000))                                /* Foszezon utani napok szama */
if (dKiVege < 0) {dKiVege = 0}                                          /* minusz azert ne legyen */
NemFoNap = dKiEleje + dKiVege                                           /* Foszezon elotti + utani napok szama*/
document.cascade.FoNap.value = dOssz - NemFoNap /* Foszezon napjainak szama */
document.cascade.KiNap.value = NemFoNap                                 /* Foszezon napjainak szama */

/*----------------------------------------------------------------------*/

FoArA =  document.cascade.FoNap.value * ((document.cascade.Db4.value * document.cascade.Fo4.value )+(document.cascade.Db7.value * document.cascade.Fo7.value ))
document.cascade.FoFt.value = FoArA
KiArA =  document.cascade.KiNap.value * ((document.cascade.Db4.value * document.cascade.Ki4.value )+(document.cascade.Db7.value * document.cascade.Ki7.value ))
document.cascade.KiFt.value = KiArA

if (korabban)
  {
  document.cascade.KiNap.value  = 0
  document.cascade.FoNap.value = 0
  document.cascade.KiFt.value  = 0
  document.cascade.FoFt.value = 0
  FoArA = 0
  KiArA = 0
  }

EgeszArA = FoArA + KiArA
if (EgeszArA>keretdij*3 && !document.cascade.CKeret.checked && gombra) // && !mondtam
  {
  alert("105.000 Ft fölött már érdemes keretszerződést kötni. Számold ki így is!")
  mondtam = true
  }
if(document.cascade.selList1.value == 'RabaList'){maxDb = 10} else{maxDb = 10}
if ((!mondtam2 || gombra) && (eval(document.cascade.Db4.value) + eval(document.cascade.Db7.value)) > maxDb)
  {
  alert("Vigyázz, több hajód van, mint amennyi egy trailer-re felfér (10)! A táblázat csak 1 fuvarral számol, de több kört kell fizetni!")
  mondtam2 = true
  }
  else{mondtam2 = false}


document.cascade.EgeszFt.value = EgeszArA
    if (document.cascade.C20.checked ){(document.cascade.CKeret.checked )= true }
    if (document.cascade.CKeret.checked ){Kedvezmeny = Math.round(EgeszArA/3)} else {Kedvezmeny = 0}
    document.cascade.KeretKedv.value = (Kedvezmeny)
    if (document.cascade.C20.checked ){Novekmeny = keretdij} else {Novekmeny = 0}
    document.cascade.Keret20.value = (Novekmeny)

    KolcsonAra = EgeszArA - Kedvezmeny + Novekmeny
    document.cascade.SumKolcs.value = KolcsonAra

    if (document.cascade.SumSz.value == "" ) {UxU = 0} else
    UxU= eval(document.cascade.SumSz.value )

    {MindenAra =   (UxU) + (KolcsonAra)}

    document.cascade.SumSum.value = MindenAra

    if (document.cascade.Szemelyek.value > 0 )
    {   if (document.cascade.SumSum.value  == "NaN")
        {document.cascade.Szemelyre.value =Math.round( KolcsonAra /eval(document.cascade.Szemelyek.value)) }
        else{document.cascade.Szemelyre.value =Math.round( MindenAra /eval(document.cascade.Szemelyek.value)) }
    }
    else
      {document.cascade.Szemelyre.value = ""}

}   /* end szamol */


  function piszkal()                         /* ha baromsagot csinal */
  {
    document.cascade.KmOda.value = "!"
    document.cascade.FtOda.value = "!"
    document.cascade.KmVissza.value = "!"
    document.cascade.FtVissza.value = "!"
    document.cascade.SumSz.value = "0"
  }
