function writeCode()
{
   var style_code = isThereStyleCode();
   var mo_code = isThereMouseOver();
   writeHeadCode(mo_code,style_code);
   writeButtonCode(mo_code);
}


//is there any style code??
function isThereStyleCode()
{
   if((window.document.button_factory.set_textalign[1].checked == true)&&(window.document.button_factory.set_fontsize.value == "") && (window.document.button_factory.set_fontcolor.value == "") && (window.document.button_factory.set_buttonheight.value == "") && (window.document.button_factory.set_buttonwidth.value == "") && (window.document.button_factory.set_backgroundcolor.value == "") && (window.document.button_factory.set_backgroundimage.value == "") && (window.document.button_factory.set_borderstyle.value == "default") && (window.document.button_factory.set_bordercolor.value == "") && (window.document.button_factory.set_borderwidth.value == "") && (window.document.button_factory.set_borderstyle_top.value == "default") && (window.document.button_factory.set_bordercolor_top.value == "") && (window.document.button_factory.set_borderwidth_top.value == "") && (window.document.button_factory.set_borderstyle_bottom.value == "default") && (window.document.button_factory.set_bordercolor_bottom.value == "") && (window.document.button_factory.set_borderwidth_bottom.value == "") && (window.document.button_factory.set_borderstyle_left.value == "default") && (window.document.button_factory.set_bordercolor_left.value == "") && (window.document.button_factory.set_borderwidth_left.value == "") && (window.document.button_factory.set_borderstyle_right.value == "default") && (window.document.button_factory.set_bordercolor_right.value == "") && (window.document.button_factory.set_borderwidth_right.value == "") && (window.document.button_factory.set_fontweight.checked == false) && (window.document.button_factory.set_fontstyle.checked == false) && (window.document.button_factory.set_underline.checked == false)&&(window.document.button_factory.set_gradient.value == "NONE"))
   { return "no"; } else { return "yes"; }
}


//is there any mouseover code??
function isThereMouseOver()
{
   if((window.document.button_factory.mo_set_fontcolor.value) || (window.document.button_factory.mo_set_backgroundcolor.value) || (window.document.button_factory.mo_set_backgroundimage.value) || (window.document.button_factory.mo_set_borderstyle.value != "default") || (window.document.button_factory.mo_set_bordercolor.value) || (window.document.button_factory.mo_set_borderstyle_top.value != "default") || (window.document.button_factory.mo_set_bordercolor_top.value) || (window.document.button_factory.mo_set_borderstyle_bottom.value != "default") || (window.document.button_factory.mo_set_bordercolor_bottom.value) || (window.document.button_factory.mo_set_borderstyle_left.value != "default") || (window.document.button_factory.mo_set_bordercolor_left.value) || (window.document.button_factory.mo_set_borderstyle_right.value != "default") || (window.document.button_factory.mo_set_bordercolor_right.value) || (window.document.button_factory.mo_set_gradient.value != "NONE"))
   { return "yes"; } else { return "no"; }
}





