//the values from the applet
//It will Generate the Report for a User friendly Format
//for the Basic HeatLoss Program 
//and also open the help pages and takes care of all the JavaScript

//Project name 
var msProject;
//company name
var msCompany;
//contact name
var msContact;

//temperatures
var mdOutsideTemp;
var mdInsideTemp;
var mdTempDifference;

//building size
var mdBuildingLength;
var mdBuildingWidth;
var mdBuildingHeight;
var mdBuildingPitch;
var mdBuildingArea;

//windSpeed
var mdWindSpeed;

//shielding type
var msShieldingDesc;

//airchange and exhaust
var mdExhaustFanInput;
var mdExhaustFanTotalBtuh;
var mdAirChangeInput;
var mdAirChangeTotalBtuh;

//exposure type
var msWindow1Desc;
var mdWindow1Height;
var mdWindow1Width;
var miWindow1QTY;
var mdWindow1UFactor;
var mdWindow1Area;
var mdWindow1BTU;

var msWindow2Desc;
var mdWindow2Height;
var mdWindow2Width;
var miWindow2QTY;
var mdWindow2UFactor;
var mdWindow2Area;
var mdWindow2BTU;

var msManDoorDesc;
var mdManDoorsHeight;
var mdManDoorsWidth;
var miManDoorsQTY;
var mdManDoorsUFactor;
var mdManDoorsArea;
var mdManDoorsBTU;

var msDBLDoorDesc;
var mdDBLDoorsHeight;
var mdDBLDoorsWidth;
var miDBLDoorsQTY;
var mdDBLDoorsUFactor;
var mdDBLDoorsArea;
var mdDBLDoorsBTU;

var msOHDoorDesc;
var mdOHDoorsHeight;
var mdOHDoorsWidth;
var miOHDoorsQTY;
var mdOHDoorsUFactor;
var mdOHDoorsArea;
var mdOHDoorsBTU;

var msLouvreDesc;
var mdLouvreHeight;
var mdLouvreWidth;
var miLouvreQTY;
var mdLouvreUFactor;
var mdLouvreArea;
var mdLouvreBTU;

var msRidgeDesc;
var mdRidgeHeight;
var mdRidgeWidth;
var miRidgeQTY;
var mdRidgeUFactor;
var mdRidgeArea;
var mdRidgeBTU;

var msOthersDesc;
var mdOthersHeight;
var mdOthersWidth;
var miOthersQTY;
var mdOthersUFactor;
var mdOthersArea;
var mdOthersBTU;

//Conduction Losses
var msWallDesc;
var mdWallUFactor;
var mdWallArea;
var mdWallBTU;

var msCeilingDesc;
var mdCeilingUFactor;
var mdCeilingArea;
var mdCeilingBTU;

var msFloorDesc;
var mdFloorUFactor;
var mdFloorArea;
var mdFloorBTU;

//the calculated total 
var mdCalcTotalBtuh;
var mdCalcTotalKW;

//the recommended total 
var mdRecTotalBtuh;
var mdRecTotalKW;

//for the current date
var today;
var Year;
var Month;
var Day;
var todayDate;

//metric or imperial
var uMesure;
var uMeterOrFeet;
var uTemp;
var uMeterFeet;
var uBtuKw;
var uSpeed;
var uTotalBtuKw;
var uGrand;
var uTotalDivided = uTotalBtuKw/uGrand;

//report string with all the values
var strReportStr;

//The window for the Help Pages
var HelpHeatLossWindow;

//The window for the  Report 
var ReportWindow;

//The window for the Help Pages
var thermalWindow;

//The StatusBar text for the main window
var defaultText = "Basic Heat Loss Calculation Tool";

//For the Browsers
var Ver4; //The Browser Version
var Nav4; //Netscape
var IE4;  //Explorer

var errorMsg = "Right mouse-click function has been disabled!";

if(document.layers) window.captureEvents(Event.MOUSEDOWN);

function no_click(e){
   detectBrowser();	
   if(IE4 && (event.button == 2 || event.button == 3)){
     alert(errorMsg);return false;
   }
   if(Nav4 && (e.which == 2 || e.which == 3)){
     alert(errorMsg);return false;
   }
}

window.onmousedown=no_click;
document.onmousedown=no_click;

function detectBrowser(){
      //decide with what browser the user has accessed the page

      Ver4 = parseInt(navigator.appVersion) >= 4;
      Nav4 = ((navigator.appName == "Netscape") && Ver4);
      IE4 =  ((navigator.userAgent.indexOf("MSIE") != -1) && Ver4);

      if(Nav4){//Netscape Browser
        window.moveTo(0,0);
        window.outerHeight = screen.availHeight;
        window.outerWidth  = screen.availWidth;
      }//else if(IE4){//Internet Explorer Browser
        //window.moveTo(0,0);
        //window.resizeTo(screen.availWidth, screen.availHeight);
      //}
      this.status = defaultText;
}

//for the help pages
function helpIndex(){
 
  if (!HelpHeatLossWindow || HelpHeatLossWindow.closed){ //does the window exist
	if(Nav4){//Netscape Browser
	//to construct a new window for the report
 	    HelpHeatLossWindow = window.open("http://www.ccithermal.com/HeatLossCalc/HeatLossHelp.html", "HelpHeatLossWindow",
		                             "width=" + (innerWidth - 5) + ",height=" + (innerHeight + 40) +
    	                                     "directories,menubar," +
		    	                     "scrollbars,status,toolbar,resizable")
            if (window.screen) {//resize the window 
               HelpHeatLossWindow.moveTo(0, 0);
               HelpHeatLossWindow.outerHeight = screen.availHeight;
               HelpHeatLossWindow.outerWidth = (screen.availWidth - 150);
            }

  	}else if(IE4){//Internet Explorer Browser
	//to construct a new window for the report
 	    HelpHeatLossWindow  = window.open("http://www.ccithermal.com/HeatLossCalc/HeatLossHelp.html", "HelpHeatLossWindow",
		  		              "toolbar=yes,directories=yes,status=yes," +
				              "menubar=yes,scrollbars=yes,resizable=yes," +
				              "width=" + screen.availWidth + ",height=" + screen.availHeight)
           if (window.screen) {//resize the window 
              HelpHeatLossWindow.moveTo(0, 0);
              HelpHeatLossWindow.resizeTo((screen.availWidth - 150), screen.availHeight)
           }
       }
   }else //Window exists so just show it
      HelpHeatLossWindow.focus();
}

