Subversion-Projekte lars-tiefland.php_share

<?php

//=======================================================================

// File:	JPGRAPH.PHP

// Description:	PHP Graph Plotting library. Base module.

// Created: 	2001-01-08

// Ver:		$Id: jpgraph.php 875 2007-03-25 10:53:39Z ljp $

//

// Copyright 2006 (c) Aditus Consulting. All rights reserved.

//========================================================================

require_once('jpg-config.inc.php');

require_once('jpgraph_errhandler.inc.php');

require_once('gd_image.inc.php');

require_once('jpgraph_ttf.inc.php');

require_once 'jpgraph_gradient.php';

// Version info

DEFINE('JPG_VERSION','1.21');

// Minimum required PHP version

DEFINE('MIN_PHPVERSION','4.3.1');

//------------------------------------------------------------------------

// Automatic settings of path for cache and font directory

// if they have not been previously specified

//------------------------------------------------------------------------

if(USE_CACHE) {

    if (!defined('CACHE_DIR')) {

	if ( strstr( PHP_OS, 'WIN') ) {

	    if( empty($_SERVER['TEMP']) ) {

		$t = new ErrMsgText();

		$msg = $t->Get(11,$file,$lineno);

		die($msg);

	    }

	    else {

		DEFINE('CACHE_DIR', $_SERVER['TEMP'] . '/');

	    }

	} else {

	    DEFINE('CACHE_DIR','/tmp/jpgraph_cache/');

	}

    }

}

elseif( !defined('CACHE_DIR') ) {

    DEFINE('CACHE_DIR', '');

}

if (!defined('TTF_DIR')) {

    if (strstr( PHP_OS, 'WIN') ) {

	$sroot = getenv('SystemRoot');

        if( empty($sroot) ) {

	    $t = new ErrMsgText();

	    $msg = $t->Get(12,$file,$lineno);

	    die($msg);

        }

	else {

	  DEFINE('TTF_DIR', $sroot.'/fonts/');

        }

    } else {

	DEFINE('TTF_DIR','/usr/X11R6/lib/X11/fonts/truetype/');

    }

}

//------------------------------------------------------------------

// Constants which are used as parameters for the method calls

//------------------------------------------------------------------

// Tick density

DEFINE("TICKD_DENSE",1);

DEFINE("TICKD_NORMAL",2);

DEFINE("TICKD_SPARSE",3);

DEFINE("TICKD_VERYSPARSE",4);

// Side for ticks and labels.

DEFINE("SIDE_LEFT",-1);

DEFINE("SIDE_RIGHT",1);

DEFINE("SIDE_DOWN",-1);

DEFINE("SIDE_BOTTOM",-1);

DEFINE("SIDE_UP",1);

DEFINE("SIDE_TOP",1);

// Legend type stacked vertical or horizontal

DEFINE("LEGEND_VERT",0);

DEFINE("LEGEND_HOR",1);

// Mark types for plot marks

DEFINE("MARK_SQUARE",1);

DEFINE("MARK_UTRIANGLE",2);

DEFINE("MARK_DTRIANGLE",3);

DEFINE("MARK_DIAMOND",4);

DEFINE("MARK_CIRCLE",5);

DEFINE("MARK_FILLEDCIRCLE",6);

DEFINE("MARK_CROSS",7);

DEFINE("MARK_STAR",8);

DEFINE("MARK_X",9);

DEFINE("MARK_LEFTTRIANGLE",10);

DEFINE("MARK_RIGHTTRIANGLE",11);

DEFINE("MARK_FLASH",12);

DEFINE("MARK_IMG",13);

DEFINE("MARK_FLAG1",14);

DEFINE("MARK_FLAG2",15);

DEFINE("MARK_FLAG3",16);

DEFINE("MARK_FLAG4",17);

// Builtin images

DEFINE("MARK_IMG_PUSHPIN",50);

DEFINE("MARK_IMG_SPUSHPIN",50);

DEFINE("MARK_IMG_LPUSHPIN",51);

DEFINE("MARK_IMG_DIAMOND",52);

DEFINE("MARK_IMG_SQUARE",53);

DEFINE("MARK_IMG_STAR",54);

DEFINE("MARK_IMG_BALL",55);

DEFINE("MARK_IMG_SBALL",55);

DEFINE("MARK_IMG_MBALL",56);

DEFINE("MARK_IMG_LBALL",57);

DEFINE("MARK_IMG_BEVEL",58);

// Inline defines

DEFINE("INLINE_YES",1);

DEFINE("INLINE_NO",0);

// Format for background images

DEFINE("BGIMG_FILLPLOT",1);

DEFINE("BGIMG_FILLFRAME",2);

DEFINE("BGIMG_COPY",3);

DEFINE("BGIMG_CENTER",4);

// Depth of objects

DEFINE("DEPTH_BACK",0);

