function camufl(a,b,c,d) {
  if((b == null) || (b == ""))  b = "bluewin";
  if((c == null) || (c == "")) c = "ch";
  if(d == null) {
    e = "";
  } else {
    e = "?subject=";
    e += d.replace(/ /g,"%20");
  }
  var s = a+"\100" +b+"."+c;
  var str = "\74\141\40\150"+"ref=\""+"\155\141\151\154"+"to\72"+s+e+"\">"+s+"</a>";
  document.write(str);
}

/* -------------------------------------------------------- *
 * ----- Für Seiten, welche von RedAXIS kopiertwerden ----- *
 * -------------------------------------------------------- */
// <script type="text/javascript">e_mail0("webmaster","sigrist","ch")</script>
function e_mail0(n,d,l,rdxs_sw) { // Link, E-Mail-Adr und Link-Text identisch
	if(d == null) d = "sigrist";
	if(l == null) l = "ch";
	var e = n + "\100" + d + "." + l;
  var str = "<a href=\"mailto:" + e + "\">" + e + "</a>";
  if(rdxs_sw == null) {
	  document.write(str); 
  } else {
    return str;
  }
  return "";
}

function e_mail1(n,d,l) { // kein Link, nur E-Mail-Adresse
	if(d == null) d = "sigrist";
	if(l == null) l = "ch";
	var e = n + "\100" + d + "." + l;
  document.write(e); 
}

function e_mail2(n,d,l,t) { // Link, separater Linkt-Text als 4. Parm
	if(d == null) d = "";
	if(l == null) l = "ch";
	var e = n + "\100" + d + "." + l;
	document.write("<a href=\"mailto:" + e + "\">" + t + "</a>"); 
}

/* ----- Dia Show ----- */
/* usage: diashow(bildname,anzahl,millisek);
Die Bilder muessen alle den gleichen Pfad haben und sind an der letzten Stelle
(vor der Erweiterung) nummeriert, beginnend mit '1'. Im folgenden Bsp. werden
die dia1.jpg bis dia4.jpg im Abstand von 2 Sekungen angezeigt:
<img name="bild1" src="/pfad/dia1.jpg" width="100" height="100" alt="Dia Show">
<script type="text/javascript">
  diashow('bild1',4,2000);
</script>
*/
var rdxs_diashow_no = Array; // global
function diashow(img,n,ela) {
  if(img == null) return;
  var pttrn = /(\S*)(\d+)\.(\w\w\w)$/;
  pttrn.exec(document.images[img].src);
  var pfad = RegExp.$1;
  rdxs_diashow_no[img] = RegExp.$2;
  var erw = RegExp.$3;
  eval("setInterval(\"diashow_it('"+img+"','"+pfad+"','"+erw+"','"+n +"')\","+ela+")");
}
function diashow_it(img,pfad,erw,n) {
  ++rdxs_diashow_no[img];
  document.images[img].src=pfad + rdxs_diashow_no[img] + "." + erw;
  if(rdxs_diashow_no[img] >= n) rdxs_diashow_no[img] = 0;
}