
// -------------------------
// coupon functions
// -------------------------

function COUP_formOnload(IsSaleOn)
{	
	//alert(IsSaleOn);
	if (IsSaleOn != "1") {
		// get previous coupon number
		document.frmPurchase.txtCoupon.value = COUP_getCoupon();
		//document.frmPurchase.txtCoupon.focus();
	}
	return; 
}

function COUP_keypress(event)
{	
	if (document.all){
		if (event.keyCode == 13){
			event.returnValue = false;
			event.cancel = true;
			document.frmPurchase.btnCoupon.click();
		}
	}
	return; 
}

function COUP_testCoupon()
{ 
	var sCoup = document.frmPurchase.txtCoupon.value;

	sCoup = sCoup.trim();

	if (sCoup=="")
	{
	   alert("Please enter a Coupon Number"); 
	   document.frmPurchase.txtCoupon.focus();
	   return;
	}

	// redirect back to coupon.asp for validation
	document.location = "coupon.asp?coupon="+sCoup;
	return; 
} 

// -------------------------
// download functions
// -------------------------

function DNLD_formOnload()
{
	var allcookies = document.cookie;
	//alert(allcookies);

	var pos = allcookies.indexOf("wwEmailAddress=");
	if (pos != -1) {
		var start = pos + 15;
		var end = allcookies.indexOf(";", start);
		if (end == -1) end = allcookies.length;
		//alert(end);
		var sEmail = allcookies.substring(start, end);
		sEmail = unescape(sEmail);
		document.frmDownload.txtEmail.value = sEmail;
	}
	document.frmDownload.txtEmail.focus();
	return; 
}

function DNLD_redirectX()
{
	// redirect download.htm to download.asp
	document.location = "aspfiles/download.asp";
	return; 
}

function DNLD_testEmail()
{ 
	var sEmail = document.frmDownload.txtEmail.value;
	sEmail = sEmail.trim();

	if (sEmail=="")
	{
	    alert("Please enter your email address"); 
		document.frmDownload.txtEmail.focus();
		return;
	}

	if (sEmail.indexOf("@") == -1)
	{
		alert("Invalid email address, please re-enter"); 
		document.frmDownload.txtEmail.focus();
		return;
	}

	// add cookie, if can
	if (navigator.cookieEnabled == true)
	{
		//alert("Please enable Cookies"); 
		//return;

		// delete old email
		var oldDate = new Date("01/01/1920");
		document.cookie = "wwEmailAddress=del;expires=" + oldDate.toGMTString();

		// add new email
		var nextyear = new Date();
		nextyear.setFullYear(nextyear.getFullYear()+1);
		//alert(nextyear.toGMTString());
		var sEmail2 = escape(sEmail);
		var sCookie = "wwEmailAddress=" + sEmail2;
		sCookie += ";expires=" + nextyear.toGMTString();
		document.cookie = sCookie;
	}

	// redirect user to eula
	document.location = "eula.asp";
	//window.open("eula.asp");
	return; 
} 

function DNLD_showCookieEmail()
{
	var allcookies = document.cookie;
	//alert(allcookies);
	var pos = allcookies.indexOf("wwEmailAddress=");
	if (pos != -1) {
		var start = pos + 15;
		var end = allcookies.indexOf(";", start);
		if (end == -1) end = allcookies.length;
		//alert(end);
		var sEmail = allcookies.substring(start, end);
		sEmail = unescape(sEmail);
		alert(sEmail);
	}
	else alert("Empty Cookie");
	return; 
}

// -------------------------
// eula functions
// -------------------------