DEFINE("DEPTH_FRONT",1);

// Direction

DEFINE("VERTICAL",1);

DEFINE("HORIZONTAL",0);

// Axis styles for scientific style axis

DEFINE('AXSTYLE_SIMPLE',1);

DEFINE('AXSTYLE_BOXIN',2);

DEFINE('AXSTYLE_BOXOUT',3);

DEFINE('AXSTYLE_YBOXIN',4);

DEFINE('AXSTYLE_YBOXOUT',5);

// Style for title backgrounds

DEFINE('TITLEBKG_STYLE1',1);

DEFINE('TITLEBKG_STYLE2',2);

DEFINE('TITLEBKG_STYLE3',3);

DEFINE('TITLEBKG_FRAME_NONE',0);

DEFINE('TITLEBKG_FRAME_FULL',1);

DEFINE('TITLEBKG_FRAME_BOTTOM',2);

DEFINE('TITLEBKG_FRAME_BEVEL',3);

DEFINE('TITLEBKG_FILLSTYLE_HSTRIPED',1);

DEFINE('TITLEBKG_FILLSTYLE_VSTRIPED',2);

DEFINE('TITLEBKG_FILLSTYLE_SOLID',3);

// Style for background gradient fills

DEFINE('BGRAD_FRAME',1);

DEFINE('BGRAD_MARGIN',2);

DEFINE('BGRAD_PLOT',3);

// Width of tab titles

DEFINE('TABTITLE_WIDTHFIT',0);

DEFINE('TABTITLE_WIDTHFULL',-1);

// Defines for 3D skew directions

DEFINE('SKEW3D_UP',0);

DEFINE('SKEW3D_DOWN',1);

DEFINE('SKEW3D_LEFT',2);

DEFINE('SKEW3D_RIGHT',3);

// For internal use only

DEFINE("_JPG_DEBUG",false);

DEFINE("_FORCE_IMGTOFILE",false);

DEFINE("_FORCE_IMGDIR",'/tmp/jpgimg/');

function CheckPHPVersion($aMinVersion)

{

    list($majorC, $minorC, $editC) = split('[/.-]', PHP_VERSION);

    list($majorR, $minorR, $editR) = split('[/.-]', $aMinVersion);

    if ($majorC > $majorR) return true;

    if ($majorC < $majorR) return false;

    // same major - check minor

    if ($minorC > $minorR) return true;

    if ($minorC < $minorR) return false;

    // and same minor

    if ($editC  >= $editR)  return true;

    return true;

}

//

// Make sure PHP version is high enough

//

if( !CheckPHPVersion(MIN_PHPVERSION) ) {

    JpGraphError::RaiseL(13,PHP_VERSION,MIN_PHPVERSION);

}

//

// Routine to determine if GD1 or GD2 is installed

//

function CheckGDVersion() {

    if( !function_exists("imagetypes") || !function_exists('imagecreatefromstring') )

	return 0;

    $GDfuncList = get_extension_funcs('gd');

    if( !$GDfuncList )

	return 0 ;

    else {

	if( in_array('imagegd2',$GDfuncList) &&

	    in_array('imagecreatetruecolor',$GDfuncList))

	    return 2;

	else

	    return 1;

    }

}

//

// Check what version of the GD library is installed.

//

$gdversion = CheckGDVersion();

if( $gdversion != 2 ) {

    JpGraphError::RaiseL(25002);

//(" Your PHP installation does not seem to have the required GD 2.x library. Please see the PHP documentation on how to install and enable the GD library.");

}

//

// Setup PHP error handler

//

function _phpErrorHandler($errno,$errmsg,$filename, $linenum, $vars) {

    // Respect current error level

    if( $errno & error_reporting() ) {

	JpGraphError::RaiseL(25003,basename($filename),$linenum,$errmsg);

    }

}

if( INSTALL_PHP_ERR_HANDLER ) {

    set_error_handler("_phpErrorHandler");

}

//

//Check if there were any warnings, perhaps some wrong includes by the user

//

if( isset($GLOBALS['php_errormsg']) && CATCH_PHPERRMSG &&

    !preg_match('|Deprecated|', $GLOBALS['php_errormsg'])) {

    JpGraphError::RaiseL(25004,$GLOBALS['php_errormsg']);

}

// Useful mathematical function

function sign($a) {return $a >= 0 ? 1 : -1;}

// Utility function to generate an image name based on the filename we

// are running from and assuming we use auto detection of graphic format

// (top level), i.e it is safe to call this function

// from a script that uses JpGraph

