<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-2">
<META HTTP-EQUIV="Creation-date" CONTENT="2006.12.01">
<META HTTP-EQUIV="Reply-to" CONTENT="a.hamrol@O2.pl">
<META NAME="Description" CONTENT="Kalkulacja 2011">
<META NAME="Author" CONTENT="Andrzej Hamrol">

<TITLE></TITLE>

<SCRIPT type="text/javascript" LANGUAGE="JavaScript">
<!--
var Stac_HandleTimer ,
    Stac_TimeOut=2000,
    Stac_Buf="" ,
    Stac_SelectedIndex=0,
    Par=new Array(),

 Stac_HandleTimer=setTimeout("StacTimeOut()",Stac_TimeOut);
 clearTimeout(Stac_HandleTimer);
 
function Ord(c)
 {switch(c)
  {case " ": return 0;
   case "!": return 1;
   case '"': return 2;
   case "#": return 3;
   case "$": return 4;
   case "%": return 5;
   case "&": return 6;
   case "'": return 7;
   case "(": return 8;
   case ")": return 9;
   case "*": return 10;
   case "+": return 11;
   case ",": return 12;
   case "-": return 13;
   case ".": return 14;
   case "/": return 15;
   case ":": return 16;
   case "<": return 17;
   case "=": return 18;
   case ">": return 19;
   case "?": return 20;
   case "@": return 21;
   case "[": return 22;
   case "]": return 23;
   case "^": return 24;
   case "_": return 25;
   case "`": return 26;
   case "{": return 27;
   case "|": return 28;
   case "}": return 29;
   case "~": return 30;
   case "‚": return 31;
   case "„": return 32;
   case "0": return 33;
   case "1": return 34;
   case "2": return 35;
   case "3": return 36;
   case "4": return 37;
   case "5": return 38;
   case "6": return 39;
   case "7": return 40;
   case "8": return 41;
   case "9": return 42;
   case "A": return 43;
   case "a": return 43;
   case "ˇ": return 45;
   case "±": return 45;
   case "B": return 47;
   case "b": return 47;
   case "C": return 49;
   case "c": return 49;
   case "Ć": return 51;
   case "ć": return 51;
   case "D": return 53;
   case "d": return 53;
   case "E": return 55;
   case "e": return 55;
   case "Ę": return 57;
   case "ę": return 57;
   case "F": return 59;
   case "f": return 59;
   case "G": return 61;
   case "g": return 61;
   case "H": return 63;
   case "h": return 63;
   case "I": return 65;
   case "i": return 65;
   case "J": return 67;
   case "j": return 67;
   case "K": return 69;
   case "k": return 69;
   case "L": return 71;
   case "l": return 71;
   case "Ł": return 73;
   case "ł": return 73;
   case "M": return 75;
   case "m": return 75;
   case "N": return 77;
   case "n": return 77;
   case "Ń": return 79;
   case "ń": return 79;
   case "O": return 81;
   case "o": return 81;
   case "Ó": return 83;
   case "ó": return 83;
   case "P": return 85;
   case "p": return 85;
   case "Q": return 87;
   case "q": return 87;
   case "R": return 89;
   case "r": return 89;
   case "S": return 91;
   case "s": return 91;
   case "¦": return 93;
   case "¶": return 93;
   case "T": return 95;
   case "t": return 95;
   case "U": return 97;
   case "u": return 97;
   case "V": return 99;
   case "v": return 99;
   case "W": return 101;
   case "w": return 101;
   case "X": return 103;
   case "x": return 103;
   case "Y": return 105;
   case "y": return 105;
   case "Z": return 107;
   case "z": return 107;
   case "¬": return 109;
   case "Ľ": return 109;
   case "Ż": return 111;
   case "ż": return 111;
   
 }
}

 function Compare(s1,s2)
 { 
  var i, c1,c2;
  for (i=0;i<Math.min(s1.length,s2.length);i++)
  { c1=Ord(s1.charAt(i));
    c2=Ord(s2.charAt(i));
    if (c1>c2) {return 2}
    if (c1<c2) {return -2}
  }
  if (s1.length>s2.length) {return 1}
  if (s1.length<s2.length) {return -1}
  return 0
 }
 
 
 function KeyToISOChar(Key)
 {switch(Key)
   {case 165: return "ˇ";
    case 185: return "±";
    case 198: return "Ć";
    case 230: return "ć";
    case 202: return "Ę";
    case 234: return "ę";
    case 163: return "Ł";
    case 179: return "ł";
    case 209: return "Ń";
    case 241: return "ń";
    case 211: return "Ó";
    case 243: return "ó";
    case 140: return "¦";
    case 156: return "¶";
    case 143: return "¬";
    case 159: return "Ľ";
    case 175: return "Ż";
    case 191: return "ż";
     default: return String.fromCharCode(Key)}
 }
 
 function StacKeyPress(ev)
 {
   var e = window.event ? window.event : ev;
   var w

    Key=e.keyCode;

   clearTimeout(Stac_HandleTimer);
   if (Key!=13)
   { 
     Stac_Buf=Stac_Buf+KeyToISOChar(Key);//String.fromCharCode(Key);
     x=document.getElementById("ListaStacji");
   
     a=0;
     b=x.length;

     while ((b-a)>1)
      {c=Math.floor((a+b)/2);
      w=Compare(x.options[c].text,Stac_Buf);
      if (w<0) a=c; else if (w>0) b=c; else {a=c; b=c}
      }
     w=Compare(x.options[a].text,Stac_Buf);
     if (w>0) x.selectedIndex=a; else x.selectedIndex=b;

     Stac_SelectedIndex=x.selectedIndex;
     window.status=Stac_Buf;

     Stac_HandleTimer=setTimeout("StacTimeOut()",Stac_TimeOut);
     e.returnValue = false;
   }
   else
   {e.returnvalue=true}
 }
 
 function StacTimeOut()
  { Stac_Buf="";
   
   window.status=""  }

 function StacClick()
 {Stac_SelectedIndex=document.getElementById("ListaStacji").selectedIndex ;
 //alert("click " +Stac_SelectedIndex);
  }

  function StacChange()
 { setTimeout("StacChangeTimeOut()",10); }

  function StacChangeTimeOut()
  {document.getElementById("ListaStacji").selectedIndex=Stac_SelectedIndex}


  function KatPocChange()
  {   var kat=document.getElementById("SelKatPoc"),
       br=document.getElementById("SelBrutto"),
       i;
   
   
   br.length=0;
   br.disabled=false;
   switch (kat.selectedIndex)
    {case 0: 
             Nowy=new Option("do 60 t",0,true,false);                            br.options[0]=Nowy;
             Nowy=new Option("powyżej 60 t  do 150 t",1,false,false);            br.options[1]=Nowy;
             Nowy=new Option("powyżej 150 t  do 300 t",2,false,false);           br.options[2]=Nowy;
             Nowy=new Option("powyżej 300 t  do 450 t",3,false,false);           br.options[3]=Nowy;
             Nowy=new Option("powyżej 450 t  do 600 t",4,false,false);           br.options[4]=Nowy;
             Nowy=new Option("powyżej 600 t",5,false,false);                     br.options[5]=Nowy;
             break;
     case 1: 
             Nowy=new Option("do 60 t",0,true,false);                            br.options[0]=Nowy;
             Nowy=new Option("powyżej 60 t  do 150 t",1,false,false);            br.options[1]=Nowy;
             Nowy=new Option("powyżej 150 t  do 300 t",2,false,false);           br.options[2]=Nowy;
             Nowy=new Option("powyżej 300 t  do 450 t",3,false,false);           br.options[3]=Nowy;
             Nowy=new Option("powyżej 450 t  do 600 t",4,false,false);           br.options[4]=Nowy;
             Nowy=new Option("powyżej 600 t  do 1100 t",5,false,false);          br.options[5]=Nowy;
             Nowy=new Option("powyżej 1100 t  do 1500 t",6,false,false);         br.options[6]=Nowy;
             Nowy=new Option("powyżej 1500 t  do 2100 t",7,false,false);         br.options[7]=Nowy;
             Nowy=new Option("powyżej 2100 t  do 3000 t",8,false,false);         br.options[8]=Nowy;
             Nowy=new Option("powyżej 3000 t",9,false,false);                    br.options[9]=Nowy;
             break;

    }
   DopasujDoRodzaju();
  }

  function DopasujDoRodzaju()
  {var rodz;
    if (document.getElementById("Dopasuj").checked)
     {
      switch(document.getElementById("SelKatPoc").selectedIndex)
        {case 0: rodz="P"; break;
         case 1: rodz="T"; break;
}

      document.getElementById("Ogr4").checked=(rodz=="P");
      document.getElementById("Ogr3").checked=(rodz=="T");
      document.getElementById("Ogr2").checked=(rodz=="P");
      document.getElementById("Ogr1").checked=(rodz=="T");
      document.getElementById("Ogr4").disabled=true;
      document.getElementById("Ogr3").disabled=true;
      document.getElementById("Ogr2").disabled=true;
      document.getElementById("Ogr1").disabled=true}
    else
     {document.getElementById("Ogr4").disabled=false;
      document.getElementById("Ogr3").disabled=false;
      document.getElementById("Ogr2").disabled=false;
      document.getElementById("Ogr1").disabled=false};
  }
  
 

  function DodajStacjeDoTrasy()
  {var x=document.getElementById("ListaStacji"),
       y=document.getElementById("Trasa"),
       KatPoc=document.getElementById("SelKatPoc"),
       NazwaKatPoc=document.getElementById("EtKatPoc").innerHTML+":",
       Brutto=document.getElementById("SelBrutto"),
       NazwaBrutto="",
       Kryterium=document.getElementById("SelKryterium"),
       NazwaKryterium=document.getElementById("EtKryterium").innerHTML+":",
       tekst="", wartosc="", i, ograniczenia=8192.0;
       Stawka=Brutto.selectedIndex;

       for (i=1;i<=6;i++)
         {if (document.getElementById("Ogr"+i).checked) ograniczenia=ograniczenia|document.getElementById("Ogr"+i).value;}
       for (i=8;i<=10;i++)
         {if (document.getElementById("Ogr"+i).checked) ograniczenia=ograniczenia|document.getElementById("Ogr"+i).value;}


       Nowy=new Option(x.options[x.selectedIndex].text,wartosc=x.selectedIndex,false,false);
       y.options[y.length]=Nowy;
   }

  function UsunStacjeZTrasy()
  {var y=document.getElementById("Trasa"), i
   while (y.selectedIndex >=0)
    { y.remove(y.selectedIndex);
       i++
     }
   }
   
  function CheckForm()
    {var x=document.getElementById("StacjeTrasy"),
         y=document.getElementById("Trasa"),
         i, lan="";

     KatPoc=document.getElementById("SelKatPoc");
     Brutto=document.getElementById("SelBrutto");
     document.getElementById("Stawka").value=KatPoc.selectedIndex*10+Brutto.selectedIndex;
     document.getElementById("Kryterium").value=document.getElementById("SelKryterium").selectedIndex;
     document.getElementById("Brutto").value=Brutto.options[Brutto.selectedIndex].text;
     document.getElementById("Rodzaj").value=KatPoc.options[KatPoc.selectedIndex].text;



     ograniczenia=8192.0;
     for (i=1;i<=6;i++)
         {if (document.getElementById("Ogr"+i).checked) ograniczenia=ograniczenia|document.getElementById("Ogr"+i).value;}
     for (i=8;i<=10;i++)
         {if (document.getElementById("Ogr"+i).checked) ograniczenia=ograniczenia|document.getElementById("Ogr"+i).value;}
     document.getElementById("Ograniczenia").value=ograniczenia;
     if (y.length<2)
     { alert("Trasa poci±gu musi mieć przynajmniej dwie stacje")
       return false } 


    for (i=0;i<y.length;i++)
     {if (i==0){lan=lan+y.options[i].value;}
      if (i>0)
        {if (y.options[i].value!=y.options[i-1].value)
          {lan=lan+'|';
          lan=lan+y.options[i].value;
          }
        }
      }
    x.value=lan;

    return true;
   }

   function UstawStylTabela()
   {document.getElementById('Formularz').target='TABELKA';
    document.getElementById('Formularz').action='TrasaTabelarycznie.php';}

   function UstawStylMapa()
   {document.getElementById('Formularz').target='MAPKA';
    document.getElementById('Formularz').action='TrasaGraficznie.php';}

