var f313_Fsai,f313_F015,f313_F015File,f313_F190,f313_Fest,f313_F046,f313_Near,f313_Leng,f313_ImgDesc;
var f313_Da,f313_DaV,f313_DaMaxI=50,f313_DaMaxJ=5;
var f313_PathForm1="F047/Forms/Form001.htm",f313_PathF190="Fsai/F190.htm";
var f313_ImgPathFix="This/F313Img/",f313_ImgPath,f313_ImgMax=11;
var f313_DddToday,f313_Ddd,f313_F004Desc,f313_Img1Desc,f313_Img2Desc,f313_Img3Desc;
var f313_HrefFsai,f313_HrefForm01,f313_HrefF190;
//function F313_F015File(fsai,file){return(f313_HrefFsai+fsai+"/F028/"+file)}
function F313_F015File(fsai,file){return(f313_HrefFsai+file)}
function F313_Open(root)
{
	f313_Brow=Head_Browser();f313_HrefFsai=Head_PathFsai(root);f313_HrefForm01=Head_PathRoot(root)+f313_PathForm1;f313_HrefF190=Head_PathRoot(root)+f313_PathF190;
	f313_DddToday=Date_ToDdd();F313_InitDa(f313_DaMaxI,f313_DaMaxJ);F313_InitDaV(f313_DaMaxI,f313_DaMaxJ);
	F313_InitF015(f313_DaMaxI);F313_InitF046(f313_DaMaxI);F313_InitF190(f313_DaMaxI);F313_InitFsai(f313_DaMaxI);F313_InitFest(f313_DaMaxI); 
	F313_InitNear(f313_DaMaxI);F313_InitLeng(f313_DaMaxI);
}
function F313_SetDay(pos,value){F313_SetDaV(pos,0,value)}
function F313_SetDate(pos,value){F313_SetDaV(pos,1,value)}
function F313_SetTime(pos,value){F313_SetDaV(pos,2,value)}
function F313_SetF015Desc(pos,value){F313_SetDaV(pos,3,value)}
function F313_SetF046Desc(pos,value){F313_SetDaV(pos,4,value)}
function F313_SetF015(pos,value){f313_F015[pos]=value}
function F313_SetF015File(pos,value){f313_F015File[pos]=value}
function F313_SetFest(pos,value){f313_Fest[pos]=value}
function F313_SetFsai(pos,value){f313_Fsai[pos]=value}
function F313_SetF190(pos,value){f313_F190[pos]=value}
function F313_SetNear(pos,value){f313_Near[pos]=value}
function F313_SetLeng(pos,value){f313_Leng[pos]=value}
function F313_SetF004Desc(v){f313_F004Desc.firstChild.nodeValue=v}
function F313_DaMover1(i)
{
	if(!F313_ChkF190(i)){F313_DaCur(i,head_CurNA);return}
	if(Date_ChkDdd0(F313_GetDaV(i,1))){F313_DaCur(i,head_CurNA);return}
	Resv_OpenLight(F313_GetDaV(i,1),F313_GetDaV(i,2),f313_Leng[i],f313_Fest[i],f313_Near[i]);
	F313_DaBg02(i,Resv_GetColor());F313_DaCur(i,Resv_GetCurs());
}
function F313_DaMover2(i)
{
	if(!F313_ChkF190(i)){F313_DaCur(i,head_CurNA);return}
	if(Date_ChkDdd0(F313_GetDaV(i,1))){F313_DaCur(i,head_CurNA);return}
	if(F313_ChkF015(i)){F313_DaBg31(i,head_Color1),F313_DaCur(i,head_CurP)}else{F313_DaBg31(i,head_Color4);F313_DaCur(i,head_CurNA)}
}
function F313_DaMover3(i)
{
	if(!F313_ChkF190(i)){F313_DaCur(i,head_CurNA);return}
	if(Date_ChkDdd0(F313_GetDaV(i,1))){F313_DaCur(i,head_CurNA);return}
	if(F313_ChkF046(i)){F313_DaBg40(i,head_Color1),F313_DaCur(i,head_CurP)}else{F313_DaBg40(i,head_Color4);F313_DaCur(i,head_CurNA)}
}
function F313_ChkF015(i){if(f313_F015[i]<1){return(false)}return(true)}
function F313_ChkF015A(i){if(f313_F015[i]<1){return(false)}if(f313_F015File[i].search(head_ReHtm)<1){alert(head_NoDesc);return(false)}return(true)}
function F313_ChkF046(i){return(F313_ChkF015(i))}
function F313_ChkF190(i){if(f313_F190[i]==null|f313_F190[i]==0){return(false)}else{return(true)}}	
function F313_DaOnC2(i){if(F313_ChkF015A(i)){window.location.href=F313_Hrefa(F313_F015File(f313_Fsai[i],f313_F015File[i]))}}
function F313_DaOnC3(i){if(F313_ChkF046(i)){window.location.href=F313_HrefF190(f313_Fsai[i],f313_F015[i],f313_F190[i])}}
function F313_DaMout(i){if(Head_Even(i)){F313_DaBg00(i,head_Color2)}else{F313_DaBg00(i,head_Color3)}}
function F313_DaCur(i,t){for(var j=0;j<f313_DaMaxJ;j++){f313_Da[i][j].style.cursor=t}} 
function F313_DaBg00(i,c){for(var j=0;j<(f313_DaMaxJ-0);j++){f313_Da[i][j].style.backgroundColor=c}} 
function F313_DaBg02(i,c){for(var j=0;j<(f313_DaMaxJ-2);j++){f313_Da[i][j].style.backgroundColor=c}}
function F313_DaBg31(i,c){for(var j=3;j<(f313_DaMaxJ-1);j++){f313_Da[i][j].style.backgroundColor=c}} 
function F313_DaBg40(i,c){for(var j=4;j<(f313_DaMaxJ-0);j++){f313_Da[i][j].style.backgroundColor=c}} 
function F313_GetDaV(i,j){if(f313_DaV[i][j].text!=""){return(f313_DaV[i][j].firstChild.nodeValue)}}
function F313_SetDaV(i,j,v){f313_DaV[i][j].firstChild.nodeValue=v}
function F313_SpaceDaV(){for(var i=0;i<f313_DaMaxI;i++){for(var j=0;j<f313_DaMaxJ;j++){F313_SetDaV(i,j," ")}}}
function F313_InitDa(iMax,jMax)
{
	f313_Da = new Array(iMax);
	for(var i=0;i<iMax;i++){f313_Da[i]=new Array(jMax)}
	for(var i=0;i<iMax;i++){for(var j=0;j<jMax;j++){f313_Da[i][j]=document.getElementById(F313_DaFix(i+1)+(j+1))}}
}
function F313_InitDaV(iMax,jMax)
{
	var x;
	f313_DaV=new Array(iMax);
	for(var i=0;i<iMax;i++){f313_DaV[i]=new Array(jMax);}
	for(var i=0;i<iMax;i++){for(var j=0;j<jMax; j++){f313_DaV[i][j]=document.getElementById(F313_DaFix(i+1)+(j+1)+"v")}}
	f313_F004Desc=document.getElementById("DaF004Desc");
}
function F313_DaFix(i){if(i<10){return("Da0"+i)};return("Da"+i)}
function F313_InitF015(iMax)
{
	f313_F015=new Array(iMax);for(var i=0;i<iMax;i++){f313_F015[i]=""}
	f313_F015File=new Array(iMax);for(var i=0;i<iMax;i++){f313_F015File[i]=""}
}
function F313_InitF046(iMax){f313_F046=new Array(iMax);for(var i=0;i<iMax;i++){f313_F046[i]=""}}
function F313_InitF190(iMax){f313_F190=new Array(iMax);for(var i=0;i<iMax;i++){f313_F190[i]=""}}
function F313_InitFsai(iMax){f313_Fsai=new Array(iMax);for(var i=0;i<iMax;i++){f313_Fsai[i]=""}}
function F313_InitFest(iMax){f313_Fest=new Array(iMax);for(var i=0;i<iMax;i++){f313_Fest[i]=""}}
function F313_InitNear(iMax){f313_Near=new Array(iMax);for(var i=0;i<iMax;i++){f313_Near[i]=""}}
function F313_InitLeng(iMax){f313_Leng=new Array(iMax);for(var i=0;i<iMax;i++){f313_Leng[i]=""}}
function F313_Href(fsai,f015,f190){Parm_Start(Parm_FsaiN(),fsai);Parm_Add(Parm_F015N(),f015);Parm_Add(Parm_F190N(),f190)}
function F313_HrefBest(fsai,f015,f190){F313_Href(fsai,f015,f190);return(f313_HrefForm01+Parm_End())}
function F313_HrefF190(fsai,f015,f190){F313_Href(fsai,f015,f190);return(f313_HrefF190+Parm_End())}
function F313_HrefMm(parm){if(Head_ChkChar(parm)){window.location.href=F313_GetPathMm(head_Root-1)+F313_SetParm(parm)}}
function F313_Hrefa(file){return(file)}
function F313_Mover1(i){F313_DaMover1(i-1)}
function F313_Mover2(i){F313_DaMover2(i-1)}
function F313_Mover3(i){F313_DaMover3(i-1)}
function F313_Mout1(i){F313_DaMout(i-1)}
function F313_OnC1(i){F313_DaOnC1(i-1)}
function F313_OnC2(i){F313_DaOnC2(i-1)}
function F313_OnC3(i){F313_DaOnC3(i-1)}
function F313_Button1(){F313_HrefMm(Sais_YmAdd(Parm_Ym(),head_Fsai))}
function F313_Button2(){F313_HrefMm(Sais_YmSub(Parm_Ym(),head_Fsai))}
function F313_SetParm(ym){Parm_Start(Parm_YmN(),ym);return(Parm_End())}
function F313_GetPathMm(root){return(Head_PathFsai(root)+"F313.htm")}
function F313_Img(f004){f313_ImgPath=f313_ImgPathFix;F313_ImgH(Head_Random(f313_ImgMax),f004)}
function F313_ImgA(i){if(i<10){return("Img00"+i+".jpg")}return("Img0"+i+".jpg")}
function F313_Img0S(i1,i2,i3){if(i1>0){F313_Img1S(i1);F313_Img1SDesc(i1)}if(i2>0){F313_Img2S(i2);F313_Img2SDesc(i2)}if(i3>0){F313_Img3S(i3);F313_Img3SDesc(i3)}}
function F313_Img1S(i){document.images.F313_Img1.src=f313_ImgPath+F313_ImgA(i)};
function F313_Img2S(i){document.images.F313_Img2.src=f313_ImgPath+F313_ImgA(i)};
function F313_Img3S(i){document.images.F313_Img3.src=f313_ImgPath+F313_ImgA(i)};
function F313_Img1SDesc(i){f313_Img1Desc=document.getElementById("F313_Img1Desc");f313_Img1Desc.firstChild.nodeValue=f313_ImgDesc[i]}
function F313_Img2SDesc(i){f313_Img2Desc=document.getElementById("F313_Img2Desc");f313_Img2Desc.firstChild.nodeValue=f313_ImgDesc[i]}
function F313_Img3SDesc(i){f313_Img3Desc=document.getElementById("F313_Img3Desc");f313_Img3Desc.firstChild.nodeValue=f313_ImgDesc[i]}