function EULA_UserAgrees()
{ 
	var allcookies = document.cookie;
	//alert(allcookies);
	var sEmail = "";
	var pos = allcookies.indexOf("wwEmailAddress=");
	if (pos != -1) {
		var start = pos + 15;
		var end = allcookies.indexOf(";", start);
		if (end == -1) end = allcookies.length;
		sEmail = allcookies.substring(start, end);
		sEmail = unescape(sEmail);
	}
	
	// disable buttons
	//document.all("btnAgree").disabled=true;
	//document.all("btnDisagree").disabled=true;
	//document.all("btnAgree").className = "clsNotVisible";
	//document.all("btnDisagree").className = "clsNotVisible";
	//document.all("btnDownload").className = "clsVisible";

	// add to database & download setup (see download.asp)
	//alert("email=" + sEmail);

	// now start download
//	document.forms(0).action = "wwDownload.asp?email=" + sEmail;
//	document.forms(0).submit();

	// now start download
	document.agrees.action = "wwDownload.asp?email=" + sEmail;
	document.agrees.submit();
	return; 
} 

function EULA_UserDisagrees()
{ 
	// redirect user back to download
	document.location = "download.asp";
	return; 
} 

// -------------------------
// order functions
// -------------------------

function ORDR_formOnload(sAction)
{ 
	var wwLoc = "";
	var wwsLoc = "";

	// production website locations
//	wwLoc = "http://www.writewaypro.com/new/";
//	wwsLoc = "http://www.writewaypro.com/new/";
	wwLoc = "http://www.writewaypro.com/";
	wwsLoc = "http://www.writewaypro.com/";

	// set PayPal variables
	document.frmOrder.business.value = "sales@writewaypro.com";
//	document.frmOrder("return").value = wwLoc + "aspfiles/thankyou.asp";
	document.getElementById("return").value = wwLoc + "aspfiles/thankyou.asp";
	document.frmOrder.cancel_return.value = wwLoc + "cancelled.html";
	document.frmOrder.image_url.value = wwLoc + "images/wwPayPal.gif";
	document.frmOrder.notify_url.value = wwsLoc + "aspfiles/wwPurchase.asp";

	if (sAction == "ShipTo") {
		document.frmOrder.ww__payer_email.focus();
	}
	return; 
}

function ORDR_redirect(sOption)
{
	// test order option
	if (sOption == "ShipTo") {
		// test shipto fields
		if (ORDR_TestShipTo() == false) return false;
		// submit form to update shipping info
		document.frmOrder.ww__Routing.value = "updated";
		document.frmOrder.method = "POST";
		document.frmOrder.action = "wwShipUpdate.asp"
		document.frmOrder.submit();
		return; 
	}

	// submit form to PayPal
	var sRouting = document.frmOrder.ww__Routing.value;
	document.frmOrder.method = "POST";
	document.frmOrder.action = sRouting;
	document.frmOrder.submit();
	return; 
} 