-->
</SCRIPT>
</HEAD>

<BODY STYLE="BACKGROUND-COLOR: #B0D0F0; Border-color:navy; font-style:normal; font-size:14; font-family: Arial, Verdana, sans-serif ">

<SCRIPT type="text/javascript" LANGUAGE="JavaScript">
 IE = !window.XMLHttpRequest && window.ActiveXObject;
</SCRIPT>
    

<DIV style="position: absolute; left:120px; top:15px; font-size:20; font-weight:bold; color:navy; ">Wersja internetowa oprogramowania KALKULACJA 2011</DIV>

<DIV STYLE="position: absolute; left:10px; top:50px; height:65px; width:800px; border-style: inset; font-family: Arial;">
  <DIV Id="EtKryterium" STYLE="position: absolute; left:30px; top:5px;" >Kryterium wyboru trasy</DIV>
  <SELECT id="SelKryterium" NAME="SelKryterium" STYLE="position: absolute; left:55px; top:25px; font-weight: bold; color:navy" >
    <OPTION VALUE=0>najkrótsza</OPTION>
    <OPTION VALUE=1>najtańsza</OPTION>
  </SELECT>

  <DIV Id="EtKatPoc" STYLE="position: absolute; left:320 px; top:5px;" >Rodzaj poci±gu</DIV>
  <SELECT id="SelKatPoc" NAME="SelKatPoc" STYLE="position: absolute; left:320px; top:25px; color:navy; font-weight: bold" onChange="KatPocChange()" >
    <OPTION selected VALUE=0>pasażerski</OPTION>
    <OPTION VALUE=1>towarowy</OPTION>
  </SELECT>

  
  <DIV Id="EtBrutto" STYLE="position: absolute; left:580px; top:5px;" >Całkowita masa brutto </DIV>
  <SELECT id="SelBrutto" NAME="SelBrutto" STYLE="position: absolute; left:565px; top:25px; color:navy; font-weight: bold;" >
    <OPTION VALUE=0>do 60 t</OPTION>
    <OPTION VALUE=1>powyżej 60 t  do 150 t</OPTION>
    <OPTION VALUE=2>powyżej 150 t  do 300 t</OPTION>
    <OPTION VALUE=3>powyżej 300 t  do 450 t</OPTION>
    <OPTION VALUE=4>powyżej 450 t  do 600 t</OPTION>
    <OPTION VALUE=3>powyżej 600 t</OPTION>
  </SELECT>