function GenImgName() {

    global $_SERVER;

    // Determine what format we should use when we save the images

    $supported = imagetypes();

    if( $supported & IMG_PNG )	   $img_format="png";

    elseif( $supported & IMG_GIF ) $img_format="gif";

    elseif( $supported & IMG_JPG ) $img_format="jpeg";

    if( !isset($_SERVER['PHP_SELF']) )

	JpGraphError::RaiseL(25005);

//(" Can't access PHP_SELF, PHP global variable. You can't run PHP from command line if you want to use the 'auto' naming of cache or image files.");

    $fname = basename($_SERVER['PHP_SELF']);

    if( !empty($_SERVER['QUERY_STRING']) ) {

	$q = @$_SERVER['QUERY_STRING'];

	$fname .= '_'.preg_replace("/\W/", "_", $q).'.'.$img_format;

    }

    else {

	$fname = substr($fname,0,strlen($fname)-4).'.'.$img_format;

    }

    return $fname;

}

//===================================================

// CLASS JpgTimer

// Description: General timing utility class to handle

// time measurement of generating graphs. Multiple

// timers can be started.

//===================================================

class JpgTimer {

    var $start;

    var $idx;

//---------------

// CONSTRUCTOR

    function JpgTimer() {

	$this->idx=0;

    }

//---------------

// PUBLIC METHODS

    // Push a new timer start on stack

    function Push() {

	list($ms,$s)=explode(" ",microtime());

	$this->start[$this->idx++]=floor($ms*1000) + 1000*$s;

    }

    // Pop the latest timer start and return the diff with the

    // current time

    function Pop() {

	assert($this->idx>0);

	list($ms,$s)=explode(" ",microtime());

	$etime=floor($ms*1000) + (1000*$s);

	$this->idx--;

	return $etime-$this->start[$this->idx];

    }

} // Class

$gJpgBrandTiming = BRAND_TIMING;

//===================================================

// CLASS DateLocale

// Description: Hold localized text used in dates

//===================================================

class DateLocale {

    var $iLocale = 'C'; // environmental locale be used by default

    var $iDayAbb = null;

    var $iShortDay = null;

    var $iShortMonth = null;

    var $iMonthName = null;

//---------------

// CONSTRUCTOR

    function DateLocale() {

	settype($this->iDayAbb, 'array');

	settype($this->iShortDay, 'array');

	settype($this->iShortMonth, 'array');

	settype($this->iMonthName, 'array');

	$this->Set('C');

    }

//---------------

// PUBLIC METHODS

    function Set($aLocale) {

	if ( in_array($aLocale, array_keys($this->iDayAbb)) ){

	    $this->iLocale = $aLocale;

	    return TRUE;  // already cached nothing else to do!

	}

	$pLocale = setlocale(LC_TIME, 0); // get current locale for LC_TIME

	if (is_array($aLocale)) {

	    foreach ($aLocale as $loc) {

		$res = @setlocale(LC_TIME, $loc);

		if ( $res ) {

		    $aLocale = $loc;

		    break;

		}

	    }

	}

	else {

	    $res = @setlocale(LC_TIME, $aLocale);

	}

	if ( ! $res ){

	    JpGraphError::RaiseL(25007,$aLocale);

//("You are trying to use the locale ($aLocale) which your PHP installation does not support. Hint: Use '' to indicate the default locale for this geographic region.");

	    return FALSE;

	}

	$this->iLocale = $aLocale;

	for ( $i = 0, $ofs = 0 - strftime('%w'); $i < 7; $i++, $ofs++ ){

	    $day = strftime('%a', strtotime("$ofs day"));

	    $day{0} = strtoupper($day{0});

	    $this->iDayAbb[$aLocale][]= $day{0};

	    $this->iShortDay[$aLocale][]= $day;

	}

	for($i=1; $i<=12; ++$i) {

	    list($short ,$full) = explode('|', strftime("%b|%B",strtotime("2001-$i-01")));

	    $this->iShortMonth[$aLocale][] = ucfirst($short);

	    $this->iMonthName [$aLocale][] = ucfirst($full);

	}

	// Return to original locale

	setlocale(LC_TIME, $pLocale);

	return TRUE;

    }

    function GetDayAbb() {

	return $this->iDayAbb[$this->iLocale];

    }

    function GetShortDay() {

	return $this->iShortDay[$this->iLocale];

    }

    function GetShortMonth() {

	return $this->iShortMonth[$this->iLocale];

    }

    function GetShortMonthName($aNbr) {

	return $this->iShortMonth[$this->iLocale][$aNbr];

    }

    function GetLongMonthName($aNbr) {

	return $this->iMonthName[$this->iLocale][$aNbr];

    }

    function GetMonth() {

	return $this->iMonthName[$this->iLocale];

    }

}

$gDateLocale = new DateLocale();

$gJpgDateLocale = new DateLocale();

//=======================================================

// CLASS Footer

// Description: Encapsulates the footer line in the Graph

//=======================================================

class Footer {

    var $left,$center,$right;

    var $iLeftMargin = 3;

    var $iRightMargin = 3;

    var $iBottomMargin = 3;

