//*******************************************
//DO NOT REMOVE THIS COPYWRITE INFO!
//1031 Exchange Calculator
//2004 Daniel C. Peterson ALL RIGHTS RESERVED
//Created: 11/16/2004
//Last Modified: 11/16/2004
//This script may not be copied, edited, distributed or reproduced
//without express written permission from
//Daniel C. Peterson of Web Winder Website Services
//For commercial use rates, contact:
//Dan Peterson:
//Web Winder Website Services
//P.O. Box 11
//Bemidji, MN  56619
//dan@webwinder.com
//http://www.webwinder.com
//Commercial User Licence #:5782-1237-138-1198
//Commercial Licence Date:2008-09-11
//*******************************************



function stripNum(num) {

   num=num.toString();


   var len = num.length;
   var rnum = "";
   var test = "";
   var j = 0;

   var b = num.substring(0,1);
   if(b == "-") {
      rnum = "-";
   }

   for(i = 0; i <= len; i++) {

      b = num.substring(i,i+1);

      if(b == "0" || b == "1" || b == "2" || b == "3" || b == "4" || b == "5" || b == "6" || b == "7" || b == "8" || b == "9" || b == ".") {
         rnum = rnum + "" + b;

      }

   }

   if(rnum == "" || rnum == "-") {
      rnum = 0;
   }

   rnum = Number(rnum);

   return rnum;

}



function formatNumberDec(num, places, comma) {

var isNeg=0;

    if(num < 0) {
       num=num*-1;
       isNeg=1;
    }

    var myDecFact = 1;
    var myPlaces = 0;
    var myZeros = "";
    while(myPlaces < places) {
       myDecFact = myDecFact * 10;
       myPlaces = eval(myPlaces) + eval(1);
       myZeros = myZeros + "0";
    }
    
	onum=Math.round(num*myDecFact)/myDecFact;
		
	integer=Math.floor(onum);

	if (Math.ceil(onum) == integer) {
		decimal=myZeros;
	} else{
		decimal=Math.round((onum-integer)* myDecFact)
	}
	decimal=decimal.toString();
	if (decimal.length<places) {
        fillZeroes = places - decimal.length;
	   for (z=0;z<fillZeroes;z++) {
        decimal="0"+decimal;
        }
     }

   if(places > 0) {
      decimal = "." + decimal;
   }

   if(comma == 1) {
	integer=integer.toString();
	var tmpnum="";
	var tmpinteger="";
	var y=0;

	for (x=integer.length;x>0;x--) {
		tmpnum=tmpnum+integer.charAt(x-1);
		y=y+1;
		if (y==3 & x>1) {
			tmpnum=tmpnum+",";
			y=0;
		}
	}

	for (x=tmpnum.length;x>0;x--) {
		tmpinteger=tmpinteger+tmpnum.charAt(x-1);
	}


	finNum=tmpinteger+""+decimal;
   } else {
      finNum=integer+""+decimal;
   }

    if(isNeg == 1) {
       finNum = "-" + finNum;
    }

	return finNum;
}


function computeForm(form) {
if(form.purchase.value.length == 0 || form.purchase.value == 0) {
   alert("Please enter the original purchase price of the property.");
   form.purchase.focus();
} else
if(form.sale_price.value.length == 0) {
   alert("Please the selling price of the property.");
   form.sale_price.focus();
} else
if(form.fed_rate.value.length == 0 || form.fed_rate.value == 0) {
   alert("Please enter the federal capital gain tax rate percentage.");
   form.fed_rate.focus();
} else
if(form.state_rate.value.length == 0 || form.state_rate.value == 0) {
   alert("Please enter the state capital gain tax rate percentage.");
   form.state_rate.focus();
} else {

var Vpurchase = stripNum(form.purchase.value);
var Vimprove = stripNum(form.improve.value);
var Vdeprec = stripNum(form.deprec.value);
var Vsale_price = stripNum(form.sale_price.value);
var Vexpenses = stripNum(form.expenses.value);
var Vfed_rate = stripNum(form.fed_rate.value);
var Vstate_rate = stripNum(form.state_rate.value);
var Vloan_bal = stripNum(form.loan_bal.value);

var Vnab = eval(Vpurchase) + eval(Vimprove) - eval(Vdeprec);
form.nab.value = "$" + formatNumberDec(Vnab,2,1);

Vcap_gain = eval(Vsale_price) - eval(Vnab) - eval(Vexpenses);
form.cap_gain.value = "$" + formatNumberDec(Vcap_gain,2,1);

Vrecap = Vdeprec * .25;
form.recap.value = "$" + formatNumberDec(Vrecap,2,1);

if(Vfed_rate >= 1) {
   Vfed_rate /= 100;
}
Vfed_tax = (eval(Vcap_gain) - eval(Vdeprec)) * Vfed_rate;
form.fed_tax.value = "$" + formatNumberDec(Vfed_tax,2,1);

if(Vstate_rate >= 1) {
   Vstate_rate /= 100;
}
Vstate_tax = Vcap_gain * Vstate_rate;
form.state_tax.value = "$" + formatNumberDec(Vstate_tax,2,1);

Vtotal_tax = eval(Vrecap) + eval(Vfed_tax) + eval(Vstate_tax);
form.total_tax.value = "$" + formatNumberDec(Vtotal_tax,2,1);

Vgross = eval(Vsale_price) - eval(Vexpenses) - eval(Vloan_bal);
form.gross.value = "$" + formatNumberDec(Vgross,2,1);

Vnet = eval(Vgross) - eval(Vtotal_tax);
form.net.value = "$" + formatNumberDec(Vnet,2,1);

Vsale_equity = Vnet * 4;
form.sale_equity.value = "$" + formatNumberDec(Vsale_equity,2,1);

Vexchange_equity = Vgross * 4;
form.exchange_equity.value = "$" + formatNumberDec(Vexchange_equity,2,1);

   }
}

function clearResults(form) {

form.nab.value = "";
form.cap_gain.value = "";
form.recap.value = "";
form.fed_tax.value = "";
form.state_tax.value = "";
form.total_tax.value = "";
form.gross.value = "";
form.net.value = "";
form.sale_equity.value = "";
form.exchange_equity.value = "";
}