var posval,infocus,settings,mywidth,myheight,mytop,myleft,mylink;

 var loc,toolb,statusb,menub,direc,scrollb,resiz,depend;
 var mstr='';

 settings='';

function checkvalue(mycontrol)
{
   if(isNaN(mycontrol.value)!=false)
   {
     alert('The value of this field ( '+mycontrol.name+' ) needs to be a number.');
     mycontrol.focus();
     mycontrol.select();
    }
}

function GenerateCode()
{
  document.frm.gencode.enabled=false;
  var BadChars=new Array
  (
    " ",
    "'",
    "!",
    "@",
    "#",
    "$",
    "%",
    "^",
    "&",
    "*",
    "(",
    ")",
    "-",
    "=",
    "+",
    "|",
    "[",
    "]",
    "{",
    "}",
    "]",
    ";",
    ":",
    ",",
    "<",
    ".",
    ">",
    "/",
    "?");
  var functionname=document.frm.txtFunctionname.value;
  var popupname=document.frm.txtPopupname.value;
  if(document.frm.txtFunctionname.value=='')
  {
    alert("Please enter a Function Name of atleast one character");
    document.frm.txtFunctionname.focus();
    return
  }

  for(var i=0;i<BadChars.length;i++)
  {
	  if(functionname.indexOf(BadChars[i])!=-1)
	  {
			alert('The function name can NOT have a " '+BadChars[i]+' " in it.');
			document.frm.txtFunctionname.value="";
			document.frm.txtFunctionname.focus();
	    	return;
	   }
  }

  if(document.frm.txtPopupname.value=='')
  {
    alert("Please enter a Popup Name of atleast one character");
    document.frm.txtPopupname.focus();
    return
  }

  for(var i=0;i<BadChars.length;i++)
  {
	  if(popupname.indexOf(BadChars[i])!=-1)
	  {
			alert('The Popup name can NOT have a " '+BadChars[i]+' " in it.');
			document.frm.txtPopupname.value="";
			document.frm.txtPopupname.focus();
	    	return;
	   }
  }

 if(document.frm.rdFocus[0].checked)
 {
    infocus='front';
 }
 else
 {
    infocus='back';
 }

  if(infocus=='front')
  {
   var winfocus="win.focus();"
   var mywinfocus='';
  }
  else
  {
   var winfocus="win.blur();";
    var mywinfocus="return false \" onFocus= \"this.blur();\"";
  }

 mywidth=document.frm.txtWidth.value;
 myheight=document.frm.txtHeight.value;
 mytop=document.frm.txtTop.value;
 myleft=document.frm.txtLeft.value;

 posval='custom';
 if(document.frm.rdwindow[0].checked){posval='fullscreen';}
 if(document.frm.rdwindow[1].checked){posval='center';}
 if(document.frm.rdwindow[2].checked){posval='random';}

 if(document.frm.rdlink[0].checked){mylink='standard';}
 if(document.frm.rdlink[1].checked){mylink='formbutton';}
 if(document.frm.rdlink[2].checked){mylink='formload';}
 if(document.frm.rdlink[3].checked){mylink='formunload';}


 loc=(document.frm.chkLocation.checked)?'yes':'no';
 toolb=(document.frm.chkToolbar.checked)?'yes':'no';
 statusb=(document.frm.chkStatusbar.checked)?'yes':'no';
 menub=(document.frm.chkMenubar.checked)?'yes':'no';
 direc=(document.frm.chkDirectories.checked)?'yes':'no';
 scrollb=(document.frm.chkScrollbar.checked)?'yes':'no';
 resiz=(document.frm.chkResizable.checked)?'yes':'no';
 depend=(document.frm.chkDependant.checked)?'yes':'no';

 if(posval=='fullscreen')
 {
   settings='fullscreen';
 }
 else
 {
  if(posval=='center')
  {
   myleft=(screen.width-mywidth)/2;
   mytop=(screen.height-myheight)/2;
   settings="width=" + mywidth + ",height=" + myheight + ",left=" + myleft + ",top=" + mytop + ",location=" + loc + ",toolbar=" + toolb + ",status=" + statusb + ",menubar=" + menub + ",directories=" + direc + ",scrollbars=" + scrollb + ",resizable=" + resiz + ",dependent=" + depend + "'";

  }
  else
  {
    if(posval=='random')
    {
      myleft=(screen.width)?Math.floor(Math.random()*(screen.width-mywidth)):100;mytop=(screen.height)?Math.floor(Math.random()*((screen.height-myheight)-75)):100;
      settings="width=" + mywidth + ",height=" + myheight + ",left=" + myleft + ",top=" + mytop + ",location=" + loc + ",toolbar=" + toolb + ",status=" + statusb + ",menubar=" + menub + ",directories=" + direc + ",scrollbars=" + scrollb + ",resizable=" + resiz + ",dependent=" + depend + "'";

    }
    else
    {
      settings="width=" + mywidth + ",height=" + myheight + ",left=" + myleft + ",top=" + mytop + ",location=" + loc + ",toolbar=" + toolb + ",status=" + statusb + ",menubar=" + menub + ",directories=" + direc + ",scrollbars=" + scrollb + ",resizable=" + resiz + ",dependent=" + depend + "'";

    }
  }
}

var htmltext="<SCRIPT LANGUAGE=\'JAVASCRIPT\' TYPE=\'TEXT/JAVASCRIPT\'>\n ";
htmltext=htmltext + "<!--\n";
htmltext=htmltext + "/****************************************************\n";
htmltext=htmltext + "     AUTHOR: WWW.CGISCRIPT.NET, LLC\n";
htmltext=htmltext + "     URL: http://www.cgiscript.net\n";
htmltext=htmltext + "     Use the code for FREE but leave this message intact.\n";
htmltext=htmltext + "     Download your FREE CGI/Perl Scripts today!\n";
htmltext=htmltext + "     ( http://www.cgiscript.net/scripts.htm )\n";
htmltext=htmltext + "****************************************************/\n";
htmltext=htmltext + "var win=null;\n";
htmltext=htmltext + "function NewWindow(mypage,myname,w,h,pos,infocus){\n";
if(document.frm.txtDaystoPopup.value > 0){
  htmltext=htmltext + "if(GetCookie(\"sid\") == \"999\"){return;}\n";
  htmltext=htmltext + "document.cookie=\"sid=999; Path=/; Expires= \" + getFuture("+document.frm.txtDaystoPopup.value+");\n";
  }
htmltext=htmltext + "if(pos==\"random\"){myleft=(screen.width)?Math.floor(Math.random()*(screen.width-w)):100;mytop=(screen.height)?Math.floor(Math.random()*((screen.height-h)-75)):100;}\n";
htmltext=htmltext + "if(pos==\"center\"){myleft=(screen.width)?(screen.width-w)/2:100;mytop=(screen.height)?(screen.height-h)/2:100;}\n";
htmltext=htmltext + "else if((pos!=\'center\' && pos!=\"random\") || pos==null){myleft=0;mytop=20}\n";
htmltext=htmltext + "settings=\"width=\" + w + \",height=\" + h + \",top=\" + mytop + \",left=\" + myleft + \",scrollbars=" + scrollb + ",location=" + loc + ",directories=" + direc + ",status=" + statusb + ",menubar=" + menub + ",toolbar=" + toolb + ",resizable=" + resiz + "\";";
htmltext=htmltext + "win=window.open(mypage,myname,settings);\n";
htmltext=htmltext + winfocus + "}\n";
if(document.frm.txtDaystoPopup.value > 0){
  htmltext=htmltext + "// Cookie functions borrowed from:\n";
  htmltext=htmltext + "// Ronnie Moore: Visit him at http://www.ronniemoore.com";
  htmltext=htmltext + "\nfunction getFuture(f){\n";
  htmltext=htmltext + "var d = new Date();\n";
  htmltext=htmltext + "d.setTime(d.getTime() + (86400000 * f));\n";
  htmltext=htmltext + "return d;\n";
  htmltext=htmltext + "}\n";
  htmltext=htmltext + "\nfunction GetCookie (name) {\n";
  htmltext=htmltext + "var arg = name + \"=\";\n";
  htmltext=htmltext + "var alen = arg.length;\n";
  htmltext=htmltext + "var clen = document.cookie.length;\n";
  htmltext=htmltext + "var i = 0;\n";
  htmltext=htmltext + "while (i < clen) {\n";
  htmltext=htmltext + "  var j = i + alen;\n";
  htmltext=htmltext + "  if (document.cookie.substring(i, j) == arg)\n";
  htmltext=htmltext + "  return getCookieVal (j);\n";
  htmltext=htmltext + "  i = document.cookie.indexOf(\" \", i) + 1;\n";
  htmltext=htmltext + "  if (i == 0) break; \n";
  htmltext=htmltext + "  }\n";
  htmltext=htmltext + "  return null;\n";
  htmltext=htmltext + "  }\n";
  htmltext=htmltext + "\n";
  htmltext=htmltext + "function getCookieVal (offset) {\n";
  htmltext=htmltext + "var endstr = document.cookie.indexOf (\";\", offset);\n";
  htmltext=htmltext + "if (endstr == -1)\n";
  htmltext=htmltext + "  endstr = document.cookie.length;\n";
  htmltext=htmltext + "  return unescape(document.cookie.substring(offset, endstr));\n";
  htmltext=htmltext + "}\n";
  }
htmltext=htmltext + "// -->\n";
htmltext=htmltext + "<" + "/scr" + "ipt>";
document.frm.txtHTML.value=htmltext;



if(mylink=='standard')
{
 document.frm.txtLink.value="<a href=\"javascript:NewWindow('" + document.frm.txtPopupURL.value + "','" + document.frm.txtPopupname.value + "','" + mywidth + "','" + myheight + "','" + posval + "','" + infocus + "');\"" + mywinfocus + ">LinkText</a>";
}
if(mylink=='formbutton')
{
 document.frm.txtLink.value="<input type=\"button\" name=\"B1\" value=\"Click Me\" onClick=\"NewWindow('" + document.frm.txtPopupURL.value + "','" + document.frm.txtPopupname.value + "','" + mywidth + "','" + myheight + "','" + posval + "','" + infocus + "');\"" + mywinfocus + ">";

}
if(mylink=='formload')
{
 document.frm.txtLink.value="<body onLoad=\"NewWindow('" + document.frm.txtPopupURL.value + "','" + document.frm.txtPopupname.value + "','" + mywidth + "','" + myheight + "','" + posval + "','" + infocus + "');\"" + mywinfocus + ">";
}
if(mylink=='formunload')
{
 document.frm.txtLink.value="<body onUnload=\"NewWindow('" + document.frm.txtPopupURL.value + "','" + document.frm.txtPopupname.value + "','" + mywidth + "','" + myheight + "','" + posval + "','" + infocus + "');\"" + mywinfocus + ">";
}
 document.frm.btnTestpopup.enabled=true;
 }


 function TestWindow()
 {
 var mstr='';
  if(document.frm.txtHTML.value=='')
  {
    return;
  }
  else
  {
  var win=window.open(document.frm.txtPopupURL.value,document.frm.txtPopupname.value,settings);
  if(infocus=='front')
  {
   win.focus();
  }

  }
 }
 function customfullscreenmode()
 {
    document.frm.chkPopupsize.checked=false;
    document.frm.chkPosition.checked=false;
    document.frm.txtTop.enabled=false;
    document.frm.txtLeft.enabled=false;
    document.frm.txtWidth.enabled=false;
    document.frm.txtHeight.enabled=false;
 }

function customcenter()
{
    document.frm.chkPopupsize.checked=true;
    document.frm.chkPosition.checked=false;
    document.frm.txtTop.value='';
    document.frm.txtLeft.value='';
}

function customposition()
{
    document.frm.txtTop.enabled=true;
    document.frm.txtLeft.enabled=true;
}

function custompopupsize()
{
     document.frm.txtWidth.enabled=true;
     document.frm.txtHeight.enabled=true;
}

function customrandom()
{
     document.frm.chkPopupsize.checked=false;
     document.frm.chkPosition.checked=false;
}