    function Footer() {

	$this->left = new Text();

	$this->left->ParagraphAlign('left');

	$this->center = new Text();

	$this->center->ParagraphAlign('center');

	$this->right = new Text();

	$this->right->ParagraphAlign('right');

    }

    function Stroke(&$aImg) {

	$y = $aImg->height - $this->iBottomMargin;

	$x = $this->iLeftMargin;

	$this->left->Align('left','bottom');

	$this->left->Stroke($aImg,$x,$y);

	$x = ($aImg->width - $this->iLeftMargin - $this->iRightMargin)/2;

	$this->center->Align('center','bottom');

	$this->center->Stroke($aImg,$x,$y);

	$x = $aImg->width - $this->iRightMargin;

	$this->right->Align('right','bottom');

	$this->right->Stroke($aImg,$x,$y);

    }

}

//===================================================

// CLASS Graph

// Description: Main class to handle graphs

//===================================================

class Graph {

    var $cache=null;		// Cache object (singleton)

    var $img=null;			// Img object (singleton)

    var $plots=array();	// Array of all plot object in the graph (for Y 1 axis)

    var $y2plots=array();// Array of all plot object in the graph (for Y 2 axis)

    var $ynplots=array();

    var $xscale=null;		// X Scale object (could be instance of LinearScale or LogScale

    var $yscale=null,$y2scale=null, $ynscale=array();

    var $iIcons = array();      // Array of Icons to add to

    var $cache_name;		// File name to be used for the current graph in the cache directory

    var $xgrid=null;		// X Grid object (linear or logarithmic)

    var $ygrid=null,$y2grid=null;

    var $doframe=true,$frame_color=array(0,0,0), $frame_weight=1;	// Frame around graph

    var $boxed=false, $box_color=array(0,0,0), $box_weight=1;		// Box around plot area

    var $doshadow=false,$shadow_width=4,$shadow_color=array(102,102,102);	// Shadow for graph

    var $xaxis=null;		// X-axis (instane of Axis class)

    var $yaxis=null, $y2axis=null, $ynaxis=array();	// Y axis (instance of Axis class)

    var $margin_color=array(200,200,200);	// Margin color of graph

    var $plotarea_color=array(255,255,255);	// Plot area color

    var $title,$subtitle,$subsubtitle; 	// Title and subtitle(s) text object

    var $axtype="linlin";		// Type of axis

    var $xtick_factor;			// Factot to determine the maximum number of ticks depending on the plot with

    var $texts=null, $y2texts=null; 	// Text object to ge shown in the graph

    var $lines=null, $y2lines=null;

    var $bands=null, $y2bands=null;

    var $text_scale_off=0, $text_scale_abscenteroff=-1; // Text scale offset in fractions and for centering bars in absolute pixels

    var $background_image="",$background_image_type=-1,$background_image_format="png";

    var $inline;

    var $showcsim=0,$csimcolor="red"; //debug stuff, draw the csim boundaris on the image if <>0

    var $grid_depth=DEPTH_BACK;	// Draw grid under all plots as default

    var $iAxisStyle = AXSTYLE_SIMPLE;

    var $iCSIMdisplay=false,$iHasStroked = false;

    var $footer;

    var $csimcachename = '', $csimcachetimeout = 0, $iCSIMImgAlt='';

    var $iDoClipping = false;

    var $y2orderback=true;

    var $tabtitle;

    var $bkg_gradtype=-1,$bkg_gradstyle=BGRAD_MARGIN;

    var $bkg_gradfrom='navy', $bkg_gradto='silver';

    var $titlebackground = false;

    var	$titlebackground_color = 'lightblue',

	$titlebackground_style = 1,

	$titlebackground_framecolor = 'blue',

	$titlebackground_framestyle = 2,

	$titlebackground_frameweight = 1,

	$titlebackground_bevelheight = 3 ;

    var $titlebkg_fillstyle=TITLEBKG_FILLSTYLE_SOLID;

    var $titlebkg_scolor1='black',$titlebkg_scolor2='white';

    var $framebevel = false, $framebeveldepth = 2 ;

    var $framebevelborder = false, $framebevelbordercolor='black';

    var $framebevelcolor1='white@0.4', $framebevelcolor2='black@0.4';

    var $background_image_mix=100;

    var $background_cflag = '';

    var $background_cflag_type = BGIMG_FILLPLOT;

    var $background_cflag_mix = 100;

    var $iImgTrans=false,

	$iImgTransHorizon = 100,$iImgTransSkewDist=150,

	$iImgTransDirection = 1, $iImgTransMinSize = true,

	$iImgTransFillColor='white',$iImgTransHighQ=false,

	$iImgTransBorder=false,$iImgTransHorizonPos=0.5;

    var $iYAxisDeltaPos=50;

    var $iIconDepth=DEPTH_BACK;

    var $iAxisLblBgType = 0,

