<?php

//  Thermogram. Site climatic seasons.
//  Coded by Luis Gil. http://meteo.aerolugo.com

//where are your clientraw*-files relative to where this file is
$hostloc = "../";

include ("../jpgraph-1/src/jpgraph.php");
include ("../jpgraph-1/src/jpgraph_radar.php");


$clientraw = get_raw("${hostloc}clientraw.txt");
$clientrawextra = get_raw("${hostloc}clientrawextra.txt");
$clientrawdaily = get_raw ("${hostloc}clientrawdaily.txt");
$wxdata = get_raw("${hostloc}wx2.html");

//read the clientraw*-files we need
function get_raw( $rawfile ) {
	$rawdata = array();
	$fd = fopen($rawfile, "r");
	if ($fd) {
		$rawcontents = '';
		while (! feof ($fd) ) {
			$rawcontents .= fread($fd, 8192);
		}
		fclose($fd);
		$delimiter = "|";
		$rawdata = explode ($delimiter, $rawcontents);
	} else {
		$rawdata[0]= -9999;
	}
	return $rawdata;
}

// avg month temp   ==========================================================
$y = array($wxdata['0'],$wxdata['1'],$wxdata['2'],$wxdata['3'],
$wxdata['4'],$wxdata['5'],$wxdata['6'],$wxdata['7'],
$wxdata['8'],$wxdata['9'],$wxdata['10'],$wxdata['11']);
$ydata = $y;
$ydata = array_reverse($y); // to make the plot clockwise. Remove this line if you want it CCW.


// Create the basic rtadar graph
$graph = new RadarGraph(500,350,"auto");
$graph->img->SetAntiAliasing($aFlg=true);
// Set background color and shadow
$graph->SetColor("white");
$graph->SetFrame(true,'black',2);
$graph->SetBackgroundImage("./images/fondo_termograma.jpg",BGIMG_FILLFRAME);
//$graph->SetShadow();

// Position the graph
$graph->SetCenter(0.35,0.55);

// Setup the axis formatting 	
$graph->axis->SetFont(FF_FONT1,FS_BOLD);
$graph->axis->SetWeight(2);
$graph->SetScale('lin',-10,30);

// Setup the grid lines
$graph->grid->SetLineStyle("dashed");
$graph->grid->SetColor("navy");
$graph->grid->Show();
$graph->HideTickMarks();
		
// Setup graph titles
$graph->tabtitle->Set("TERMOGRAMA 2012 - " . date("Y"));
$graph->tabtitle->SetFont(FF_ARIAL,FS_BOLD,11);
$graph->SetTitles(array("Dic","Nov","Oct","Sep","Ago","Jul","Jun","May","Abr","Mar","Feb","Ene"));  // to make the plot clockwise...
//$graph->SetTitles(array("Ene","Feb","Mar","Abr","May","Jun","Jul","Ago","Sep","Oct","Nov","Dic")); // to make the plot CCW...
// Setup graph legend
$graph->legend->SetPos(0.5,0.98,'center','bottom');
// Create the radar plot
$plot4 = new RadarPlot($ydata);
$plot4->SetLegend("Temp. Media");
$plot4->SetColor("darkred","aqua");
$plot4->mark->SetType(MARK_IMG_SBALL,'red');
// Create and add a new text
$txt=new Text(" Estaciones climáticas\n menor 0 -> Fría\n 0 - 10   -> Templada\n 10 - 20  -> Cálida\n mayor 20 -> Tórrida\n =====================\nSan Sebastián - Arriola\n Latitud: 43.311 \n Longitud: -2.014");
$txt->Pos(350,190,"left","center");
$txt->SetFont(FF_FONT1,FS_NORMAL);
$txt->ParagraphAlign('left');
$txt->SetBox('white','navy','gray');
$txt->SetColor("black");
$graph->AddText($txt); 

// Add the plots to the graph
$graph->Add($plot4);


// And output the graph
$graph->Stroke();

?>