NAME

GD::Graph::Polar - Make polar graph using GD package

SYNOPSIS

use GD::Graph::Polar;
my $obj=GD::Graph::Polar->new(size=>480, radius=>100);
$obj->addPoint        (50=>25);
$obj->addPoint_rad    (50=>3.1415);
$obj->addGeoPoint     (75=>25);
$obj->addGeoPoint_rad (75=>3.1415);
$obj->addLine($r0=>$t0, $r1=>$t1);
$obj->addLine_rad($r0=>$t0, $r1=>$t1);
$obj->addGeoLine($r0=>$t0, $r1=>$t1);
$obj->addGeoLine_rad($r0=>$t0, $r1=>$t1);
$obj->addArc($r0=>$t0, $r1=>$t1);
$obj->addArc_rad($r0=>$t0, $r1=>$t1);
$obj->addGeoArc($r0=>$t0, $r1=>$t1);
$obj->addGeoArc_rad($r0=>$t0, $r1=>$t1);
$obj->addString($r=>$t, "Hello World!");
$obj->addString_rad($r=>$t, "Hello World!");
$obj->addGeoString($r=>$t, "Hello World!");
$obj->addGeoString_rad($r=>$t, "Hello World!");
$obj->font(gdSmallFont);  #sets the current font from GD exports
$obj->color("blue");      #sets the current color from Graphics::ColorNames
$obj->color([0,0,0]);     #sets the current color [red,green,blue]
print $obj->draw;

DESCRIPTION

CONSTRUCTOR

new

The new() constructor.

my $obj = GD::Graph::Polar->new(               #default values
                                size=>480,     #width and height in pixels
                                radius=>1,     #scale of the radius
                                ticks=>10,     #number of major ticks
                                border=>2,     #pixel border around graph
                                rgbfile=>"/usr/X11R6/lib/X11/rgb.txt"
                               );

METHODS

addPoint

Method to add a point to the graph.

$obj->addPoint(50=>25);

addPoint_rad

Method to add a point to the graph.

$obj->addPoint_rad(50=>3.1415);

addGeoPoint

Method to add a point to the graph.

$obj->addGeoPoint(75=>25);

addGeoPoint_rad

Method to add a point to the graph.

$obj->addGeoPoint_rad(75=>3.1415);

addLine

Method to add a line to the graph.

$obj->addLine(50=>25, 75=>35);

addLine_rad

Method to add a line to the graph.

$obj->addLine_rad(50=>3.14, 75=>3.45);

addGeoLine

Method to add a line to the graph.

$obj->addGeoLine(50=>25, 75=>35);

addGeoLine_rad

Method to add a line to the graph.

$obj->addGeoLine_rad(50=>3.14, 75=>3.45);

addArc

Method to add an arc to the graph.

$obj->addArc(50=>25, 75=>35);

addArc_rad

Method to add an arc to the graph.

$obj->addArc_rad(50=>3.14, 75=>3.45);

addGeoArc

Method to add an arc to the graph.

$obj->addGeoArc(50=>25, 75=>35);

addGeoArc_rad

Method to add an arc to the graph.

$obj->addGeoArc_rad(50=>25, 75=>35);

addString

Method to add a string to the graph.

addString_rad

Method to add a string to the graph.

addGeoString

Method to add a string to the graph.

addGeoString_rad

Method to add a string to the graph.

color

Method to set or return the current drawing color

my $colorobj=$obj->color("blue");     #if Graphics::ColorNames available
my $colorobj=$obj->color([77,82,68]); #rgb=>[decimal,decimal,decimal]
my $colorobj=$obj->color;

font

Method to set or return the current drawing font (only needed by the very few)

use GD qw(gdGiantFont gdLargeFont gdMediumBoldFont gdSmallFont gdTinyFont);
$obj->font(gdSmallFont); #the default
$obj->font;

draw

Method returns a PNG binary blob.

my $png_binary=$obj->draw;

TODO

BUGS

Please send to the geo-perl email list.

LIMITS

AUTHOR

Michael R. Davis qw/perl michaelrdavis com/

LICENSE

Copyright (c) 2006 Michael R. Davis (mrdvt92)

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

SEE ALSO

GD Geo::Constants Geo::Functions