//for the help pages
function thermalPerformance(){
 
  if (!thermalWindow || thermalWindow.closed){ //does the window exist
	if(Nav4){//Netscape Browser
	//to construct a new window for the report
 	    thermalWindow = window.open("http://www.ccithermal.com/ruffneck_heater_sizing.php", "thermalWindow",
		                        "width=" + (innerWidth - 5) + ",height=" + (innerHeight + 40) +
    	                                "directories,menubar," +
		    	                "scrollbars,status,toolbar,resizable")
            if (window.screen) {//resize the window 
               thermalWindow.moveTo(0, 0);
               thermalWindow.outerHeight = screen.availHeight;
               thermalWindow.outerWidth = (screen.availWidth - 150);
            }

  	}else if(IE4){//Internet Explorer Browser
	//to construct a new window for the report
 	    thermalWindow = window.open("http://www.ccithermal.com/ruffneck_heater_sizing.php", "thermalWindow",
		  		        "toolbar=yes,directories=yes,status=yes," +
				        "menubar=yes,scrollbars=yes,resizable=yes," +
				        "width=" + screen.availWidth + ",height=" + screen.availHeight)
           if (window.screen) {//resize the window 
              thermalWindow.moveTo(0, 0);
              thermalWindow.resizeTo((screen.availWidth - 150), screen.availHeight)
           }
       }
   }else //Window exists so just show it
      thermalWindow.focus();
}
//rounding to x decimal
function round(number,X) {
// rounds number to X decimal places, defaults to 2
X = (!X ? 2 : X);
return Math.round(number*Math.pow(10,X))/Math.pow(10,X);
}

//unload the pages if the user refreshes the browser or leaves the html page
function closeChildWindow(){
  //check if the other windows are still open
   if (!HelpHeatLossWindow || HelpHeatLossWindow.closed){ //check for the help pages
	//do nothing
   }else //still open so close it
      HelpHeatLossWindow.close();
   if (!ReportWindow || ReportWindow.closed){ //check for the report
	//do nothing
   }else //still open so close it
      ReportWindow.close();
   if (!thermalWindow || thermalWindow.closed){ //check for the report
	//do nothing
   }else //still open so close it
      thermalWindow.close();
}

//Change the status bar text
function message(text){
  //to change the status text if the mouse is over a specific button
  window.status = text;
}

//set all variables
function setReportVariables() {
   //initialize the variables
   initValues(document.HeatLossCalc.getProject(),
              document.HeatLossCalc.getCompany(),
              document.HeatLossCalc.getContact(),
	      document.HeatLossCalc.getOutsideTemp(),
              document.HeatLossCalc.getInsideTemp(),
	      document.HeatLossCalc.getTempDifference(),
	      document.HeatLossCalc.getBuildingLength(),
	      document.HeatLossCalc.getBuildingWidth(),
	      document.HeatLossCalc.getBuildingHeight(),
	      document.HeatLossCalc.getBuildingPitch(),
	      document.HeatLossCalc.getBuildingArea(),
              document.HeatLossCalc.getExhaustFan(),
              document.HeatLossCalc.getExhaustFanBTU(),
              document.HeatLossCalc.getAirChange(),
              document.HeatLossCalc.getAirChangeBTU(),
	      document.HeatLossCalc.getWindSpeed(),
	      document.HeatLossCalc.getShieldingDesc(),
	      document.HeatLossCalc.getWindow1Desc(),
	      document.HeatLossCalc.getWindow1Width(),
	      document.HeatLossCalc.getWindow1Height(),
	      document.HeatLossCalc.getWindow1QTY(),
              document.HeatLossCalc.getWindow1UFactor(),
              document.HeatLossCalc.getWindow1Area(),
              document.HeatLossCalc.getWindow1BTU(),
	      document.HeatLossCalc.getWindow2Desc(),
	      document.HeatLossCalc.getWindow2Width(),
	      document.HeatLossCalc.getWindow2Height(),
	      document.HeatLossCalc.getWindow2QTY(),
              document.HeatLossCalc.getWindow2UFactor(),
              document.HeatLossCalc.getWindow2Area(),
              document.HeatLossCalc.getWindow2BTU(),
	      document.HeatLossCalc.getManDoorsDesc(),
	      document.HeatLossCalc.getManDoorsWidth(),
	      document.HeatLossCalc.getManDoorsHeight(),
	      document.HeatLossCalc.getManDoorsQTY(),
              document.HeatLossCalc.getManDoorsUFactor(),
              document.HeatLossCalc.getManDoorsArea(),
              document.HeatLossCalc.getManDoorsBTU(),
	      document.HeatLossCalc.getDBLDoorsDesc(),
	      document.HeatLossCalc.getDBLDoorsWidth(),
	      document.HeatLossCalc.getDBLDoorsHeight(),
	      document.HeatLossCalc.getDBLDoorsQTY(),
              document.HeatLossCalc.getDBLDoorsUFactor(),
              document.HeatLossCalc.getDBLDoorsArea(),
              document.HeatLossCalc.getDBLDoorsBTU(),
	      document.HeatLossCalc.getOHDoorsDesc(),
	      document.HeatLossCalc.getOHDoorsWidth(),
	      document.HeatLossCalc.getOHDoorsHeight(),
	      document.HeatLossCalc.getOHDoorsQTY(),
              document.HeatLossCalc.getOHDoorsUFactor(),
              document.HeatLossCalc.getOHDoorsArea(),
              document.HeatLossCalc.getOHDoorsBTU(),
	      document.HeatLossCalc.getLouvreDesc(),
	      document.HeatLossCalc.getLouvreWidth(),
	      document.HeatLossCalc.getLouvreHeight(),
	      document.HeatLossCalc.getLouvreQTY(),
              document.HeatLossCalc.getLouvreUFactor(),
              document.HeatLossCalc.getLouvreArea(),
              document.HeatLossCalc.getLouvreBTU(),
	      document.HeatLossCalc.getRidgeDesc(),
	      document.HeatLossCalc.getRidgeWidth(),
	      document.HeatLossCalc.getRidgeHeight(),
	      document.HeatLossCalc.getRidgeQTY(),
              document.HeatLossCalc.getRidgeUFactor(),
              document.HeatLossCalc.getRidgeArea(),
              document.HeatLossCalc.getRidgeBTU(),
	      document.HeatLossCalc.getOthersDesc(),
	      document.HeatLossCalc.getOthersWidth(),
	      document.HeatLossCalc.getOthersHeight(),
	      document.HeatLossCalc.getOthersQTY(),
              document.HeatLossCalc.getOthersUFactor(),
              document.HeatLossCalc.getOthersArea(),
              document.HeatLossCalc.getOthersBTU(),
              document.HeatLossCalc.getWallDesc(),
              document.HeatLossCalc.getWallUFactor(),
              document.HeatLossCalc.getWallArea(),
              document.HeatLossCalc.getWallBTU(),
              document.HeatLossCalc.getCeilingDesc(),
              document.HeatLossCalc.getCeilingUFactor(),
              document.HeatLossCalc.getCeilingArea(),
              document.HeatLossCalc.getCeilingBTU(),
              document.HeatLossCalc.getFloorDesc(),
              document.HeatLossCalc.getFloorUFactor(),
              document.HeatLossCalc.getFloorArea(),
              document.HeatLossCalc.getFloorBTU(),
              document.HeatLossCalc.getTotalBTU(),
              document.HeatLossCalc.getTotalKW(),
              document.HeatLossCalc.getRecTotalBTU(),
              document.HeatLossCalc.getRecTotalKW());
   //display the report
   createHTMLPage();
   displayReport();
}