	$iXAxisLblBgFillColor = 'lightgray', $iXAxisLblBgColor = 'black',

	$iYAxisLblBgFillColor = 'lightgray', $iYAxisLblBgColor = 'black';

    var $iTables=NULL;

//---------------

// CONSTRUCTOR

    // aWIdth 		Width in pixels of image

    // aHeight  	Height in pixels of image

    // aCachedName	Name for image file in cache directory

    // aTimeOut		Timeout in minutes for image in cache

    // aInline		If true the image is streamed back in the call to Stroke()

    //			If false the image is just created in the cache

    function Graph($aWidth=300,$aHeight=200,$aCachedName="",$aTimeOut=0,$aInline=true) {

	GLOBAL $gJpgBrandTiming;

	// If timing is used create a new timing object

	if( $gJpgBrandTiming ) {

	    global $tim;

	    $tim = new JpgTimer();

	    $tim->Push();

	}

	if( !is_numeric($aWidth) || !is_numeric($aHeight) ) {

	    JpGraphError::RaiseL(25008);//('Image width/height argument in Graph::Graph() must be numeric');

	}

	// Automatically generate the image file name based on the name of the script that

	// generates the graph

	if( $aCachedName=="auto" )

	    $aCachedName=GenImgName();

	// Should the image be streamed back to the browser or only to the cache?

	$this->inline=$aInline;

	$this->img	= new RotImage($aWidth,$aHeight);

	$this->cache 	= new ImgStreamCache($this->img);

	$this->cache->SetTimeOut($aTimeOut);

	$this->title = new Text();

	$this->title->ParagraphAlign('center');

	$this->title->SetFont(FF_FONT2,FS_BOLD);

	$this->title->SetMargin(3);

	$this->title->SetAlign('center');

	$this->subtitle = new Text();

	$this->subtitle->ParagraphAlign('center');

	$this->subtitle->SetMargin(2);

	$this->subtitle->SetAlign('center');

	$this->subsubtitle = new Text();

	$this->subsubtitle->ParagraphAlign('center');

	$this->subsubtitle->SetMargin(2);

	$this->subsubtitle->SetAlign('center');

	$this->legend = new Legend();

	$this->footer = new Footer();

	// Window doesn't like '?' in the file name so replace it with an '_'

	$aCachedName = str_replace("?","_",$aCachedName);

	// If the cached version exist just read it directly from the

	// cache, stream it back to browser and exit

	if( $aCachedName!="" && READ_CACHE && $aInline )

	    if( $this->cache->GetAndStream($aCachedName) ) {

		exit();

	    }

	$this->cache_name = $aCachedName;

	$this->SetTickDensity(); // Normal density

	$this->tabtitle = new GraphTabTitle();

    }

//---------------

// PUBLIC METHODS

    // Enable final image perspective transformation

    function Set3DPerspective($aDir=1,$aHorizon=100,$aSkewDist=120,$aQuality=false,$aFillColor='#FFFFFF',$aBorder=false,$aMinSize=true,$aHorizonPos=0.5) {

	$this->iImgTrans = true;

	$this->iImgTransHorizon = $aHorizon;

	$this->iImgTransSkewDist= $aSkewDist;

	$this->iImgTransDirection = $aDir;

	$this->iImgTransMinSize = $aMinSize;

	$this->iImgTransFillColor=$aFillColor;

	$this->iImgTransHighQ=$aQuality;

	$this->iImgTransBorder=$aBorder;

	$this->iImgTransHorizonPos=$aHorizonPos;

    }

    // Set Image format and optional quality

    function SetImgFormat($aFormat,$aQuality=75) {

	$this->img->SetImgFormat($aFormat,$aQuality);

    }

    // Should the grid be in front or back of the plot?

    function SetGridDepth($aDepth) {

	$this->grid_depth=$aDepth;

    }

    function SetIconDepth($aDepth) {

	$this->iIconDepth=$aDepth;

    }

    // Specify graph angle 0-360 degrees.

    function SetAngle($aAngle) {

	$this->img->SetAngle($aAngle);

    }

    function SetAlphaBlending($aFlg=true) {

	$this->img->SetAlphaBlending($aFlg);

    }

    // Shortcut to image margin

    function SetMargin($lm,$rm,$tm,$bm) {

	$this->img->SetMargin($lm,$rm,$tm,$bm);

    }

    function SetY2OrderBack($aBack=true) {

	$this->y2orderback = $aBack;

    }

    // Rotate the graph 90 degrees and set the margin

    // when we have done a 90 degree rotation

