//**************************************************************************************
//
// Champ Analysis / Champ Calc
//
// Copyright Tony Barson 2004 - 2007
//
// PLEASE do not use or alter this code without the permission of the author. 
// 
// The system can be purchased or optimised for any client. Please contact the author
// for further details.
//
// E-Mail : Tony_Barson@yahoo.co.uk
//
// 17/01/07 - Version 2.3
//**************************************************************************************
function Display_Results(nResults_Round, sPassed_Final){

var n;
var X;
var Y;
var nFinal_Points;
var nArray_Start;
var bRoundIsSimulated;
var sHTML;
var sSimulateString = "";

nSwitch = 0;

sHTML = "";

bSimScoreFound = false;

if(nResults_Round > nCurrent_Round){
   for (X = 1;X <= nDriver_Records;X++){
      if(anSimulatedScore[nResults_Round][X] != 0) {
         bSimScoreFound = true;
         sSimulateString = "(Simulated) ";
         break;
      }
   }
}


if(sChamp_Type == "SPRINT"){
   sHTML += "<TABLE class='HeadTable1' BORDER=1 ALIGN=CENTER WIDTH=400>";
   sHTML += "<TR><TD class='HeadBox1' BGCOLOR='#A8D3FF' ALIGN=CENTER>" + sSimulateString + "Results for Round " + nResults_Round + " - " + asTrackName[nResults_Round] + " " + asTrackDate[nResults_Round] + "</TD></TR>";
   sHTML += "</TABLE><BR>";
}else if(sChamp_Type == "ENDURANCE"){
       sHTML += "<TABLE class='HeadTable1' BORDER=1 ALIGN=CENTER WIDTH=400>";
       sHTML += "<TR><TD class='HeadBox1' BGCOLOR='#A8D3FF' ALIGN=CENTER>" + sSimulateString + "Results for Round " + nResults_Round + " - " + asTrackName[nResults_Round] + " " + asTrackDate[nResults_Round] + "</TD></TR>";
       sHTML += "</TABLE><BR>";
}else if(sChamp_Type == "CAR"){
       sHTML += "<TABLE class='HeadTable1' BORDER=1 ALIGN=CENTER WIDTH=400>";
       sHTML += "<TR><TD class='HeadBox1' BGCOLOR='#A8D3FF' ALIGN=CENTER>" + sSimulateString + "Results for Round " + nResults_Round + " - " + asTrackName[nResults_Round] + " " + asTrackDate[nResults_Round] + "</TD></TR>";
       sHTML += "</TABLE><BR>";
}

if (nResults_Round > nCurrent_Round) {
   sHTML += "<TABLE class='HeadTable1' BORDER=1 ALIGN=CENTER WIDTH=200>";
   sHTML += "<TR><TD class='HeadBox1' BGCOLOR='#A8D3FF' ALIGN=CENTER>Race Not Yet Run</TD></TR>";
   sHTML += "</TABLE><BR>";
}


if(sChamp_Type.substring(0,6) == "SPRINT"){
   if(asRace_Analysis_Page[nResults_Round] != ""){
      sHTML += "<TABLE BORDER=0 ALIGN=CENTER WIDTH=400>";
      sHTML += "<TR><TD ALIGN=CENTER WIDTH=400><A HREF='" + asRace_Analysis_Page[nResults_Round] + "' TARGET='_blank'><U>A-Final Race Analysis Available - Click Here</U></A></TD></TR>";
      sHTML += "</TABLE><BR>";
   }
}

if(sChamp_Type.substring(0,9) == "ENDURANCE"){
   if(asRace_Analysis_Page[nResults_Round] != ""){
      sHTML += "<TABLE BORDER=0 ALIGN=CENTER WIDTH=400>";
      sHTML += "<TR><TD ALIGN=CENTER WIDTH=400><A HREF='" + asRace_Analysis_Page[nResults_Round] + "' TARGET='_blank'><U>Race Analysis Available - Click Here</U></A></TD></TR>";
      sHTML += "</TABLE><BR>";
   }
}

if(sChamp_Type.substring(0,3) == "CAR"){
   if(asRace_Analysis_Page[nResults_Round] != ""){
      sHTML += "<TABLE BORDER=0 ALIGN=CENTER WIDTH=400>";
      sHTML += "<TR><TD ALIGN=CENTER WIDTH=400><A HREF='" + asRace_Analysis_Page[nResults_Round] + "' TARGET='_blank'><U>Race Analysis Available - Click Here</U></A></TD></TR>";
      sHTML += "</TABLE><BR>";
   }
}

   if(asTrackWebSite_Link[nResults_Round] != ""){
      sHTML += "<TABLE BORDER=0 ALIGN=CENTER WIDTH=400>";
      sHTML += "<TR><TD ALIGN=CENTER WIDTH=400><A HREF='" + asTrackWebSite_Link[nResults_Round] + "' TARGET='_blank'><U>Track Website - Click Here</U></A></TD></TR>";
      sHTML += "</TABLE><BR>";
   }

   if(asTrackWeather_Link[nResults_Round] != ""){
      sHTML += "<TABLE BORDER=0 ALIGN=CENTER WIDTH=400>";
      sHTML += "<TR><TD ALIGN=CENTER WIDTH=400><A HREF='" + asTrackWeather_Link[nResults_Round] + "' TARGET='_blank'><U>Track Weather - Click Here</U></A></TD></TR>";
      sHTML += "</TABLE><BR>";
   }


if(asTrackHistory[nResults_Round] != ""){
   if(nResults_Round > nCurrent_Round && bSimScoreFound == false) {
   } else {
   	sHTML += "<TABLE BORDER=0 ALIGN=CENTER WIDTH=400>";
   	sHTML += "<TR><TD ALIGN=CENTER WIDTH=400><A onclick='Race_History(" + "\"" + "RESULTS" + "\"" + "," + nResults_Round + "," + "\"" + sPassed_Final + "\"" + ")'><U>Race History - Click Here</U></A></TD></TR>";
   	sHTML += "</TABLE><BR>";
   }
}

//******************************************************
// If Race Not Run Yet end here
//******************************************************

if (nResults_Round > nCurrent_Round && bSimulationOn == false) {
   bSimScoreFound = false;
}

if (nResults_Round > nCurrent_Round && bSimScoreFound == false) {
   Race_History("NOTRUNYET",nResults_Round,"A");
   document.getElementById("DivText2").innerHTML = sHTML + sHistoryHTML;
   return;
}


if(sChamp_Type.substring(0,6) == "SPRINT"){
   sHTML += "<TABLE class='HeadTable2' BORDER=1 ALIGN=CENTER WIDTH=200>";
   sHTML += "<TR><TD class='HeadBox2' BGCOLOR='#A8D3FF' ALIGN=CENTER>" + sPassed_Final + "-Final</TD></TR>";
   sHTML += "</TABLE><BR>";

   sHTML += "<TABLE class='ControlTable' BORDER=0 ALIGN=CENTER WIDTH=700>";
   sHTML += "<TR>";
   sHTML += "<TD class='ControlBox' BGCOLOR='" + sColour + "' WIDTH=233 ALIGN=CENTER><A onclick='Display_Results(" + nResults_Round + "," + "\"" + "A" + "\"" + ")'><U>A-Final</U></A></TD>";
   sHTML += "<TD class='ControlBox' BGCOLOR='" + sColour + "' WIDTH=233 ALIGN=CENTER><A onclick='Display_Results(" + nResults_Round + "," + "\"" + "B" + "\"" + ")'><U>B-Final</U></A></TD>";
   sHTML += "<TD class='ControlBox' BGCOLOR='" + sColour + "' WIDTH=233 ALIGN=CENTER><A onclick='Display_Results(" + nResults_Round + "," + "\"" + "C" + "\"" + ")'><U>C-Final</U></A></TD>";
   sHTML += "</TR>";
   sHTML += "</TABLE>";
}

sResults_Final = sPassed_Final;

if(sChamp_Type.substring(0,6) == "SPRINT"){
   if(sResults_Final.toUpperCase() == "A"){
      nFinal_Points = 100;
      nArray_Start = 1;
   }else if(sResults_Final.toUpperCase() == "B"){
          nFinal_Points = 70;
          nArray_Start = 5;
          sHTML += "<TABLE BORDER=0 ALIGN=CENTER WIDTH=700>";
          sHTML = sHTML + "<TR><TD>(Note: Top 4 Drivers Promoted To A-Final)</TD></TR>";
          sHTML += "</TABLE>";
   }else if(sResults_Final.toUpperCase() == "C"){
          nFinal_Points = 40;
          nArray_Start = 5;
          sHTML += "<TABLE BORDER=0 ALIGN=CENTER WIDTH=700>";
          sHTML = sHTML + "<TR><TD>(Note: Top 4 Drivers Promoted To B-Final)</TD></TR>";
          sHTML += "</TABLE>";
   }
}else{
   nFinal_Points = 0;
}


sHTML += "<TABLE class='DetTable' BORDER=1 ALIGN=CENTER WIDTH=700>";
sHTML += "<TR>";
sHTML += "<TD class='DetHeadBox' BGCOLOR='#A8D3FF' WIDTH=100 ALIGN=LEFT>Position</TD>";
sHTML += "<TD class='DetHeadBox' BGCOLOR='#A8D3FF' WIDTH=250 ALIGN=LEFT>Entrant</TD>";
sHTML += "<TD class='DetHeadBox' BGCOLOR='#A8D3FF' WIDTH=100 ALIGN=LEFT>Points</TD>";
sHTML += "</TR>";
sHTML += "</TABLE>";


sHTML += "<TABLE class='DetTable' BORDER=1 ALIGN=CENTER WIDTH=700>";

if(sChamp_Type.substring(0,6) == "SPRINT"){
   for (X = nArray_Start; X <= sPoints_Array.length-1;X++) {
       for (Y = 1;Y <= nDriver_Records;Y++) {

           if(anScore[nResults_Round][Y] == (nFinal_Points + Number(sPoints_Array[X].substring(0,3)))){
              if(asDriver[Y] == sSaved_Driver){
                 sColour = "RED";
              }else {
                 if(nSwitch == 0){
                    sColour = sColour1;
                    nSwitch = 1;
                 }else{
                    sColour = sColour2;
                    nSwitch = 0;
                 }
              }

              sHTML += "<TR>";
              sHTML += "<TD class='DetBox' BGCOLOR='" + sColour + "' WIDTH=100 ALIGN=LEFT>" + sPoints_Array[X].substring(3,8) + "</TD>";
              sHTML += "<TD class='DetBox' BGCOLOR='" + sColour + "' WIDTH=250 ALIGN=LEFT><U><A onclick='Find_Driver(" + "\"" + asDriver[Y] + "\"" + ")'>" + asDriver[Y] + "</A></U></TD>";
              sHTML += "<TD class='DetBox' BGCOLOR='" + sColour + "' WIDTH=100 ALIGN=RIGHT>" + anScore[nResults_Round][Y] + "</TD>";
              sHTML += "</TR>";

              if(nResults_Round > nCurrent_Round && bSimulationOn == true){
                 bRoundIsSimulated = true;
              }

           }
       }
   }
   if(sResults_Final.toUpperCase() == "C"){
      for (X = 39; X >= 36;X--) {
          for (Y = 1;Y <= nDriver_Records;Y++) {
              if(anScore[nResults_Round][Y] == X){
                 if(asDriver[Y] == sSaved_Driver){
                    sColour = "RED";
                 }else{ 
                    if(nSwitch == 0){
                       sColour = sColour1;
                       nSwitch = 1;
                    }else{
                       sColour = sColour2;
                       nSwitch = 0;
                    }
                 }

                 sHTML += "<TR>";
                 sHTML += "<TD class='DetBox' BGCOLOR='" + sColour + "' WIDTH=100 ALIGN=LEFT>" + sPoints_Array[sPoints_Array.length-1].substring(3,8) + "</TD>";
                 sHTML += "<TD class='DetBox' BGCOLOR='" + sColour + "' WIDTH=250 ALIGN=LEFT><U><A onclick='Find_Driver(" + "\"" + asDriver[Y] + "\"" + ")'>" + asDriver[Y] + "</A></U></TD>";
                 sHTML += "<TD class='DetBox' BGCOLOR='" + sColour + "' WIDTH=100 ALIGN=RIGHT>" + anScore[nResults_Round][Y] + "</TD>";
                 sHTML += "</TR>";

                 if(nResults_Round > nCurrent_Round && bSimulationOn == true){
                    bRoundIsSimulated = true;
                 }
              }
          }
      }
   }
}

if(sChamp_Type.substring(0,9) == "ENDURANCE"){
   for (X = 1;X <= sPoints_Array.length-1;X++) {
       for (Y = 1;Y <= nDriver_Records;Y++) {
           if(anScore[nResults_Round][Y] == (nFinal_Points + sPoints_Array[X].substring(0,3))){
              if(asDriver[Y] == sSaved_Driver){
                 sColour = "RED";
              }else {
                 if(nSwitch == 0){
                    sColour = sColour1;
                    nSwitch = 1;
                 }else{
                    sColour = sColour2;
                    nSwitch = 0;
                 } ;
              }

              sHTML += "<TR>";
              sHTML += "<TD class='DetBox' BGCOLOR='" + sColour + "' WIDTH=100 ALIGN=LEFT>" + sPoints_Array[X].substring(3,8) + "</TD>";
              sHTML += "<TD class='DetBox' BGCOLOR='" + sColour + "' WIDTH=250 ALIGN=LEFT>" + asDriver[Y] + "</TD>";
              sHTML += "<TD class='DetBox' BGCOLOR='" + sColour + "' WIDTH=100 ALIGN=RIGHT>" + anScore[nResults_Round][Y] + "</TD>";
              sHTML += "</TR>";


              if(nResults_Round > nCurrent_Round && bSimulationOn == true){
                    bRoundIsSimulated = true;
              }

          }
       }
   }
}

if(sChamp_Type.substring(0,3) == "CAR"){
   for (X = 1;X <= sPoints_Array.length-1;X++) {
       for (Y = 1; Y <= nDriver_Records;Y++) {
           if(anScore[nResults_Round][Y] == (nFinal_Points + sPoints_Array[X].substring(0,3))){
              if(asDriver[Y] == sSaved_Driver){
                 sColour = "RED";
              }else{ 
                 if(nSwitch == 0){
                    sColour = sColour1;
                    nSwitch = 1;
                 }else{
                    sColour = sColour2;
                    nSwitch = 0;
                 }
              }

              sHTML += "<TR>";
              sHTML += "<TD class='DetBox' BGCOLOR='" + sColour + "' WIDTH=100 ALIGN=LEFT>" + sPoints_Array[X].substring(3,8) + "</TD>";
              sHTML += "<TD class='DetBox' BGCOLOR='" + sColour + "' WIDTH=250 ALIGN=LEFT><U><A onclick='Find_Driver(" + "\"" + asDriver[Y] + "\"" + ")'>" + asDriver[Y] + "</A></U></TD>";
              sHTML += "<TD class='DetBox' BGCOLOR='" + sColour + "' WIDTH=100 ALIGN=RIGHT>" + anScore[nResults_Round][Y] + "</TD>";
              sHTML += "</TR>";

              if(nResults_Round > nCurrent_Round && bSimulationOn == true){
                    bRoundIsSimulated = true;
              }

         }
       }
   }
}

if(bRoundIsSimulated == true){
   sHTML += "<TABLE BORDER=0 ALIGN=CENTER WIDTH=700>";
   sHTML += "<TR><TD><B>Note : Results for This Round Are Simulated !</B></TD></TR>";
   sHTML += "</TABLE>";
}

sHTML += "</TABLE>";

document.getElementById("DivText2").innerHTML = sHTML;

}

//********************************************************************************************

function Find_Driver(sDriver_Name){

var nDriverNo;

for (Y = 1; Y <= nDriver_Records;Y++) {
    if(asDriver[Y] == sDriver_Name){
       nDriverNo = Y;
       Driver_Analysis(Y);
       Y = nDriver_Records+1;
    }
}

}