      //  This script was derived from the OverLIB by Erik Bosrup (erik@bosrup.com).

      var ns4 = (document.layers)? true:false;
      var ns6 = (document.getElementById)? true:false;
      var ie4 = (document.all)? true:false;
      var ie5 = false;

      var popup_layer = null;

      var popup_width = 130;
      var popup_allow_movement = false;


      if  (ie4)
        {
         if  (   (navigator.userAgent.indexOf('MSIE 5') > 0)
              || (navigator.userAgent.indexOf('MSIE 6') > 0)
             )
            ie5 = true;

         if  (ns6)
            ns6 = false;
        }


      if  (   (ns4)
           || (ie4)
           || (ns6)
          )
        {
         document.onmousemove = Mouse_Move;
         if  (ns4)
            document.captureEvents(Event.MOUSEMOVE)
        }


      header  = "";
      header += "<table width='"+(popup_width+5)+"'  boarder='0' cellpadding='0' cellspacing='0' bgcolor='#333399'";
      if  (ie5)   header += " height='85'";
      header += ">";
      header += "<tr><td align='center' valign='middle'>";
      header += "<table width='"+popup_width+"' boarder='0' cellpadding='1' cellspacing='0' bgcolor='#999999'>";
      header += "<tr><td><table width='100%' border='0' cellpadding='2' cellspacing='0' bgcolor='#FFFFCC'";
      if  (ie5)   header += " height='80'";
      header += ">";
      header += "<tr><td valign='top'>";
      header += "<font face='Verdana,Arial,Helvetica' color='#666699' size='1'>";

      trailer  = "</font></td></tr></table></td></tr></table>";
      trailer += "</td></tr></table>";


      function
         Write_Hint(text)
           {
            document.write("    <a href=\"javascript:void(0);\" onmouseover=\"return PopUp('"+text+"');\" onmouseout=\"return PopDown();\">Hint:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;</a></td>");
            document.write("<td><a href=\"javascript:void(0);\" onmouseover=\"return PopUp('"+text+"');\" onmouseout=\"return PopDown();\">Yes</a></td>");
            document.write("<td>&nbsp;</td>");
            document.write("<td>&nbsp;");
           }

      function
         PopUp(text)
           {
            if  (   (ns4)
                 || (ie4)
                 || (ns6)
                )
              {
               if  (ns4) popup_layer = document.popup
               if  (ie4) popup_layer = popup.style
               if  (ns6) popup_layer = document.getElementById("popup");
              }

            Write_Layer(header + text + trailer);
            popup_allow_movement = false;
            Display_Popup();

            return true;
           }


      function
         Write_Layer(txt) 
           {
            txt += "\n";

            if       (ns4)
                   {
                    var p_layer = document.popup.document

                    p_layer.write(txt)
                    p_layer.close()
                   }
            else if  (ie4)
                    document.all["popup"].innerHTML = txt
            else if  (ns6)
                   {
                    range = document.createRange();
                    range.setStartBefore(popup_layer);
                    domfrag = range.createContextualFragment(txt);
                    while (popup_layer.hasChildNodes())
                       popup_layer.removeChild(popup_layer.lastChild);
                    popup_layer.appendChild(domfrag);
                   }
           }


      function
         Display_Popup()
           {
            if  (   (ns4)
                 || (ie4)
                 || (ns6)
                )
              {
               if  (! popup_allow_movement)
                 {
                  Place_Layer();
                  Show_Object(popup_layer);
                  popup_allow_movement = true;
                 }
              }
           }


      function 
         Show_Object(obj)
           {
            if       (ns4) obj.visibility = "show";
            else if  (ie4) obj.visibility = "visible";
            else if  (ns6) obj.style.visibility = "visible";
           }


      function 
         Hide_Object(obj)
           {
            if       (ns4) obj.visibility = "hide";
            else if  (ie4) obj.visibility = "hidden";
            else if  (ns6) obj.style.visibility = "hidden";
           }


      function 
         Move_Object_To(obj,xL,yL) 
           {
            if       (   (ns4)
                      || (ie4)
                     )
                   {
                    obj.left = xL;
                    obj.top = yL;
                   } 
            else if  (ns6) 
                   {
                    obj.style.left = xL + "px";
                    obj.style.top  = yL + "px";
                   }
           }


      function 
         Mouse_Move(evnt) 
           {
            if  (   (ns4)
                 || (ns6)
                )
              {
               mouse_x = evnt.pageX; 
               mouse_y = evnt.pageY;
              }

            if  (ie4)
              {
               mouse_x = event.x; 
               mouse_y = event.y;
              }

            if  (ie5)
              {
               mouse_x = event.x+document.body.scrollLeft; 
               mouse_y = event.y+document.body.scrollTop;
              }

            if  (popup_allow_movement)
               Place_Layer();
           }


      function
         Place_Layer()
           {
            var placeX, placeY;

            
            win_offset = (ie4) ? document.body.scrollLeft : pageXOffset;
            if  (ie4)   win_width = document.body.clientWidth;
            if  (ns4)   win_width = innerWidth;
            if  (ns6)   win_width = outerWidth;

            placeX = mouse_x + 10;
            if  ( (eval(placeX) + eval(popup_width)) > (win_offset + win_width) )
              {
               placeX = win_width + win_offset - popup_width;
               if  (placeX < 0)   placeX = 0;
              }

            scrolloffset = (ie4) ? document.body.scrollTop : pageYOffset;
            placeY = mouse_y + 2;

            Move_Object_To(popup_layer, placeX, placeY);
           }


      function 
         PopDown()
           {
            if  (   (ns4)
                 || (ie4)
                 || (ns6)
                )
              {
               popup_allow_movement = false;
               if  (popup_layer != null)
                  Hide_Object(popup_layer);
              }

            return true;
           }


