<%@LANGUAGE="JSCRIPT"%><%
	//
	// Generate a Clarity I snapshot - manual refresh
	//
	// 23-Mar-07 Ajai Sehgal - Initial edit based on aclarityII.asp
	// 10-Apr-07 Bob Denny - Remove generic info that shows in Weather
	//           and System Status, colors were hardwired. 
	//
	
	Response.ContentType = "text/plain";									
	var C;
	try {
		C = new ActiveXObject("Clarity.CloudSensor");
	} catch(ex) {
		Response.Write("Clarity is not available.\n\n");
		Response.End();
	}
	//
	// We have Clarity I and it's connected
	//
	Response.Write("For generic data, see the [[Weather]] item.\n");
	Response.Write("|!Sky Temp|");
	switch(C.RelSkyT)
	{
		case 999:
			Response.Write("Sensor saturated hot");
			break;
		case -999:
			Response.Write("Sensor saturated cold");
			break;
		case -998:
			Response.Write("N/A - sensor wet");
			break;
		default:
			Response.Write(Util.FormatVar(C.RelSkyT, "0.0"));
			break;
	}
	Response.Write(" deg C");
	Response.Write("|!Ambient Temp|");
	switch(C.AmbientT)
	{
		case 999:
			Response.Write("Saturated hot");
			break;
		case -999:
			Response.Write("Saturated cold");
			break;
		default:
			Response.Write(Util.FormatVar(C.AmbientT, "0.0"));
			break;
	}
	Response.Write(" deg C");
	Response.Write("|!Sensor Temp|");
	switch(C.SensorT)
	{
		case 999:
			Response.Write("Saturated hot");
			break;
		case -999:
			Response.Write("Saturated cold");
			break;
		default:
			Response.Write(Util.FormatVar(C.SensorT, "0.0"));
			break;
	}
	Response.Write(" deg C|\n");
	Response.Write("|!Sky Condition|");
	switch(C.SkyCondition)
	{
		case 0:
			Response.Write("Unknown");
			break;
		case 1:
			Response.Write("@@background:green;color:black;Clear@@");
			break;
		case 2:
			Response.Write("@@background:yellow;color:black;Cloudy@@");
			break;
		case 3:
			Response.Write("@@background:red;color:black;Very Cloudy@@");
			break;
		case 4:
			Response.Write("@@background:red;color:black;Wet@@");
			break;
		default:
			Response.Write("Invalid");
			break;
	}
	Response.Write("|!Sensor wet?|" + (C.WetF ? "Yes" : "No"));
	Response.Write("|!Drops detected?|"+ (C.RainF ? "Yes" : "No") + "|\n");
	Response.Write("Last good data from sensor " + Util.FormatVar(C.SecondsSinceGoodData, "0.0") + " sec. ago.\n\n");
	
%>