function vis(tekst)  {

   document.write (tekst);
   }

function erstat (text, fratext, tiltext) {
var str;
var pos;
var scpos;

   str = '';
   pos = 0;
   retpos = text.indexOf (fratext, pos);
   while (retpos >= 0)  {
      str += text.substring(pos, retpos);
      str += tiltext;
      pos = retpos + fratext.length;
      retpos = text.indexOf (fratext, pos);
      };
   str += text.substring(pos, 9999);
   return str;
   };

function scaron (text) {
var str;

   if (navigator.appName == 'Microsoft Internet Explorer')
      return text
   else {
      str =  erstat (text, '&scaron;', 's');
      return erstat (str,  '&Scaron;', 'S');
      };
   };

function dagger (text) {

   if (navigator.appName == 'Microsoft Internet Explorer')
      return text
   else {
      return erstat (text, '&dagger;', '+');
      };
   };

var valign;
function dan_tablin() {
var str;
var pos;  
var align = '"left"';
var col;
var col_max;

   col_max = arguments.length - 1;
   str =  '<tr align=left valign=' + valign + '>';
   for (col = 0; col <= col_max; col ++)  {
      if (arguments [col] == 'v'  ||
          arguments [col] == 'l')  {
          align = '"left"'; col++; }
      else if  
         (arguments [col] == 'm'  ||
          arguments [col] == 'c')  {
          align = '"center"'; col++; }
      else if
         (arguments [col] == 'h'  ||
          arguments [col] == 'r')  {
          align = '"right"'; col++; }
      str += '<td align=' + align;
      if (arguments[col].substring(0,1) == '@') {
          pos = arguments[col].substring(1,999).indexOf('@');
          str += ' ' + arguments[col].substring(1, pos+1) + '>' +
                 arguments[col].substring(pos+2, 999);
          }
      else  
         str += '>' + arguments[col];   
      str += '</td>';
      };
   str += '</tr>';
   return str;
   }

var klasse = 'std';
function dan_tabdef() {
var str;
var spacing;
var col;
var col_max;
var proctegn;

   col_max = dan_tabdef.arguments.length - 1;
   spacing = dan_tabdef.arguments[1]; 
   str = '<table bgcolor="' + dan_tabdef.arguments[0] +
         '" cellspacing="';
   if (spacing >= 0)
      str += spacing + '" '
   else
      str += -spacing + '" border=1 ';
   if (dan_tabdef.arguments[2] == 'X') {
      proctegn = '';
      col = 3;
      }
   else if
      (dan_tabdef.arguments[2] == 'W') {
      proctegn = '%';
      str += 'width="';
      str += dan_tabdef.arguments[3] + '%"';
      col = 4;
      }
   else {
      proctegn = '%';
      str += 'width="100%"';
      col = 2;
      };
   if (klasse != 'std')  {
      str += 'class="';
      str += klasse;
      str += '"';
      };
   str += '>';
   for (; col <= col_max; col++)  {
      str += '<col width=' + dan_tabdef.arguments[col] + proctegn + '>';
      };
   return str;
   }

function dan_diagram() {
var str;
 
   str =  '<table bgcolor="#8fe88f" cellspacing="">';
   str += '<col width=281><col width="*">';
   str += '<tr><td>' + dan_diagram.arguments [0] + '</td><td></td></tr>';
   str += '</table>';
   return str;
   }

function top (tekst1, tekst2, tekst3) {
var str;
var del1;
var del2;
var del3;
var lgd;

   lgd = tekst1.length + tekst2.length*0.55 + tekst3.length*0.55;
   del1 = 90 * tekst1.length / lgd;
   del2 = 50 * tekst2.length / lgd;
   del3 = 50 * tekst3.length / lgd;
   valign="middle";
   str = dan_tabdef('#00af00" class="top',0,del1,1,del2,1,del3,'*');

   str += '<font color=white>';
   str += dan_tablin(
       '<font size="+2"><strong>' + tekst1 + '</strong>','',
       '<font size="-0">' + tekst2 + '</font>','',
       '<font size="-0">' + tekst3 + '</font>','m',
       '<A href="index.htm" target="_top" ' +
       'OnMouseOver="window.status=\'Tilbage til forsiden\';">' + 
       '<img src="top.gif" border="0"' +
       'alt="Tilbage til forsiden"' +
       '</A>');
   str += '</table>';
   str += '</font>';
   return str;
   }

function dan_ref (billede, href, tekst)  {

   return dan_tablin(
         '<img src="blanke8.gif">',
         '<A href="' + href + '">' +
             '<IMG SRC="' + billede + '" height=16 width=16 border="0"></A>',
         '','',
         '<A href="' + href + '">' +
             tekst + '</A>');
   }

function ref (href, tekst)  {

   return dan_ref ('prik.gif', href, tekst);
   }

function tilbage() {

   bil_nr--;
return '';
}

