/*	trend_pairs.js
	081609 hac		v1.0	from trend day forecast

	Grabs the current high vol stock odds from the server and displays them in a bar chart

*/


var xmlhttp = null;

function writedate() {

	document.write(Date());
}

function loadXMLDoc(url){    
    var doctext = "";
    
	xmlhttp=new XMLHttpRequest();
	
	if (xmlhttp!=null){
	  
	  xmlhttp.open("GET",url, false);
	  
	  xmlhttp.send(null);
	  
	  //falls through on synchronous
		if (window.console) {
			window.console.log(xmlhttp.readyState.toString());
		}
		
		if (xmlhttp.readyState==4){
		  // 4 = "loaded"
		  
			if (window.console) {
				window.console.log("state change status");
			}
		
		  if (xmlhttp.status==200){
			// 200 = "OK"
			
			
			doctext = xmlhttp.responseText;
			

			//placeholder
			//percent = 0;
			
		  }
		  else{
			alert("Problem retrieving data from server:" + xmlhttp.statusText);
			
			//percent = 0;
		  }
	  
	  }
	}
	else{
	  alert("Your browser does not support XMLHTTP.");
	}
	
	return doctext;
}

//Build table from high vol stocks array
function buildtable(doctext){
	var clickstr	= "";
	var datestring	= "";
	var hvstable	= "";
    var splitresult 	= new Array();
    var tempsplit		= new Array();

	splitresult = doctext.split(/\r/g);
	
	//build pairs table
	dx = 26;
	hvstable = "<table border='1' cellpadding='10'>"
	hvstable = hvstable + "<th>" + "Stock" + "</th>"
	hvstable = hvstable + "<th>" + "Trend<br /> Odds(%)" + "</th>"
	hvstable = hvstable + "<th>" + "Stock" + "</th>"
	hvstable = hvstable + "<th>" + "Trend<br /> Odds(%)" + "</th>"
	for (index = 1; index < dx; index++) {
		tempsplit = splitresult[index].split(/\s/g);
		hvstable = hvstable + "<tr>";
		
		//the 0 pos seems to hold a space or cr
		
		
		for (j = 1; j<= 4; j++) {
		clickstr = "<a class='link' href='http://www.google.com/finance?q=" + tempsplit[j] + "'>";
			if (j==1)
				hvstable = hvstable + "<td>" + clickstr + tempsplit[j] + "</a>" + "</td>"
			else if (j==2) 
				hvstable = hvstable + "<td bgcolor='lightgreen'>" + tempsplit[j] + "</td>"
			else if (j==3)
				hvstable = hvstable + "<td>" + clickstr + tempsplit[j] + "</a>" + "</td>"
			else if (j==4)
				hvstable = hvstable + "<td bgcolor='lightcoral'>" + tempsplit[j] + "</td>";
		}
		hvstable = hvstable + "</tr>";
		
	}
	hvstable = hvstable + "</table>";
	hvstable = hvstable + "<br /><br />";
	
	datestring = datestring + "Last updated: " + Date() + "<br /><br />";
	
	hvstable = hvstable + datestring;
	
	return hvstable;
}


function trendpairs() {
	var doctext = "";
	var hvstable = "";
	
	var url = "http://www.verticalsolutions.com/pairs.txt";
	
	
	// get the current stocks and trends from the server
	doctext = loadXMLDoc(url);
	
	if (window.console) {
		window.console.log("post loadxml ");
	}
	
    // build out the table
    hvstable = buildtable(doctext);
    
    if (window.console) {
		window.console.log("post build table ");
	}
	
	// display the table	
	document.getElementById("pairs_table").innerHTML = hvstable;
    
}