//zdefiniowanie danych dotyczšcych papierów
function PapierDef(Nazwa, SzerArk,WysArk,Cena,Gramatura, Uszlachetnianie, Czy_cena_za_sztuke){
  	this.Nazwa = Nazwa;
	this.SzerArk = SzerArk;
    this.WysArk = WysArk;
  	this.Cena = Cena;
	this.Gramatura = Gramatura;
	this.Uszlachetnianie = Uszlachetnianie;
	this.Czy_cena_za_sztuke = Czy_cena_za_sztuke;
  }

 // utworzenie tablicy papierów
PapierDane = new Array();//    nazwa,                      			max wymiar  cena,   możliwe gramatury.	możliwoœci uszlachetniania	czy cena jest od sztuki
PapierDane[0] = new PapierDef('GARDAPAT',						350,  500,  11,		new Array('200'),		new Array('0')				,0);
PapierDane[1] = new PapierDef('ELFENBENS Linen 137',			350,  500,  19,		new Array('245'),		new Array('0')				,0);
PapierDane[2] = new PapierDef('ACQUERELLO Comoscio',			350,  500,  28,		new Array('240'),		new Array('0')				,0);
PapierDane[3] = new PapierDef('ACQUERELLO Avorio',				350,  500,  28,		new Array('240'),		new Array('0')				,0);
PapierDane[4] = new PapierDef('TINTORETTO Gesso',				350,  500,  28,		new Array('250'),		new Array('0')				,0);
PapierDane[5] = new PapierDef('CONSTELLATION E23 Pinstripe',	350,  500,  28,		new Array('240'),		new Array('0')				,0);
PapierDane[6] = new PapierDef('CONSTELLATION E33 Raster',		350,  500,  28,		new Array('240'),		new Array('0')				,0);
PapierDane[7] = new PapierDef('LESSEBO Ivory',					350,  500,  9,		new Array('250'),		new Array('0')				,0);
//PapierDane[8] = new PapierDef('CURTIS MALTS Speyside',			350,  500,  26,		new Array('300'),		new Array('0')				,0);
//PapierDane[9] = new PapierDef('SCOTIA Weave White',				350,  500,  22,		new Array('280'),		new Array('0')				,0);

// zšłożenia moduł
var Naklad = 150;
var Liczba_uzytkow_na_arkuszu = 30;

function setPapier() {
	for (var i = 0; i <PapierDane.length; i++) {
		document.kalkulator.Papier.options[i] = new Option(PapierDane[i].Nazwa + ' ' + PapierDane[i].Gramatura[0] + ' g/m2');
	}
}

function Cena_papieru(){

	var Liczba_arkuszy = Math.ceil( Naklad / Liczba_uzytkow_na_arkuszu ); // co jesli bedze 6.5 arkusza
	document.kalkulator.LiczbaArkuszy.value=Liczba_arkuszy;
	var Wspolczynnik_wagi_arkusza = PapierDane[document.kalkulator.Papier.selectedIndex].SzerArk/1000 * PapierDane[document.kalkulator.Papier.selectedIndex].WysArk/1000 * PapierDane[document.kalkulator.Papier.selectedIndex].Gramatura[0] / 1000;
	var Koszt_papieru = PapierDane[document.kalkulator.Papier.selectedIndex].Cena * Liczba_arkuszy * Wspolczynnik_wagi_arkusza;
	return Koszt_papieru * 1.2;
}

function kalkulacja()
{
	poprzec=2;
	if (wal!="zł") poprzec=4;

	var Cena_podstawowa=0.13;
	var upust = 1;
	if(document.kalkulator.dealer.value!=1) upust=1.8;
	var Cena_sztuki = formatNum((Cena_papieru()/Naklad + Cena_podstawowa)*upust,2);
	document.kalkulator.wynik.value = formatNum(Cena_sztuki,2);

	document.kalkulator.wynik1.value = formatNum(Cena_sztuki/kurs_waluty,poprzec) +' '+wal;
	document.kalkulator.wynik2.value = formatNum((Cena_sztuki/kurs_waluty*150),2) +' '+wal;
	document.kalkulator.masa_sztuki.value = 0.09*0.05 * PapierDane[document.kalkulator.Papier.selectedIndex].Gramatura[0]/1000;
	document.kalkulator.naklad.value = Naklad;
	document.kalkulator.termin.value = 3*24;

//	document.kalkulator.kalkulator.value="Wizytowki_ozdobne";
	document.kalkulator.cena_za_sztuke.value = formatNum(Cena_sztuki,2);
	document.kalkulator.CenaRazem.value = Naklad*formatNum(Cena_sztuki,2);

}