/*
<SCRIPT LANGUAGE="JavaScript" TYPE="text/javascript">
<!--
email_addr("kempa","mediasalon.de",1,"Andreas Kempa");
//-->
</SCRIPT>
*/
function email_addr(name,host,isLink,otherName) {
    var email = name + "@" + host;
    var linktext = email;   // text to display within link
    if (otherName) {
        linktext = otherName;
        isLink = 1;  // only makes sense for live link
    }
    if ( isLink ) document.write("<a href=\"mailto:" + email + "\">");
    document.write(linktext);
    if ( isLink ) document.write("</a>");
    document.close();
}


function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

function MM_findObj(n, d) { //v4.01
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}

function open_newsletter()
{
	//alert (farbe);
	window_detail=window.open("http://data.astravita.de/_special/newsletter/frameset.php4","newsletter","width=450,height=450,resizable=yes,scrollbars=yes,toolbar=no,status=no,directories=no,menubar=no") 
	window_detail.moveTo(10, 10);
	window_detail.focus();
}

function open_kontaktformular(id)
{
	window_detail=window.open("http://data.astravita.de/_special/kontakt/frameset.php4?id="+id,"kontakt","width=650,height=600,resizable=no,scrollbars=yes,toolbar=no,status=no,directories=no,menubar=no") 
	window_detail.moveTo(10, 10);
	window_detail.focus();
}

function open_gewinnspiel() /* height=454 */
{
    //alert (farbe);
    window_detail=window.open("/_flash/quiz/index.html","gewinnspiel","width=560,height=433,resizable=no,scrollbars=no,toolbar=no,status=no,directories=no,menubar=no") 
    window_detail.moveTo(10, 10);
    window_detail.focus();
}

function show_horo(sz, aid)
{
	var horo_layer_id = sz + '_' + aid;
	reset_horo_layer(aid);
	show_horo_layer(horo_layer_id);
}

function get_layer_obj(id)
{
	//thisbrowser="NN4";
	if(document.layers)            
		return document.layers[id];
		
	//thisbrowser="ie"
	if(document.all)
		return document.all[id];

	//thisbrowser="NN6";
	if(!document.all && document.getElementById)        
		return document.getElementById(id); 
}

function reset_horo_layer(aid)
{
	//alert ('reset:' + aid);
	hide_layer('inf_'+aid);
	hide_layer('wid_'+aid);
	hide_layer('sti_'+aid);
	hide_layer('zwi_'+aid);
	hide_layer('kre_'+aid);
	hide_layer('loe_'+aid);
	hide_layer('jun_'+aid);
	hide_layer('waa_'+aid);
	hide_layer('sko_'+aid);
	hide_layer('sch_'+aid);
	hide_layer('ste_'+aid);
	hide_layer('was_'+aid);
	hide_layer('fis_'+aid);
}

function hide_layer(aid)
{
	var layer = get_layer_obj(aid);
	if (layer)
	{
		layer.style.display = "none";
	}
	
}

function show_horo_layer(horoid)
{
	//alert('show:' + horoid);
	swap_layer(horoid);
}

function swap_layer(id)
{
	//alert(id);
	
	var layer = get_layer_obj(id);

	if(layer)
	{
		//alert(layer.style.display);
		if(layer.style.display == "block" || layer.style.display == "")
		{
			layer.style.display = "none";
		}
		else
		{
			layer.style.display = "block";
		}
	}
}

function check_birthday (formid)
{
	var err=0;
	
	//Datum ueberpruefen
	var tt;
	var mm;
	var jjjj;
	eval ('tt=document.geburtsdatum'+formid+'.tag.value;');
	eval ('mm=document.geburtsdatum'+formid+'.monat.value;');
	eval ('jjjj=document.geburtsdatum'+formid+'.jahr.value;');
	
	//alert (tt+' '+mm+' '+jjjj);
	
	if (jjjj.length != 4) err=1;
	if (parseInt(jjjj)!=jjjj) err = 2;
	if (parseInt(jjjj)!=jjjj) err = 3;
	if (tt<1 || tt>31) err = 3;
	if (mm<1 || mm>12) err = 3;
	if (jjjj<0 || jjjj>2002) err = 3;
	if (mm==4 || mm==6 || mm==9 || mm==11){
	if (tt==31) err=3
	};
	if (mm==2){
	var g=parseInt(jjjj/4)
	if (isNaN(g)) {
	err=3
	};
	if (tt>29) err=3;
	if (tt==29 && ((jjjj/4)!=parseInt(jjjj/4))) err=3
	};
	//Datum ueberpruefen Ende, weiter mit err-level
	
	if (err==1) {
	alert('Bitte vierstellige Jahreszahl eingeben!');
	};
	if (err==2) {
	alert('Bitte nur ganzzahlige Werte eingeben!');
	};
	if (err==3) {
	alert('Das eingegebene Geburtsdatum ist ungültig!');
	};
	
	//err-level 0: Datumseingabe in Ordnung
	if (err==0) {
		//alert (tt+' '+mm+' '+jjjj);
		var qs_tt = parseInt(quersumme(tt));
		var qs_mm = parseInt(quersumme(mm));
		var qs_jjjj = parseInt(quersumme(jjjj));
		
		var numqs = quersumme(qs_tt+qs_mm+qs_jjjj);
		
		//alert(numqs);
		eval ('document.geburtsdatum'+formid+'.qs.value="'+numqs+'";');
		eval ('document.geburtsdatum'+formid+'.submit();');
	}
}

//quersumme liefert astrologische Quersumme für Zahlen bis 4 Stellen
function quersumme(zahl)
{
	var t=(((zahl%10000)-(zahl%1000))/1000); //Tausender
	var h=(((zahl%1000)-(zahl%100))/100);    //Hunderter
	var z=(((zahl%100)-(zahl%10))/10);       //Zehner
	var e=((zahl%10)-(zahl%1));              //Einer 
	
	if ((zahl == 11) || (zahl == 22) || (zahl == 33) || (zahl == 44))
	{
		return zahl;
	} else
	{
	
		if (!(((t+h+z+e)<10) || ((t+h+z+e) == 11) || ((t+h+z+e) == 22)  || ((t+h+z+e) == 33) || ((t+h+z+e) == 44)))
		{
			return quersumme(t+h+z+e);  //rekursiver Aufruf falls nicht einstellig oder ungleich 11,22,33,44
		}
		else
		{
			return (t+h+z+e);
		}
	}
}