function writeHeadCode(mo_code,style_code)
{

   var hc = "";

   if(style_code == "yes")
   {
      hc += "<style type=\"text/css\">\n";
      hc += "\ninput.groovybutton\n";
      hc += "\{\n";

      if(window.document.button_factory.set_fontsize.value)
      {
         hc += "   font-size:" + window.document.button_factory.set_fontsize.value + "px\;\n";
      }
      if(window.document.button_factory.set_fontfamily.value)
      {
         hc += "   font-family:" + window.document.button_factory.set_fontfamily.value + "\;\n";
      }
      if(window.document.button_factory.set_fontweight.checked == true)
      {
         hc += "   font-weight:bold\;\n";
      }
      if(window.document.button_factory.set_fontstyle.checked == true)
      {
         hc += "   font-style:italic\;\n";
      }
      if(window.document.button_factory.set_underline.checked == true)
      {
         hc += "   text-decoration:underline\;\n";
      }

      if(window.document.button_factory.set_textalign[0].checked == true)
      {
         hc += "   text-align:left\;\n";
      }
      else if(window.document.button_factory.set_textalign[2].checked == true)
      {
         hc += "   text-align:right\;\n";
      }

      if(window.document.button_factory.set_fontcolor.value)
      {
         hc += "   color:#" + window.document.button_factory.set_fontcolor.value + "\;\n";
      }
      if(window.document.button_factory.set_buttonwidth.value)
      {
         hc += "   width:" + window.document.button_factory.set_buttonwidth.value + "px\;\n";
      }
      if(window.document.button_factory.set_buttonheight.value)
      {
         hc += "   height:" + window.document.button_factory.set_buttonheight.value + "px\;\n";
      }
      if(window.document.button_factory.set_backgroundcolor.value)
      {
         if(window.document.button_factory.set_backgroundcolor.value.toLowerCase() == "trans")
         {
            hc += "   background-color:transparent\;\n";
         }
         else
         {
            hc += "   background-color:#" + window.document.button_factory.set_backgroundcolor.value + "\;\n";
         }
      }
      if(window.document.button_factory.set_backgroundimage.value)
      {
         hc += "   background-image:url(" + window.document.button_factory.set_backgroundimage.value + ")\;\n";
      }

      if(window.document.button_factory.set_gradient.value != "NONE")
      {
         var grst = window.document.button_factory.set_gradient.value;
         var grst1 = grst.substring(0,6);
         var grst2 = grst.substring(7,13);
         var grst3 = grst.charAt(14);

         hc += "   filter:progid:DXImageTransform.Microsoft.Gradient(GradientType=" + grst3 + ",StartColorStr='#ff" + grst1 + "',EndColorStr='#ff" + grst2 + "')\;\n";
      }

      if((window.document.button_factory.borderdraw[0].checked == true)&&(window.document.button_factory.mo_borderdraw[0].checked == true))
      {
         //border all
         if(window.document.button_factory.set_borderstyle.value != "default")
         {
            hc += "   border-style:" + window.document.button_factory.set_borderstyle.value + "\;\n";
         }
         if(window.document.button_factory.set_bordercolor.value)
         {
            hc += "   border-color:#" + window.document.button_factory.set_bordercolor.value + "\;\n";
         }
         if(window.document.button_factory.set_borderwidth.value)
         {
            hc += "   border-width:" + window.document.button_factory.set_borderwidth.value + "px\;\n";
         }
      }
      else
      {
         //border top
         if(window.document.button_factory.set_borderstyle_top.value != "default")
         {
            hc += "   border-top-style:" + window.document.button_factory.set_borderstyle_top.value + "\;\n";
         }
         if(window.document.button_factory.set_bordercolor_top.value)
         {
            hc += "   border-top-color:#" + window.document.button_factory.set_bordercolor_top.value + "\;\n";
         }
         if(window.document.button_factory.set_borderwidth_top.value)
         {
            hc += "   border-top-width:" + window.document.button_factory.set_borderwidth_top.value + "px\;\n";
         }

         //border bottom
         if(window.document.button_factory.set_borderstyle_bottom.value != "default")
         {
            hc += "   border-bottom-style:" + window.document.button_factory.set_borderstyle_bottom.value + "\;\n";
         }
         if(window.document.button_factory.set_bordercolor_bottom.value)
         {
            hc += "   border-bottom-color:#" + window.document.button_factory.set_bordercolor_bottom.value + "\;\n";
         }
         if(window.document.button_factory.set_borderwidth_bottom.value)
         {
            hc += "   border-bottom-width:" + window.document.button_factory.set_borderwidth_bottom.value + "px\;\n";
         }

         //border left
         if(window.document.button_factory.set_borderstyle_left.value != "default")
         {
            hc += "   border-left-style:" + window.document.button_factory.set_borderstyle_left.value + "\;\n";
         }
         if(window.document.button_factory.set_bordercolor_left.value)
         {
            hc += "   border-left-color:#" + window.document.button_factory.set_bordercolor_left.value + "\;\n";
         }
         if(window.document.button_factory.set_borderwidth_left.value)
         {
            hc += "   border-left-width:" + window.document.button_factory.set_borderwidth_left.value + "px\;\n";
         }

         //border right
         if(window.document.button_factory.set_borderstyle_right.value != "default")
         {
            hc += "   border-right-style:" + window.document.button_factory.set_borderstyle_right.value + "\;\n";
         }
         if(window.document.button_factory.set_bordercolor_right.value)
         {
            hc += "   border-right-color:#" + window.document.button_factory.set_bordercolor_right.value + "\;\n";
         }
         if(window.document.button_factory.set_borderwidth_right.value)
         {
            hc += "   border-right-width:" + window.document.button_factory.set_borderwidth_right.value + "px\;\n";
         }
      }

      hc += "\}\n";
      hc += "\n</style>\n";
   }











   if(mo_code == "yes") //add mouseover/out code... if any
   {
      hc += "\n<scr" + "ipt language=\"javascr" + "ipt\">\n";



      //go Lite
      hc += "\nfunction goLite(FRM,BTN)\n";
      hc += "\{\n";

      if(window.document.button_factory.mo_set_fontcolor.value)
      {
         hc += "   window.document.forms[FRM].elements[BTN].style.color = \"#" + window.document.button_factory.mo_set_fontcolor.value + "\"\;\n";
      }

      if(window.document.button_factory.mo_set_backgroundcolor.value)
      {
         if(window.document.button_factory.mo_set_backgroundcolor.value.toLowerCase() == "trans")
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.backgroundColor = \"transparent\"\;\n";
         }
         else
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.backgroundColor = \"#" + window.document.button_factory.mo_set_backgroundcolor.value + "\"\;\n";
         }
      }

      if(window.document.button_factory.mo_set_backgroundimage.value)
      {
         hc += "   window.document.forms[FRM].elements[BTN].style.backgroundImage = \"url(" + window.document.button_factory.mo_set_backgroundimage.value + ")\"\;\n";
      }

      if(window.document.button_factory.mo_set_gradient.value != "NONE")
      {
         var grst = window.document.button_factory.mo_set_gradient.value;
         var grst1 = grst.substring(0,6);
         var grst2 = grst.substring(7,13);
         var grst3 = grst.charAt(14);

         hc += "   window.document.forms[FRM].elements[BTN].style.filter = \"progid:DXImageTransform.Microsoft.Gradient(GradientType=" + grst3 + ",StartColorStr='#ff" + grst1 + "',EndColorStr='#ff" + grst2 + "')\"\;\n";
      }

      if((window.document.button_factory.borderdraw[0].checked == true)&&(window.document.button_factory.mo_borderdraw[0].checked == true))
      {
         //lite borderstyle
         if((window.document.button_factory.set_borderstyle.value == "default")&&(window.document.button_factory.mo_set_borderstyle.value != "default"))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderStyle = \"" + window.document.button_factory.mo_set_borderstyle.value + "\"\;\n";
         }
         else if(((window.document.button_factory.set_borderstyle.value!= "default")&&(window.document.button_factory.mo_set_borderstyle.value != "default"))&&(window.document.button_factory.set_borderstyle.value != window.document.button_factory.mo_set_borderstyle.value))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderStyle = \"" + window.document.button_factory.mo_set_borderstyle.value + "\"\;\n";
         }

         //lite bordercolor
         if((window.document.button_factory.set_bordercolor.value == "")&&(window.document.button_factory.mo_set_bordercolor.value))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderColor = \"#" + window.document.button_factory.mo_set_bordercolor.value + "\"\;\n";
         }
         else if(((window.document.button_factory.set_bordercolor.value)&&(window.document.button_factory.mo_set_bordercolor.value))&&(window.document.button_factory.set_bordercolor.value != window.document.button_factory.mo_set_bordercolor.value))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderColor = \"#" + window.document.button_factory.mo_set_bordercolor.value + "\"\;\n";
         }
      }
      else
      {
         //lite borderstyle_top
         if((window.document.button_factory.set_borderstyle_top.value == "default")&&(window.document.button_factory.mo_set_borderstyle_top.value != "default"))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderTopStyle = \"" + window.document.button_factory.mo_set_borderstyle_top.value + "\"\;\n";
         }
         else if(((window.document.button_factory.set_borderstyle_top.value!= "default")&&(window.document.button_factory.mo_set_borderstyle_top.value != "default"))&&(window.document.button_factory.set_borderstyle_top.value != window.document.button_factory.mo_set_borderstyle_top.value))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderTopStyle = \"" + window.document.button_factory.mo_set_borderstyle_top.value + "\"\;\n";
         }
         //lite borderstyle_bottom
         if((window.document.button_factory.set_borderstyle_bottom.value == "default")&&(window.document.button_factory.mo_set_borderstyle_bottom.value != "default"))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderBottomStyle = \"" + window.document.button_factory.mo_set_borderstyle_bottom.value + "\"\;\n";
         }
         else if(((window.document.button_factory.set_borderstyle_bottom.value!= "default")&&(window.document.button_factory.mo_set_borderstyle_bottom.value != "default"))&&(window.document.button_factory.set_borderstyle_bottom.value != window.document.button_factory.mo_set_borderstyle_bottom.value))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderBottomStyle = \"" + window.document.button_factory.mo_set_borderstyle_bottom.value + "\"\;\n";
         }
         //lite borderstyle_left
         if((window.document.button_factory.set_borderstyle_left.value == "default")&&(window.document.button_factory.mo_set_borderstyle_left.value != "default"))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderLeftStyle = \"" + window.document.button_factory.mo_set_borderstyle_left.value + "\"\;\n";
         }
         else if(((window.document.button_factory.set_borderstyle_left.value!= "default")&&(window.document.button_factory.mo_set_borderstyle_left.value != "default"))&&(window.document.button_factory.set_borderstyle_left.value != window.document.button_factory.mo_set_borderstyle_left.value))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderLeftStyle = \"" + window.document.button_factory.mo_set_borderstyle_left.value + "\"\;\n";
         }
         //lite borderstyle_right
         if((window.document.button_factory.set_borderstyle_right.value == "default")&&(window.document.button_factory.mo_set_borderstyle_right.value != "default"))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderRightStyle = \"" + window.document.button_factory.mo_set_borderstyle_right.value + "\"\;\n";
         }
         else if(((window.document.button_factory.set_borderstyle_right.value!= "default")&&(window.document.button_factory.mo_set_borderstyle_right.value != "default"))&&(window.document.button_factory.set_borderstyle_right.value != window.document.button_factory.mo_set_borderstyle_right.value))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderRightStyle = \"" + window.document.button_factory.mo_set_borderstyle_right.value + "\"\;\n";
         }

         //lite bordercolor_top
         if((window.document.button_factory.set_bordercolor_top.value == "")&&(window.document.button_factory.mo_set_bordercolor_top.value))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderTopColor = \"#" + window.document.button_factory.mo_set_bordercolor_top.value + "\"\;\n";
         }
         else if(((window.document.button_factory.set_bordercolor_top.value)&&(window.document.button_factory.mo_set_bordercolor_top.value))&&(window.document.button_factory.set_bordercolor_top.value != window.document.button_factory.mo_set_bordercolor_top.value))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderTopColor = \"#" + window.document.button_factory.mo_set_bordercolor_top.value + "\"\;\n";
         }
         //lite bordercolor_bottom
         if((window.document.button_factory.set_bordercolor_bottom.value == "")&&(window.document.button_factory.mo_set_bordercolor_bottom.value))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderBottomColor = \"#" + window.document.button_factory.mo_set_bordercolor_bottom.value + "\"\;\n";
         }
         else if(((window.document.button_factory.set_bordercolor_bottom.value)&&(window.document.button_factory.mo_set_bordercolor_bottom.value))&&(window.document.button_factory.set_bordercolor_bottom.value != window.document.button_factory.mo_set_bordercolor_bottom.value))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderBottomColor = \"#" + window.document.button_factory.mo_set_bordercolor_bottom.value + "\"\;\n";
         }
         //lite bordercolor_left
         if((window.document.button_factory.set_bordercolor_left.value == "")&&(window.document.button_factory.mo_set_bordercolor_left.value))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderLeftColor = \"#" + window.document.button_factory.mo_set_bordercolor_left.value + "\"\;\n";
         }
         else if(((window.document.button_factory.set_bordercolor_left.value)&&(window.document.button_factory.mo_set_bordercolor_left.value))&&(window.document.button_factory.set_bordercolor_left.value != window.document.button_factory.mo_set_bordercolor_left.value))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderLeftColor = \"#" + window.document.button_factory.mo_set_bordercolor_left.value + "\"\;\n";
         }
         //lite bordercolor_right
         if((window.document.button_factory.set_bordercolor_right.value == "")&&(window.document.button_factory.mo_set_bordercolor_right.value))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderRightColor = \"#" + window.document.button_factory.mo_set_bordercolor_right.value + "\"\;\n";
         }
         else if(((window.document.button_factory.set_bordercolor_right.value)&&(window.document.button_factory.mo_set_bordercolor_right.value))&&(window.document.button_factory.set_bordercolor_right.value != window.document.button_factory.mo_set_bordercolor_right.value))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderRightColor = \"#" + window.document.button_factory.mo_set_bordercolor_right.value + "\"\;\n";
         }
      }





      hc += "\}\n";



      //go Dim
      hc += "\nfunction goDim(FRM,BTN)\n";
      hc += "\{\n";

      if(window.document.button_factory.mo_set_fontcolor.value)
      {
         if(window.document.button_factory.set_fontcolor.value == "")
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.color = \"\"\;\n";
         }
         else
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.color = \"#" + window.document.button_factory.set_fontcolor.value + "\"\;\n";
         }
      }

      if(window.document.button_factory.mo_set_backgroundcolor.value)
      {
         if(window.document.button_factory.set_backgroundcolor.value == "")
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.backgroundColor = \"\"\;\n";
         }
         else if(window.document.button_factory.set_backgroundcolor.value.toLowerCase() == "trans")
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.backgroundColor = \"transparent\"\;\n";
         }
         else
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.backgroundColor = \"#" + window.document.button_factory.set_backgroundcolor.value + "\"\;\n";
         }
      }

      if(window.document.button_factory.mo_set_backgroundimage.value)
      {
         if(window.document.button_factory.set_backgroundimage.value == "")
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.backgroundImage = \"\"\;\n";
         }
         else
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.backgroundImage = \"url(" + window.document.button_factory.set_backgroundimage.value + ")\"\;\n";
         }
      }


      if(window.document.button_factory.mo_set_gradient.value != "NONE")
      {
         if(window.document.button_factory.set_gradient.value != "NONE")
         {
            var grst = window.document.button_factory.set_gradient.value;
            var grst1 = grst.substring(0,6);
            var grst2 = grst.substring(7,13);
            var grst3 = grst.charAt(14);

            hc += "   window.document.forms[FRM].elements[BTN].style.filter = \"progid:DXImageTransform.Microsoft.Gradient(GradientType=" + grst3 + ",StartColorStr='#ff" + grst1 + "',EndColorStr='#ff" + grst2 + "')\"\;\n";
         }
         else
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.filter = \"\"\;\n";
         }
      }



      if((window.document.button_factory.borderdraw[0].checked == true)&&(window.document.button_factory.mo_borderdraw[0].checked == true))
      {
         //dim borderstyle
         if((window.document.button_factory.set_borderstyle.value == "default")&&(window.document.button_factory.mo_set_borderstyle.value != "default"))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderStyle = \"\"\;\n";
         }
         else if(((window.document.button_factory.set_borderstyle.value!= "default")&&(window.document.button_factory.mo_set_borderstyle.value != "default"))&&(window.document.button_factory.set_borderstyle.value != window.document.button_factory.mo_set_borderstyle.value))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderStyle = \"" + window.document.button_factory.set_borderstyle.value + "\"\;\n";
         }

         //dim bordercolor
         if((window.document.button_factory.set_bordercolor.value == "")&&(window.document.button_factory.mo_set_bordercolor.value))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderColor = \"\"\;\n";
         }
         else if(((window.document.button_factory.set_bordercolor.value!= "")&&(window.document.button_factory.mo_set_bordercolor.value != ""))&&(window.document.button_factory.set_bordercolor.value != window.document.button_factory.mo_set_bordercolor.value))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderColor = \"#" + window.document.button_factory.set_bordercolor.value + "\"\;\n";
         }
      }
      else
      {
         //dim borderstyle_top
         if((window.document.button_factory.set_borderstyle_top.value == "default")&&(window.document.button_factory.mo_set_borderstyle_top.value != "default"))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderTopStyle = \"\"\;\n";
         }
         else if(((window.document.button_factory.set_borderstyle_top.value!= "default")&&(window.document.button_factory.mo_set_borderstyle_top.value != "default"))&&(window.document.button_factory.set_borderstyle_top.value != window.document.button_factory.mo_set_borderstyle_top.value))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderTopStyle = \"" + window.document.button_factory.set_borderstyle_top.value + "\"\;\n";
         }
         //dim borderstyle_bottom
         if((window.document.button_factory.set_borderstyle_bottom.value == "default")&&(window.document.button_factory.mo_set_borderstyle_bottom.value != "default"))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderBottomStyle = \"\"\;\n";
         }
         else if(((window.document.button_factory.set_borderstyle_bottom.value!= "default")&&(window.document.button_factory.mo_set_borderstyle_bottom.value != "default"))&&(window.document.button_factory.set_borderstyle_bottom.value != window.document.button_factory.mo_set_borderstyle_bottom.value))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderBottomStyle = \"" + window.document.button_factory.set_borderstyle_bottom.value + "\"\;\n";
         }
         //dim borderstyle_left
         if((window.document.button_factory.set_borderstyle_left.value == "default")&&(window.document.button_factory.mo_set_borderstyle_left.value != "default"))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderLeftStyle = \"\"\;\n";
         }
         else if(((window.document.button_factory.set_borderstyle_left.value!= "default")&&(window.document.button_factory.mo_set_borderstyle_left.value != "default"))&&(window.document.button_factory.set_borderstyle_left.value != window.document.button_factory.mo_set_borderstyle_left.value))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderLeftStyle = \"" + window.document.button_factory.set_borderstyle_left.value + "\"\;\n";
         }
         //dim borderstyle_right
         if((window.document.button_factory.set_borderstyle_right.value == "default")&&(window.document.button_factory.mo_set_borderstyle_right.value != "default"))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderRightStyle = \"\"\;\n";
         }
         else if(((window.document.button_factory.set_borderstyle_right.value!= "default")&&(window.document.button_factory.mo_set_borderstyle_right.value != "default"))&&(window.document.button_factory.set_borderstyle_right.value != window.document.button_factory.mo_set_borderstyle_right.value))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderRightStyle = \"" + window.document.button_factory.set_borderstyle_right.value + "\"\;\n";
         }

         //dim bordercolor_top
         if((window.document.button_factory.set_bordercolor_top.value == "")&&(window.document.button_factory.mo_set_bordercolor_top.value))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderTopColor = \"\"\;\n";
         }
         else if(((window.document.button_factory.set_bordercolor_top.value!= "")&&(window.document.button_factory.mo_set_bordercolor_top.value != ""))&&(window.document.button_factory.set_bordercolor_top.value != window.document.button_factory.mo_set_bordercolor_top.value))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderTopColor = \"#" + window.document.button_factory.set_bordercolor_top.value + "\"\;\n";
         }
         //dim bordercolor_bottom
         if((window.document.button_factory.set_bordercolor_bottom.value == "")&&(window.document.button_factory.mo_set_bordercolor_bottom.value))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderBottomColor = \"\"\;\n";
         }
         else if(((window.document.button_factory.set_bordercolor_bottom.value!= "")&&(window.document.button_factory.mo_set_bordercolor_bottom.value != ""))&&(window.document.button_factory.set_bordercolor_bottom.value != window.document.button_factory.mo_set_bordercolor_bottom.value))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderBottomColor = \"#" + window.document.button_factory.set_bordercolor_bottom.value + "\"\;\n";
         }
         //dim bordercolor_left
         if((window.document.button_factory.set_bordercolor_left.value == "")&&(window.document.button_factory.mo_set_bordercolor_left.value))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderLeftColor = \"\"\;\n";
         }
         else if(((window.document.button_factory.set_bordercolor_left.value!= "")&&(window.document.button_factory.mo_set_bordercolor_left.value != ""))&&(window.document.button_factory.set_bordercolor_left.value != window.document.button_factory.mo_set_bordercolor_left.value))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderLeftColor = \"#" + window.document.button_factory.set_bordercolor_left.value + "\"\;\n";
         }
         //dim bordercolor_right
         if((window.document.button_factory.set_bordercolor_right.value == "")&&(window.document.button_factory.mo_set_bordercolor_right.value))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderRightColor = \"\"\;\n";
         }
         else if(((window.document.button_factory.set_bordercolor_right.value!= "")&&(window.document.button_factory.mo_set_bordercolor_right.value != ""))&&(window.document.button_factory.set_bordercolor_right.value != window.document.button_factory.mo_set_bordercolor_right.value))
         {
            hc += "   window.document.forms[FRM].elements[BTN].style.borderRightColor = \"#" + window.document.button_factory.set_bordercolor_right.value + "\"\;\n";
         }
      }



      hc += "\}\n";



      hc += "\n</scr" + "ipt>\n";
   }



   window.document.code_form.headcode.value = hc;
}



