function EMail(s)
{
 var a = false;
 var res = false;
 if(typeof(RegExp) == 'function')
 {
  var b = new RegExp('abc');
  if(b.test('abc') == true){a = true;}
  }

 if(a == true)
 {
  reg = new RegExp('^([a-zA-Z0-9\\-\\.\\_]+)'+
                   '(\\@)([a-zA-Z0-9\\-\\.]+)'+
                   '(\\.)([a-zA-Z]{2,4})$');
  res = (reg.test(s));
 }
 else
 {
  res = (s.search('@') >= 1 &&
         s.lastIndexOf('.') > s.search('@') &&
         s.lastIndexOf('.') >= s.length-5)
 }
 if(res==false){
	 alert('Bitte geben Sie eine gueltige E-Mail-Adresse an.');
	 //document.forms[0].mail.focus();
	 }
}


function set_transparent(divid){
	document.getElementById(divid).style.backgroundColor='transparent';
}

function checkform(){
	text = 'Bitte fuellen Sie alle obligatorischen* Felder aus';	
	// auf name und email fragen
	if(document.forms[0].name.value=='' || document.forms[0].mail.value==''){
		alert(text);
		return false;
		}
	else return true;
}

// buchstabieren
// var text='wort des tages: <b>frisimatenten</b>. mehr dazu im: <a href="blog.htm">wortblog</a>.';
// var text='der wortkiosk hat am 27.03.2007 er&ouml;ffnet.';
// var text='1. mai 2007, berlin, kreuzberg: <a href="http://www.guerillagrafik.com" target="blank">guerillagrafik</a> hat das netz neu besetzt.';
// var text="words... ...don't come easy";
// var text="demn&auml;chst neu auf diesem kanal: handfestes zum herunterladen.";
// var text='neu im wortkiosk: <a href="handfestes.htm">handfestes zum herunterladen</a>.';
// var text='wortkiosk gratuliert zur Publikation von <a href="http://www.ontos-verlag.de/Buchreihen-MB-978-3-938793-49-7.php" target="blank">The Metaphysics and the Epistemology of Meaning</a>.';
// var text='neu im wortkiosk: einblick, ausblick und r&uuml;ckblick -- ausgew&auml;hlte <a href="projekte.htm">projekte</a>.';
// var text='wortkiosk w&uuml;nscht Ihnen ein gl&uuml;ckliches 2008!';
//var text='Willkommen! Hier gibt es Buchstaben, W&ouml;rter, S&auml;tze und so weiter im Text.';
var text='Buchstaben, W&ouml;rter, S&auml;tze und so weiter im Text.';
var currentChar=1;
var destination="[not defined]";

function type()
{
var delay=100;

  if (document.getElementById)
  {
    var dest=document.getElementById(destination);
    if (dest)// && dest.innerHTML)
    {
      dest.innerHTML=text.substr(0, currentChar);
      //dest.innerHTML+=text[currentChar-1];
      currentChar++
      if (currentChar>text.length)
      {
        currentChar=1;
        //setTimeout("type()", 5000);
      }
      else
      {
        setTimeout("type()", delay);
      }
    }
  }
}

function startTyping(textParam, delayParam, destinationParam)
{
  text=textParam;
  delay=delayParam;
  currentChar=1;
  destination=destinationParam;
  type();
}