function create_calendar_head(rd, rm, ry)
{
	var mesice = ["Leden", "Únor", "Březen", "Duben", "Květen", "Červen", "Červenec", "Srpen", "Září", "Říjen", "Listopad", "Prosinec"];
	var buf = "";
	
	if((rm-1) < 1)
	{
		var lm = 12;
		var ly = ry-1;
	}else{
		var lm = rm-1;
		var ly = ry;
	}
	
	if((rm+1) > 12)
	{
		var nm = 1;
		var ny = ry+1;
	}else{
		var nm = rm+1;
		var ny = ry;
	}
	
	buf+="<div id=\"chal_div\">";
	buf+="<table id=\"cheader\" cellspacing=\"0\">";
	buf+="<tr>";
	buf+="<td class=\"cnavi\" style=\"width:1%;text-align:left;padding-left:5px;\">";
	buf+="<a href=\"#\" onclick=\"reload_calendar("+rd+", "+lm+", "+ly+"); return false\" title=\"předchozí měsíc\">&laquo;&laquo;</a>";
	buf+="</td>";
	buf+="<td class=\"chead\">"+mesice[rm-1]+" "+ry+"</td>";
	buf+="<td class=\"cnavi\" style=\"width:1%;text-align:right;padding-right:5px;\">";
	buf+="<a href=\"#\" onclick=\"reload_calendar("+rd+", "+nm+", "+ny+"); return false\" title=\"další měsíc\">&raquo;&raquo;</a></td></tr>";
	buf+="</table>";
	buf+="</div>";
	
	return buf;
}

function create_calendar_body(rd, rm, ry)
{
	var datum = new Date;
	datum.getDayNorm = function(){var d = this.getDay(); if(d==0){d=7}; return d;};
	var buf = "";
	var dny = new Array("Po", "Út", "St", "Čt", "Pá", "So", "Ne");
	var rok = datum.getFullYear();
	
	var mesic = datum.getMonth();
	
	if(ry > rok)
	{
		var a = 0;
		var f = true;
	}
	else if(ry < rok)
	{
		var a = 0;
		var f = false;
	}
	else if(rm > (mesic+1))
	{
		var a = 0;
		var f = true;
	}
	else if(rm < (mesic+1))
	{
		var a = 0;
		var f = false;
	}
	else
	{
		var a = datum.getDate();
		var f = false;
	}

	datum.setDate(1);
	datum.setMonth(rm-1);
	datum.setYear(ry);
	
	var pocetDni = new Array(31, (rok%4)?28:29, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31);
	
	vynechat = datum.getDayNorm()-1;
	
	datum.setDate(rd);
	
	if(ry == rok && rm == (mesic+1))
		var t = rd;
	else
		var t = -1;
	
	buf+="<div id=\"cal_div\">";
	buf+="<table id=\"ctab\" cellspacing=\"3\">\n";
	buf+="<tr>\n";
	for(i=0;i<6;i++)
	{
		buf+="<td class=\"ccell\">"+dny[i]+"</td>";
	}
	
	buf+="<td class=\"csun\">"+dny[i]+"</td>";
		
	buf+="</tr>";
	
	buf+="<tr>";
	
	for(i=0;i<vynechat;i++)
		buf+="<td class=\"cempty\">&nbsp;</td>";
	
	var cislo_dne = vynechat+1;
	var i = 1;
	
	
	for(i=1;i<=pocetDni[(rm-1)];i++,cislo_dne++)
	{
		if(i==t)
			var link = "<a style=\"color: White\" href=\"/index.php?rok="+ry+"&amp;mesic="+(rm)+"&amp;den="+i+"\">"+i+"</a>";
		else
			var link = "<a href=\"/index.php?rok="+ry+"&amp;mesic="+(rm)+"&amp;den="+i+"\">"+i+"</a>";
		
		if(i==a)
		{
			buf+="<td class=\""+((i==t)?"chigh":"ccell")+"\" style=\"border-color: Red;\">"+link+"</td>";
			f = true;
		}
		else if(f)
			buf+="<td class=\""+((i==t)?"chigh":"ccell")+"\">"+link+"</td>";
		else
			buf+="<td class=\""+((i==t)?"chigh":"cpast")+"\">"+link+"</td>";

		
		if(cislo_dne==7)
		{
			buf+="</tr><tr>";
			cislo_dne = 0;
		}
	}
	
	buf+="</tr>";
	buf+="</table>";
	buf+="</div>";
	
	return buf;
}

function reload_calendar(rd, rm, ry)
{
	var el = document.getElementById("cal_div");
	if(el)
	{
		el.innerHTML = create_calendar_body(rd, rm, ry);
	}
	var el = document.getElementById("chal_div");
	if(el)
	{
		el.innerHTML = create_calendar_head(rd, rm, ry);
	}
}

function print_calendar(rd, rm, ry)
{
	document.write(create_calendar_head(rd, rm, ry));
	document.write(create_calendar_body(rd, rm, ry));
}

function closeCalendar()
{
	var div = document.getElementById('div_popcal');
	div.style.display = "none";
}

function create_calendar_head_popop(rd, rm, ry)
{
	var mesice = ["Leden", "Únor", "Březen", "Duben", "Květen", "Červen", "Červenec", "Srpen", "Září", "Říjen", "Listopad", "Prosinec"];
	var buf = "";
	
	if((rm-1) < 1)
	{
		var lm = 12;
		var ly = ry-1;
	}else{
		var lm = rm-1;
		var ly = ry;
	}
	
	if((rm+1) > 12)
	{
		var nm = 1;
		var ny = ry+1;
	}else{
		var nm = rm+1;
		var ny = ry;
	}
	
	buf+="<table id=\"cheader\" cellspacing=\"0\">";
	buf+="<tr>";
	buf+="<td class=\"cnavi\" style=\"width:1%;text-align:left;padding-left:5px;\">";
	buf+="<a href=\"#\" onclick=\"reload_calendar_popup("+rd+", "+lm+", "+ly+"); return false\" title=\"předchozí měsíc\">&laquo;&laquo;</a>";
	buf+="</td>";
	buf+="<td class=\"chead\">"+mesice[rm-1]+" "+ry+"</td>";
	buf+="<td class=\"cnavi\" style=\"width:1%;text-align:right;padding-right:5px;\">";
	buf+="<a href=\"#\" onclick=\"reload_calendar_popup("+rd+", "+nm+", "+ny+"); return false\" title=\"další měsíc\">&raquo;&raquo;</a></td></tr>";
	buf+="</table>";
	
	return buf;
}

function reload_calendar_popup(rd, rm, ry)
{
	var el = document.getElementById("popcal_body");
	if(el)
	{
		el.innerHTML = create_calendar_head_popop(rd, rm, ry) + create_calendar_body(rd, rm, ry);
	}
}

function zobrazCalendar(rd, rm, ry)
{
	
	var div = document.getElementById('div_popcal');
	if(div)
	{
		reload_calendar_popup(rd, rm, ry);
		//div.style.left = 
		//div.style.top = 
		div.style.display = "block";
	}
}