var adresat = "http://www.folk.tau10.ceti.pl/folk/cgi-local/zamow1.cgi";
var wysylka = 14;
Lista_Informacji = new Lista_pusta();
suma = 0;

function sprawdz_wysylka()
{
 if (suma <= 200)
 {
  wysylka = 14;
 }
 else
 {
  wysylka = 0;
  if (suma <= 300)
  {
   wysylka = 7;
  }
 }
 return true;
}

function Lista_pusta()
{
 this.wielkosc = 0;
 return this;
}

function Tablica_nowa(rozmiar)
{
 this.wielkosc = rozmiar;
 for (i=1; i<=rozmiar; i++)
 {
  this[i] = null;
 }
}

function rekord(Nazwa , Ilosc, Cena, Dokl)
{
 this.nazwa = Nazwa;
 this.ilosc = Ilosc;
 this.cena = Cena;
 this.dokladnosc = Dokl;
 return this;
}

function zaokr( Liczba, Dokladnosc)
{
 if (Dokladnosc < 0.0001 )
 {
  Dokladnosc = 0.0001
 };
 var Liczba_str = "" + Math.round(Liczba / Dokladnosc);
 var Liczba_len = Liczba_str.length;
 var poz = Math.log(1/Dokladnosc)/Math.log(10);
 if (Dokladnosc < 1)
 {
  return parseFloat(Liczba_str.substring(0, Liczba_len - poz) + "." + Liczba_str.substring(Liczba_len - poz, Liczba_len));
 }
  else
 {
  return Math.round(Dokladnosc * Liczba_str);
 }
}

function waluta_scr(Liczba)
{
 var Waluta = Math.round(Liczba*100);
 var Waluta_str = "" + Waluta;
 var Waluta_len = Waluta_str.length;
 return Waluta_str.substring(0, Waluta_len - 2) + "." + Waluta_str.substring(Waluta_len - 2, Waluta_len) + "zl";
}

function Analizuj(info)
{
 var p_temp = ""+info;
 var p1_temp = null;
 var p2_temp = null;
 if (p_temp.indexOf(",")>-1)
 {
  var p1_temp=p_temp.substring(0,p_temp.indexOf(","));
  var p2_temp=p_temp.substring(p_temp.indexOf(",")+1);
  p_temp=p1_temp+"."+p2_temp;
 }
 p_temp = parseFloat(p_temp);
 if (isNaN(p_temp)) {p_temp = 0};
 return p_temp;
}

function dodaj_element(Lista, nazwa, ilosc, cena, dokladnosc)
{
 for ( i=1 ; i<= Lista.wielkosc; i++)
 {
  if (Lista[i].nazwa == nazwa)
  {
   Lista[i].ilosc += ilosc;
   return(Lista);
  }
 }
 wlk = ++Lista.wielkosc;
 Lista[wlk] = new rekord( nazwa, ilosc, cena, dokladnosc);
 return Lista;
}

function usun_element(Lista, numer)
{
 if (Lista.wielkosc > 0)
 {
  Lista_mala = new Tablica_nowa(Lista.wielkosc - 1);
  for (i = 1; i <= Lista.wielkosc - 1; i++) 
  { 
   if (i < numer)
   {
    Lista_mala[i] = Lista[i]
   }
   else
   {
    Lista_mala[i] = Lista[i+1]
   }
  }
  return Lista_mala;
 }
}

function dodatnie(Lista)
{
 licznik = 0;
 for (i=1; i<=Lista.wielkosc; i++)
 {
  if (Lista[i].ilosc <= 0)
  {
   licznik++
  }
 }
 Lista_dodatnie = new Tablica_nowa(Lista.wielkosc - licznik);
 licznik = 0;
 for (i=1; i<=Lista.wielkosc; i++)
 {
  if (Lista[i].ilosc > 0)
  {
   Lista_dodatnie[++licznik] = new rekord(Lista[i].nazwa, Lista[i].ilosc, Lista[i].cena, Lista[i].dokladnosc)
  }
 }
 return Lista_dodatnie;
}