function divide($a, $b, X){ 
// convert to numeric by multiplying values by 1.0
$a=$a.replace(/,/g,"");
$a=$a.replace(/\s/g,"");
e = ($a / $b);
X = (!X ? 0 : X);
return Math.round(e*Math.pow(10,X))/Math.pow(10,X);

}


//to create the output
function createHTMLPage(){
   today         = new Date();
   Year          = today.getYear();
   Month         = today.getMonth() + 1; //month starts with 0 for January
   Day           = today.getDate(); 

   Year += (Year < 2000) ? 1900 : 0;       //to ensure the right year will be printed  
   if(Month < 10)
      Month = "0" + Month;
   if(Day < 10)
      Day = "0" + Day;
   todayDate = Year + "/" + Month + "/" + Day; 
   
   if (document.HeatLossCalc.getMetricImperial() == 0 ){
       uMesure      = "- CFM (cubic ft/min)"; 
       uMeterOrFeet = "ft";
       uTemp        = " ºF";
       uMeterFeet   = "ft²";
       uBtuKw       = "Btu/h";
       uSpeed       = "mph"; 
	   uTotalBtuKw  =  mdCalcTotalKW 
	  
   }else{
       uMesure      = "- l/s (liter/sec)";
       uMeterOrFeet = "m";
       uTemp        = " ºC";
       uMeterFeet   = "m²";
       uBtuKw       = "Watt/h";
       uSpeed       = "m/s"; 
	   uTotalBtuKw  = mdCalcTotalKW 
   }
   var strProject;
   var strCompany;
   var strContact;

   if(msProject == ""){
     strProject = "<td colspan=\"6\">&nbsp;</td>";
   }else{
     strProject = "<td colspan=\"6\">" + msProject + "</td>";
   }     
   if(msCompany == ""){
     strCompany = "<td colspan=\"3\">&nbsp;</td>";
   }else{
     strCompany = "<td colspan=\"3\">" + msCompany + "</td>";
   }     
   if(msContact == ""){
     strContact = "<td colspan=\"3\">&nbsp;</td>";
   }else{
     strContact = "<td colspan=\"3\">" + msContact + "</td>";
   }  

   var strWindow1;
   var strWindow2;
   var strManDoors;
   var strDBLDoors;
   var strOHDoors;
   var strLouvre;
   var strRidge;
   var strOther;

   if (mdWindow1BTU == 0){
      strWindow1 = "";
   }else{
      strWindow1 = "<tr>" +
                   "<td colspan=\"2\">&nbsp;&nbsp;<b>Window #1:</b><br>" +
                   "<font size=\"-2\">"    + msWindow1Desc    + "</font></td>" +
                   "<td align=\"center\">" + mdWindow1Width   + "</td>" +
                   "<td align=\"center\">" + mdWindow1Height  + "</td>" +
                   "<td align=\"center\">" + miWindow1QTY     + "</td>" +
                   "<td align=\"center\">" + mdWindow1UFactor + "</td>" +
                   "<td align=\"center\">" + mdWindow1Area    + "</td>" +
                   "<td align=\"center\">" + mdWindow1BTU     + "</td>" +
                   "</tr>";
   }

   if (mdWindow2BTU == 0){
      strWindow2 = "";
   }else{
      strWindow2 = "<tr>" +
                   "<td colspan=\"2\">&nbsp;&nbsp;<b>Window #2:</b><br>" +
                   "<font size=\"-2\">"    + msWindow2Desc    + "</font></td>" +
                   "<td align=\"center\">" + mdWindow2Width   + "</td>" +
                   "<td align=\"center\">" + mdWindow2Height  + "</td>" +
                   "<td align=\"center\">" + miWindow2QTY     + "</td>" +
                   "<td align=\"center\">" + mdWindow2UFactor + "</td>" +
                   "<td align=\"center\">" + mdWindow2Area    + "</td>" +
                   "<td align=\"center\">" + mdWindow2BTU     + "</td>" +
                   "</tr>";
   }

   if (mdManDoorsBTU == 0){
      strManDoors = "";
   }else{
      strManDoors = "<tr>" +
                   "<td colspan=\"2\">&nbsp;&nbsp;<b>Man Doors:</b><br>" +
                   "<font size=\"-2\">"    + msManDoorsDesc    + "</font></td>" +
                   "<td align=\"center\">" + mdManDoorsWidth   + "</td>" +
                   "<td align=\"center\">" + mdManDoorsHeight  + "</td>" +
                   "<td align=\"center\">" + miManDoorsQTY     + "</td>" +
                   "<td align=\"center\">" + mdManDoorsUFactor + "</td>" +
                   "<td align=\"center\">" + mdManDoorsArea    + "</td>" +
                   "<td align=\"center\">" + mdManDoorsBTU     + "</td>" +
                   "</tr>";
   }
   if (mdDBLDoorsBTU == 0){
      strDBLDoors = "";
   }else{
      strDBLDoors = "<tr>" +
                   "<td colspan=\"2\">&nbsp;&nbsp;<b>DBL Doors:</b><br>" +
                   "<font size=\"-2\">"    + msDBLDoorsDesc    + "</font></td>" +
                   "<td align=\"center\">" + mdDBLDoorsWidth   + "</td>" +
                   "<td align=\"center\">" + mdDBLDoorsHeight  + "</td>" +
                   "<td align=\"center\">" + miDBLDoorsQTY     + "</td>" +
                   "<td align=\"center\">" + mdDBLDoorsUFactor + "</td>" +
                   "<td align=\"center\">" + mdDBLDoorsArea    + "</td>" +
                   "<td align=\"center\">" + mdDBLDoorsBTU     + "</td>" +
                   "</tr>";
   }
   if (mdOHDoorsBTU == 0){
      strOHDoors = "";
   }else{
      strOHDoors = "<tr>" +
                   "<td colspan=\"2\">&nbsp;&nbsp;<b>O/H Doors:</b><br>" +
                   "<font size=\"-2\">"    + msOHDoorsDesc    + "</font></td>" +
                   "<td align=\"center\">" + mdOHDoorsWidth   + "</td>" +
                   "<td align=\"center\">" + mdOHDoorsHeight  + "</td>" +
                   "<td align=\"center\">" + miOHDoorsQTY     + "</td>" +
                   "<td align=\"center\">" + mdOHDoorsUFactor + "</td>" +
                   "<td align=\"center\">" + mdOHDoorsArea    + "</td>" +
                   "<td align=\"center\">" + mdOHDoorsBTU     + "</td>" +
                   "</tr>";
   }
   if (mdLouvreBTU == 0){
      strLouvre = "";
   }else{
      strLouvre = "<tr>" +
                   "<td colspan=\"2\">&nbsp;&nbsp;<b>Louvre Vent:</b><br>" +
                   "<font size=\"-2\">"    + msLouvreDesc    + "</font></td>" +
                   "<td align=\"center\">" + mdLouvreWidth   + "</td>" +
                   "<td align=\"center\">" + mdLouvreHeight  + "</td>" +
                   "<td align=\"center\">" + miLouvreQTY     + "</td>" +
                   "<td align=\"center\">" + mdLouvreUFactor + "</td>" +
                   "<td align=\"center\">" + mdLouvreArea    + "</td>" +
                   "<td align=\"center\">" + mdLouvreBTU     + "</td>" +
                   "</tr>";
   }
   if (mdRidgeBTU == 0){
      strRidge = "";
   }else{
      strRidge = "<tr>" +
                   "<td colspan=\"2\">&nbsp;&nbsp;<b>Ridge Vent:</b><br>" +
                   "<font size=\"-2\">"    + msRidgeDesc    + "</font></td>" +
                   "<td align=\"center\">" + mdRidgeWidth   + "</td>" +
                   "<td align=\"center\">" + mdRidgeHeight  + "</td>" +
                   "<td align=\"center\">" + miRidgeQTY     + "</td>" +
                   "<td align=\"center\">" + mdRidgeUFactor + "</td>" +
                   "<td align=\"center\">" + mdRidgeArea    + "</td>" +
                   "<td align=\"center\">" + mdRidgeBTU     + "</td>" +
                   "</tr>";
   }
   if (mdOthersBTU == 0){
      strOther = "";
   }else{
      strOther = "<tr>" +
                   "<td colspan=\"2\">&nbsp;&nbsp;<b>Other:</b><br>" +
                   "<font size=\"-2\">"    + msOthersDesc    + "</font></td>" +
                   "<td align=\"center\">" + mdOthersWidth   + "</td>" +
                   "<td align=\"center\">" + mdOthersHeight  + "</td>" +
                   "<td align=\"center\">" + miOthersQTY     + "</td>" +
                   "<td align=\"center\">" + mdOthersUFactor + "</td>" +
                   "<td align=\"center\">" + mdOthersArea    + "</td>" +
                   "<td align=\"center\">" + mdOthersBTU     + "</td>" +
                   "</tr>";
   }

strReportStr = "<html>" +
               "<head>" +
               "<title>CCI Thermal Technologies Inc. - Calculation Tools - Cata-Dyne&trade; Heat Loss Calculation Output</title>" +
               "</head>" +
               "<body BGCOLOR=#FFFFFF TEXT=#000000 LINK=#000000 VLINK=#000000 ALINK=#000000>" +
               "<center>" +
			   "<p style=\"font-family: Arial, Helvetica, sans-serif; font-size: 18px; font-weight: bold\">CCI Thermal Technologies Inc. - Cata-Dyne&trade; Heat Loss Calculation Output</p><br>" +
               "<table BORDER=\"1\" CELLPADDING=\"3\" CELLSPACING=\"1\" WIDTH=\"90%\" style=\"font-family: Arial, Helvetica, sans-serif; font-size: 14px\">" +
               "<tr>" +
               "<td width=\"20%\"></td>" +
               "<td width=\"14%\"></td>" +
               "<td width=\"10%\"></td>" +
               "<td width=\"12%\"></td>" +
               "<td width=\"8%\"></td>" +
               "<td width=\"12%\"></td>" +
               "<td width=\"12%\"></td>" +
               "<td width=\"*%\"></td>" +
               "</tr>" +
               "<tr>" +
               "<td width=\"12%\" align=\"center\"><b>Project:</b></td>" +
               strProject +
               "<td align=\"center\"><b>" + todayDate + "</b></td>" +
               "</tr>"+
               "<tr>" +
               "<td width=\"12%\" align=\"center\"><b>Company:</b></td>" +
               strCompany +
               "<td width=\"12%\" align=\"center\"><b>Contact:</b></td>" +
               strContact +
               "</tr>"+
               "<tr>" +
               "<td colspan=\"2\" align=\"center\"><b>Design Temp.</b></td>" +
               "<td align=\"center\"><b>Outside:</b></td>" +
               "<td align=\"center\">" + mdOutsideTemp + uTemp + "</td>" +
               "<td align=\"center\"><b>Inside:</b></td>" +
               "<td align=\"center\">" + mdInsideTemp + uTemp + "</td>" +
             //  "<td align=\"center\"><b>Difference:</b></td>" +
               "<td align=\"center\"><b>&#916;&nbsp;T</b></td>" +
               "<td align=\"center\">" + mdTempDifference + uTemp + "</td>" +
               "</tr>" +
               "<tr>" +
               "<tr>" +
               "<td colspan=\"6\" align=\"center\"><b>Building Section:</b></td>" +
               "<td align=\"center\"><b>Length:</b></td>" +
               "<td align=\"center\"><b>Width:</b></td>" +
               "</tr>" +
               "<tr>" +
               "<td colspan=\"6\"><b>&nbsp;&nbsp;Section Length & Width:</b></td>" +
               "<td align=\"center\">" + mdBuildingLength + " " + uMeterOrFeet + "</td>" +
               "<td align=\"center\">" + mdBuildingWidth  + " " + uMeterOrFeet + "</td>" +
               "</tr>" +
               "<tr>" +
               "<td colspan=\"6\"><b>&nbsp;&nbsp;Wall Height at  Eaves:</b></td>" +
               "<td align=\"center\">" + mdBuildingHeight + " " + uMeterOrFeet + "</td>" +
               "<td align=\"center\">&nbsp;</td>" +
               "</tr>" +
               "<tr>" +
               "<td colspan=\"6\"><b>&nbsp;&nbsp;Pitched Roof Height above  Eaves:</b></td>" +
               "<td align=\"center\">" + mdBuildingPitch + " " + uMeterOrFeet + "</td>" +
               "<td align=\"center\">&nbsp;</td>" +
               "</tr>" +
               "<tr>" +
               "<td align=\"center\"><b>Wind Speed:</b></td>" +
               "<td align=\"center\">" + mdWindSpeed + " " + uSpeed + "</td>" +
               "<td align=\"center\"><b>Shielding:</b></td>" +
               "<td colspan=\"5\" align=\"center\">" + msShieldingDesc + "</td>" +
               "</tr>" +
               "<tr>" +
               "<td colspan=\"2\" align=\"center\"><b>Opening</b></td>" +
               "<td align=\"center\"><b>Width <br>(" + uMeterOrFeet + ")</b></td>" +
               "<td align=\"center\"><b>Height <br>(" + uMeterOrFeet + ")</b></td>" +
               "<td align=\"center\"><b>QTY</b></td>" +
               "<td align=\"center\"><b>'U'Factor:</b></td>" +
               "<td align=\"center\"><b>Area " + uMeterFeet + ":</b></td>" +
               "<td align=\"center\"><b>Total " + uBtuKw + ":</b></td>" +
               "</tr>" +
               strWindow1 +
               strWindow2 +
               strManDoors +
               strDBLDoors +
               strOHDoors +
               strLouvre +
               strRidge +
               strOther +
               "<tr>" +
               "<td colspan=\"5\"><b>&nbsp;&nbsp;Net Exposed Wall Conduction Losses:</b><br>" +
               "<font size=\"-2\">"    + msWallDesc    + "</font></td>" +
               "<td align=\"center\">" + mdWallUFactor + "</td>" +
               "<td align=\"center\">" + mdWallArea    + "</td>" +
               "<td align=\"center\">" + mdWallBTU     + "</td>" +
               "</tr>" +
               "<tr>" +
               "<td colspan=\"5\"><b>&nbsp;&nbsp;Net Exposed Ceiling Conduction Losses:</b><br>" +
               "<font size=\"-2\">"    + msCeilingDesc    + "</font></td>" +
               "<td align=\"center\">" + mdCeilingUFactor + "</td>" +
               "<td align=\"center\">" + mdCeilingArea    + "</td>" +
               "<td align=\"center\">" + mdCeilingBTU     + "</td>" +
               "</tr>" +
               "<tr>" +
               "<td colspan=\"5\"><b>&nbsp;&nbsp;Net Exposed Floor Conduction Losses:</b><br>" +
               "<font size=\"-2\">"    + msFloorDesc    + "</font></td>" +
               "<td align=\"center\">" + mdFloorUFactor + "</td>" +
               "<td align=\"center\">" + mdFloorArea    + "</td>" +
               "<td align=\"center\">" + mdFloorBTU     + "</td>" +
               "</tr>" +
               "<tr>" +
               "<td colspan=\"4\">&nbsp;&nbsp;<b>Exhaust Fan " + uMesure + ":</b></td>" +
               "<td align=\"center\">" + mdExhaustFan + "</td>" +
               "<td colspan=\"2\" align=\"center\">&nbsp;</td>" +
               "<td align=\"center\">" + mdExhaustFanBTU + "</td>" +
               "</tr>" +
               "<tr>" +
               "<td colspan=\"4\">&nbsp;&nbsp;<b>Other # Air Changes/hr:</b></td>" +
               "<td align=\"center\">" + mdAirChange + "</td>" +
               "<td colspan=\"2\" align=\"center\">&nbsp;</td>" +
               "<td align=\"center\">" + mdAirChangeBTU + "</td>" +
               "</tr>" +
               "<tr>" +
               "<td colspan=\"7\"><b>&nbsp;&nbsp;Estimated Building Total - (" + uBtuKw + ")</b><br>&nbsp;&nbsp;<span style=\"font-size: 11px\">To convert Btu/h to kW, multiply the value by 0.000293.  To convert Watts/h to kW, divide by 1000.</span></td>" +
               "<td align=\"center\">" + mdCalcTotalBtuh + "</td>" +
               "</tr>" +
               "<tr>" +
               "<td colspan=\"7\"><b>&nbsp;&nbsp;Suggested Building Total - (" + uBtuKw + ")</b><br>&nbsp;&nbsp;<span style=\"font-size: 11px\">To convert Btu/h to kW, multiply the value by 0.000293.  To convert Watts/h to kW, divide by 1000.</span></td>" +
               "<td align=\"center\">" + mdRecTotalBtuh + "</td>" +
               "</tr>" +
			   
			   "<tr>" +
               "<td colspan=\"1\" align=\"center\"></td>" +
               "</tr>" +
			   
			   "<tr>" +
               "<td colspan=\"8\" align=\"center\"><b>Suggested Cata-Dyne&trade; Heater Quantities</b></td>" +
               "</tr>" +
			   
			   
			   "<tr>" +
               "<td colspan=\"1\" align=\"center\"><b>Heater Size</b></td>" +
               "<td align=\"center\"><b>QTY</b></td>" +
               "<td align=\"center\"><b>Heater Size</b></td>" +
               "<td align=\"center\"><b>QTY</b></td>" +
               "<td align=\"center\"><b>Heater Size</b></td>" +
               "<td align=\"center\"><b>QTY</b></td>" +
               "<td align=\"center\"><b>Heater Size</b></td>" +
			   "<td align=\"center\"><b>QTY</b></td>" +
               "</tr>" +
			   
			   "<tr>" +
               "<td colspan=\"1\" align=\"center\"><b>8 X 8</b></td>" +
               "<td align=\"center\"><b>" + divide(mdRecTotalBtuh, 2222) +" </b></td>" +
               "<td align=\"center\"><b>6 X 24</b></td>" +
               "<td align=\"center\"><b>"+ divide(mdRecTotalBtuh, 5000) +"</b></td>" +
               "<td align=\"center\"><b>12 X 12</b></td>" +
               "<td align=\"center\"><b>"+ divide(mdRecTotalBtuh, 5000) +"</b></td>" +
               "<td align=\"center\"><b>12 X 24</b></td>" +
			   "<td align=\"center\"><b>"+ divide(mdRecTotalBtuh, 10000) +"</b></td>" +
               "</tr>" +
			   
			    "<tr>" +
               "<td colspan=\"1\" align=\"center\"><b>12 X 36</b></td>" +
               "<td align=\"center\"><b>"+ divide(mdRecTotalBtuh, 15000) +"</b></td>" +
               "<td align=\"center\"><b>12 X 48</b></td>" +
               "<td align=\"center\"><b>"+ divide(mdRecTotalBtuh, 20000) +"</b></td>" +
               "<td align=\"center\"><b>12 X 60</b></td>" +
               "<td align=\"center\"><b>"+ divide(mdRecTotalBtuh, 25000) +"</b></td>" +
               "<td align=\"center\"><b>12 X 72</b></td>" +
			   "<td align=\"center\"><b>"+ divide(mdRecTotalBtuh, 30000) +"</b></td>" +
               "</tr>" +
			   
			   "<tr>" +
               "<td colspan=\"1\" align=\"center\"><b>18 X 24</b></td>" +
               "<td align=\"center\"><b>"+ divide(mdRecTotalBtuh, 15000) +"</b></td>" +
               "<td align=\"center\"><b>18 X 36</b></td>" +
               "<td align=\"center\"><b>"+ divide(mdRecTotalBtuh, 22500) +"</b></td>" +
               "<td align=\"center\"><b>18 X 48</b></td>" +
               "<td align=\"center\"><b>"+ divide(mdRecTotalBtuh, 30000) +"</b></td>" +
               "<td align=\"center\"><b>18 X 60</b></td>" +
			   "<td align=\"center\"><b>"+ divide(mdRecTotalBtuh, 37500) +"</b></td>" +
               "</tr>" +
			   
			   "<tr>" +
               "<td colspan=\"1\" align=\"center\"><b>18 X 72</b></td>" +
               "<td align=\"center\"><b>"+ divide(mdRecTotalBtuh, 45000) +"</b></td>" +
               "<td align=\"center\"><b>24 X 24</b></td>" +
               "<td align=\"center\"><b>"+ divide(mdRecTotalBtuh, 20000) +"</b></td>" +
               "<td align=\"center\"><b>24 X 30</b></td>" +
               "<td align=\"center\"><b>"+ divide(mdRecTotalBtuh, 25000) +"</b></td>" +
               "<td align=\"center\"><b>24 X 36</b></td>" +
			   "<td align=\"center\"><b>"+ divide(mdRecTotalBtuh, 30000) +"</b></td>" +
               "</tr>" +
			   
			   "<tr>" +
               "<td colspan=\"1\" align=\"center\"><b>24 X 48</b></td>" +
               "<td align=\"center\"><b>"+ divide(mdRecTotalBtuh, 40000) +"</b></td>" +
               "<td align=\"center\"><b>24 X 60</b></td>" +
               "<td align=\"center\"><b>"+ divide(mdRecTotalBtuh, 50000) +"</b></td>" +
               "<td align=\"center\"><b>24 X 72</b></td>" +
               "<td align=\"center\"><b>"+ divide(mdRecTotalBtuh, 60000) +"</b></td>" +
               "<td align=\"center\"><b>18 X 30</b></td>" +
			   "<td align=\"center\"><b>"+ divide(mdRecTotalBtuh, 18750) +"</b></td>" +
               "</tr>" +
			   
			   
               "</table><br><br>" +
               "<table width=\"75%\" bgcolor=\"#000000\" cellspacing=\"2\" cellpadding=\"5\"><tr><td align=\"left\" valign=\"middle\" bgcolor=\"#ffffff\" style=\"font-family: Arial, Helvetica, sans-serif; font-size: 13px; text-align: justify\">" +
               "<B>NOTE:</B> This calculation is an <b>ESTIMATE ONLY</b> and is not to be used for Engineering data. This calculation is based on the data submitted at the time of inquiry.<BR>" +
               "<br>" +
               "CCI Thermal Technologies Inc. accepts no responsibility for any inaccuracies, errors or invalid input that may occur. Always consult a Professional Engineer for the final design.</td></tr></table>" +
               //"<A HREF=\"Thermal.html\" target=\"_BLANK\">Go to the Thermal Performance Program</A>" +
               //"<form ACTION=\"Thermal.html\" target=\"_BLANK\">" +
               //"<input TYPE=SUBMIT NAME=\"tpabutton\" VALUE=\"Go to Thermal Performance Analysis Program (for Steam or Hydronic Heater Sizing)\">" +
               //"</input>" +
               //"</form>" +
               "</center>" +
               "</body>" +
               "</html>";
}
//to get all the value from the applet
function initValues(imsProject, imsCompany, imsContact, 
                    imdOutsideTemp, imdInsideTemp, imdTempDifference, 
                    imdBuildingLength, imdBuildingWidth, imdBuildingHeight, imdBuildingPitch, imdBuildingArea,
                    imdExhaustFan, imdExhaustFanBTU, imdAirChange, imdAirChangeBTU, 
                    imdWindSpeed, imsShieldingDesc, 
                    imsWindow1Desc, imdWindow1Width, imdWindow1Height, imiWindow1QTY, 
                    imdWindow1UFactor, imdWindow1Area, imdWindow1BTU, 
                    imsWindow2Desc, imdWindow2Width, imdWindow2Height, imiWindow2QTY,
                    imdWindow2UFactor, imdWindow2Area, imdWindow2BTU, 
                    imsManDoorsDesc, imdManDoorsWidth, imdManDoorsHeight, imiManDoorsQTY, 
                    imdManDoorsUFactor, imdManDoorsArea, imdManDoorsBTU, 
                    imsDBLDoorsDesc, imdDBLDoorsWidth, imdDBLDoorsHeight, imiDBLDoorsQTY, 
                    imdDBLDoorsUFactor, imdDBLDoorsArea, imdDBLDoorsBTU, 
                    imsOHDoorsDesc, imdOHDoorsWidth, imdOHDoorsHeight, imiOHDoorsQTY, 
                    imdOHDoorsUFactor, imdOHDoorsArea, imdOHDoorsBTU, 
                    imsLouvreDesc, imdLouvreWidth, imdLouvreHeight, imiLouvreQTY, 
                    imdLouvreUFactor, imdLouvreArea, imdLouvreBTU, 
                    imsRidgeDesc, imdRidgeWidth, imdRidgeHeight, imiRidgeQTY, 
                    imdRidgeUFactor, imdRidgeArea, imdRidgeBTU, 
                    imsOthersDesc, imdOthersWidth, imdOthersHeight, imiOthersQTY, 
                    imdOthersUFactor, imdOthersArea, imdOthersBTU, 
                    imsWallDesc, imdWallUFactor, imdWallArea, imdWallBTU, 
                    imsCeilingDesc, imdCeilingUFactor, imdCeilingArea, imdCeilingBTU,
                    imsFloorDesc, imdFloorUFactor, imdFloorArea, imdFloorBTU, 
                    imdCalcTotalBtuh, imdCalcTotalKW, imdRecTotalBtuh, imdRecTotalKW){
             //asign the values
             msProject                    = imsProject;
             msCompany                    = imsCompany;
             msContact                    = imsContact;

             mdOutsideTemp                = imdOutsideTemp;
             mdInsideTemp                 = imdInsideTemp;
             mdTempDifference             = imdTempDifference;

             mdBuildingLength             = imdBuildingLength;
             mdBuildingWidth              = imdBuildingWidth;
             mdBuildingHeight             = imdBuildingHeight;
             mdBuildingPitch              = imdBuildingPitch;
             mdBuildingArea               = imdBuildingArea;

             mdWindSpeed                  = imdWindSpeed;
             msShieldingDesc              = imsShieldingDesc;

             mdExhaustFan                 = imdExhaustFan;
             mdExhaustFanBTU              = imdExhaustFanBTU;

             mdAirChange                  = imdAirChange;
             mdAirChangeBTU               = imdAirChangeBTU;

             msWindow1Desc                = imsWindow1Desc;
             mdWindow1Height              = imdWindow1Height;
             mdWindow1Width               = imdWindow1Width;
             miWindow1QTY                 = imiWindow1QTY;
             mdWindow1UFactor             = imdWindow1UFactor;
             mdWindow1Area                = imdWindow1Area;
             mdWindow1BTU                 = imdWindow1BTU;

             msWindow2Desc                = imsWindow2Desc;
             mdWindow2Height              = imdWindow2Height;
             mdWindow2Width               = imdWindow2Width;
             miWindow2QTY                 = imiWindow2QTY;
             mdWindow2UFactor             = imdWindow2UFactor;
             mdWindow2Area                = imdWindow2Area;
             mdWindow2BTU                 = imdWindow2BTU;

             msManDoorsDesc               = imsManDoorsDesc;
             mdManDoorsHeight             = imdManDoorsHeight;
             mdManDoorsWidth              = imdManDoorsWidth;
             miManDoorsQTY                = imiManDoorsQTY;
             mdManDoorsUFactor            = imdManDoorsUFactor;
             mdManDoorsArea               = imdManDoorsArea;
             mdManDoorsBTU                = imdManDoorsBTU;

             msDBLDoorsDesc               = imsDBLDoorsDesc;
             mdDBLDoorsHeight             = imdDBLDoorsHeight;
             mdDBLDoorsWidth              = imdDBLDoorsWidth;
             miDBLDoorsQTY                = imiDBLDoorsQTY;
             mdDBLDoorsUFactor            = imdDBLDoorsUFactor;
             mdDBLDoorsArea               = imdDBLDoorsArea;
             mdDBLDoorsBTU                = imdDBLDoorsBTU;

             msOHDoorsDesc                = imsOHDoorsDesc;
             mdOHDoorsHeight              = imdOHDoorsHeight;
             mdOHDoorsWidth               = imdOHDoorsWidth;
             miOHDoorsQTY                 = imiOHDoorsQTY;
             mdOHDoorsUFactor             = imdOHDoorsUFactor;
             mdOHDoorsArea                = imdOHDoorsArea;
             mdOHDoorsBTU                 = imdOHDoorsBTU;

             msLouvreDesc                 = imsLouvreDesc;
             mdLouvreHeight               = imdLouvreHeight;
             mdLouvreWidth                = imdLouvreWidth;
             miLouvreQTY                  = imiLouvreQTY;
             mdLouvreUFactor              = imdLouvreUFactor;
             mdLouvreArea                 = imdLouvreArea;
             mdLouvreBTU                  = imdLouvreBTU;

             msRidgeDesc                  = imsRidgeDesc;
             mdRidgeHeight                = imdRidgeHeight;
             mdRidgeWidth                 = imdRidgeWidth;
             miRidgeQTY                   = imiRidgeQTY;
             mdRidgeUFactor               = imdRidgeUFactor;
             mdRidgeArea                  = imdRidgeArea;
             mdRidgeBTU                   = imdRidgeBTU;

             msOthersDesc                 = imsOthersDesc;
             mdOthersHeight               = imdOthersHeight;
             mdOthersWidth                = imdOthersWidth;
             miOthersQTY                  = imiOthersQTY;
             mdOthersUFactor              = imdOthersUFactor;
             mdOthersArea                 = imdOthersArea;
             mdOthersBTU                  = imdOthersBTU;

             msWallDesc                   = imsWallDesc;
             mdWallUFactor                = imdWallUFactor;
             mdWallArea                   = imdWallArea;
             mdWallBTU                    = imdWallBTU;

             msCeilingDesc                = imsCeilingDesc;
             mdCeilingUFactor             = imdCeilingUFactor;
             mdCeilingArea                = imdCeilingArea;
             mdCeilingBTU                 = imdCeilingBTU;

             msFloorDesc                  = imsFloorDesc;
             mdFloorUFactor               = imdFloorUFactor;
             mdFloorArea                  = imdFloorArea;
             mdFloorBTU                   = imdFloorBTU;

             mdCalcTotalBtuh              = imdCalcTotalBtuh;
             mdCalcTotalKW                = imdCalcTotalKW;

             mdRecTotalBtuh               = imdRecTotalBtuh;
             mdRecTotalKW                 = imdRecTotalKW;
}
//to display the report
function displayReport(){

	    //decide what browser to open
	    var maxWidth  = screen.availWidth;
	    var maxHeight = screen.availHeight;

	    if(Nav4){//Netscape Browser
		//to construct a new window for the report
 		ReportWindow = window.open("", "ReportWindow", 
					   "width=" + outerWidth + ",height=" + outerHeight +
					   "directories,menubar," +
					   "scrollbars,status,toolbar,resizable")	
            	//if (window.screen) {//resize the window 
           	     ReportWindow.moveTo(0, 0);
           	     ReportWindow.outerHeight = screen.availHeight;
           	     ReportWindow.outerWidth =  (screen.availWidth - 150);
		//}

 	    }else if(IE4){//Internet Explorer Browser
		//to construct a new window for the report
 		ReportWindow = window.open("", "ReportWindow", 
					   "toolbar=yes,directories=yes,status=yes," +
					   "menubar=yes,scrollbars=yes,resizable=yes," + 
					   "width=" + maxWidth + ",height=" + maxHeight)

	         if (window.screen) {//resize the window 
        	   ReportWindow.moveTo(0, 0);
	           ReportWindow.resizeTo((screen.availWidth - 150), screen.availHeight)
        	 }
	    }

	//to write the content on to the webpage
	self.ReportWindow.document.open()
	self.ReportWindow.document.write(strReportStr)
	self.ReportWindow.status = "CCI Thermal Basic Heat Loss Calculation ReportReport"
	self.ReportWindow.document.close()
	self.ReportWindow.focus()
}