Lines Matching refs:graph
289 my($graph)=@_;
294 my$w=$graph->{"canvas"};
304 if($graph->{"vars"}->[$i]){
306 if(!defined($graph->{"minx"})){
308 $graph->{"maxx"}=$1;
309 $graph->{"minx"}=$1;
310 $graph->{"maxy"}=$2;
311 $graph->{"miny"}=$2;
317 $rescale=1 if($1>$graph->{"maxx"});
318 $rescale=1 if($1<$graph->{"minx"});
319 $rescale=1 if($2>$graph->{"maxy"});
320 $rescale=1 if($2<$graph->{"miny"});
321 $graph->{"maxx"}=$1 if($1>$graph->{"maxx"});
322 $graph->{"minx"}=$1 if($1<$graph->{"minx"});
323 $graph->{"maxy"}=$2 if($2>$graph->{"maxy"});
324 $graph->{"miny"}=$2 if($2<$graph->{"miny"});
334 $rescale=1 if(!defined($graph->{"width"}) ||
335 $width!=$graph->{"width"} ||
336 $height!=$graph->{"height"});
338 $graph->{"width"}=$width;
339 $graph->{"height"}=$height;
341 if(defined($graph->{"maxx"})){
355 while(($graph->{"maxx"}-$graph->{"minx"})*$xscale>15){$xscale*=.1;$ixscale*=10.;}
356 while(($graph->{"maxy"}-$graph->{"miny"})*$yscale>15){$yscale*=.1;$iyscale*=10.;}
358 while(($graph->{"maxx"}-$graph->{"minx"})*$xscale<3){$xscale*=10.;$ixscale*=.1;}
359 while(($graph->{"maxy"}-$graph->{"miny"})*$yscale<3){$yscale*=10.;$iyscale*=.1;}
367 my$pixelpery=$useabley/($graph->{"maxy"}-$graph->{"miny"});
371 my$topyval=int($graph->{"maxy"}*$yscale+1.)*$iyscale;
375 my$y= ($graph->{"maxy"}-$yval)*$pixelpery;
398 my$y= ($graph->{"maxy"}-$yval)*$pixelpery;
415 my$topxval=int($graph->{"maxx"}*$xscale+1.)*$ixscale;
416 my$pixelperx=$useablex/($graph->{"maxx"}-$graph->{"minx"});
420 my$x= $width-($graph->{"maxx"}-$xval)*$pixelperx;
434 my$x= $width-($graph->{"maxx"}-$xval)*$pixelperx;
447 $graph->{"labelheight"}=$maxlabelheight;
448 $graph->{"xo"}=$beginx;
449 $graph->{"ppx"}=$pixelperx;
450 $graph->{"ppy"}=$pixelpery;
455 my$legendy=$graph->{"labelheight"}/2;
457 if($graph
464 $legendy+=$graph->{"labelheight"};
468 (($1-$graph->{"minx"})*$graph->{"ppx"}+$graph->{"xo"},
469 (-$2+$graph->{"maxy"})*$graph->{"ppy"})}} (@{$data[$i]});