function dodaj(nazwa, cena, dokladnosc)
{
 ilosc=prompt("Podaj zamawianą ilość:", dokladnosc);
 Lista_Informacji = dodaj_element(Lista_Informacji, nazwa, zaokr(Analizuj(ilosc), Analizuj(dokladnosc)), Math.abs(Analizuj(cena)),  Analizuj(dokladnosc));
 Lista_Informacji = dodatnie(Lista_Informacji);
}

function usun_all()
{
 Lista_Informacji = Lista_pusta();
 pokaz();
}

function usun(numer)
{
 Lista_Informacji = usun_element(Lista_Informacji, numer);
 pokaz();
}

function zmien(numer)
{
 liczba = Lista_Informacji[numer].ilosc;
 nowa_liczba = prompt("Podaj nową ilość:", liczba);
 if (nowa_liczba != "")
 { 
  liczba = zaokr(Analizuj(nowa_liczba), Analizuj(Lista_Informacji[numer].dokladnosc));
  Lista_Informacji[numer].ilosc = liczba;
  Lista_Informacji = dodatnie(Lista_Informacji);
  pokaz();
 }
}

function pokaz()
{
 parent.WYNIK.document.writeln('<HTML><HEAD><META http-equiv="Content-Type" content="text/html; charset=iso-8859-2"></HEAD><BODY background="/img/dodatki/tlo_1.jpg"><CENTER><TABLE COLS=1 WIDTH="100%" HEIGHT="100%"><TR><TD ALIGN=CENTER valign="top"><TABLE COLS=1 WIDTH="90%" ><TR><TD ALIGN=CENTER VALIGN=CENTER BGCOLOR="#996600"><B><FONT size=+2>Zawartość koszyka</FONT></B></TD></TR></TABLE><HR SIZE=3 WIDTH="95%"><BR></TD></TR><TR><TD ALIGN=CENTER>');
 if (Lista_Informacji.wielkosc >= 1)
 {
  parent.WYNIK.document.writeln('<table WIDTH="80%" BORDER=0 CELLSPACING=0 CELLPADDING=0 BGCOLOR="#CCCCCC" ><tr BGCOLOR="#999999"><th ALIGN=CENTER VALIGN=CENTER>Mateiał</th><th ALIGN=CENTER VALIGN=CENTER>Cena</th><th>Sztuk</th><th>Wartość</th><th>Korekty</th></tr>');
  suma=0;
  for ( i = 1 ; i <= Lista_Informacji.wielkosc ; i++)
  {
   wartosc = Lista_Informacji[i].ilosc*Lista_Informacji[i].cena;
   parent.WYNIK.document.writeln('<tr ALIGN=RIGHT><td ALIGN=CENTER VALIGN=CENTER>'+Lista_Informacji[i].nazwa+'</td><td ALIGN=CENTER VALIGN=CENTER>'+waluta_scr(Lista_Informacji[i].cena)+'</td><td ALIGN=CENTER VALIGN=CENTER>'+Lista_Informacji[i].ilosc+'</td><td ALIGN=CENTER VALIGN=CENTER>'+waluta_scr(wartosc)+'</td><td ALIGN=CENTER VALIGN=CENTER><a href="javascript:parent.TEMATY.usun(' + i + ')">Usuń</a><br><a href="javascript:parent.TEMATY.zmien(' + i + ')">Zmień</a></td></tr>');
   suma += wartosc;
  }
  sprawdz_wysylka();
  suma += Analizuj(wysylka);
  parent.WYNIK.document.writeln('<tr ALIGN=RIGHT><td ALIGN=CENTER VALIGN=CENTER COLSPAN="3">wysyłka</td><td ALIGN=CENTER VALIGN=CENTER>'+waluta_scr(wysylka)+';</td><td ALIGN=CENTER VALIGN=CENTER>&nbsp;</td></tr><tr ALIGN=RIGHT><td ALIGN=CENTER VALIGN=CENTER COLSPAN="3"><b>Razem:</b></td><td ALIGN=CENTER VALIGN=CENTER><b>'+waluta_scr(suma)+'</b></td><td ALIGN=CENTER VALIGN=CENTER>');
  parent.WYNIK.document.writeln('&nbsp;</td></tr></table><br><form NAME="Zamówienie" METHOD="POST"><table COLS=1 WIDTH="40%"><tr><td ALIGN=CENTER VALIGN=CENTER><input TYPE="BUTTON" VALUE="Kasuj " onClick="parent.TEMATY.usun_all()"></td></tr><tr><td ALIGN=CENTER><input TYPE="BUTTON" VALUE="Formularz zamówień" onClick="parent.TEMATY.wyslij_zam()"></td></tr></table></form>');
 }
 else
 {
  parent.WYNIK.document.writeln('<CENTER><H1>Koszyk jest pusty!</H1></CENTER>');
 }
 parent.WYNIK.document.writeln('</TD></TR><TR><TD ALIGN=CENTER valign="bottom"><BR><HR SIZE=3 WIDTH="95%"><TABLE COLS=1 WIDTH="90%" BGCOLOR="#996600" ><TR><TD ALIGN=CENTER><FONT size=-1>Wysyłka fonogramów odbywa sie za zaliczeniem pocztowym.</FONT></TD></TR></TABLE></TD></TR></TABLE></CENTER></BODY></HTML>');
 parent.WYNIK.document.close();
}