    function Set90AndMargin($lm=0,$rm=0,$tm=0,$bm=0) {

	$lm = $lm ==0 ? floor(0.2 * $this->img->width)  : $lm ;

	$rm = $rm ==0 ? floor(0.1 * $this->img->width)  : $rm ;

	$tm = $tm ==0 ? floor(0.2 * $this->img->height) : $tm ;

	$bm = $bm ==0 ? floor(0.1 * $this->img->height) : $bm ;

	$adj = ($this->img->height - $this->img->width)/2;

	$this->img->SetMargin($tm-$adj,$bm-$adj,$rm+$adj,$lm+$adj);

	$this->img->SetCenter(floor($this->img->width/2),floor($this->img->height/2));

	$this->SetAngle(90);

	if( empty($this->yaxis) || empty($this->xaxis) ) {

	    JpgraphError::RaiseL(25009);//('You must specify what scale to use with a call to Graph::SetScale()');

	}

	$this->xaxis->SetLabelAlign('right','center');

	$this->yaxis->SetLabelAlign('center','bottom');

    }

    function SetClipping($aFlg=true) {

	$this->iDoClipping = $aFlg ;

    }

    // Add a plot object to the graph

    function Add(&$aPlot) {

	if( $aPlot == null )

	    JpGraphError::RaiseL(25010);//("Graph::Add() You tried to add a null plot to the graph.");

	if( is_array($aPlot) && count($aPlot) > 0 )

	    $cl = $aPlot[0];

	else

	    $cl = $aPlot;

	if( is_a($cl,'Text') )

	    $this->AddText($aPlot);

	elseif( is_a($cl,'PlotLine') )

	    $this->AddLine($aPlot);

	elseif( is_a($cl,'PlotBand') )

	    $this->AddBand($aPlot);

	elseif( is_a($cl,'IconPlot') )

	    $this->AddIcon($aPlot);

	elseif( is_a($cl,'GTextTable') )

	    $this->AddTable($aPlot);

	else

	    $this->plots[] = &$aPlot;

    }

    function AddTable(&$aTable) {

	if( is_array($aTable) ) {

	    for($i=0; $i < count($aTable); ++$i )

		$this->iTables[]=&$aTable[$i];

	}

	else {

	    $this->iTables[] = &$aTable ;

	}

    }

    function AddIcon(&$aIcon) {

	if( is_array($aIcon) ) {

	    for($i=0; $i < count($aIcon); ++$i )

		$this->iIcons[]=&$aIcon[$i];

	}

	else {

	    $this->iIcons[] = &$aIcon ;

	}

    }

    // Add plot to second Y-scale

    function AddY2(&$aPlot) {

	if( $aPlot == null )

	    JpGraphError::RaiseL(25011);//("Graph::AddY2() You tried to add a null plot to the graph.");

	if( is_array($aPlot) && count($aPlot) > 0 )

	    $cl = $aPlot[0];

	else

	    $cl = $aPlot;

	if( is_a($cl,'Text') )

	    $this->AddText($aPlot,true);

	elseif( is_a($cl,'PlotLine') )

	    $this->AddLine($aPlot,true);

	elseif( is_a($cl,'PlotBand') )

	    $this->AddBand($aPlot,true);

	else

	    $this->y2plots[] = &$aPlot;

    }

    // Add plot to second Y-scale

    function AddY($aN,&$aPlot) {

	if( $aPlot == null )

	    JpGraphError::RaiseL(25012);//("Graph::AddYN() You tried to add a null plot to the graph.");

	if( is_array($aPlot) && count($aPlot) > 0 )

	    $cl = $aPlot[0];

	else

	    $cl = $aPlot;

	if( is_a($cl,'Text') || is_a($cl,'PlotLine') || is_a($cl,'PlotBand') )

	    JpGraph::RaiseL(25013);//('You can only add standard plots to multiple Y-axis');

	else

	    $this->ynplots[$aN][] = &$aPlot;

    }

    // Add text object to the graph

    function AddText(&$aTxt,$aToY2=false) {

	if( $aTxt == null )

	    JpGraphError::RaiseL(25014);//("Graph::AddText() You tried to add a null text to the graph.");

	if( $aToY2 ) {

	    if( is_array($aTxt) ) {

		for($i=0; $i < count($aTxt); ++$i )

		    $this->y2texts[]=&$aTxt[$i];

	    }

	    else

		$this->y2texts[] = &$aTxt;

	}

	else {

	    if( is_array($aTxt) ) {

		for($i=0; $i < count($aTxt); ++$i )

		    $this->texts[]=&$aTxt[$i];

	    }

	    else

		$this->texts[] = &$aTxt;

	}

    }

    // Add a line object (class PlotLine) to the graph

    function AddLine(&$aLine,$aToY2=false) {

	if( $aLine == null )

	    JpGraphError::RaiseL(25015);//("Graph::AddLine() You tried to add a null line to the graph.");

	if( $aToY2 ) {

 	    if( is_array($aLine) ) {

		for($i=0; $i < count($aLine); ++$i )

		    $this->y2lines[]=&$aLine[$i];

	    }

	    else

		$this->y2lines[] = &$aLine;

	}

	else {

 	    if( is_array($aLine) ) {

		for($i=0; $i < count($aLine); ++$i )

		    $this->lines[]=&$aLine[$i];

	    }

	    else

		$this->lines[] = &$aLine;

	}

    }

