http://www.perlmonks.org?node_id=342101


in reply to GD::Graph vertical line

A slightly different ugly hack, in an attempt to make more use of what GD::Graph provides:
my $chosen_x = ($graph->GD::Graph::axestype::val_to_pixel(5,0,1))[0]; +# only the 5 matters here my @ys = @{$graph->get_feature_coordinates('axes')}[2,4]; # the y coor +ds of the chart box $graph->{graph}->line($chosen_x, $ys[0], $chosen_x, $ys[1], 8); # 8 is + black, or you could colorAllocate() something
In my test it seems to line up the vertical better than in tachyon's example, but there may be other reasons for that too. The val_to_pixel() subroutine could be really handy for drawing objects, or inserting bitmaps too, I'll have to play with that some more.

--
I'd like to be able to assign to an luser

Replies are listed 'Best First'.
Re: Re: GD::Graph vertical line
by tachyon (Chancellor) on Apr 03, 2004 at 08:04 UTC

    Yes, I know what you mean. Depending on the value my hack may or may not have a 1 pixel left offset from the tick mark. Mostly it lines up as expected. I was too lazy to look at the tick code to see how the rounding to integer is being done.

    cheers

    tachyon