</DIV>

<DIV STYLE="position: absolute; left:10px; top:125px; height:155px; width:800px; border-style: inset; ">
  <DIV STYLE="position: absolute; left:20px; top:5px; width:800px;">
    <DIV style="font-weight:bold">Ograniczenia dla trasy - nie układaj trasy na odcinkach linii:</DIV>
    <DIV STYLE="position: absolute; left:20px; top:30px;" >
      <INPUT TYPE="checkbox" NAME="Ogr10" ID="Ogr10" VALUE=128> &nbsp;bez elektrycznej sieci trakcyjnej<BR>
      <INPUT TYPE="checkbox" NAME="Ogr9" ID="Ogr9" VALUE=64 Checked> &nbsp;nieczynnych<BR>
      <INPUT TYPE="checkbox" NAME="Ogr8" ID="Ogr8" VALUE=32 Checked> &nbsp;nie będ±cych pod zarz±dem PKP PLK S.A.<BR>
      <INPUT TYPE="radio"   NAME="Ogr6" ID="Ogr6" VALUE=256 Checked> &nbsp;Szerokotorowych
      <INPUT TYPE="radio"   NAME="Ogr6" ID="Ogr5" VALUE=512 > &nbsp;Normalnotorowych<BR>
    </DIV>


    <DIV ID="OgrAutomat" STYLE="position: absolute; left:400px; top:30px;" >
      <INPUT TYPE="checkbox" NAME="Ogr4" ID="Ogr4" VALUE=16 Checked disabled> &nbsp;przeznaczonych dla ruchu towarowego<BR>
      <INPUT TYPE="checkbox" NAME="Ogr3" ID="Ogr3" VALUE=8 disabled> &nbsp;przeznaczonych dla ruchu pasażerskiego<BR>
      <INPUT TYPE="checkbox" NAME="Ogr2" ID="Ogr2" VALUE=4 Checked disabled> &nbsp;dla których brak stawki pasażerskiej<BR>
      <INPUT TYPE="checkbox" NAME="Ogr1" ID="Ogr1" VALUE=2 disabled> &nbsp;dla których brak stawki towarowej<BR>      
    </DIV>

    <DIV STYLE="position: absolute; left:470px; top:5px; height:23px; BACKGROUND-COLOR:navy; color:white" >
      <INPUT TYPE="checkbox" NAME="Dopasuj" ID="Dopasuj" VALUE="0" Checked onClick="DopasujDoRodzaju()"> &nbsp;Dopasuj ograniczenia do rodzaju poci±gu&nbsp;
    </DIV>
  </DIV>