function ORDR_TestShipTo()
{ 
	if (document.frmOrder.ww__giftOption.checked == true) {
		var sGEmail = document.frmOrder.ww__gift_email.value;
		sGEmail = sGEmail.trim();
		if (sGEmail=="") {
			alert("Please enter recipient's Email"); 
			document.frmOrder.ww__gift_email.focus();
			return false;
		}
		if (Test_Email(sGEmail) == false) {
			alert("Recipient's Email is not valid"); 
			document.frmOrder.ww__gift_email.focus();
			return false;
		}
		var sGFName = document.frmOrder.ww__gift_first.value;
		sGFName = sGFName.trim();
		if (sGFName=="") {
			alert("Please enter recipient's First Name"); 
			document.frmOrder.ww__gift_first.focus();
			return false;
		}
		var sGLName = document.frmOrder.ww__gift_last.value;
		sGLName = sGLName.trim();
		if (sGLName=="") {
			alert("Please enter recipient's Last Name"); 
			document.frmOrder.ww__gift_last.focus();
			return false;
		}
	}

	var sEmail = document.frmOrder.ww__payer_email.value;
	sEmail = sEmail.trim();
	if (sEmail=="") {
	    alert("Please enter your Email"); 
		document.frmOrder.ww__payer_email.focus();
		return false;
	}
	if (Test_Email(sEmail) == false) {
		alert("Your Email is not valid"); 
		document.frmOrder.ww__payer_email.focus();
		return false;
	}
	var sFName = document.frmOrder.ww__first_name.value;
	sFName = sFName.trim();
	if (sFName=="") {
	    alert("Please enter your First Name"); 
		document.frmOrder.ww__first_name.focus();
		return false;
	}
	var sLName = document.frmOrder.ww__last_name.value;
	sLName = sLName.trim();
	if (sLName=="") {
	    alert("Please enter your Last Name"); 
		document.frmOrder.ww__last_name.focus();
		return false;
	}
	var sAddr1 = document.frmOrder.ww__address_street.value;
	sAddr1 = sAddr1.trim();
	if (sAddr1=="") {
	    alert("Please enter your Street"); 
		document.frmOrder.ww__address_street.focus();
		return false;
	}
	var sAddr2 = document.frmOrder.ww__address_street2.value;
	sAddr2 = sAddr2.trim();

	var sCity = document.frmOrder.ww__address_city.value;
	sCity = sCity.trim();
	if (sCity=="") {
	    alert("Please enter your City"); 
		document.frmOrder.ww__address_city.focus();
		return false;
	}
	var sState = document.frmOrder.ww__address_state.value;
	sState = sState.trim();
	if (sState=="") {
	    alert("Please enter your State"); 
		document.frmOrder.ww__address_state.focus();
		return false;
	}
	var sZip = document.frmOrder.ww__address_zip.value;
	sZip = sZip.trim();
	if (sZip=="") {
	    alert("Please enter your Zip"); 
		document.frmOrder.ww__address_zip.focus();
		return false;
	}
	var sCountry = document.frmOrder.ww__address_country.value;
	sCountry = sCountry.trim();
	if (sCountry=="") {
	    alert("Please enter your Country"); 
		document.frmOrder.ww__address_country.focus();
		return false;
	}
	var sPhone = document.frmOrder.ww__phone.value;
	sPhone = sPhone.trim();

	var sMsg = "";
	if (document.frmOrder.ww__giftOption.checked == true) {
		sMsg += sGEmail + "\n";;
		sMsg += sGFName + "\n";
		sMsg += sGLName + "\n";
		sMsg += "\n";
	}
	sMsg += sEmail + "\n";;
	sMsg += sFName + "\n";
	sMsg += sLName + "\n";
	sMsg += sAddr1 + "\n";
	sMsg += sAddr2 + "\n";
	sMsg += sCity + "\n";
	sMsg += sState + "\n";
	sMsg += sZip + "\n";
	sMsg += sCountry + "\n";
	sMsg += sPhone + "\n";
	sMsg += "\nIs the above information correct?";
	var bConfirmed = window.confirm(sMsg)
	if (bConfirmed == false) return false;

	return true; 
} 

// -------------------------
// purchase functions
// -------------------------

function PURC_formOnload(sWho)
{ 
	PURC_SetProduct("p", sWho);
	return; 
} 

function PURC_SetProduct(sProduct, sWho)
{ 
	var sIsCD = "";
	var sProd = "";
	var sName = "";
	var sItem = "";
	var sRelNo = "";
	var nPrice = 0;

	sProd = sProduct;
	//alert("sProd=" + sProd + ", sWho=" + sWho);

	sRelNo = document.frmPurchase.ww__RelNo.value;
	//alert(">"+sRelNo+"<");

	if (sProd.substr(0,1) == "c") {
		sIsCD = "CD";
		sProd = sProd.substr(1,1);
	}

	// CD shipping warning, if needed
	if (sIsCD == "CD") {
		var IsCDwarning = document.frmPurchase.IsCDwarning.value;
		if (IsCDwarning == "1") {
			alert("Note: Our office will be close for two weeks. CD orders will not ship until June 24th, 2010.");
		}
	}

	if (sProd == "s") {
		sName = "Standard";
		sItem = "S" + sRelNo;
		nPrice = 29.00;
	}
	else if (sProd == "u") {
		sName = "Upgrade to Professional";
		sItem = "U" + sRelNo;
		nPrice = 35.00;
	}
	else {
		sName = "Professional";
		sItem = "P" + sRelNo;
		nPrice = 59.00;
	}
	
	// apply discount, if needed
	if (sWho == "wo") {
		nPrice = nPrice * .60;
	}

	// apply CD, if needed
	if (sIsCD == "CD") {
		sName = sName + " CD-ROM";
		sItem = sItem + "CD";
		nPrice = nPrice + 9;
	}

	// finish 
	sName = "WriteWay " + sName + " Edition";

	//alert("sProd=" + sProd + ", sName=" + sName + ", sItem=" + sItem + ", nPrice=" + nPrice);
	
	// set fields
	document.frmPurchase.item_name.value = sName;
	document.frmPurchase.item_number.value = sItem;
	document.frmPurchase.amount.value = nPrice;
	return; 
} 

