var f032C_Root,f032C_F360,f032C_DateL,f032C_DateH,f032C_PosDaysMax=40,f032C_PosDays,f032C_WeekOld,f032C_WeekNew;
var f032C_TimeNs="12:00",f032C_TimeNe="18:00",f032C_AnzF204=5,f032C_Eur="€";
function F032C_Open(root)
{
	f032C_Root=root;f032C_DateL=date_High;f032C_DateH=date_Low;F032C_IniF360(f032C_AnzF204);
	Parm_Open();if(Parm_F015()<0){window.location.href=head_UrlTir};
	F032C_OpenF032(root,Parm_Fsai(),Parm_F015());F032C_OpenL0303(root,Parm_Fsai(),Parm_F015());
	F032C_GetL0306(Parm_F015());F032_SetF004(l0306_F004(0));F032_SetF015(l0303_F015Desc());f032C_PosDays=F032C_GetPosF190();F032C_SetPos();
	F032_SetVon(f032C_DateL,f032C_DateH);F032_SetImg(root,l0306_Pic(0));
	F032C_GetF360(f032C_F360[0]);F032C_SetPxE(0,0,l0302_Preis(1));F032C_SetPxE(1,0,l0302_Preis(2));F032C_SetPxE(2,0,l0302_Preis(3));
	F032C_GetF360(f032C_F360[1]);F032C_SetPxE(0,1,l0302_Preis(1));F032C_SetPxE(1,1,l0302_Preis(2));F032C_SetPxE(2,1,l0302_Preis(3));
//	F032C_GetF360(f032C_F360[2]);F032C_SetPxE(0,2,l0302_Preis(1));F032C_SetPxE(1,2,l0302_Preis(2));F032C_SetPxE(2,2,l0302_Preis(3));
}
function F032C_SetPxE(x,y,z){if(z!=""){F032_SetPx(x,y,z+f032C_Eur)}else{F032_SetPx(x,y,z)}}
function F032C_GetL0306(f015){L0306_Open(f032C_Root,Parm_Fsai());L0306_Read(f015);L0306_Close()}
function F032C_GetF360(f360){L0302_Open(f032C_Root,Parm_Fsai());L0302_Read(f360);L0302_Close()}
function F032C_ChkPlus(j){if(j==0){return(false)}if(j==f032C_PosDaysMax/2){return(false)}return(true)}
function F032C_GetPosF190()
{
	var j=-1;f032C_WeekOld=0;
	for(var i=0;i<l0303_F190NumRec();i++)
	{
		if(l0303_F190Day(i)!=null)
		{
			F032C_DateL(l0303_F190Date(i));
			F032C_SetF360(l0303_F190Date(i),l0303_F190Day(i),l0303_F190Time(i),l0303_F190F360(i),l0303_F190Prem(i));
			j=F032C_NxtPos(i,j);
		}
	}
	return(j+1);
}
function F032C_SetPos()
{
	var i0=0;
	if(f032C_PosDays>f032C_PosDaysMax){for(var i=0;i<l0303_F190NumRec();i++){if(Date_Ddd(l0303_F190Date(i))<Date_ToDdd()){i0++}}}	
	var j=-1;f032C_WeekOld=0;
	for(var i=i0;i<f032C_PosDays;i++){if(l0303_F190Day(i)!=null){j=F032C_NxtPos(i,j);if(j<=f032C_PosDaysMax){F032C_SetF032(i,j)}}}
}
function F032C_NxtPos(i,j)
{
		f032C_WeekNew=Date_Week(Date_Ddd(l0303_F190Date(i)));
		j++;if(!F032C_ChkPlus(j)){f032C_WeekOld=f032C_WeekNew};if(f032C_WeekNew!=f032C_WeekOld){f032C_WeekOld=f032C_WeekNew;j++};
		return(j)
}
function F032C_SetF032(i,j)
{
	F032_SetF190(j,l0303_F190F190(i));F032_SetDay(j,l0303_F190Day(i));F032_SetDate(j,l0303_F190Date(i));F032_SetTime(j,l0303_F190Time(i));
	F032_SetFest(j,l0303_F190Fest(i));F032_SetNear(j,l0303_F190Near(i));F032_SetLeng(j,l0303_F190Leng(i));
}
function F032C_DateL(ddd){var x=Date_Ddd(ddd);if(x>f032C_DateH){f032C_DateH=x}if(x<f032C_DateL){f032C_DateL=x}}
function F032C_SetF360(date,day,time,f360,prem)
{
	if(date.substr(0,5)=="31.12"){return}
	if(prem!="0"){F032C_SetF360Sa(time,f360);return}
	switch(day)
	{
		case "So":F032C_SetF360So(time,f360);break;case "Mo":F032C_SetF360So(time,f360);break;
		case "Di":F032C_SetF360So(time,f360);break;case "Mi":F032C_SetF360So(time,f360);break;
		case "Do":F032C_SetF360So(time,f360);break;case "Fr":F032C_SetF360Sa(time,f360);break;
		case "Sa":F032C_SetF360Sa(time,f360);break;
		default  :break;
	}
}
function F032C_SetF360So(time,f360){if(F032C_TimeN(time)){f032C_F360[0]=f360;return}f032C_F360[0]=f360}
function F032C_SetF360Sa(time,f360){if(F032C_TimeN(time)){f032C_F360[1]=f360;return}f032C_F360[1]=f360}
function F032C_TimeN(time){if(Time_Mi(time)>Time_Mi(f032C_TimeNs)&Time_Mi(time)<Time_Mi(f032C_TimeNe)){return(true)}return(false)}
function F032C_OpenL0303(root,fsai,f015){L0303_Open(root,fsai,f015);L0303_ReadF190Ax();L0303_Close()}
function F032C_OpenF032(root,fsai,f015){F032_Open(root,fsai,f015);F032_SpaceDaV()}
function F032C_IniF360(iMax){f032C_F360=new Array(iMax);for(var i=0;i<iMax;i++){f032C_F360[i]=0}}

