///////////////////////////////////////////////////////////////////////
   function UAdd(y,v,f) { var at = '@'; y = y.replace(/^r5tzu./,""); f = f.replace(/^r5tzu./,""); var c = f+at+y; var a = 'href'; if ( "" == v ) { v = f + '' + at + y; }; document.write('<a '+a+'="mailto:'+c+'">'+v+'</a>'); }; 

///////////////////////////////////////////////////////////////////////
   function autoexpire (year,mon,day,text) { var now = new Date(); var exp = new Date(year, mon-1, day, 23, 59, 59); if ( now <= exp ) { document.write(text); }; }

///////////////////////////////////////////////////////////////////////
function MM_swapImgRestore() { //v2.0
  if (document.MM_swapImgData != null)
    for (var i=0; i<(document.MM_swapImgData.length-1); i+=2)
      document.MM_swapImgData[i].src = document.MM_swapImgData[i+1];
}

///////////////////////////////////////////////////////////////////////
function MM_preloadImages() { //v2.0
  if (document.images) {
    var imgFiles = MM_preloadImages.arguments;
    if (document.preloadArray==null) document.preloadArray = new Array();
    var i = document.preloadArray.length;
    with (document) for (var j=0; j<imgFiles.length; j++) if (imgFiles[j].charAt(0)!="#"){
      preloadArray[i] = new Image;
      preloadArray[i++].src = imgFiles[j];
  } }
}

///////////////////////////////////////////////////////////////////////
function MM_swapImage() { //v2.0
  var i,j=0,objStr,obj,swapArray=new Array,oldArray=document.MM_swapImgData;
  for (i=0; i < (MM_swapImage.arguments.length-2); i+=3) {
    objStr = MM_swapImage.arguments[(navigator.appName == 'Netscape')?i:i+1];
    if ((objStr.indexOf('document.layers[')==0 && document.layers==null) ||
        (objStr.indexOf('document.all[')   ==0 && document.all   ==null))
      objStr = 'document'+objStr.substring(objStr.lastIndexOf('.'),objStr.length);
    obj = eval(objStr);
    if (obj != null) {
      swapArray[j++] = obj;
      swapArray[j++] = (oldArray==null || oldArray[j-1]!=obj)?obj.src:oldArray[j];
      obj.src = MM_swapImage.arguments[i+2];
  } }
  document.MM_swapImgData = swapArray; //used for restore
}

///////////////////////////////////////////////////////////////////////
function MM_validateForm() { //v2.0
  var i,objStr,field,theCheck,atPos,theNum,colonPos,min,max,errors='';
  for (i=0; i<(MM_validateForm.arguments.length-2); i+=3) {
    objStr = MM_validateForm.arguments[(navigator.appName == 'Netscape')?i:i+1];
    if ((objStr.indexOf('document.layers[')==0 && document.layers==null) ||
        (objStr.indexOf('document.all[')   ==0 && document.all   ==null))
      objStr = 'document'+objStr.substring(objStr.substring(0,objStr.lastIndexOf('.')).
                 lastIndexOf('.'),objStr.length);  //fix layer ref if not supp
    field = eval(objStr);
    field.name = (field.name)?field.name:objStr;
    theCheck = MM_validateForm.arguments[i+2];
    if (field.value) { //IF NOT EMPTY FIELD
      if (theCheck.indexOf('isEmail') != -1) { //CHECK EMAIL
        atPos = field.value.indexOf('@');
        if (atPos < 1 || atPos == (field.value.length - 1))
          errors += '- '+field.name+' must contain an e-mail address.\n';
      } else if (theCheck != 'R') { //START NUM CHECKS
        theNum = parseFloat(field.value);
        if (field.value != ''+theNum) errors += '- '+field.name+' must contain a number.\n';
        if (theCheck.indexOf('inRange') != -1) { //CHECK RANGE
          colonPos = theCheck.indexOf(':');
          min = theCheck.substring(8,colonPos);
          max = theCheck.substring(colonPos+1,theCheck.length);
          if (theNum < min || max < theNum) //bad range
            errors += '- '+field.name+' must contain a number between '+min+' and '+max+'.\n';
    } } }
    else if (theCheck.charAt(0) == 'R') errors += '- '+field.name+' is required.\n';
  }
  if (errors) alert('The following error(s) occurred:\n'+
                    errors);
  document.MM_returnValue = (errors == '')
}

///////////////////////////////////////////////////////////////////////
function kopf (a) {
   document.write('<table width="85%" border="0" align="left" cellspacing="0" cellpadding="5">');
   document.write(  '<tr align="left">');
   document.write(    '<td width="89%" valign="top">');
   document.write(      '<table width="100%" border="0" align="left" cellspacing="0" cellpadding="0">');
   document.write(        '<tr valign="top" align="left">');
   document.write(          '<td width="14%">');
   document.write(            '<div align="center"><img src="../jpgs/Upstage.jpg" alt="Upstage" width="400" height="120"></div>');
   document.write(          '</td>');
   document.write(        '</tr>');
}

///////////////////////////////////////////////////////////////////////
function footer (updated,base,created) {
/*
   document.write(        '<tr align="left" valign="middle">');
   document.write(          '<td width="14%" height="94">');
   document.write(              '<br><div align="center"><div align="center"><img src="../jpgs/hr.jpg" width="400" height="20"></div>');
   document.write(              '<font face="Verdana, Arial, Helvetica, sans-serif" size="-2">Page maintained by UPSTAGE <br />');
   document.write(            'E-mail comments to: <script language="Javascript">UAdd("r5tzu.upstage.ch","","r5tzu.webmaster")</script>');
   document.write(              '<br>');
   document.write(              'Copyright © Upstage 1999-2006 <br>');
   document.write(              '<div align="center"><div align="center"><img src="../jpgs/hr.jpg" width="400" height="20"></div><p>');
   document.write(          '</td>');
   document.write(        '</tr>');
   document.write(      '</table>');
   document.write(    '</td>');
   document.write(  '</tr>');
   document.write('</table>');
*/
}
