/*
	Copyright 2009 by Edy Muellers opuskula 
	
	Dieser Code darf nur fuer die Domain walterstraumann.ch verwendet werden.
	Jeglich Modifikation ist verboten.
*/

gRoot='http://www.walterstraumann.ch/';
function opStart(){opEM();}
function opBildWechsel(){alt=opAktBild;neu=alt+1;if(neu>opAnzBilder){neu=1;}Effect.Appear($('div'+neu));Effect.Fade($('div'+alt));opAktBild=neu;window.setTimeout("opBildWechsel()",5000);}
function opEM() { //V 1.0 (C) 2008 opuskula.ch
out=document.body.innerHTML;if(out.search(/(\()(\S+?)(\*\*)(\S+?)(\))/)==-1){return;}document.body.innerHTML=out.replace(/(\()(\S+?)(\*\*)(\S+?)(\))/g,'<a href="mailto:$2@$4">$2@$4</a>');}
function opMarkEgoStyle(style) { //V 1.1 (C) 2008 opuskula.ch
var as=document.getElementsByTagName("a");var selbst=document.location;var i,ziel;for(i=0;i<as.length;i++){ziel=as[i].getAttribute('href');if(navigator.appName=="Microsoft Internet Explorer"){if(selbst==ziel){as[i].innerHTML="<span style="+style+">"+as[i].innerHTML+"</span>";}}else{if(selbst==opRel2Abs(ziel)){as[i].setAttribute('style',style);}}}}
function opRel2Abs(rel) { //V 1.1 (C) 2008 opuskula.ch
var selbst=document.location+"";var aSelbst,aRel;var muster=/^http[s]?.\/\//i;if(muster.test(rel)==true){return(rel);}aSelbst=selbst.split('/');aSelbst.pop();if(rel==null||typeof rel=='undefined')rel='';aRel=rel.split('/');if(aRel[0]=='')return(aSelbst.join('/')+'/'+rel);for(var i=0;i<aRel.length;i++){switch(aRel[i]){case '.':break;case '..':aSelbst.pop();break;default: aSelbst.push(aRel[i]);}}return aSelbst.join('/');}