Subversion Repositories cheapmusic

<?php

 /*

     pChart - a PHP class to build charts!

     Copyright (C) 2008 Jean-Damien POGOLOTTI

     Version  1.27 last updated on 08/17/08

     http://pchart.sourceforge.net

     This program is free software: you can redistribute it and/or modify

     it under the terms of the GNU General Public License as published by

     the Free Software Foundation, either version 1,2,3 of the License, or

     (at your option) any later version.

     This program is distributed in the hope that it will be useful,

     but WITHOUT ANY WARRANTY; without even the implied warranty of

     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

     GNU General Public License for more details.

     You should have received a copy of the GNU General Public License

     along with this program.  If not, see <http://www.gnu.org/licenses/>.

     Class initialisation :

      pChart($XSize,$YSize)

     Draw methods :

      drawBackground($R,$G,$B)

      drawRectangle($X1,$Y1,$X2,$Y2,$R,$G,$B)

      drawFilledRectangle($X1,$Y1,$X2,$Y2,$R,$G,$B,$DrawBorder=TRUE,$Alpha=100)

      drawRoundedRectangle($X1,$Y1,$X2,$Y2,$Radius,$R,$G,$B)

      drawFilledRoundedRectangle($X1,$Y1,$X2,$Y2,$Radius,$R,$G,$B)

      drawCircle($Xc,$Yc,$Height,$R,$G,$B,$Width=0)

      drawFilledCircle($Xc,$Yc,$Height,$R,$G,$B,$Width=0)

      drawEllipse($Xc,$Yc,$Height,$Width,$R,$G,$B)

      drawFilledEllipse($Xc,$Yc,$Height,$Width,$R,$G,$B)

      drawLine($X1,$Y1,$X2,$Y2,$R,$G,$B,$GraphFunction=FALSE)

      drawDottedLine($X1,$Y1,$X2,$Y2,$DotSize,$R,$G,$B)

      drawAlphaPixel($X,$Y,$Alpha,$R,$G,$B)

      drawFromPNG($FileName,$X,$Y,$Alpha=100)

      drawFromGIF($FileName,$X,$Y,$Alpha=100)

      drawFromJPG($FileName,$X,$Y,$Alpha=100)

     Graph setup methods :

      drawGraphArea($R,$G,$B,$Stripe=FALSE)

      drawScale(&$Data,&$DataDescription,$ScaleMode,$R,$G,$B,$DrawTicks=TRUE,$Angle=0,$Decimals=1,$WithMargin=FALSE,$SkipLabels=1)

      drawGrid($LineWidth,$Mosaic=TRUE,$R=220,$G=220,$B=220,$Alpha=100)

      drawLegend($XPos,$YPos,&$DataDescription,$R,$G,$B)

      drawPieLegend($XPos,$YPos,$Data,$DataDescription,$R,$G,$B)

      drawTitle($XPos,$YPos,$Value,$R,$G,$B,$XPos2=-1,$YPos2=-1)

      drawTreshold($Value,$R,$G,$B,$ShowLabel=FALSE,$ShowOnRight=FALSE,$TickWidth=4)

      drawArea(&$Data,$Serie1,$Serie2,$R,$G,$B,$Alpha = 50)

      drawRadarAxis(&$Data,&$DataDescription,$Mosaic=TRUE,$BorderOffset=10,$A_R=60,$A_G=60,$A_B=60,$S_R=200,$S_G=200,$S_B=200,$MaxValue=-1)

      getLegendBoxSize($DataDescription)

      loadColorPalette($FileName,$Delimiter=",")

      reportWarnings($Interface="CLI")

      setGraphArea($X1,$Y1,$X2,$Y2)

      setFixedScale($VMin,$VMax)

      setLabel(&$Data,&$DataDescription,$SerieName,$ValueName,$Caption,$R=210,$G=210,$B=210)

      setColorPalette($ID,$R,$G,$B)

      setDateFormat($Format)

      setFontProperties($FontName,$FontSize)

      setLineStyle($Width=1,$DotSize=0)

      setFixedScale($VMin,$VMax,$Divisions=5)

      writeValues(&$Data,&$DataDescription,$Series)

    Graphs methods :

      drawPlotGraph(&$Data,&$DataDescription,$BigRadius=5,$SmallRadius=2,$R2=-1,$G2=-1,$B2=-1)

      drawLineGraph(&$Data,&$DataDescription,$SerieName="")

      drawFilledLineGraph(&$Data,&$DataDescription,$Alpha=100,$AroundZero=FALSE)

      drawCubicCurve(&$Data,&$DataDescription,$Accuracy=.1,$SerieName="")

      drawFilledCubicCurve(&$Data,&$DataDescription,$Accuracy=.1,$Alpha=100,$AroundZero=FALSE)

      drawOverlayBarGraph(&$Data,&$DataDescription,$Alpha=50)

      drawBarGraph(&$Data,&$DataDescription,$Shadow=FALSE)

      drawStackedBarGraph(&$Data,&$DataDescription,$Alpha=50)

      drawLimitsGraph(&$Data,&$DataDescription,$R=0,$G=0,$B=0)

      drawRadar(&$Data,&$DataDescription,$BorderOffset=10,$MaxValue=-1)

      drawFilledRadar(&$Data,&$DataDescription,$Alpha=50,$BorderOffset=10,$MaxValue=-1)

      drawBasicPieGraph(&$Data,&$DataDescription,$XPos,$YPos,$Radius=100,$DrawLabels=PIE_NOLABEL,$R=255,$G=255,$B=255,$Decimals=0)

      drawFlatPieGraph(&$Data,&$DataDescription,$XPos,$YPos,$Radius=100,$DrawLabels=PIE_NOLABEL,$SpliceDistance=0,$Decimals = 0)

      drawPieGraph(&$Data,&$DataDescription,$XPos,$YPos,$Radius=100,$DrawLabels=PIE_NOLABEL,$EnhanceColors=TRUE,$Skew=60,$SpliceHeight=20,$SpliceDistance=0,$Decimals=0)

     Other methods :

      Render($FileName)

      Stroke()

 */

 /* Declare some script wide constants */

 define("SCALE_NORMAL",1);

 define("SCALE_ADDALL",2);

 define("SCALE_START0",3);

 define("SCALE_ADDALLSTART0",4);

 define("PIE_PERCENTAGE", 1);

 define("PIE_LABELS",2);

 define("PIE_NOLABEL",3);

 /* pChart class definition */

 class pChart

  {

   /* Palettes definition */

   var $Palette = array("0"=>array("R"=>188,"G"=>224,"B"=>46),

                        "1"=>array("R"=>224,"G"=>100,"B"=>46),

                        "2"=>array("R"=>224,"G"=>214,"B"=>46),

                        "3"=>array("R"=>46,"G"=>151,"B"=>224),

                        "4"=>array("R"=>176,"G"=>46,"B"=>224),

                        "5"=>array("R"=>224,"G"=>46,"B"=>117),

                        "6"=>array("R"=>92,"G"=>224,"B"=>46),

                        "7"=>array("R"=>224,"G"=>176,"B"=>46));

   /* Some static vars used in the class */

   var $XSize          = NULL;

   var $YSize          = NULL;

   var $Picture        = NULL;

   /* Error management */

   var $ErrorReporting = FALSE;

   var $ErrorInterface = "CLI";

   var $Errors         = NULL;

   var $ErrorFontName  = "fonts/tahoma.ttf";

   var $ErrorFontSize  = 6;

   /* vars related to the graphing area */

   var $GArea_X1       = NULL;

   var $GArea_Y1       = NULL;

   var $GArea_X2       = NULL;

   var $GArea_Y2       = NULL;

   var $GAreaXOffset   = NULL;

   var $VMax           = NULL;

   var $VMin           = NULL;

   var $Divisions      = NULL;

   var $DivisionHeight = NULL;

   var $DivisionCount  = NULL;

   var $DivisionRatio  = NULL;

   var $DivisionWidth  = NULL;

   var $DataCount      = NULL;

   /* Text format related vars */

   var $FontName       = NULL;

   var $FontSize       = NULL;

   var $DateFormat     = "d/m/Y";

   /* Lines format related vars */

   var $LineWidth      = 1;

   var $LineDotSize    = 0;

   /* Layer related vars */

   var $Layers         = NULL;

   /* Set antialias quality : 0 is maximum, 100 minimum*/

   var $AntialiasQuality = 10;

   /* This function create the background picture */

   function __construct($XSize,$YSize)

    {

     $this->XSize   = $XSize;

     $this->YSize   = $YSize;

     $this->Picture = imagecreatetruecolor($XSize,$YSize);

     $C_White = imagecolorallocate($this->Picture,255,255,255);

     imagefilledrectangle($this->Picture,0,0,$XSize,$YSize,$C_White);

     imagecolortransparent($this->Picture,$C_White);

     $this->setFontProperties("tahoma.ttf",8);

    }

  /* Set if warnings should be reported */

  function reportWarnings($Interface="CLI")

   {

    $this->ErrorReporting = TRUE;

    $this->ErrorInterface = $Interface;

    }

   /* Set the font properties */

   function setFontProperties($FontName,$FontSize)

    {

     $this->FontName = $FontName;

     $this->FontSize = $FontSize;

    }

   /* Set Palette color */

   function setColorPalette($ID,$R,$G,$B)

    {

     if ( $R < 0 ) { $R = 0; } if ( $R > 255 ) { $R = 255; }

     if ( $G < 0 ) { $G = 0; } if ( $G > 255 ) { $G = 255; }

     if ( $B < 0 ) { $B = 0; } if ( $B > 255 ) { $B = 255; }

     $this->Palette[$ID]["R"] = $R;

     $this->Palette[$ID]["G"] = $G;

     $this->Palette[$ID]["B"] = $B;

    }

   /* Load Color Palette from file */

   function loadColorPalette($FileName,$Delimiter=",")

    {

     $handle  = @fopen($FileName,"r");

     $ColorID = 0;

     if ($handle)

      {

       while (!feof($handle))

        {

         $buffer = fgets($handle, 4096);

         $buffer = str_replace(chr(10),"",$buffer);

         $buffer = str_replace(chr(13),"",$buffer);

         $Values = split($Delimiter,$buffer);

         if ( count($Values) == 3 )

          {

           $this->Palette[$ColorID]["R"] = $Values[0];

           $this->Palette[$ColorID]["G"] = $Values[1];

           $this->Palette[$ColorID]["B"] = $Values[2];

           $ColorID++;

          }

        }

      }

    }

   /* Set line style */

  function setLineStyle($Width=1,$DotSize=0)

   {

    $this->LineWidth   = $Width;

    $this->LineDotSize = $DotSize;

   }

   /* Set the graph area location */

   function setGraphArea($X1,$Y1,$X2,$Y2)

    {

     $this->GArea_X1 = $X1;

     $this->GArea_Y1 = $Y1;

     $this->GArea_X2 = $X2;

     $this->GArea_Y2 = $Y2;

    }

   /* Prepare the graph area */

   function drawGraphArea($R,$G,$B,$Stripe=FALSE)

    {

     $this->drawFilledRectangle($this->GArea_X1,$this->GArea_Y1,$this->GArea_X2,$this->GArea_Y2,$R,$G,$B,FALSE);

     $this->drawRectangle($this->GArea_X1,$this->GArea_Y1,$this->GArea_X2,$this->GArea_Y2,$R-40,$G-40,$B-40);

     if ( $Stripe )

      {

       $R2 = $R-15; if ( $R2 < 0 ) { $R2 = 0; }

       $G2 = $R-15; if ( $G2 < 0 ) { $G2 = 0; }

       $B2 = $R-15; if ( $B2 < 0 ) { $B2 = 0; }

       $LineColor = imagecolorallocate($this->Picture,$R2,$G2,$B2);

       $SkewWidth = $this->GArea_Y2-$this->GArea_Y1-1;

       for($i=$this->GArea_X1-$SkewWidth;$i<=$this->GArea_X2;$i=$i+4)

        {

         $X1 = $i;            $Y1 = $this->GArea_Y2;

         $X2 = $i+$SkewWidth; $Y2 = $this->GArea_Y1;

         if ( $X1 < $this->GArea_X1 )

          { $X1 = $this->GArea_X1; $Y1 = $this->GArea_Y1 + $X2 - $this->GArea_X1 + 1; }

         if ( $X2 >= $this->GArea_X2 )

          { $Y2 = $this->GArea_Y1 + $X2 - $this->GArea_X2 +1; $X2 = $this->GArea_X2 - 1; }

// * Fixed in 1.27 *         { $X2 = $this->GArea_X2 - 1; $Y2 = $this->GArea_Y2 - ($this->GArea_X2 - $X1); }

         imageline($this->Picture,$X1,$Y1,$X2,$Y2+1,$LineColor);

        }

      }

    }

   /* Allow you to fix the scale, use this to bypass the automatic scaling */

   function setFixedScale($VMin,$VMax,$Divisions=5)

    {

     $this->VMin      = $VMin;

     $this->VMax      = $VMax;

     $this->Divisions = $Divisions;

    }

   /* Compute and draw the scale */

   function drawScale(&$Data,&$DataDescription,$ScaleMode,$R,$G,$B,$DrawTicks=TRUE,$Angle=0,$Decimals=1,$WithMargin=FALSE,$SkipLabels=1)

    {

     /* Validate the Data and DataDescription array */

     $this->validateData("drawScale",$Data);

     $C_TextColor         = imagecolorallocate($this->Picture,$R,$G,$B);

     $this->drawLine($this->GArea_X1,$this->GArea_Y1,$this->GArea_X1,$this->GArea_Y2,$R,$G,$B);

     $this->drawLine($this->GArea_X1,$this->GArea_Y2,$this->GArea_X2,$this->GArea_Y2,$R,$G,$B);

     if ( $this->VMin == NULL && $this->VMax == NULL)

      {

       if (isset($DataDescription["Values"][0]))

        {

         $this->VMin = $Data[0][$DataDescription["Values"][0]];

         $this->VMax = $Data[0][$DataDescription["Values"][0]];

        }

       else { $this->VMin = 2147483647; $this->VMax = -2147483647; }

       /* Compute Min and Max values */

       if ( $ScaleMode == SCALE_NORMAL || $ScaleMode == SCALE_START0 )

        {

         if ( $ScaleMode == SCALE_START0 ) { $this->VMin = 0; }

         foreach ( $Data as $Key => $Values )

          {

           foreach ( $DataDescription["Values"] as $Key2 => $ColName )

            {

             if (isset($Data[$Key][$ColName]))

              {

               $Value = $Data[$Key][$ColName];

               if ( is_numeric($Value) )

                {

                 if ( $this->VMax < $Value) { $this->VMax = $Value; }

                 if ( $this->VMin > $Value) { $this->VMin = $Value; }

                }

              }

            }

          }

        }

       elseif ( $ScaleMode == SCALE_ADDALL || $ScaleMode == SCALE_ADDALLSTART0 ) /* Experimental */

        {

         if ( $ScaleMode == SCALE_ADDALLSTART0 ) { $this->VMin = 0; }

         foreach ( $Data as $Key => $Values )

          {

           $Sum = 0;

           foreach ( $DataDescription["Values"] as $Key2 => $ColName )

            {

             if (isset($Data[$Key][$ColName]))

              {

               $Value = $Data[$Key][$ColName];

               if ( is_numeric($Value) )

                $Sum  += $Value;

              }

            }

           if ( $this->VMax < $Sum) { $this->VMax = $Sum; }

           if ( $this->VMin > $Sum) { $this->VMin = $Sum; }

          }

        }

       $DataRange = $this->VMax - $this->VMin;

       if ( $DataRange == 0 ) { $DataRange = .1; }

       /* Compute automatic scaling */

       $ScaleOk = FALSE; $Factor = 1;

       $MinDivHeight = 25; $MaxDivs = ($this->GArea_Y2 - $this->GArea_Y1) / $MinDivHeight;

       if ($MaxDivs > 1)

        {

         while(!$ScaleOk)

          {

           $Scale1 = ( $this->VMax - $this->VMin ) / $Factor;

           $Scale2 = ( $this->VMax - $this->VMin ) / $Factor / 2;

           $Scale4 = ( $this->VMax - $this->VMin ) / $Factor / 4;

           if ( $Scale1 > 1 && $Scale1 <= $MaxDivs && !$ScaleOk) { $ScaleOk = TRUE; $Divisions = floor($Scale1); $Scale = 1;}

           if ( $Scale2 > 1 && $Scale2 <= $MaxDivs && !$ScaleOk) { $ScaleOk = TRUE; $Divisions = floor($Scale2); $Scale = 2;}

           if (!$ScaleOk)

            {

             if ( $Scale2 > 1 ) { $Factor = $Factor * 10; }

             if ( $Scale2 < 1 ) { $Factor = $Factor / 10; }

            }

          }

         if ( floor($this->VMax / $Scale / $Factor) != $this->VMax / $Scale / $Factor)

          {

           $GridID     = floor ( $this->VMax / $Scale / $Factor) + 1;

           $this->VMax = $GridID * $Scale * $Factor;

           $Divisions++;

          }

         if ( floor($this->VMin / $Scale / $Factor) != $this->VMin / $Scale / $Factor)

          {

           $GridID     = floor( $this->VMin / $Scale / $Factor);

           $this->VMin = $GridID * $Scale * $Factor;

           $Divisions++;

          }

        }

       else /* Can occurs for small graphs */

        $Scale = 1;

       if ( !isset($Divisions) )

        $Divisions = 2;

       if ($Scale == 1 && $Divisions%2 == 1)

        $Divisions--;

      }

     else

      $Divisions = $this->Divisions;

     $this->DivisionCount = $Divisions;

     $DataRange = $this->VMax - $this->VMin;

     if ( $DataRange == 0 ) { $DataRange = .1; }

     $this->DivisionHeight = ( $this->GArea_Y2 - $this->GArea_Y1 ) / $Divisions;

     $this->DivisionRatio  = ( $this->GArea_Y2 - $this->GArea_Y1 ) / $DataRange;

     $this->GAreaXOffset  = 0;

     if ( count($Data) > 1 )

      {

       if ( $WithMargin == FALSE )

        $this->DivisionWidth = ( $this->GArea_X2 - $this->GArea_X1 ) / (count($Data)-1);

       else

        {

         $this->DivisionWidth = ( $this->GArea_X2 - $this->GArea_X1 ) / (count($Data));

         $this->GAreaXOffset  = $this->DivisionWidth / 2;

        }

      }

     else

      {

       $this->DivisionWidth = $this->GArea_X2 - $this->GArea_X1;

       $this->GAreaXOffset  = $this->DivisionWidth / 2;

      }

     $this->DataCount = count($Data);

     if ( $DrawTicks == FALSE )

      return(0);

     $YPos = $this->GArea_Y2; $XMin = NULL;

     for($i=1;$i<=$Divisions+1;$i++)

      {

       $this->drawLine($this->GArea_X1,$YPos,$this->GArea_X1-5,$YPos,$R,$G,$B);

       $Value     = $this->VMin + ($i-1) * (( $this->VMax - $this->VMin ) / $Divisions);

       $Value     = floor($Value * pow(10,$Decimals)) / pow(10,$Decimals);

       if ( $DataDescription["Format"]["Y"] == "number" )

        $Value = $Value.$DataDescription["Unit"]["Y"];

       if ( $DataDescription["Format"]["Y"] == "time" )

        $Value = $this->ToTime($Value);

       if ( $DataDescription["Format"]["Y"] == "date" )

        $Value = $this->ToDate($Value);

       if ( $DataDescription["Format"]["Y"] == "metric" )

        $Value = $this->ToMetric($Value);

       $Position  = imageftbbox($this->FontSize,0,$this->FontName,$Value);

       $TextWidth = $Position[2]-$Position[0];

       imagettftext($this->Picture,$this->FontSize,0,$this->GArea_X1-10-$TextWidth,$YPos+($this->FontSize/2),$C_TextColor,$this->FontName,$Value);

       if ( $XMin > $this->GArea_X1-10-$TextWidth || $XMin == NULL ) { $XMin = $this->GArea_X1-10-$TextWidth; }

       $YPos = $YPos - $this->DivisionHeight;

      }

     /* Write the Y Axis caption if set */

     if ( isset($DataDescription["Axis"]["Y"]) )

      {

       $Position   = imageftbbox($this->FontSize,90,$this->FontName,$DataDescription["Axis"]["Y"]);

       $TextHeight = abs($Position[1])+abs($Position[3]);

       $TextTop    = (($this->GArea_Y2 - $this->GArea_Y1) / 2) + $this->GArea_Y1 + ($TextHeight/2);

       imagettftext($this->Picture,$this->FontSize,90,$XMin-$this->FontSize,$TextTop,$C_TextColor,$this->FontName,$DataDescription["Axis"]["Y"]);

      }

     /* Horizontal Axis */

     $XPos = $this->GArea_X1 + $this->GAreaXOffset;

     $ID = 1; $YMax = NULL;

     foreach ( $Data as $Key => $Values )

      {

       if ( $ID % $SkipLabels == 0 )

        {

         $this->drawLine(floor($XPos),$this->GArea_Y2,floor($XPos),$this->GArea_Y2+5,$R,$G,$B);

         $Value      = $Data[$Key][$DataDescription["Position"]];

         if ( $DataDescription["Format"]["X"] == "number" )

          $Value = $Value.$DataDescription["Unit"]["X"];

         if ( $DataDescription["Format"]["X"] == "time" )

          $Value = $this->ToTime($Value);

         if ( $DataDescription["Format"]["X"] == "date" )

          $Value = $this->ToDate($Value);

         if ( $DataDescription["Format"]["X"] == "metric" )

          $Value = $this->ToMetric($Value);

         $Position   = imageftbbox($this->FontSize,$Angle,$this->FontName,$Value);

         $TextWidth  = abs($Position[2])+abs($Position[0]);

         $TextHeight = abs($Position[1])+abs($Position[3]);

         if ( $Angle == 0 )

          {

           $YPos = $this->GArea_Y2+18;

           imagettftext($this->Picture,$this->FontSize,$Angle,floor($XPos)-floor($TextWidth/2),$YPos,$C_TextColor,$this->FontName,$Value);

          }

         else

          {

           $YPos = $this->GArea_Y2+10+$TextHeight;

           if ( $Angle <= 90 )

            imagettftext($this->Picture,$this->FontSize,$Angle,floor($XPos)-$TextWidth+5,$YPos,$C_TextColor,$this->FontName,$Value);

           else

            imagettftext($this->Picture,$this->FontSize,$Angle,floor($XPos)+$TextWidth+5,$YPos,$C_TextColor,$this->FontName,$Value);

          }

         if ( $YMax < $YPos || $YMax == NULL ) { $YMax = $YPos; }

        }

       $XPos = $XPos + $this->DivisionWidth;

       $ID++;

      }

    /* Write the X Axis caption if set */

    if ( isset($DataDescription["Axis"]["X"]) )

      {

       $Position   = imageftbbox($this->FontSize,90,$this->FontName,$DataDescription["Axis"]["X"]);

       $TextWidth  = abs($Position[2])+abs($Position[0]);

       $TextLeft   = (($this->GArea_X2 - $this->GArea_X1) / 2) + $this->GArea_X1 + ($TextWidth/2);

       imagettftext($this->Picture,$this->FontSize,0,$TextLeft,$YMax+$this->FontSize+5,$C_TextColor,$this->FontName,$DataDescription["Axis"]["X"]);

      }

    }

   /* Compute and draw the scale */

   function drawGrid($LineWidth,$Mosaic=TRUE,$R=220,$G=220,$B=220,$Alpha=100)

    {

     /* Draw mosaic */

     if ( $Mosaic )

      {

       $LayerWidth  = $this->GArea_X2-$this->GArea_X1;

       $LayerHeight = $this->GArea_Y2-$this->GArea_Y1;

       $this->Layers[0] = imagecreatetruecolor($LayerWidth,$LayerHeight);

       $C_White         = imagecolorallocate($this->Layers[0],255,255,255);

       imagefilledrectangle($this->Layers[0],0,0,$LayerWidth,$LayerHeight,$C_White);

       imagecolortransparent($this->Layers[0],$C_White);

       $C_Rectangle = imagecolorallocate($this->Layers[0],250,250,250);

       $YPos  = $LayerHeight; //$this->GArea_Y2-1;

       $LastY = $YPos;

       for($i=0;$i<=$this->DivisionCount;$i++)

        {

         $LastY = $YPos;

         $YPos  = $YPos - $this->DivisionHeight;

         if ( $YPos <= 0 ) { $YPos = 1; }

         if ( $i % 2 == 0 )

          {

           imagefilledrectangle($this->Layers[0],1,$YPos,$LayerWidth-1,$LastY,$C_Rectangle);

          }

        }

       imagecopymerge($this->Picture,$this->Layers[0],$this->GArea_X1,$this->GArea_Y1,0,0,$LayerWidth,$LayerHeight,$Alpha);

       imagedestroy($this->Layers[0]);

      }

     /* Horizontal lines */

     $YPos = $this->GArea_Y2 - $this->DivisionHeight;

     for($i=1;$i<=$this->DivisionCount;$i++)

      {

       if ( $YPos > $this->GArea_Y1 && $YPos < $this->GArea_Y2 )

        $this->drawDottedLine($this->GArea_X1,$YPos,$this->GArea_X2,$YPos,$LineWidth,$R,$G,$B);

       $YPos = $YPos - $this->DivisionHeight;

      }

     /* Vertical lines */

     if ( $this->GAreaXOffset == 0 )

      { $XPos = $this->GArea_X1 + $this->DivisionWidth + $this->GAreaXOffset; $ColCount = $this->DataCount-2; }

     else

      { $XPos = $this->GArea_X1 + $this->GAreaXOffset; $ColCount = $this->DataCount; }

     for($i=1;$i<=$ColCount;$i++)

      {

       if ( $XPos > $this->GArea_X1 && $XPos < $this->GArea_X2 )

        $this->drawDottedLine(floor($XPos),$this->GArea_Y1,floor($XPos),$this->GArea_Y2,$LineWidth,$R,$G,$B);

       $XPos = $XPos + $this->DivisionWidth;

      }

    }

   /* retrieve the legends size */

   function getLegendBoxSize($DataDescription)

    {

     if ( !isset($DataDescription["Description"]) )

      return(-1);

     /* <-10->[8]<-4->Text<-10-> */

     $MaxWidth = 0; $MaxHeight = 8;

     foreach($DataDescription["Description"] as $Key => $Value)

      {

       $Position  = imageftbbox($this->FontSize,0,$this->FontName,$Value);

       $TextWidth = $Position[2]-$Position[0];

       if ( $TextWidth > $MaxWidth) { $MaxWidth = $TextWidth; }

       $MaxHeight = $MaxHeight + ( $this->FontSize + 6 );

      }

     $MaxHeight = $MaxHeight - 3;

     $MaxWidth  = $MaxWidth + 32;

     return(array($MaxWidth,$MaxHeight));

    }

   /* Draw the data legends */

   function drawLegend($XPos,$YPos,&$DataDescription,$R,$G,$B)

    {

     /* Validate the Data and DataDescription array */

     $this->validateDataDescription("drawLegend",$DataDescription);

     if ( !isset($DataDescription["Description"]) )

      return(-1);

     $C_TextColor = imagecolorallocate($this->Picture,0,0,0);

     /* <-10->[8]<-4->Text<-10-> */

     $MaxWidth = 0; $MaxHeight = 8;

     foreach($DataDescription["Description"] as $Key => $Value)

      {

       $Position  = imageftbbox($this->FontSize,0,$this->FontName,$Value);

       $TextWidth = $Position[2]-$Position[0];

       if ( $TextWidth > $MaxWidth) { $MaxWidth = $TextWidth; }

       $MaxHeight = $MaxHeight + ( $this->FontSize + 6 );

      }

     $MaxHeight = $MaxHeight - 5;

     $MaxWidth  = $MaxWidth + 32;

     $this->drawFilledRoundedRectangle($XPos+1,$YPos+1,$XPos+$MaxWidth+1,$YPos+$MaxHeight+1,5,$R-30,$G-30,$B-30);

     $this->drawFilledRoundedRectangle($XPos,$YPos,$XPos+$MaxWidth,$YPos+$MaxHeight,5,$R,$G,$B);

     $YOffset = 4 + $this->FontSize; $ID = 0;

     foreach($DataDescription["Description"] as $Key => $Value)

      {

       $this->drawFilledRoundedRectangle($XPos+10,$YPos+$YOffset-4,$XPos+14,$YPos+$YOffset-4,2,$this->Palette[$ID]["R"],$this->Palette[$ID]["G"],$this->Palette[$ID]["B"]);

       imagettftext($this->Picture,$this->FontSize,0,$XPos+22,$YPos+$YOffset,$C_TextColor,$this->FontName,$Value);

       $YOffset = $YOffset + ( $this->FontSize + 6 );

       $ID++;

      }

    }

   /* Draw the data legends */

   function drawPieLegend($XPos,$YPos,&$Data,&$DataDescription,$R,$G,$B)

    {

     /* Validate the Data and DataDescription array */

     $this->validateDataDescription("drawPieLegend",$DataDescription,FALSE);

     $this->validateData("drawPieLegend",$Data);

     if ( !isset($DataDescription["Position"]) )

      return(-1);

     $C_TextColor = imagecolorallocate($this->Picture,0,0,0);

     /* <-10->[8]<-4->Text<-10-> */

     $MaxWidth = 0; $MaxHeight = 8;

     foreach($Data as $Key => $Value)

      {

       $Value2 = $Value[$DataDescription["Position"]];

       $Position  = imageftbbox($this->FontSize,0,$this->FontName,$Value2);

       $TextWidth = $Position[2]-$Position[0];

       if ( $TextWidth > $MaxWidth) { $MaxWidth = $TextWidth; }

       $MaxHeight = $MaxHeight + ( $this->FontSize + 6 );

      }

     $MaxHeight = $MaxHeight - 3;

     $MaxWidth  = $MaxWidth + 32;

     $this->drawFilledRoundedRectangle($XPos+1,$YPos+1,$XPos+$MaxWidth+1,$YPos+$MaxHeight+1,5,$R-30,$G-30,$B-30);

     $this->drawFilledRoundedRectangle($XPos,$YPos,$XPos+$MaxWidth,$YPos+$MaxHeight,5,$R,$G,$B);

     $YOffset = 4 + $this->FontSize; $ID = 0;

     foreach($Data as $Key => $Value)

      {

       $Value2 = $Value[$DataDescription["Position"]];

       $this->drawFilledRectangle($XPos+10,$YPos+$YOffset-6,$XPos+14,$YPos+$YOffset-2,$this->Palette[$ID]["R"],$this->Palette[$ID]["G"],$this->Palette[$ID]["B"]);

       imagettftext($this->Picture,$this->FontSize,0,$XPos+22,$YPos+$YOffset,$C_TextColor,$this->FontName,$Value2);

       $YOffset = $YOffset + ( $this->FontSize + 6 );

       $ID++;

      }

    }

   /* Draw the graph title */

   function drawTitle($XPos,$YPos,$Value,$R,$G,$B,$XPos2 = -1, $YPos2 = -1)

    {

     $C_TextColor = imagecolorallocate($this->Picture,$R,$G,$B);

     if ( $XPos2 != -1 )

      {

       $Position  = imageftbbox($this->FontSize,0,$this->FontName,$Value);

       $TextWidth = $Position[2]-$Position[0];

       $XPos      = floor(( $XPos2 - $XPos - $TextWidth ) / 2 ) + $XPos;

      }

     if ( $YPos2 != -1 )

      {

       $Position   = imageftbbox($this->FontSize,0,$this->FontName,$Value);

       $TextHeight = $Position[5]-$Position[3];

       $YPos       = floor(( $YPos2 - $YPos - $TextHeight ) / 2 ) + $YPos;

      }

     imagettftext($this->Picture,$this->FontSize,0,$XPos,$YPos,$C_TextColor,$this->FontName,$Value);

    }

   /* Compute and draw the scale */

   function drawTreshold($Value,$R,$G,$B,$ShowLabel=FALSE,$ShowOnRight=FALSE,$TickWidth=4)

    {

     if ( $R < 0 ) { $R = 0; } if ( $R > 255 ) { $R = 255; }

     if ( $G < 0 ) { $G = 0; } if ( $G > 255 ) { $G = 255; }

     if ( $B < 0 ) { $B = 0; } if ( $B > 255 ) { $B = 255; }

     $C_TextColor = imagecolorallocate($this->Picture,$R,$G,$B);

     $Y = $this->GArea_Y2 - ($Value - $this->VMin) * $this->DivisionRatio;

     if ( $Y <= $this->GArea_Y1 || $Y >= $this->GArea_Y2 )

      return(-1);

     if ( $TickWidth == 0 )

      $this->drawLine($this->GArea_X1,$Y,$this->GArea_X2,$Y,$R,$G,$B);

     else

      $this->drawDottedLine($this->GArea_X1,$Y,$this->GArea_X2,$Y,$TickWidth,$R,$G,$B);

     if ( $ShowLabel )

      {

       if ( $ShowOnRight )

        imagettftext($this->Picture,$this->FontSize,0,$this->GArea_X2+2,$Y+($this->FontSize/2),$C_TextColor,$this->FontName,$Value);

       else

        imagettftext($this->Picture,$this->FontSize,0,$this->GArea_X1+2,$Y-($this->FontSize/2),$C_TextColor,$this->FontName,$Value);

      }

    }

   /* This function put a label on a specific point */

   function setLabel(&$Data,&$DataDescription,$SerieName,$ValueName,$Caption,$R=210,$G=210,$B=210)

    {

     /* Validate the Data and DataDescription array */

     $this->validateDataDescription("setLabel",$DataDescription);

     $this->validateData("setLabel",$Data);

     $C_Label     = imagecolorallocate($this->Picture,$R,$G,$B);

     $C_Shadow    = imagecolorallocate($this->Picture,$R-30,$G-30,$B-30);

     $C_TextColor = imagecolorallocate($this->Picture,0,0,0);

     $Cp = 0; $Found = FALSE;

     foreach ( $Data as $Key => $Value )

      {

       if ( $Data[$Key][$DataDescription["Position"]] == $ValueName )

        { $NumericalValue = $Data[$Key][$SerieName]; $Found = TRUE; }

       if ( !$Found )

        $Cp++;

      }

     $XPos = $this->GArea_X1 + $this->GAreaXOffset + ( $this->DivisionWidth * $Cp ) + 2;

     $YPos = $this->GArea_Y2 - ($NumericalValue - $this->VMin) * $this->DivisionRatio;

     $Position   = imageftbbox($this->FontSize,0,$this->FontName,$Caption);

     $TextHeight = $Position[3] - $Position[5];

     $TextWidth = $Position[2]-$Position[0];

     $TextOffset = floor($TextHeight/2);

     // Shadow

     $Poly = array($XPos+1,$YPos+1,$XPos + 9,$YPos - $TextOffset,$XPos + 8,$YPos + $TextOffset + 2);

     imagefilledpolygon($this->Picture,$Poly,3,$C_Shadow);

     $this->drawLine($XPos,$YPos+1,$XPos + 9,$YPos - $TextOffset - 1,$R-30,$G-30,$B-30);

     $this->drawLine($XPos,$YPos+1,$XPos + 9,$YPos + $TextOffset + 3,$R-30,$G-30,$B-30);

     $this->drawFilledRectangle($XPos + 9,$YPos - $TextOffset,$XPos + 13 + $TextWidth,$YPos + $TextOffset + 2,$R-30,$G-30,$B-30);

     // Label background

     $Poly = array($XPos,$YPos,$XPos + 8,$YPos - $TextOffset - 1,$XPos + 8,$YPos + $TextOffset + 1);

     imagefilledpolygon($this->Picture,$Poly,3,$C_Label);

     $this->drawLine($XPos-1,$YPos,$XPos + 8,$YPos - $TextOffset - 2,$R,$G,$B);

     $this->drawLine($XPos-1,$YPos,$XPos + 8,$YPos + $TextOffset + 2,$R,$G,$B);

     $this->drawFilledRectangle($XPos + 8,$YPos - $TextOffset - 1,$XPos + 12 + $TextWidth,$YPos + $TextOffset + 1,$R,$G,$B);

     imagettftext($this->Picture,$this->FontSize,0,$XPos + 10,$YPos + $TextOffset,$C_TextColor,$this->FontName,$Caption);

    }

   /* This function draw a line graph */

   function drawPlotGraph(&$Data,&$DataDescription,$BigRadius=5,$SmallRadius=2,$R2=-1,$G2=-1,$B2=-1)

    {

     /* Validate the Data and DataDescription array */

     $this->validateDataDescription("drawPlotGraph",$DataDescription);

     $this->validateData("drawPlotGraph",$Data);

     $GraphID = 0;

     foreach ( $DataDescription["Values"] as $Key2 => $ColName )

      {

       $ID = 0;

       foreach ( $DataDescription["Description"] as $keyI => $ValueI )

        { if ( $keyI == $ColName ) { $ColorID = $ID; }; $ID++; }

       $XPos   = $this->GArea_X1 + $this->GAreaXOffset;

       foreach ( $Data as $Key => $Values )

        {

         $Value = $Data[$Key][$ColName];

         $YPos = $this->GArea_Y2 - (($Value-$this->VMin) * $this->DivisionRatio);

         if ( is_numeric($Value) )

          {

           $R = $this->Palette[$ColorID]["R"];

           $G = $this->Palette[$ColorID]["G"];

           $B = $this->Palette[$ColorID]["B"];

           $this->drawFilledCircle($XPos+1,$YPos+1,$BigRadius,$R,$G,$B);

           if ( $R2 !=-1 && $G2 !=-1 && $B2 !=-1 )

            $this->drawFilledCircle($XPos+1,$YPos+1,$SmallRadius,$R2,$G2,$B2);

           else

            {

             $R = $this->Palette[$ColorID]["R"]-5; if ( $R < 0 ) { $R = 0; }

             $G = $this->Palette[$ColorID]["G"]-5; if ( $G < 0 ) { $G = 0; }

             $B = $this->Palette[$ColorID]["B"]-5; if ( $B < 0 ) { $B = 0; }

             $this->drawFilledCircle($XPos+1,$YPos+1,$SmallRadius,$R,$G,$B);

            }

          }

         $XPos = $XPos + $this->DivisionWidth;

        }

       $GraphID++;

      }

    }

   /* This function draw an area between two series */

   function drawArea(&$Data,$Serie1,$Serie2,$R,$G,$B,$Alpha = 50)

    {

     /* Validate the Data and DataDescription array */

     $this->validateData("drawArea",$Data);

     $LayerWidth  = $this->GArea_X2-$this->GArea_X1;

     $LayerHeight = $this->GArea_Y2-$this->GArea_Y1;

     $this->Layers[0] = imagecreatetruecolor($LayerWidth,$LayerHeight);

     $C_White         = imagecolorallocate($this->Layers[0],255,255,255);

     imagefilledrectangle($this->Layers[0],0,0,$LayerWidth,$LayerHeight,$C_White);

     imagecolortransparent($this->Layers[0],$C_White);

     $C_Graph = imagecolorallocate($this->Layers[0],$R,$G,$B);

     $XPos     = $this->GAreaXOffset;

     $LastXPos = -1;

     foreach ( $Data as $Key => $Values )

      {

       $Value1 = $Data[$Key][$Serie1];

       $Value2 = $Data[$Key][$Serie2];

       $YPos1  = $LayerHeight - (($Value1-$this->VMin) * $this->DivisionRatio);

       $YPos2  = $LayerHeight - (($Value2-$this->VMin) * $this->DivisionRatio);

       if ( $LastXPos != -1 )

        {

         $Points   = "";

         $Points[] = $LastXPos; $Points[] = $LastYPos1;

         $Points[] = $LastXPos; $Points[] = $LastYPos2;

         $Points[] = $XPos; $Points[] = $YPos2;

         $Points[] = $XPos; $Points[] = $YPos1;

         imagefilledpolygon($this->Layers[0],$Points,4,$C_Graph);

        }

       $LastYPos1 = $YPos1;

       $LastYPos2 = $YPos2;

       $LastXPos  = $XPos;

       $XPos = $XPos + $this->DivisionWidth;

      }

     imagecopymerge($this->Picture,$this->Layers[0],$this->GArea_X1,$this->GArea_Y1,0,0,$LayerWidth,$LayerHeight,$Alpha);

     imagedestroy($this->Layers[0]);

    }

   /* This function write the values of the specified series */

   function writeValues(&$Data,&$DataDescription,$Series)

    {

     /* Validate the Data and DataDescription array */

     $this->validateDataDescription("writeValues",$DataDescription);

     $this->validateData("writeValues",$Data);

     if ( !is_array($Series) ) { $Series = array($Series); }

     foreach($Series as $Key => $Serie)

      {

       $ID = 0;

       foreach ( $DataDescription["Description"] as $keyI => $ValueI )

        { if ( $keyI == $Serie ) { $ColorID = $ID; }; $ID++; }

       $XPos  = $this->GArea_X1 + $this->GAreaXOffset;

       $XLast = -1;

       foreach ( $Data as $Key => $Values )

        {

         if ( isset($Data[$Key][$Serie]) && is_numeric($Data[$Key][$Serie]))

          {

           $Value = $Data[$Key][$Serie];

           $YPos = $this->GArea_Y2 - (($Value-$this->VMin) * $this->DivisionRatio);

           $Positions = imagettfbbox($this->FontSize,0,$this->FontName,$Value);

           $Width  = $Positions[2] - $Positions[6]; $XOffset = $XPos - ($Width/2);

           $Height = $Positions[3] - $Positions[7]; $YOffset = $YPos - 4;

           $C_TextColor = imagecolorallocate($this->Picture,$this->Palette[$ColorID]["R"],$this->Palette[$ColorID]["G"],$this->Palette[$ColorID]["B"]);

           imagettftext($this->Picture,$this->FontSize,0,$XOffset,$YOffset,$C_TextColor,$this->FontName,$Value);

          }

         $XPos = $XPos + $this->DivisionWidth;

        }

      }

    }

   /* This function draw a line graph */

   function drawLineGraph(&$Data,&$DataDescription,$SerieName="")

    {

     /* Validate the Data and DataDescription array */

     $this->validateDataDescription("drawLineGraph",$DataDescription);

     $this->validateData("drawLineGraph",$Data);

     $GraphID = 0;

     foreach ( $DataDescription["Values"] as $Key2 => $ColName )

      {

       $ID = 0;

       foreach ( $DataDescription["Description"] as $keyI => $ValueI )

        { if ( $keyI == $ColName ) { $ColorID = $ID; }; $ID++; }

       if ( $SerieName == "" || $SerieName == $ColName )

        {

         $XPos  = $this->GArea_X1 + $this->GAreaXOffset;

         $XLast = -1;

         foreach ( $Data as $Key => $Values )

          {

           if ( isset($Data[$Key][$ColName]))

            {

             $Value = $Data[$Key][$ColName];

             $YPos = $this->GArea_Y2 - (($Value-$this->VMin) * $this->DivisionRatio);

             if (!is_numeric($Value)) { $XLast = -1; }

             if ( $XLast != -1 )

              $this->drawLine($XLast,$YLast,$XPos,$YPos,$this->Palette[$ColorID]["R"],$this->Palette[$ColorID]["G"],$this->Palette[$ColorID]["B"],TRUE);

             $XLast = $XPos;

             $YLast = $YPos;

             if (!is_numeric($Value)) { $XLast = -1; }

            }

           $XPos = $XPos + $this->DivisionWidth;

          }

         $GraphID++;

        }

      }

    }

   /* This function draw a cubic curve */

   function drawCubicCurve(&$Data,&$DataDescription,$Accuracy=.1,$SerieName="")

    {

     /* Validate the Data and DataDescription array */

     $this->validateDataDescription("drawCubicCurve",$DataDescription);

     $this->validateData("drawCubicCurve",$Data);

     $GraphID = 0;

     foreach ( $DataDescription["Values"] as $Key2 => $ColName )

      {

       if ( $SerieName == "" || $SerieName == $ColName )

        {

         $XIn = ""; $Yin = ""; $Yt = ""; $U = "";

         $XIn[0] = 0; $YIn[0] = 0;

         $ID = 0;

         foreach ( $DataDescription["Description"] as $keyI => $ValueI )

          { if ( $keyI == $ColName ) { $ColorID = $ID; }; $ID++; }

         $Index = 1;

         $XLast = -1; $Missing = "";

         foreach ( $Data as $Key => $Values )

          {

           if ( isset($Data[$Key][$ColName]) )

            {

             $Value = $Data[$Key][$ColName];

             $XIn[$Index] = $Index;

             $YIn[$Index] = $Value;

             if ( !is_numeric($Value) ) { $Missing[$Index] = TRUE; }

             $Index++;

            }

          }

         $Index--;

         $Yt[0] = 0;

         $Yt[1] = 0;

         $U[1]  = 0;

         for($i=2;$i<=$Index-1;$i++)

          {

           $Sig    = ($XIn[$i] - $XIn[$i-1]) / ($XIn[$i+1] - $XIn[$i-1]);

           $p      = $Sig * $Yt[$i-1] + 2;

           $Yt[$i] = ($Sig - 1) / $p;

           $U[$i]  = ($YIn[$i+1] - $YIn[$i]) / ($XIn[$i+1] - $XIn[$i]) - ($YIn[$i] - $YIn[$i-1]) / ($XIn[$i] - $XIn[$i-1]);

           $U[$i]  = (6 * $U[$i] / ($XIn[$i+1] - $XIn[$i-1]) - $Sig * $U[$i-1]) / $p;

          }

         $qn = 0;

         $un = 0;

         $Yt[$Index] = ($un - $qn * $U[$Index-1]) / ($qn * $Yt[$Index-1] + 1);

         for($k=$Index-1;$k>=1;$k--)

          $Yt[$k] = $Yt[$k] * $Yt[$k+1] + $U[$k];

         $XPos  = $this->GArea_X1 + $this->GAreaXOffset;

         for($X=1;$X<=$Index;$X=$X+$Accuracy)

          {

           $klo = 1;

           $khi = $Index;

           $k   = $khi - $klo;

           while($k > 1)

            {

             $k = $khi - $klo;

             If ( $XIn[$k] >= $X )

              $khi = $k;

             else

              $klo = $k;

            }

           $klo = $khi - 1;

           $h     = $XIn[$khi] - $XIn[$klo];

           $a     = ($XIn[$khi] - $X) / $h;

           $b     = ($X - $XIn[$klo]) / $h;

           $Value = $a * $YIn[$klo] + $b * $YIn[$khi] + (($a*$a*$a - $a) * $Yt[$klo] + ($b*$b*$b - $b) * $Yt[$khi]) * ($h*$h) / 6;

           $YPos = $this->GArea_Y2 - (($Value-$this->VMin) * $this->DivisionRatio);

           if ( $XLast != -1 && !isset($Missing[floor($X)]) && !isset($Missing[floor($X+1)]) )

            $this->drawLine($XLast,$YLast,$XPos,$YPos,$this->Palette[$ColorID]["R"],$this->Palette[$ColorID]["G"],$this->Palette[$ColorID]["B"],TRUE);

           $XLast = $XPos;

           $YLast = $YPos;

           $XPos  = $XPos + $this->DivisionWidth * $Accuracy;

          }

         // Add potentialy missing values

         $XPos  = $XPos - $this->DivisionWidth * $Accuracy;

         if ( $XPos < ($this->GArea_X2 - $this->GAreaXOffset) )

          {

           $YPos = $this->GArea_Y2 - (($YIn[$Index]-$this->VMin) * $this->DivisionRatio);

           $this->drawLine($XLast,$YLast,$this->GArea_X2-$this->GAreaXOffset,$YPos,$this->Palette[$ColorID]["R"],$this->Palette[$ColorID]["G"],$this->Palette[$ColorID]["B"],TRUE);

          }