edit: Flera kurvor i samma graf?

Hur gör man för att ... ? Hur fungerar ... ? Steg för steg-guider och förklarande artiklar finns i detta forum.
Många guider finner också på vår blogg: https://blog.m.nu/
Kategoriregler
Vill du visa bilder i ditt inlägg? Använd funktionen "Ladda upp bilaga" nedanför textrutan!
sm7rdx
Tar hemautomation på allvar
Inlägg: 126
Blev medlem: 17 feb 2010, 20:38
Ort: Kalmar
Kontakt:

edit: Flera kurvor i samma graf?

Inlägg av sm7rdx »

Jag har använt owfs ett tag nu, mest för att ha som indata till NexaHome och
att visa temperaturer på hemsidan.
Nu har jag fått för mig att prova rrdtool och skriva en graf på hemsidan. Jag
kollade den guide som finns i Wikin och det gick som f-n. Nu ville jag ha flera
kurvor i samma graf. Jag fattar ju att jag ska skapa en databas till varje givare.
Så ett script att hämta data från varje givare, inga problem.
Men när det kommer till att skriva ut fler än en kurva skiter det sig rejält. Hur jag
trixar så får jag bara den ursprungliga kurvan, den andra blir det inget av.
Vad gör jag för fel?

Kod: Markera allt

#!/usr/bin/perl

use RRDs;

my $cur_time = time();
my $start_time = $cur_time - 86400;     # set end time to 24 hours ago 
                
RRDs::graph "/var/www/temp/graph.png",   
			"--start= $start_time",
			"--end= $cur_time",
			"--title= Test med rrd.",
			"--height= 300",
			"--width= 500",
			"--vertical-label= °C",
		"DEF:MatTemp=/home/rrd/rrddata/mat.rrd:mattemp:AVERAGE", 
		"DEF:AltanTemp=/home/rrd/rrddata/altan.rrd:altantemp:AVERAGE",                          
			"COMMENT:\t\t\t\tNu     Medel    Max    Min\\n",
			"HRULE:0#FFFF00",   		    
	      "LINE2:MatTemp#0000FF:Matkällaren\t\t",   
			"GPRINT:MatTemp:LAST:%6.1lf",
			"GPRINT:MatTemp:AVERAGE:%6.1lf",
			"GPRINT:MatTemp:MAX:%6.1lf",
			"GPRINT:MatTemp:MIN:%6.1lf\\n";
			"HRULE:0#800080",  		
		"LINE2:AltanTemp#FF0000:Altanen\t\t",   
			"GPRINT:AltanTemp:LAST:%6.1lf",
			"GPRINT:AltanTemp:AVERAGE:%6.1lf",
			"GPRINT:AltanTemp:MAX:%6.1lf",
			"GPRINT:AltanTemp:MIN:%6.1lf\\n";

my $err=RRDs::error;
if ($err) {print "problem generating the graph: $err\n";}

print "Done!\n"
Detta är mitt graph.pl-script.
Tips?? :?

Jag har fifflat som bara den, hittade ett semikolon som inte verkade passa. Bytte mot ett komma
och så var saken klar. Man stirrar sig blind på "fel" saker. :oops: