function calcTotal()
{
	var unitCost = 14.00;

	// var costMP = 6.00;

	var shippingCost = 7.00;
	var runningTotal = 0.00;
	var USExchange = 1.00;
	var quantity = 0;
	var CanadianEquivalent;


	// quantity = parseInt(document.Order.QuantityDVD.value);
	quantity = document.Order.QuantitySelect.selectedIndex + 1;
	shippingCost = 5 + quantity;
	if (quantity > 1) {
	  unitCost = 12;
	  // shippingCost = 20;
	}

   if (quantity > 2) {
	  unitCost = 11;
	  // shippingCost = 20;
	}	
   if (quantity > 3) {
	  unitCost = 10;
	  // shippingCost = 20;
	}	
	if (quantity > 4) {
	  unitCost = 9;
	  // shippingCost = 20;
	}


	document.Order.TotalDVD.value = parseInt(quantity * unitCost); // GD Jan 11, 1999
	// document.Order.Exchange.value = alterError(USExchange);
	document.Order.Rate.value = parseInt(unitCost);
	document.Order.Shipping.value = parseInt(shippingCost);
	DVDRunningTotal = 0.00;
	DVDRunningTotal = parseFloat( document.Order.TotalDVD.value );
	// CanadianEquivalent = ((quantity * unitCost) + shippingCost) * USExchange;
	// document.Order.CanadianTotal.value = alterError(CanadianEquivalent);
	// document.Order.DVDTotal.value = alterError(DVDRunningTotal);
	runningTotal += parseFloat (DVDRunningTotal);
	// Added April 20, 2006 for PayPal.
	document.Order.quantity.value = quantity;
	// alert('Quantity = ' + document.Order.quantity.value);
	document.Order.amount.value = alterError(unitCost);
	document.Order.shipping.value = shippingCost;

    document.Order.GrandTotal.value = parseInt(runningTotal + shippingCost);

}

// alterError - fixes a rounding bug in Netscape 2
function alterError(value) {
	if (value<=0.99) {
		newPounds = '0';
	} else {
		newPounds = parseInt(value);
	}
	newPence = parseInt((value+.0008 - newPounds)* 100);
	if (eval(newPence) <= 9) newPence='0'+newPence;
	newString = newPounds + '.' + newPence;
	return (newString);
}