function PURC_Buy_Show()
{
	var sCtl1 = "JOHNDREAMSZ";
	var sCtl2 = "WRITEONGALS";
	var sCoupon = "";
	var sParms = "";

	var sCoupon = document.frmPurchase.ww__Coupon.value;
	var sRelNo = document.frmPurchase.ww__ShowRelNo.value;
	//alert("RelNo= " + sRelNo);
	var sItem = document.frmPurchase.item_number.value;
	var sAmt = document.frmPurchase.amount.value;
	//alert(sItem + " " + sAmt);

	// get amt positions
	sAmt = sAmt.substr(0,2);
	var sPos = sAmt.substr(0,1);
	var nPos1 = parseInt(sPos);
	sPos = sAmt.substr(1,1);
	var nPos2 = parseInt(sPos);
	var nPos3 = nPos1 + nPos2;
	//alert(nPos1+"-"+nPos2+"-"+nPos3+"-"+sCtl2.charAt(nPos3)+sCtl2.charAt(nPos2)+sCtl1.charAt(nPos1)+sCtl1.charAt(nPos3));
	if (nPos3 > 10) nPos3 = nPos3 - 10;
	// build price parm
	var sAmtX = sCtl2.charAt(nPos3) + sCtl2.charAt(nPos2) + sCtl1.charAt(nPos1) + sCtl1.charAt(nPos3);

	sParms = "item=" + sRelNo + ";" + sItem + ";";
	sParms = sParms + sAmtX + "&coupon=" + sCoupon;
	//alert(sParms);
	//return;

	// open new window for order.asp
	var newWindow = window.open("order.asp?"+sParms, "wwOrder", "status=no,toolbar=no,menubar=no,location=no,resizable=yes,scrollbars=yes,fullscreen=no", false);
	newWindow.focus();
	return; 
}

function PURC_CCMO_Show()
{
	// redirect purchase.asp to purchccmo.asp
	document.location = "purchccmo.asp";
	return; 
}

function PURC_Coupon_Show()
{
	// redirect purchase.asp to coupon.asp
	document.location = "coupon.asp";
	return; 
}

// -------------------------
// general functions
// -------------------------

function Get_Header(sType, sAnchor)
{
	var sHTML = "";
	var sLoc = "";
	var sLoc2 = "aspfiles/";
	
	if (sType == "asp") {
		sLoc="../";
		sLoc2="";
	}
    sHTML+='<TABLE class=hdrTable BORDER="0" LEFTMARGIN="0" CELLSPACING="0" CELLPADDING="0">';
    sHTML+='  <TR><TD>&nbsp;</TD></TR>';
    sHTML+='  <TR>';
	sHTML+='    <TD>&nbsp;';
	if (sAnchor == "n") {
		sHTML+='      <IMG SRC="'+sLoc+'images/ww_logo.jpg" WIDTH="209" HEIGHT="47" ALIGN="BOTTOM" BORDER="0" NATURALSIZEFLAG="3">';
	}
	else {
		if (sType == "asp") {
			sHTML+='      <A href="../index.html"><IMG SRC="'+sLoc+'images/ww_logo.jpg" WIDTH="209" HEIGHT="47" ALIGN="BOTTOM" BORDER="0" NATURALSIZEFLAG="3"></A>';
		}
		else {
			sHTML+='      <A href="index.html"><IMG SRC="'+sLoc+'images/ww_logo.jpg" WIDTH="209" HEIGHT="47" ALIGN="BOTTOM" BORDER="0" NATURALSIZEFLAG="3"></A>';
		}
	}
    sHTML+='    </TD>';
    sHTML+='    <TD ALIGN=RIGHT><B>From concept and characters, through completed manuscript . . .';
    sHTML+='      <BR>do it all -- the WriteWay!</B>';
    sHTML+='    </TD>';
    sHTML+='    <TD>&nbsp;&nbsp;</TD>';
    sHTML+='  </TR>';
    sHTML+='  <TR>';
    sHTML+='    <TD BGCOLOR="#004a73">&nbsp;</TD>';
    sHTML+='  </TR>';
    sHTML+='</TABLE>';
	return sHTML; 
}