</DIV>

<DIV STYLE="position: absolute; left:10px; top:290px; height:260px; width:260px; border-style: inset;  ">
  <DIV Id="EtStacje" STYLE="position: absolute; left:20px; top:10px; font-sytle: italic">Stacje trasy</DIV>
  <SELECT Id="Trasa" NAME="Trasa" MULTIPLE STYLE="position: absolute; left:10px; top:40px; width:230px; height:200px;">
  </SELECT>
</DIV>

<DIV STYLE="position: absolute; left:280px; top:290px; height:260px; width:260px; border-style: inset; ">
  <DIV STYLE="position: absolute; left:20px; top:10px; font-sytle: 'italic'">Lista stacji</DIV>
  <SELECT id="ListaStacji" NAME="ListaStacji" STYLE="position: absolute; left:5px; top:40px; color:navy; " onkeypress="StacKeyPress(event)" onchange="StacChange()" onClick="StacClick()" >
    <?php
      $Lista=file('Dane/ListaStacji.txt');
      for ($i=0;$i<count($Lista);$i++){print($Lista[$i]);}
    ?>
  </SELECT>
  <INPUT STYLE="background-color:#B0D0F0; position: absolute; left:10px; top:70px; width:220px;" type="BUTTON"  NAME="InsStac" VALUE="Dodaj stację do trasy" onClick="DodajStacjeDoTrasy()">
  <INPUT STYLE="background-color:#B0D0F0; position: absolute; left:10px; top:100px; width:220px;" type="BUTTON"  NAME="DelStac" VALUE="Usuń zaznaczone stacje z trasy" onClick="UsunStacjeZTrasy()">
</DIV>


<FORM id="Formularz" METHOD="GET" TARGET="MAPA" ACTION="TrasaGraficznie.php" onSubmit="return CheckForm()">
  <INPUT STYLE="background-color:navy; color:white; position: absolute; left:40px; top:560px; width:200px;" TYPE="SUBMIT" NAME="Wyslij" VALUE="Pokaż wynik tabelarycznie " onClick="UstawStylTabela()">
  <INPUT STYLE="background-color:navy; color:white; position: absolute; left:300px; top:560px; width:200px;" TYPE="SUBMIT" NAME="Wyslij" VALUE="Pokaż wynik graficznie" onClick="UstawStylMapa()">
  <INPUT TYPE="HIDDEN" ID="StacjeTrasy" NAME="StacjeTrasy" VALUE="" >
  <INPUT TYPE="HIDDEN" ID="Kryterium" NAME="Kryterium" VALUE="" >
  <INPUT TYPE="HIDDEN" ID="Stawka" NAME="Stawka" VALUE="" >
  <INPUT TYPE="HIDDEN" ID="Ograniczenia" NAME="Ograniczenia" VALUE="" >
  <INPUT TYPE="HIDDEN" ID="Brutto" NAME="Brutto" VALUE="" >
  <INPUT TYPE="HIDDEN" ID="Rodzaj" NAME="Rodzaj" VALUE="" >

</FORM>

<FORM ACTION="Opis.html" >
  <INPUT STYLE="background-color:#B0D0F0; position: absolute; left:560px; top:330px; width:240px;" TYPE="SUBMIT" NAME="Wyslij" VALUE="Opis wersji internetowej">
</FORM>
<FORM  ACTION="http://www.plk-sa.pl/oferta/2010-2011/kalkulacja-warunki-sprzedazy.html">
  <INPUT STYLE="background-color:#B0D0F0; position: absolute; left:560px; top:400px; width:240px;" TYPE="SUBMIT" NAME="Wyslij" VALUE="Warunki sprzedaży wersji komercyjnej">
</FORM>
<FORM  ACTION="http://www.plk-sa.pl/fileadmin/pdf/OFERTA_CALOSC/cennik_2010_2011/25_maja_zmiana/Kalkulacja2011_w1_2010.05.25.rar">
  <INPUT STYLE="background-color:#B0D0F0; position: absolute; left:560px; top:430px; width:240px;" TYPE="SUBMIT" NAME="Wyslij" VALUE="Pliki instalacyjne wersji komercyjnej">
</FORM>

<IMG src="Obrazki/logo.gif" style="position: absolute; left:560px; top:490px; " alt="PKP PLK S.A.">

<DIV style="position: absolute; left:615px; top:565px; font-size:12; color:navy" >Autor : Andrzej Hamrol
<br>
Osoba odpowiedzialna: Jakub Pietruczuk
</DIV>

</BODY>
</HTML>





<!--ISO-->