function wyslij_zam()
{
 parent.WYNIK.document.writeln('<HTML><HEAD><META HTTP-EQUIV="Content-type" CONTENT="text/html; charset=iso-8859-2"></HEAD><BODY background="/img/dodatki/tlo_1.jpg">');
 if (Lista_Informacji.wielkosc >= 1)
 {
  parent.WYNIK.document.writeln('<center><table COLS=1 WIDTH="80%" ><tr><td ALIGN=CENTER VALIGN=CENTER BGCOLOR="#C0C0C0"><b>Formularz zamówienia</b></td></tr></table><hr SIZE=3 WIDTH="95%"><form NAME="Zamowienie" ACTION="'+adresat+'" METHOD="POST">');
  for (i = 1 ; i <= Lista_Informacji.wielkosc ; i++)
  {
   wartosc = Lista_Informacji[i].ilosc*Lista_Informacji[i].cena;
   parent.WYNIK.document.writeln('<INPUT TYPE="HIDDEN" NAME="Poz:'+i+' " VALUE="material:'+Lista_Informacji[i].nazwa+' ilosc:'+Lista_Informacji[i].ilosc+' cena:'+Lista_Informacji[i].cena+'">');
  }
  sprawdz_wysylka();
  parent.WYNIK.document.writeln('<input TYPE="HIDDEN" NAME="Wysylka" VALUE="'+wysylka+'"><b><font size=+1>Wartość zamówienia '+waluta_scr(suma)+'</font></b><input TYPE="HIDDEN" NAME="Suma" VALUE="'+waluta_scr(suma)+'"><p><table><caption ALIGN="CENTER"><b><u>Twoje dane:</u></b></caption><tr><td ALIGN=RIGHT>Imię i Nazwisko lub nazwa firmy:</td><td ALIGN=LEFT><input TYPE="TEXT" NAME="nazwisko" VALUE="" SIZE="30" MAXLENGTH="35">');
  parent.WYNIK.document.writeln('</td></tr><tr><td ALIGN=RIGHT><font color="#0000FF">NIP:</font></td><td ALIGN=LEFT><input TYPE="TEXT" NAME="nip" VALUE="" SIZE="20" MAXLENGTH="13"></td></tr><tr><td ALIGN=RIGHT><font color="#0000FF">Skrzynka E-mail:</font></td><td ALIGN=LEFT><input TYPE="TEXT" NAME="mail" VALUE="" SIZE="20" MAXLENGTH="128"></td></tr><tr><td ALIGN=RIGHT><font color="#0000FF">Telefon:</font>');
  parent.WYNIK.document.writeln('</td><td ALIGN=LEFT><input TYPE="TEXT" NAME="telefon" VALUE="" SIZE="20" MAXLENGTH="20"></td></tr><tr><td ALIGN=RIGHT>Adres:</td><td ALIGN=LEFT><input TYPE="TEXT" NAME="adres" VALUE="" SIZE="30" MAXLENGTH="35"></td></tr><tr><td ALIGN=RIGHT>Kod pocztowy i miejscowość:</td><td ALIGN=LEFT><input TYPE="TEXT" NAME="miasto" VALUE="" SIZE="30" MAXLENGTH="35"></td></tr></table><font color="#0000FF">Komentarz:</font><br><TEXTAREA NAME="komentarz" ROWS=5 COLS=40 WRAP=physical> </TEXTAREA>');
  parent.WYNIK.document.writeln('<table BORDER=0 CELLSPACING=0 CELLPADDING=0 COLS=1 WIDTH="70%" BGCOLOR="#CCCCCC"><tr><td ALIGN=CENTER><font size=-2><font face="Arial Black">kolor czarny</font><font face="Arial,Helvetica"> - koniecznie wypełnij;&nbsp;&nbsp;&nbsp; </font><font face="Arial Black"><font color="#0000FF">kolor miebieski</font></font><font face="Arial,Helvetica">- przydatne, ale niewymagane;');
  parent.WYNIK.document.writeln('</font></font></td></tr></table><br><table COLS=1 WIDTH="60%" ><tr><td ALIGN=LEFT VALIGN=CENTER><input type="radio" name="Rachunek" value="nie" checked>bez rachunku;<br><input type="radio" name="Rachunek" value="faktura VAT" >faktura VAT <font size=-1>(wymagany NIP i oświadczenie o treści');
  parent.WYNIK.document.writeln(': Oświadczam ze wyrażam zgodę na wydanie rachunku VAT bez mojego podpisu);</font></td></tr></table><table COLS=2 WIDTH="40%" ><tr><td ALIGN=RIGHT VALIGN=CENTER><div align=right><input TYPE="BUTTON" VALUE="Popraw" onClick="parent.TEMATY.pokaz()"></div></td><td ALIGN=LEFT VALIGN=CENTER><input TYPE="BUTTON" VALUE="Kasuj " onClick="parent.TEMATY.usun_all()">');
  parent.WYNIK.document.writeln('</td></tr><caption ALIGN=BOTTOM><input TYPE="BUTTON" VALUE="Wyslij zamówienie" onClick="parent.TEMATY.kontrola()" ></caption></table></form><hr SIZE=3 WIDTH="95%"><table COLS=1 WIDTH="90%" BGCOLOR="#996600"><tr><td ALIGN=CENTER><font size=-1>Dane umieszczone w formularzu zamówień nie będą udostępniane firmom trzecim.</font></td></tr></table></center>');
 }
 else
 {
  parent.WYNIK.document.writeln("<center><H1>Koszyk jest pusty!</H1></center>")
 }
 parent.WYNIK.document.writeln('</BODY></HTML>');
 parent.WYNIK.document.close();
}

function kontrola()
{
 if (parent.WYNIK.document.Zamowienie.nazwisko.value == "")
 {
  alert("Proszę podać imię i nazwisko");
  return false;
 }
 if (parent.WYNIK.document.Zamowienie.adres.value == "" || parent.WYNIK.document.Zamowienie.miasto.value == "")
 {
  alert("Proszę podać adres!");
  return false;
 }
 if (parent.WYNIK.document.Zamowienie.mail.value != "")
 {
  gdzie_at = Analizuj(parent.WYNIK.document.Zamowienie.mail.value.indexOf("@"));
  dlugosc = Analizuj(parent.WYNIK.document.Zamowienie.mail.value.lenght);
  if (gdzie_at == 0 || gdzie_at == (dlugosc-1))
  {
   alert("Popraw adres e-mail");
   return false;
  }
 }
 parent.WYNIK.document.Zamowienie.submit();
 return true;
}