function Get_Menu(sType)
{
	var sHTML = "";
	var sHLoc = "";
	var sALoc = "";
	var sColorOver = "'#669ACC'";
	var sColorOut = "'#000040'";
	
	if (sType == "asp") {
		sHLoc="../";
		sALoc="";
	}
	else {
		sHLoc="";
		sALoc="aspfiles/";
	}

	// build menu separator line
    sHTML+='<TABLE class=sepTable BORDER="0" LEFTMARGIN="0" CELLSPACING="0" CELLPADDING="0">';
    sHTML+='  <TBODY><TR><TD></TD></TR></TBODY>';
    sHTML+='</TABLE>';

	// build menu
    sHTML+='<TABLE class=menuTable cellSpacing=0 cellPadding=0 border=0>';
    sHTML+='  <TBODY>';
    sHTML+='    <TR>';
    sHTML+='      <TD>';
    sHTML+='        <TABLE class=menuTableLvl1 cellSpacing=0 cellPadding=0 border=0>';
    sHTML+='          <TBODY>';
    sHTML+='          <TR>';
    sHTML+='            <TD></TD>';
    sHTML+='            <TD align=right>';
    sHTML+='              <TABLE class=menuTableLvl2 cellSpacing=0 cellPadding=0 border=0>';
    sHTML+='                <TBODY>';
    sHTML+='                <TR>';
    sHTML+='                  <TD class=menuTableItem ';
    sHTML+='                    onmouseover="this.style.background='+sColorOver+'" ';
    sHTML+='                    onmouseout="this.style.background='+sColorOut+'">';
    sHTML+='                    <TABLE class=menuTableLvl3 cellSpacing=0 cellPadding=0 border=0>';
    sHTML+='                      <TBODY>';
    sHTML+='                      <TR>';
    sHTML+='                        <TD><NOBR><A class=menuTableText title="Product Information" href="'+sHLoc+'productinfo.html">PRODUCT INFO</A></NOBR>';
    sHTML+='                        </TD>';
    sHTML+='                      </TR>';
    sHTML+='                      </TBODY>';
    sHTML+='                    </TABLE>';
    sHTML+='                  </TD>';
    sHTML+='                  <TD class=menuTableItem ';
    sHTML+='                    onmouseover="this.style.background='+sColorOver+'" ';
    sHTML+='                    onmouseout="this.style.background='+sColorOut+'">';
    sHTML+='                    <TABLE class=menuTableLvl3 cellSpacing=0 cellPadding=0 border=0>';
    sHTML+='                      <TBODY>';
    sHTML+='                      <TR>';
    sHTML+='                        <TD><NOBR><A class=menuTableText title="Download WriteWay" href="'+sALoc+'download.asp">DOWNLOAD</A></NOBR>';
    sHTML+='                        </TD>';
    sHTML+='                      </TR>';
    sHTML+='                      </TBODY>';
    sHTML+='                    </TABLE>';
    sHTML+='                  </TD>';
    sHTML+='                  <TD class=menuTableItem ';
    sHTML+='                    onmouseover="this.style.background='+sColorOver+'" ';
    sHTML+='                    onmouseout="this.style.background='+sColorOut+'">';
    sHTML+='                    <TABLE class=menuTableLvl3 cellSpacing=0 cellPadding=0 border=0>';
    sHTML+='                      <TBODY>';
    sHTML+='                      <TR>';
    sHTML+='                        <TD><NOBR><A class=menuTableText title="Purchase WriteWay" href="'+sALoc+'purchase.asp">PURCHASE</A></NOBR>';
    sHTML+='                        </TD>';
    sHTML+='                      </TR>';
    sHTML+='                      </TBODY>';
    sHTML+='                    </TABLE>';
    sHTML+='                  </TD>';
    sHTML+='                  <TD class=menuTableItem ';
    sHTML+='                    onmouseover="this.style.background='+sColorOver+'" ';
    sHTML+='                    onmouseout="this.style.background='+sColorOut+'">';
    sHTML+='                    <TABLE class=menuTableLvl3 cellSpacing=0 cellPadding=0 border=0>';
    sHTML+='                      <TBODY>';
    sHTML+='                      <TR>';
    sHTML+='                        <TD><NOBR><A class=menuTableText title="WriteWay Testimonials" href="'+sHLoc+'testimonials.html">TESTIMONIALS</A></NOBR>';
    sHTML+='                        </TD>';
    sHTML+='                      </TR>';
    sHTML+='                      </TBODY>';
    sHTML+='                    </TABLE>';
    sHTML+='                  </TD>';
    sHTML+='                  <TD class=menuTableItem ';
    sHTML+='                    onmouseover="this.style.background='+sColorOver+'" ';
    sHTML+='                    onmouseout="this.style.background='+sColorOut+'">';
    sHTML+='                    <TABLE class=menuTableLvl3 cellSpacing=0 cellPadding=0 border=0>';
    sHTML+='                      <TBODY>';
    sHTML+='                      <TR>';
    sHTML+='                        <TD><NOBR><A class=menuTableText title="Frequently Asked Questions" href="'+sHLoc+'faq.html">FAQs</A></NOBR>';
    sHTML+='                        </TD>';
    sHTML+='                      </TR>';
    sHTML+='                      </TBODY>';
    sHTML+='                    </TABLE>';
    sHTML+='                  </TD>';
    sHTML+='                  <TD class=menuTableItem ';
    sHTML+='                    onmouseover="this.style.background='+sColorOver+'" ';
    sHTML+='                    onmouseout="this.style.background='+sColorOut+'">';
    sHTML+='                    <TABLE class=menuTableLvl3 cellSpacing=0 cellPadding=0 border=0>';
    sHTML+='                      <TBODY>';
    sHTML+='                      <TR>';
    sHTML+='                        <TD><NOBR><A class=menuTableText title="Writers Resources & Links" href="'+sHLoc+'resources.html">WRITERS&#39; RESOURCES</A></NOBR>';
    sHTML+='                        </TD>';
    sHTML+='                      </TR>';
    sHTML+='                      </TBODY>';
    sHTML+='                    </TABLE>';
    sHTML+='                  </TD>';
    sHTML+='                  <TD width="150px" class=menuTableItem> ';
    sHTML+='                    <TABLE class=menuTableLvl3 cellSpacing=0 cellPadding=0 border=0>';
    sHTML+='                      <TBODY>';
    sHTML+='                      <TR>';
    sHTML+='                        <TD>';
    sHTML+='                        <NOBR><A class=menuTableText>&nbsp;</NOBR>';
    sHTML+='                        </TD>';
    sHTML+='                      </TR>';
    sHTML+='                      </TBODY>';
    sHTML+='                    </TABLE>';
    sHTML+='                  </TD>';
    sHTML+='                  <TD class=menuTableItem ';
    sHTML+='                    onmouseover="this.style.background='+sColorOver+'" ';
    sHTML+='                    onmouseout="this.style.background='+sColorOut+'">';
    sHTML+='                    <TABLE class=menuTableLvl3 cellSpacing=0 cellPadding=0 border=0>';
    sHTML+='                      <TBODY>';
    sHTML+='                      <TR>';
    sHTML+='                        <TD><NOBR><A class=menuTableText title="About Us" href="'+sHLoc+'about.html">ABOUT US</A></NOBR>';
    sHTML+='                        </TD>';
    sHTML+='                      </TR>';
    sHTML+='                      </TBODY>';
    sHTML+='                    </TABLE>';
    sHTML+='                  </TD>';
    sHTML+='                  <TD class=menuTableItem ';
    sHTML+='                    onmouseover="this.style.background='+sColorOver+'" ';
    sHTML+='                    onmouseout="this.style.background='+sColorOut+'">';
    sHTML+='                    <TABLE class=menuTableLvl3 cellSpacing=0 cellPadding=0 border=0>';
    sHTML+='                      <TBODY>';
    sHTML+='                      <TR>';
    sHTML+='                        <TD><NOBR><A class=menuTableText title="Contact Us" href="mailto:contact@writewaypro.com">CONTACT</A></NOBR>';
    sHTML+='                        </TD>';
    sHTML+='                      </TR>';
    sHTML+='                      </TBODY>';
    sHTML+='                    </TABLE>';
    sHTML+='                  </TD>';
    sHTML+='                </TR>';
    sHTML+='                </TBODY>';
    sHTML+='              </TABLE>';
    sHTML+='            </TD>';
    sHTML+='          </TR>';
    sHTML+='        </TBODY>';
    sHTML+='      </TABLE>';
    sHTML+='    </TD>';
    sHTML+='  </TR>';
    sHTML+='  </TBODY>';
    sHTML+='</TABLE>';

	// build menu separator line
    sHTML+='<TABLE class=sepTable BORDER="0" LEFTMARGIN="0" CELLSPACING="0" CELLPADDING="0">';
    sHTML+='  <TBODY><TR WIDTH="1">';
    sHTML+='    <TD WIDTH="1" BGCOLOR=#004a73></TD>';
    sHTML+='    <TD BGCOLOR=white>&nbsp;</TD>';
    sHTML+='    <TD WIDTH="1" BGCOLOR=#004a73></TD>';
    sHTML+='  </TR></TBODY>';
    sHTML+='</TABLE>';

	// return menu
	return sHTML; 
}