function writeButtonCode(mo_code)
{

   if(mo_code == "yes")
   {
      MO = "\n   onMouseOver=\"goLite(this.form.name,this.name)\"\n   onMouseOut=\"goDim(this.form.name,this.name)\"";
   }
   else
   {
      MO = "";
   }
   var bc = "";
   bc += "<form name=\"groovyform\">\n";
   bc += "<input\n   type=\"button\"\n   name=\"groovybtn1\"\n   class=\"groovybutton\"\n   value=\"" + window.document.button_factory.set_text.value + "\"\n   title=\"" + window.document.button_factory.set_titletext.value + "\"" + MO + ">\n";
   bc += "</form>\n";

   window.document.code_form.buttoncode.value = bc;
}


function makePage()
{
   var BGCOLOR_CODE = "";
   if(window.document.button_factory.set_pagebackground.value.toLowerCase() == "ffffff")
   {
      BGCOLOR_CODE = " bgcolor=\"#FFFFFF\"";
   }
   else if(window.document.button_factory.set_pagebackground.value.toLowerCase() == "")
   {
      //do nothing... BGCOLOR_CODE remains ""
   }
   else
   {
      BGCOLOR_CODE = " bgcolor=\"#" + window.document.button_factory.set_pagebackground.value + "\"";
   }

   var BACKGROUND_CODE = "";
   if(window.document.button_factory.set_pagebackgroundimage.value)
   {
      BACKGROUND_CODE = " background=\"" + window.document.button_factory.set_pagebackgroundimage.value + "\"";
   }


   testWindow = window.open("testpage.html","");
   testWindow.document.open();
   testWindow.document.write("<html>\n<head>\n<title>Groovy Button test page</title>\n\n");
   testWindow.document.write(window.document.code_form.headcode.value);
   testWindow.document.write("\n</head>\n<body" + BGCOLOR_CODE + BACKGROUND_CODE + ">\n\n");
   testWindow.document.write(window.document.code_form.buttoncode.value);
   testWindow.document.write("\n</body>\n</html>\n");
   testWindow.document.close();

}