var prAUD=25;
var prNZD=30;
var prUSD=23;
var prEUR=16;
var prGBP=11;

function changeCurr(curr) { 
// Change currency:
// auto set other currencies to use credit card, set discount and price, re-calculate totals
var pb=curr.form.pay_by;
var pr=curr.form.price;
var qty=curr.form.quantity;
var caltot=curr.form.calendar_total;
var disc=curr.form.discount;
var disctot=curr.form.discount_total;
var subtot=curr.form.subtotal;

  if (curr.value!="AUD") {
	pb.value="card";
	disc.value=0;
  }
  else if (pb.value=="bank") {
	disc.value=10;
  }

  switch (curr.value) {
    case "AUD":
	pr.value=prAUD;
	reCalcTots(pr,qty,caltot,disc,disctot,subtot);
	break;
    case "NZD":
	pr.value=prNZD;
	reCalcTots(pr,qty,caltot,disc,disctot,subtot);
	break;
    case "USD":
	pr.value=prUSD;
	reCalcTots(pr,qty,caltot,disc,disctot,subtot);
	break;
    case "EUR":
	pr.value=prEUR;
	reCalcTots(pr,qty,caltot,disc,disctot,subtot);
	break;
    case "GBP":
	pr.value=prGBP;
	reCalcTots(pr,qty,caltot,disc,disctot,subtot);
	break;
  }
}

function reCalcTots(pr,qty,caltot,disc,disctot,subtot) {
	caltot.value=pr.value*qty.value;
	disctot.value=disc.value*caltot.value/100;
	subtot.value=caltot.value-disctot.value;
}

function changePay_by(pb) {
// Change pay by method: bank or card
// check currency, set discount, re-calculate totals
var curr=pb.form.currency;
var caltot=pb.form.calendar_total;
var disc=pb.form.discount;
var disctot=pb.form.discount_total;
var subtot=pb.form.subtotal;

  if (pb.value=="bank") {
    if (curr.value!="AUD") {
	alert("Bank deposit accepted in AUD only");
	pb.value="card";
    }
    else {
	disc.value=10;
	disctot.value=disc.value*caltot.value/100;
	subtot.value=caltot.value-disctot.value;
    }
  }

  if ((pb.value=="card")&&(curr.value=="AUD")) {
	disc.value=0;
	disctot.value=0;
	subtot.value=caltot.value;
  }
}

function changeQty(qty) {
// Change quantity
// re-calculate totals
var pr=qty.form.price;
var caltot=qty.form.calendar_total;
var disc=qty.form.discount;
var disctot=qty.form.discount_total;
var subtot=qty.form.subtotal;

	reCalcTots(pr,qty,caltot,disc,disctot,subtot);
}