<!-- Comma function by:  Martin Webb, http://www.irt.org -->

function Comma(number) {
number = '' + number;
if (number.length > 3) {
var mod = number.length % 3;
var output = (mod > 0 ? (number.substring(0,mod)) : '');
for (i=0 ; i < Math.floor(number.length / 3); i++) {
if ((mod == 0) && (i == 0))
output += number.substring(mod+ 3 * i, mod + 3 * i + 3);
else
output+= ',' + number.substring(mod + 3 * i, mod + 3 * i + 3);
}
return (output);
}
else return number;
}

function results(){

var fleet = parseFloat(calc.fleet.value);
var mpy = parseFloat(calc.mpy.value);
var mpg = parseFloat(calc.mpg.value);
var fcg = parseFloat(calc.fcg.value);
var ccg = parseFloat(calc.ccg.value);
var gmi = parseFloat(calc.gmi.value);

if(fleet == ''){alert('Vehicles in Fleet must be entered.');calc.fleet.focus();return false;}
if(mpy == ''){alert('Miles per Year must be entered.');calc.mpy.focus();return false;}
if(mpg == ''){alert('Miles per Gallon must be entered.');calc.mpg.focus();return false;}
if(fcg == ''){alert('Fuel Cost per Gallon must be entered.');calc.fcg.focus();return false;}
if(ccg == ''){alert('Centron Cost per Gallon must be entered.');calc.ccg.focus();return false;}
if(gmi == ''){alert('Gross mileage increase must be entered.');calc.gmi.focus();return false;}

var gmiv = gmi/100;

var gpyv = (fleet*mpy) / mpg;
var afcv = gpyv*fcg;
var accv = ccg*gpyv;
var nasv = (afcv*gmiv) - accv;
var roiv = nasv/accv;
var cpmv = nasv / (fleet*mpy);
var minv = ccg/fcg;
var roiv2 = roiv*100;
var minv2 = minv*100;
var rcfv = gpyv / 100;

calc.gpy.value = Comma(Math.round(gpyv));
calc.afc.value = '$' + Comma(Math.round(afcv));
calc.acc.value = '$' + Comma(Math.round(accv));
calc.nas.value = '$' + Comma(Math.round(nasv));
calc.roi.value = Comma(Math.round(roiv2)) + '%';
calc.cpm.value = '$' + Math.round(cpmv*100)/100;
calc.min.value = Math.round(minv2*100)/100 + '%';
calc.rcf.value = Comma(Math.round(rcfv));

return false;
}