    // Copyright © 2001 Sander van Dijk, Assen, The Netherlands. All rights reserved.

    function maakcsslinks() {
      data="<STYLE type=\"text/css\" rel=\"Stylesheet\">\n"
      data+="A {\n"
      data+="text-decoration: "+document.csslinks.nordec.options[document.csslinks.nordec.selectedIndex].value+"\;\n"
      data+="color: "+document.csslinks.norcolor.value+"\;\n"
      if (document.csslinks.norbgcolor.value!="geen") {
        data+="background-color: "+document.csslinks.norbgcolor.value+"\;\n"
      }
      data+="\}\n"
      data+="A:visited {\n"
      data+="text-decoration: "+document.csslinks.visdec.options[document.csslinks.visdec.selectedIndex].value+"\;\n"
      data+="color: "+document.csslinks.viscolor.value+"\;\n"
      if (document.csslinks.visbgcolor.value!="geen") {
        data+="background-color: "+document.csslinks.visbgcolor.value+"\;\n"
      }
      data+="\}\n"
      data+="A:active {\n"
      data+="text-decoration: "+document.csslinks.actdec.options[document.csslinks.actdec.selectedIndex].value+"\;\n"
      data+="color: "+document.csslinks.actcolor.value+"\;\n"
      if (document.csslinks.actbgcolor.value!="geen") {
        data+="background-color: "+document.csslinks.actbgcolor.value+"\;\n"
      }
      data+="\}\n"
      data+="A:hover {\n"
      data+="text-decoration: "+document.csslinks.hovdec.options[document.csslinks.hovdec.selectedIndex].value+"\;\n"
      data+="color: "+document.csslinks.hovcolor.value+"\;\n"
      if (document.csslinks.hovbgcolor.value!="geen") {
        data+="background-color: "+document.csslinks.hovbgcolor.value+"\;\n"
      }
      data+="\}\n"
      data+="</STYLE>"
      document.csslinks.resultaat.value=data
    }

    function verander(a) {
      if (a == 0) {
        data=""
        if (document.popup.actie.options[document.popup.actie.selectedIndex].value == "onClick") { data = 'href="javascript:void(0)" ' }
        data += document.popup.actie.options[document.popup.actie.selectedIndex].value + "=\"window.open(\'" + document.popup.url.value + "\', \'popup\', \'height=" + document.popup.hoogte.value + ",width=" + document.popup.breedte.value + ","
        for (i = 4;i < 11;i++) {
          if (document.popup.elements[i].checked == true) {
            data += document.popup.elements[i].value+"=yes,"
          } else {
            data += document.popup.elements[i].value+"=no,"
          }
        }
        data = data.substring(0,data.length-1)
        data += "\')\""
        document.popup.resultaat.value = data
      } else {
        data = "height="+document.popup.hoogte.value+",width="+document.popup.breedte.value+","
        for (i = 4;i < 11;i++) {
          if (document.popup.elements[i].checked == true) {
            data += document.popup.elements[i].value+"=yes,"
          } else {
            data += document.popup.elements[i].value+"=no,"
          }
        }
        data = data.substring(0,data.length-1)
        window.open(document.popup.url.value, 'popup', data)
      }
    }

    function maakdropdown() {
      data = '<FORM><SELECT onChange="if (this.options[this.selectedIndex].value) '
      if ( document.dropdown.doel.options[document.dropdown.doel.selectedIndex].value == "zelfde" ) {
        document.dropdown.frame.value = ""
        data += 'window.location=this.options[this.selectedIndex].value">'
      } else if ( document.dropdown.doel.options[document.dropdown.doel.selectedIndex].value == "nieuwe" ) {
        data += 'window.open(this.options[this.selectedIndex].value, \'nieuw\')">'
      } else if ( document.dropdown.doel.options[document.dropdown.doel.selectedIndex].value == "frame" ) {
        data += 'top.' + document.dropdown.frame.value + '.location=this.options[this.selectedIndex].value">'
      }
      data += "\n"
      data += '<OPTION>' + document.dropdown.titel.value + "\n";
      data += '<OPTION>' + "----------\n";
      opties = new Array
      urls = new Array
      opties = document.dropdown.opties.value.split(",")
      urls = document.dropdown.urls.value.split(",")
      if (opties.length == urls.length) {
        for (i = 0;i < opties.length;i++) {
          data += '<OPTION value="' + urls[i] + '">' + opties[i] + "\n"
        }
      }
      data += '</SELECT></FORM>'
      document.dropdown.resultaat.value = data
    }

    function maakscroll(a) {
      if ( a == 0 ) {
        data = '<SCRIPT language="JavaScript"><!--' + "\n"
        data += 'var msg' + "\n"
        data += 'function scroller() {' + "\n"
        data += '  msg = "' + document.scroll.tekst.value + '"' + "\n"
        data += '  for (i = msg.length ; i < 100 ; i++ ) msg += " "' + "\n"
        data += '  verzet()' + "\n"
        data += '}' + "\n"
        data += 'function verzet() {' + "\n"
        if ( document.scroll.type.options[document.scroll.type.selectedIndex].value == "links" ) {
          data += '  msg = msg.substring(1, msg.length) + msg.charAt(0)' + "\n"
        } else if ( document.scroll.type.options[document.scroll.type.selectedIndex].value == "rechts" ) {
          data += '  msg = msg.charAt(msg.length-1) + msg.substring(0, msg.length-1)' + "\n"
        }
        data += '  window.status = msg' + "\n"
        data += '  timer = setTimeout("verzet()", ' + document.scroll.snelheid.value + ')' + "\n"
        data += '}' + "\n"
        data += "\/\/ --><\/SCRIPT>"
        document.scroll.resultaat.value = data
      }
    }

    function maakbanner() {
      data = '<SCRIPT language="JavaScript"><!--' + "\n"
      data += 'var welke=0' + "\n"
      data += 'var pl = ' + "\'" + document.banner.plaatjes.value + "\'\n"
      data += 'var pa = ' + "\'" + document.banner.paginas.value + "\'\n"
      data += 'plaatjes = new Array' + "\n"
      data += 'paginas = new Array' + "\n"
      data += 'plaatjes = pl.split(",")' + "\n"
      data += 'paginas = pa.split(",")' + "\n"

      data += 'function bannerstart() {' + "\n"
      if ( document.banner.volgorde.selectedIndex == 0 ) {
        data += 'welke = Math.round(Math.random()*(plaatjes.length)+0.5)-1' + "\n"
      } else {
        data += 'welke++' + "\n"
        data += 'welke=welke%(plaatjes.length)' + "\n"
      }
      data += 'document.bannerimg.src=plaatjes[welke]' + "\n"
      data += 'timer = setTimeout("bannerstart()", ' + document.banner.miliseconden.value + ')' + "\n"
      data += '}' + "\n"
      data += 'function bannergo() {' + "\n"
      data += 'window.open(paginas[welke], "banner")' +"\n"
      data += '}' + "\n"
      data += '\/\/ --><\/SCRIPT>' + "\n"
      data += '<A href="javascript:void(0)"><IMG name="bannerimg" src="" onClick="bannergo()" border="0"></A>'
      document.banner.resultaat.value=data
    }

    function maakmouseover() {
      data = '<IMG src="'+document.mouseover.URL1.value+'" onMouseOver="'
      if (document.mouseover.plaatje.options[document.mouseover.plaatje.selectedIndex].value=='zelf') {
        data += 'this.src=\''+document.mouseover.URL2.value+'\'" onMouseOut="this.src=\''+document.mouseover.URL1.value+'\'">'
      } else {
        data += 'document.'+document.mouseover.anderplaatje.value+'.src=\''+document.mouseover.URL2.value+'\'" onMouseOut="document.'+document.mouseover.anderplaatje.value+'.src=\''+document.mouseover.URL3.value+'\'">'
      }
      document.mouseover.resultaat.value=data
    }

    function maakdhtmlmenu() {
      keuzes=new Array()
      keuzes=document.dhtmlmenu.uittxt.value.split(",")
      urls=new Array()
      urls=document.dhtmlmenu.uiturl.value.split(",")

      // Make Stylesheet for submenus
      data1 =  '<STYLE rel="Stylesheet" type="text/css">\n'
      data1 += '  DIV.submenu {\n'
      data1 += '    position: absolute;\n'
      data1 += '    line-height: '+(Math.floor(document.dhtmlmenu.hoogte.value)-1)+'px;\n'
      data1 += '    width: '+document.dhtmlmenu.breedte.value+';\n'
      if (document.dhtmlmenu.position.selectedIndex==1) {
        data1 += '    left: 5;\n'
      }
      data1 += '    border-width: '+document.dhtmlmenu.borderwidth.value+';\n'
      data1 += '    border-style: solid;\n'
      data1 += '    border-color: '+document.dhtmlmenu.bordercolor.value+';\n'
      data1 += '  }\n'

      // Make Stylesheet for menus
      data1 += '  DIV.menu {\n'
      data1 += '    position: absolute;\n'
      data1 += '    width: '+document.dhtmlmenu.breedte.value+';\n'
      if (document.dhtmlmenu.position.selectedIndex==0) {
        data1 += '    top: 0;\n'
      } else {
        data1 += '    left: 5;\n'
      }
      data1 += '    border-width: '+document.dhtmlmenu.borderwidth.value+';\n'
      data1 += '    border-style: solid;\n'
      data1 += '    border-color: '+document.dhtmlmenu.bordercolor.value+';\n'
      data1 += '  }\n'
      data1 += '</STYLE>\n\n'
      document.dhtmlmenu.code1.value = data1 + jscript

      // Make layer for submenu
      data =  '<DIV id="submenu' + (Math.floor(document.dhtmlmenu.aantal.value)+1) + '" class="submenu" style="height: ' + Math.floor(document.dhtmlmenu.hoogte.value)*keuzes.length +'; '
      if (document.dhtmlmenu.bguitkeuze.selectedIndex==0) {
        data += 'background-color: ' + document.dhtmlmenu.bguit.value + '; '
      } else {
        data += 'background-image: url(' + document.dhtmlmenu.bguit.value + '); '
      }
      data += 'top: '+(0-Math.floor(document.dhtmlmenu.hoogte.value)*(keuzes.length-1))+'; '
      if ( document.dhtmlmenu.position.selectedIndex==0 ) {
        data += 'left: ' + (Math.floor(document.dhtmlmenu.breedte.value)*Math.floor(document.dhtmlmenu.aantal.value)+5)+'; '
      }
      data += 'z-index: '+(100-Math.floor(document.dhtmlmenu.aantal.value)*2-1)+';" onMouseOver="setBackground(this.id,\'' + document.dhtmlmenu.bguitmo.value + '\');dropDown(this.id)" onMouseOut="setBackground(this.id,\''+document.dhtmlmenu.bguit.value+'\');pullUp(this.id)"><CENTER>\n'
      for ( i=0 ; i < keuzes.length ; i++ ) {
        data += '  <A href="' + urls[i] + '" target="'
        if (document.dhtmlmenu.doel.selectedIndex != 2) {
          data += document.dhtmlmenu.doel.options[document.dhtmlmenu.doel.selectedIndex].value
        } else {
          data += document.dhtmlmenu.frame.value
        }
        data += '">' + keuzes[i] + '</A><BR>\n'
      }
      data += '</CENTER></DIV>\n'

      // Make layer for menu
      data += '<DIV id="menu' + (Math.floor(document.dhtmlmenu.aantal.value)+1) + '" class="menu" style="height: '+document.dhtmlmenu.hoogte.value+'; '
      if (document.dhtmlmenu.bgkopkeuze.selectedIndex==0) {
        data += 'background-color: ' + document.dhtmlmenu.bgkop.value + '; '
      } else {
        data += 'background-image: url(' + document.dhtmlmenu.bgkop.value + '); '
      }
      if ( document.dhtmlmenu.position.selectedIndex==0 ) {
        data += 'left: ' + (Math.floor(document.dhtmlmenu.breedte.value)*Math.floor(document.dhtmlmenu.aantal.value)+5)+'; '
      } else {
        data += 'top: ' + (Math.floor(document.dhtmlmenu.hoogte.value)*Math.floor(document.dhtmlmenu.aantal.value)) + '; '
      }
      data += 'z-index: '+(100-Math.floor(document.dhtmlmenu.aantal.value)*2)+';" onMouseOver="setBackground(this.id,\'' + document.dhtmlmenu.bgkopmo.value + '\');dropDown(\'sub\'+this.id)" onMouseOut="setBackground(this.id,\''+document.dhtmlmenu.bgkop.value+'\');pullUp(\'sub\'+this.id)"><CENTER>\n'
      data += '  <A href="' + document.dhtmlmenu.kopurl.value + '" target="'
      if (document.dhtmlmenu.doel.selectedIndex != 2) {
        data += document.dhtmlmenu.doel.options[document.dhtmlmenu.doel.selectedIndex].value
      } else {
        data += document.dhtmlmenu.frame.value
      }
      data += '">' + document.dhtmlmenu.koptxt.value + '</A><BR>\n'
      data += '</CENTER></DIV>\n'

      document.dhtmlmenu.resultaat.value=data
    }

    function testdhtmlmenu() {
        scherm=window.open('', 'scherm', 'height=300,width=300,location=no,menubar=no,status=no,toolbar=no,scrollbars=no,resizable=no')
        scherm.document.open()
        scherm.document.write("<HTML><HEAD><TITLE>DHTML-menu test</TITLE>\n")
        scherm.document.write(document.dhtmlmenu.code1.value)
        scherm.document.write("</HEAD><BODY>")
        scherm.document.write(document.dhtmlmenu.resultaat.value)
        scherm.document.write("</BODY></HTML>")
        scherm.document.close()
    }

    function makeCountdown() {
      data ='<SCRIPT language="JavaScript">\n';
      data+='countdownTo=new Date();\n';
      data+='countdownTo.setYear('+document.countdownForm.year.value+');\n';
      data+='countdownTo.setMonth('+(document.countdownForm.month.value-1)+');\n';
      data+='countdownTo.setDate('+document.countdownForm.date.value+');\n';
      data+='countdownTo.setHours('+document.countdownForm.hours.value+');\n';
      data+='countdownTo.setMinutes('+document.countdownForm.minutes.value+');\n';
      data+='countdownTo.setSeconds(0);\n\n';

      data+='function countdown() {\n';
      data+='  var now=new Date();\n';
      if ( document.countdownForm.type.value=="telterug" ) {
        data+='  var deltaSecs = Math.floor((countdownTo.getTime()-now.getTime())/1000);\n';
      } else {
        data+='  var deltaSecs = Math.floor((now.getTime()-countdownTo.getTime())/1000);\n';
      }
      data+='  var txt="";\n';
      if ( document.countdownForm.showdays.checked==true ) {
        data+='  var deltaDays=Math.floor(deltaSecs/86400);\n';
        data+='  deltaSecs-=86400*deltaDays;\n';
        data+='  txt+=deltaDays+" dagen, ";\n';
      }

      if ( document.countdownForm.showhours.checked==true ) {
        data+='  var deltaHours=Math.floor(deltaSecs/3600);\n';
        data+='  deltaSecs-=3600*deltaHours;\n';
        data+='  txt+=deltaHours+" uur, ";\n';
      }
      if ( document.countdownForm.showminutes.checked==true ) {
        data+='  var deltaMins=Math.floor(deltaSecs/60);\n';
        data+='  deltaSecs-=60*deltaMins;\n\n';
        data+='  txt+=deltaMins+" minuten, ";\n';
      }
      if ( document.countdownForm.showseconds.checked==true ) {
        data+='  txt+=deltaSecs+" seconden, ";\n';
      }
      data+='  txt=txt.substr(0,txt.length-2);\n';
      data+='  document.getElementById("countdown").innerHTML=txt;\n';

      data+='  countdownTimer=setTimeout("countdown()",1000);\n';
      data+='}\n';
      data+='</SCRIPT>';

      document.countdownForm.resultaat.value=data;
    }

    function makeTicker() {
      var dir = document.tickerForm.direction.selectedIndex;
      data  = '<SCRIPT language="JavaScript">\n';
      data += '  mouseOnTicker=false;\n';
      data += '  pixelsPerTick=' + (dir==0 ? '-' : '' ) + (document.tickerForm.speed.value/10) + ';\n';
      data += '  tickerText="' + document.tickerForm.text.value + '";\n\n';
      data += '  function startTicker() {\n';
      data += '    document.getElementById(\'tickerpanel\').style.width = tickerPanelWidth = "'+document.tickerForm.width.value+'";\n';
      data += '    document.getElementById(\'ticker\').innerHTML="<NOBR>"+tickerText+"</NOBR>";\n';
      data += '    tickerPosition=document.getElementById(\'tickerpanel\').offsetWidth;\n';
      data += '    speed=pixelsPerTick;\n\n';
      data += '    ticker();\n';
      data += '  }\n\n';
      data += '  function ticker() {\n';
      data += '    if (mouseOnTicker) {\n';
      data += (dir == 0 ? '      speed += (speed < 0 ? 1 : 0);\n' : '      speed -= (speed > 0 ? 1 : 0);\n');
      data += '    } else {\n';
      data += (dir == 0 ? '      speed -= (speed > pixelsPerTick ? 1 : 0);\n' : '      speed += (speed < pixelsPerTick ? 1 : 0);\n');
      data += '    }\n';
      data += '    tickerPosition += speed;\n';
      if ( dir==0 ) {
        data += '    if ( tickerPosition < -(document.getElementById(\'ticker\').offsetWidth) )  {\n';
        data += '      tickerPosition = document.getElementById(\'tickerpanel\').offsetWidth;\n';
      } else {
        data += '    if ( tickerPosition > document.getElementById(\'tickerpanel\').offsetWidth) {\n';
        data += '      tickerPosition = -document.getElementById(\'ticker\').offsetWidth;\n';
      }
      data += '    }\n\n';
      data += '    document.getElementById(\'ticker\').style.left=tickerPosition;\n\n';
      data += '    setTimeout(\'ticker()\',100);\n';
      data += '  }\n';
      data += '</SCRIPT>';

      document.tickerForm.resultaat.value=data;
    }

    function testTicker() {
      makeTicker();
      tickerWin=window.open('','tickerWin','width='+(parseInt(document.tickerForm.width.value)+50)+',height=100');
      tickerWin.document.open();
      tickerWin.document.writeln('<HTML><HEAD><TITLE>Ticker</TITLE>');
      tickerWin.document.writeln(document.tickerForm.resultaat.value);
      tickerWin.document.writeln('</HEAD><BODY onLoad="startTicker()">');
      tickerWin.document.writeln(document.tickerForm.tickerHTML.value);
      tickerWin.document.writeln('</BODY></HTML>');
      tickerWin.document.close();
    }