    // Add vertical or horizontal band

    function AddBand(&$aBand,$aToY2=false) {

	if( $aBand == null )

	    JpGraphError::RaiseL(25016);//(" Graph::AddBand() You tried to add a null band to the graph.");

	if( $aToY2 ) {

	    if( is_array($aBand) ) {

		for($i=0; $i < count($aBand); ++$i )

		    $this->y2bands[] = &$aBand[$i];

	    }

	    else

		$this->y2bands[] = &$aBand;

	}

	else {

	    if( is_array($aBand) ) {

		for($i=0; $i < count($aBand); ++$i )

		    $this->bands[] = &$aBand[$i];

	    }

	    else

		$this->bands[] = &$aBand;

	}

    }

    function SetBackgroundGradient($aFrom='navy',$aTo='silver',$aGradType=2,$aStyle=BGRAD_FRAME) {

	$this->bkg_gradtype=$aGradType;

	$this->bkg_gradstyle=$aStyle;

	$this->bkg_gradfrom = $aFrom;

	$this->bkg_gradto = $aTo;

    }

    // Set a country flag in the background

    function SetBackgroundCFlag($aName,$aBgType=BGIMG_FILLPLOT,$aMix=100) {

	$this->background_cflag = $aName;

	$this->background_cflag_type = $aBgType;

	$this->background_cflag_mix = $aMix;

    }

    // Alias for the above method

    function SetBackgroundCountryFlag($aName,$aBgType=BGIMG_FILLPLOT,$aMix=100) {

	$this->background_cflag = $aName;

	$this->background_cflag_type = $aBgType;

	$this->background_cflag_mix = $aMix;

    }

    // Specify a background image

    function SetBackgroundImage($aFileName,$aBgType=BGIMG_FILLPLOT,$aImgFormat="auto") {

	// Get extension to determine image type

	if( $aImgFormat == "auto" ) {

	    $e = explode('.',$aFileName);

	    if( !$e ) {

		JpGraphError::RaiseL(25018,$aFileName);//('Incorrect file name for Graph::SetBackgroundImage() : '.$aFileName.' Must have a valid image extension (jpg,gif,png) when using autodetection of image type');

	    }

	    $valid_formats = array('png', 'jpg', 'gif');

	    $aImgFormat = strtolower($e[count($e)-1]);

	    if ($aImgFormat == 'jpeg')  {

		$aImgFormat = 'jpg';

	    }

	    elseif (!in_array($aImgFormat, $valid_formats) )  {

		JpGraphError::RaiseL(25019,$aImgFormat);//('Unknown file extension ($aImgFormat) in Graph::SetBackgroundImage() for filename: '.$aFileName);

	    }

	}

	$this->background_image = $aFileName;

	$this->background_image_type=$aBgType;

	$this->background_image_format=$aImgFormat;

    }

    function SetBackgroundImageMix($aMix) {

	$this->background_image_mix = $aMix ;

    }

    // Specify axis style (boxed or single)

    function SetAxisStyle($aStyle) {

        $this->iAxisStyle = $aStyle ;

    }

    // Set a frame around the plot area

    function SetBox($aDrawPlotFrame=true,$aPlotFrameColor=array(0,0,0),$aPlotFrameWeight=1) {

	$this->boxed = $aDrawPlotFrame;

	$this->box_weight = $aPlotFrameWeight;

	$this->box_color = $aPlotFrameColor;

    }

    // Specify color for the plotarea (not the margins)

    function SetColor($aColor) {

	$this->plotarea_color=$aColor;

    }

    // Specify color for the margins (all areas outside the plotarea)

    function SetMarginColor($aColor) {

	$this->margin_color=$aColor;

    }

    // Set a frame around the entire image

    function SetFrame($aDrawImgFrame=true,$aImgFrameColor=array(0,0,0),$aImgFrameWeight=1) {

	$this->doframe = $aDrawImgFrame;

	$this->frame_color = $aImgFrameColor;

	$this->frame_weight = $aImgFrameWeight;

    }

    function SetFrameBevel($aDepth=3,$aBorder=false,$aBorderColor='black',$aColor1='white@0.4',$aColor2='darkgray@0.4',$aFlg=true) {

	$this->framebevel = $aFlg ;

	$this->framebeveldepth = $aDepth ;

	$this->framebevelborder = $aBorder ;

	$this->framebevelbordercolor = $aBorderColor ;

	$this->framebevelcolor1 = $aColor1 ;

	$this->framebevelcolor2 = $aColor2 ;

	$this->doshadow = false ;

    }

    // Set the shadow around the whole image