function Get_PayPalLoc()
{ 
	var sLoc = "" + document.location;
	sLoc = sLoc.substr(0,17);
	//alert(sLoc);

	if (sLoc == "http://localhost/") {
		// ============ test mode ============
		return "xxTest_PayPal-IPN.asp";
	}
	else {
		// ============ production ============
		return "https://www.paypal.com/cgi-bin/webscr";
	}
} 

function Test_Email(sEmail)
{    
	if (sEmail.indexOf("@") == -1) {
		return false; 
	}
	else if (sEmail.indexOf(".") == -1) {
		return false; 
	}
	else {
		return true; 
	}
} 

function Open_NewWindow(sURL)
{
	var newWindow = window.open(sURL, "NewWindow", "menubar,toolbar,location,status,resizable,scrollbars,fullscreen=0", true);
	newWindow.focus();
	return; 
}

// -------------------------
// user String functions
// -------------------------

// String.rtrim()
String.prototype.rtrim=function()
{
   var whitespace = new String(" \t\n\r");
   var s = this.valueOf();
   if (whitespace.indexOf(s.charAt(s.length-1)) != -1)
   {
      var i = s.length - 1;      
      while (i >= 0 && whitespace.indexOf(s.charAt(i)) != -1)
         i--;
      s = s.substring(0, i+1);
   }
   return s;
}

// String.ltrim()
String.prototype.ltrim=function()
{
   var whitespace = new String(" \t\n\r");
   var s = this.valueOf();
   if (whitespace.indexOf(s.charAt(0)) != -1) 
   {
      var j=0, i = s.length;
      while (j < i && whitespace.indexOf(s.charAt(j)) != -1)
         j++;
      s = s.substring(j, i);
   }
   return s;
}

// String.trim()
String.prototype.trim=function()
{
	var s = this.valueOf();
	return s.rtrim().ltrim();
}
