if (ns4up||loc961bes) {
    doc_width = self.innerWidth;
    doc_height = self.innerHeight;
  } else if (blocexit) {
    doc_width = document.body.clientWidth;
    doc_height = document.body.clientHeight;
  }

  dx = new Array();
  xp = new Array();
  yp = new Array();
  am = new Array();
  stx = new Array();
  sty = new Array();
  
  for (i = 0; i < per40loc; ++ i) {  
    dx[i] = 0;                        // set coordinate variables
    xp[i] = Math.random()*(doc_width-50);  // set position variables
    yp[i] = Math.random()*doc_height;
    am[i] = Math.random()*20;         // set amplitude variables
    stx[i] = 0.02 + Math.random()/10; // set step variables
    sty[i] = 0.7 + Math.random();     // set step variables
    if (ns4up) {                      // set layers
      if (i == 0) {
        document.write("<layer name=\"dot"+ i +"\" left=\"15\" top=\"15\" visibility=\"show\"><img src='"+cant40ros+"' border=\"0\"><\/a><\/layer>");
      } else {
        document.write("<layer name=\"dot"+ i +"\" left=\"15\" top=\"15\" visibility=\"show\"><img src='"+cant40ros+"' border=\"0\"><\/layer>");
      }
    } else if (blocexit||loc961bes) {
      if (i == 0) {
        document.write("<div id=\"dot"+ i +"\" style=\"POSITION: absolute; Z-INDEX: "+ i +"; VISIBILITY: visible; TOP: 15px; LEFT: 15px;\"><img src='"+cant40ros+"' border=\"0\"><\/a><\/div>");
      } else {
        document.write("<div id=\"dot"+ i +"\" style=\"POSITION: absolute; Z-INDEX: "+ i +"; VISIBILITY: visible; TOP: 15px; LEFT: 15px;\"><img src='"+cant40ros+"' border=\"0\"><\/div>");
      }
    }
  }
  
  function sper40locwNS() {  
    for (i = 0; i < per40loc; ++ i) {  
      yp[i] += sty[i];
      if (yp[i] > doc_height-50) {
        xp[i] = Math.random()*(doc_width-am[i]-30);
        yp[i] = 0;
        stx[i] = 0.02 + Math.random()/10;
        sty[i] = 0.7 + Math.random();
        doc_width = self.innerWidth;
        doc_height = self.innerHeight;
      }
      dx[i] += stx[i];
      document.layers["dot"+i].top = yp[i];
      document.layers["dot"+i].left = xp[i] + am[i]*Math.sin(dx[i]);
    }
    setTimeout("sper40locwNS()", 10);
  }

  function sper40locwIE_NS6() {  
    for (i = 0; i < per40loc; ++ i) {  
      yp[i] += sty[i];
      if (yp[i] > doc_height-50) {
        xp[i] = Math.random()*(doc_width-am[i]-30);
        yp[i] = 0;
        stx[i] = 0.02 + Math.random()/10;
        sty[i] = 0.7 + Math.random();
        doc_width = loc961bes?window.innerWidth : document.body.clientWidth;
        doc_height = loc961bes?window.innerHeight : document.body.clientHeight;
      }
      dx[i] += stx[i];
      if (blocexit){
      document.all["dot"+i].style.pixelTop = yp[i];
      document.all["dot"+i].style.pixelLeft = xp[i] + am[i]*Math.sin(dx[i]);
      }
      else if (loc961bes){
      document.getElementById("dot"+i).style.top=yp[i];
      document.getElementById("dot"+i).style.left=xp[i] + am[i]*Math.sin(dx[i]);
      }   
    }
    setTimeout("sper40locwIE_NS6()", 10);
  }

  if (ns4up) {
    sper40locwNS();
  } else if (blocexit||loc961bes) {
    sper40locwIE_NS6();
  }

  function comprobar() {
      resultado=0; preguntas=10;
      for (i=0;i<document.forms[0].elements.length;i++) {
        if ((document.forms[0].elements[i].type=="radio") &&
            (document.forms[0].elements[i].value=="bien") &&
            (document.forms[0].elements[i].checked))
          resultado++;
      }
      PopIt(document.forms[0].elements[0].value+" ¡Hola! \n\nEl resultado de la prueba es "+resultado+" de "+preguntas+" preguntas acertadas.");
    }