function F313_DaOnC1(i)
{
	if(Date_ChkL(F313_GetDaV(i,1))){return};
	if(Resv_GetOrder()){window.location.href=F313_HrefBest(f313_Fsai[i],f313_F015[i],f313_F190[i])}
	if(!Resv_GetOrder()){window.location.href=F313_HrefF190(f313_Fsai[i],f313_F015[i],f313_F190[i])}
}
function F313_ImgH(i,f004)
{	
	i++;if(i>f313_ImgMax){i=1}{F313_Img1S(i)}i++;if(i>f313_ImgMax){i=1}{F313_Img2S(i)}i++;if(i>f313_ImgMax){i=1}{F313_Img3S(i)}
	switch(f004)
	{
		case "00418":F313_Img0S(7,1,8);break;
		case "00419":F313_Img0S(4,5,6);break;
		default  :break;
	}
}
function F313_InitImgDesc(iMax)
{
	f313_ImgDesc=new Array(iMax);for(var i=0;i<iMax;i++){f313_ImgDesc[i]=""}
	f313_ImgDesc[01]="'Best of Heinz Erhardt'";
	f313_ImgDesc[02]="'Der Ferienkönig'";
	f313_ImgDesc[03]="'Ach du lieber Himmel'";
	f313_ImgDesc[04]="'Herbstspezial'";
	f313_ImgDesc[05]="'Weihnachtsputz / Spezial'";
	f313_ImgDesc[06]="' '";
	f313_ImgDesc[07]="'Pater Brown'";
	f313_ImgDesc[08]="'Total verglupt'";


}