    function SetShadow($aShowShadow=true,$aShadowWidth=5,$aShadowColor=array(102,102,102)) {

	$this->doshadow = $aShowShadow;

	$this->shadow_color = $aShadowColor;

	$this->shadow_width = $aShadowWidth;

	$this->footer->iBottomMargin += $aShadowWidth;

	$this->footer->iRightMargin += $aShadowWidth;

    }

    // Specify x,y scale. Note that if you manually specify the scale

    // you must also specify the tick distance with a call to Ticks::Set()

    function SetScale($aAxisType,$aYMin=1,$aYMax=1,$aXMin=1,$aXMax=1) {

	$this->axtype = $aAxisType;

	if( $aYMax < $aYMin || $aXMax < $aXMin )

	    JpGraphError::RaiseL(25020);//('Graph::SetScale(): Specified Max value must be larger than the specified Min value.');

	$yt=substr($aAxisType,-3,3);

	if( $yt=="lin" )

	    $this->yscale = new LinearScale($aYMin,$aYMax);

	elseif( $yt == "int" ) {

	    $this->yscale = new LinearScale($aYMin,$aYMax);

	    $this->yscale->SetIntScale();

	}

	elseif( $yt=="log" )

	    $this->yscale = new LogScale($aYMin,$aYMax);

	else

	    JpGraphError::RaiseL(25021,$aAxisType);//("Unknown scale specification for Y-scale. ($aAxisType)");

	$xt=substr($aAxisType,0,3);

	if( $xt == "lin" || $xt == "tex" ) {

	    $this->xscale = new LinearScale($aXMin,$aXMax,"x");

	    $this->xscale->textscale = ($xt == "tex");

	}

	elseif( $xt == "int" ) {

	    $this->xscale = new LinearScale($aXMin,$aXMax,"x");

	    $this->xscale->SetIntScale();

	}

	elseif( $xt == "dat" ) {

	    $this->xscale = new DateScale($aXMin,$aXMax,"x");

	}

	elseif( $xt == "log" )

	    $this->xscale = new LogScale($aXMin,$aXMax,"x");

	else

	    JpGraphError::RaiseL(25022,$aAxisType);//(" Unknown scale specification for X-scale. ($aAxisType)");

	$this->xaxis = new Axis($this->img,$this->xscale);

	$this->yaxis = new Axis($this->img,$this->yscale);

	$this->xgrid = new Grid($this->xaxis);

	$this->ygrid = new Grid($this->yaxis);

	$this->ygrid->Show();

    }

    // Specify secondary Y scale

    function SetY2Scale($aAxisType="lin",$aY2Min=1,$aY2Max=1) {

	if( $aAxisType=="lin" )

	    $this->y2scale = new LinearScale($aY2Min,$aY2Max);

	elseif( $aAxisType == "int" ) {

	    $this->y2scale = new LinearScale($aY2Min,$aY2Max);

	    $this->y2scale->SetIntScale();

	}

	elseif( $aAxisType=="log" ) {

	    $this->y2scale = new LogScale($aY2Min,$aY2Max);

	}

	else JpGraphError::RaiseL(25023,$aAxisType);//("JpGraph: Unsupported Y2 axis type: $aAxisType\nMust be one of (lin,log,int)");

	$this->y2axis = new Axis($this->img,$this->y2scale);

	$this->y2axis->scale->ticks->SetDirection(SIDE_LEFT);

	$this->y2axis->SetLabelSide(SIDE_RIGHT);

	$this->y2axis->SetPos('max');

	$this->y2axis->SetTitleSide(SIDE_RIGHT);

	// Deafult position is the max x-value

	$this->y2grid = new Grid($this->y2axis);

    }

    // Set the delta position (in pixels) between the multiple Y-axis

    function SetYDeltaDist($aDist) {

	$this->iYAxisDeltaPos = $aDist;

    }

    // Specify secondary Y scale

    function SetYScale($aN,$aAxisType="lin",$aYMin=1,$aYMax=1) {

	if( $aAxisType=="lin" )

	    $this->ynscale[$aN] = new LinearScale($aYMin,$aYMax);

	elseif( $aAxisType == "int" ) {

	    $this->ynscale[$aN] = new LinearScale($aYMin,$aYMax);

	    $this->ynscale[$aN]->SetIntScale();

	}

	elseif( $aAxisType=="log" ) {

	    $this->ynscale[$aN] = new LogScale($aYMin,$aYMax);

	}

	else JpGraphError::RaiseL(25024,$aAxisType);//("JpGraph: Unsupported Y axis type: $aAxisType\nMust be one of (lin,log,int)");

	$this->ynaxis[$aN] = new Axis($this->img,$this->ynscale[$aN]);

	$this->ynaxis[$aN]->scale->ticks->SetDirection(SIDE_LEFT);

	$this->ynaxis[$aN]->SetLabelSide(SIDE_RIGHT);

    }