<!-- Author: Brian Mackenzie -->
<!-- Date: 21st April 2005 -->
<!-- Version: 1.0 -->
<!-- Function:  calculate results from TEOSQ -->
<!-- Required by: teosq.htm -->
<!-- Copyright Brian Mackenzie 2005 -->

function calculate()
{
  var q1 = document.stride.q1.value;
  var q2 = document.stride.q2.value; 
  var q3 = document.stride.q3.value;
  var q4 = document.stride.q4.value;
  var q5 = document.stride.q5.value;
  var q6 = document.stride.q6.value;
  var q7 = document.stride.q7.value;
  var q8 = document.stride.q8.value;
  var q9 = document.stride.q9.value;
  var q10 = document.stride.q10.value;
  var q11 = document.stride.q11.value;
  var q12 = document.stride.q12.value;
  var q13 = document.stride.q13.value;

  q1 = q1 * 1;
  q2 = q2 * 1;
  q3 = q3 * 1;
  q4 = q4 * 1;
  q5 = q5 * 1;
  q6 = q6 * 1;
  q7 = q7 * 1;
  q8 = q8 * 1;
  q9 = q9 * 1;
  q10 = q10 * 1;
  q11 = q11 * 1;
  q12 = q12 * 1;
  q13 = q13 * 1;
 
  if (q1>5) q1=5;
  if (q2>5) q2=5;
  if (q3>5) q3=5;
  if (q4>5) q4=5;
  if (q5>5) q5=5;
  if (q6>5) q6=5;
  if (q7>5) q7=5;
  if (q8>5) q8=5;
  if (q9>5) q9=5;
  if (q10>5) q10=5;
  if (q11>5) q11=5;
  if (q12>5) q12=5;
  if (q13>5) q13=5;

  if (q1==0) q1=1;
  if (q2==0) q2=1;
  if (q3==0) q3=1;
  if (q4==0) q4=1;
  if (q5==0) q5=1;
  if (q6==0) q6=1;
  if (q7==0) q7=1;
  if (q8==0) q8=1;
  if (q9==0) q9=1;
  if (q10==0) q10=1;
  if (q11==0) q11=1;
  if (q12==0) q12=1;
  if (q13==0) q13=1;

  r1 = (q1 + q3 + q4 + q6 + q9 + q11) / 6;
  r2 = (q2 + q5 + q7 + q8 + q10 + q12 + q13) / 7;

  document.stride.r1.value = nt2dp(r1,1);
  document.stride.r2.value = nt2dp(r2,1);
}

function valclear()
{
  document.stride.r1.value = "";
  document.stride.r2.value = "";
}

function qclear()
{
  document.stride.q1.value = "";
  document.stride.q2.value = "";
  document.stride.q3.value = "";
  document.stride.q4.value = "";
  document.stride.q5.value = "";
  document.stride.q6.value = "";
  document.stride.q7.value = "";
  document.stride.q8.value = "";
  document.stride.q9.value = "";
  document.stride.q10.value = "";
  document.stride.q11.value = "";
  document.stride.q12.value = "";
  document.stride.q13.value = "";
}

function nt2dp(num,dp)
{
<!-- rounds num to dp decimal places -->
  num=num*1+(0.55/Math.pow(10,dp));
  if (dp>0) dp=dp+1;
  b=Math.floor(num).toString().length+dp;
  return num.toString().substr(0,b);
}