<?php
 /*
     pDraw - pChart core class

     Version     : 2.1.4
     Made by     : Jean-Damien POGOLOTTI
     Last Update : 19/01/2014

     This file can be distributed under the license you can find at :

                       http://www.pchart.net/license

     You can find the whole class documentation on the pChart web site.
 */

 /* The GD extension is mandatory */
 if (!extension_loaded('gd') && !extension_loaded('gd2')) {
     echo "GD extension must be loaded. \r\n";
     exit();
 }

 /* Image map handling */
 define("IMAGE_MAP_STORAGE_FILE", 680001);
 define("IMAGE_MAP_STORAGE_SESSION", 680002);

 /* Last generated chart layout */
 define("CHART_LAST_LAYOUT_REGULAR", 680011);
 define("CHART_LAST_LAYOUT_STACKED", 680012);

 /* ImageMap string delimiter */
 define("IMAGE_MAP_DELIMITER", chr(1));

 class pImage extends pDraw
 {
     /* Image settings, size, quality, .. */
     public $XSize		= null;				// Width of the picture
   public $YSize		= null;				// Height of the picture
   public $Picture		= null;				// GD picture object
   public $Antialias	= true;				// Turn antialias on or off
   public $AntialiasQuality  = 0;				// Quality of the antialiasing implementation (0-1)
   public $Mask		= "";				// Already drawn pixels mask (Filled circle implementation)
   public $TransparentBackground = false;			// Just to know if we need to flush the alpha channels when rendering

   /* Graph area settings */
     public $GraphAreaX1	= null;				// Graph area X origin
   public $GraphAreaY1	= null;				// Graph area Y origin
   public $GraphAreaX2	= null;				// Graph area bottom right X position
   public $GraphAreaY2	= null;				// Graph area bottom right Y position

   /* Scale settings */
     public $ScaleMinDivHeight = 20;				// Minimum height for scame divs

     /* Font properties */
     public $FontName	= "fonts/GeosansLight.ttf";	// Default font file
   public $FontSize	= 12;				// Default font size
   public $FontBox		= null;				// Return the bounding box of the last written string
   public $FontColorR	= 0;				// Default color settings
   public $FontColorG	= 0;				// Default color settings
   public $FontColorB	= 0;				// Default color settings
   public $FontColorA	= 100;				// Default transparency

   /* Shadow properties */
     public $Shadow		= false;			// Turn shadows on or off
   public $ShadowX		= null;				// X Offset of the shadow
   public $ShadowY		= null;				// Y Offset of the shadow
   public $ShadowR		= null;				// R component of the shadow
   public $ShadowG		= null;				// G component of the shadow
   public $ShadowB		= null;				// B component of the shadow
   public $Shadowa		= null;				// Alpha level of the shadow

   /* Image map */
     public $ImageMap	= null;				// Aray containing the image map
   public $ImageMapIndex	= "pChart";			// Name of the session array
   public $ImageMapStorageMode = null;			// Save the current imagemap storage mode
   public $ImageMapAutoDelete  = true;			// Automatic deletion of the image map temp files

   /* Data Set */
     public $DataSet		= null;				// Attached dataset

     /* Last generated chart info */
     public $LastChartLayout	= CHART_LAST_LAYOUT_REGULAR;	// Last layout : regular or stacked

     /* Class constructor */
     public function __construct($XSize, $YSize, $DataSet = null, $TransparentBackground = false)
     {
     $this->TransparentBackground = $TransparentBackground;

         if ($DataSet != null) {
             $this->DataSet = $DataSet;
         }

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

         if ($this->TransparentBackground) {
             imagealphablending($this->Picture, false);
             imagefilledrectangle($this->Picture, 0, 0, $XSize, $YSize, imagecolorallocatealpha($this->Picture, 255, 255, 255, 127));
             imagealphablending($this->Picture, true);
             imagesavealpha($this->Picture, true);
         } else {
             $C_White = $this->AllocateColor($this->Picture, 255, 255, 255);
             imagefilledrectangle($this->Picture, 0, 0, $XSize, $YSize, $C_White);
         }
     }

     /* Enable / Disable and set shadow properties */
     public function setShadow($Enabled=true, $Format="")
     {
         $X	    = isset($Format["X"]) ? $Format["X"] : 2;
         $Y	    = isset($Format["Y"]) ? $Format["Y"] : 2;
         $R	    = isset($Format["R"]) ? $Format["R"] : 0;
         $G	    = isset($Format["G"]) ? $Format["G"] : 0;
         $B	    = isset($Format["B"]) ? $Format["B"] : 0;
         $Alpha = isset($Format["Alpha"]) ? $Format["Alpha"] : 10;

         $this->Shadow  = $Enabled;
         $this->ShadowX = $X;
         $this->ShadowY = $Y;
         $this->ShadowR = $R;
         $this->ShadowG = $G;
         $this->ShadowB = $B;
         $this->Shadowa = $Alpha;
     }

     /* Set the graph area position */
     public function setGraphArea($X1, $Y1, $X2, $Y2)
     {
         if ($X2 < $X1 || $X1 == $X2 || $Y2 < $Y1 || $Y1 == $Y2) {
             return(-1);
         }

         $this->GraphAreaX1 = $X1;
         $this->DataSet->Data["GraphArea"]["X1"] = $X1;
         $this->GraphAreaY1 = $Y1;
         $this->DataSet->Data["GraphArea"]["Y1"] = $Y1;
         $this->GraphAreaX2 = $X2;
         $this->DataSet->Data["GraphArea"]["X2"] = $X2;
         $this->GraphAreaY2 = $Y2;
         $this->DataSet->Data["GraphArea"]["Y2"] = $Y2;
     }

     /* Return the width of the picture */
     public function getWidth()
     {
         return($this->XSize);
     }

     /* Return the heigth of the picture */
     public function getHeight()
     {
         return($this->YSize);
     }

     /* Render the picture to a file */
     public function render($FileName)
     {
         if ($this->TransparentBackground) {
             imagealphablending($this->Picture, false);
             imagesavealpha($this->Picture, true);
         }
         imagepng($this->Picture, $FileName);
     }

     /* Render the picture to a web browser stream */
     public function stroke($BrowserExpire=false)
     {
         if ($this->TransparentBackground) {
             imagealphablending($this->Picture, false);
             imagesavealpha($this->Picture, true);
         }

         if ($BrowserExpire) {
             header("Expires: Mon, 26 Jul 1997 05:00:00 GMT");
             header("Cache-Control: no-cache");
             header("Pragma: no-cache");
         }

         header('Content-type: image/png');
         imagepng($this->Picture);
     }

     /* Automatic output method based on the calling interface */
     public function autoOutput($FileName="output.png")
     {
         if (php_sapi_name() == "cli") {
             $this->Render($FileName);
         } else {
             $this->Stroke();
         }
     }

     /* Return the length between two points */
     public function getLength($X1, $Y1, $X2, $Y2)
     {
         return(sqrt(pow(max($X1, $X2)-min($X1, $X2), 2)+pow(max($Y1, $Y2)-min($Y1, $Y2), 2)));
     }

     /* Return the orientation of a line */
     public function getAngle($X1, $Y1, $X2, $Y2)
     {
         $Opposite = $Y2 - $Y1;
         $Adjacent = $X2 - $X1;
         $Angle = rad2deg(atan2($Opposite, $Adjacent));
         if ($Angle > 0) {
             return($Angle);
         }
         return(360-abs($Angle));
     }

     /* Return the surrounding box of text area */
     public function getTextBox_deprecated($X, $Y, $FontName, $FontSize, $Angle, $Text)
     {
         $Size    = imagettfbbox($FontSize, $Angle, $FontName, $Text);
         $Width   = $this->getLength($Size[0], $Size[1], $Size[2], $Size[3])+1;
         $Height  = $this->getLength($Size[2], $Size[3], $Size[4], $Size[5])+1;

         $RealPos[0]["X"] = $X;
         $RealPos[0]["Y"] = $Y;
         $RealPos[1]["X"] = cos((360-$Angle)*PI/180)*$Width + $RealPos[0]["X"];
         $RealPos[1]["Y"] = sin((360-$Angle)*PI/180)*$Width + $RealPos[0]["Y"];
         $RealPos[2]["X"] = cos((270-$Angle)*PI/180)*$Height + $RealPos[1]["X"];
         $RealPos[2]["Y"] = sin((270-$Angle)*PI/180)*$Height + $RealPos[1]["Y"];
         $RealPos[3]["X"] = cos((180-$Angle)*PI/180)*$Width + $RealPos[2]["X"];
         $RealPos[3]["Y"] = sin((180-$Angle)*PI/180)*$Width + $RealPos[2]["Y"];

         $RealPos[TEXT_ALIGN_BOTTOMLEFT]["X"] = $RealPos[0]["X"];
         $RealPos[TEXT_ALIGN_BOTTOMLEFT]["Y"] = $RealPos[0]["Y"];
         $RealPos[TEXT_ALIGN_BOTTOMRIGHT]["X"] = $RealPos[1]["X"];
         $RealPos[TEXT_ALIGN_BOTTOMRIGHT]["Y"] = $RealPos[1]["Y"];

         return($RealPos);
     }

     /* Return the surrounding box of text area */
     public function getTextBox($X, $Y, $FontName, $FontSize, $Angle, $Text)
     {
         $coords = imagettfbbox($FontSize, 0, $FontName, $Text);

         $a = deg2rad($Angle);
         $ca = cos($a);
         $sa = sin($a);
         $RealPos = array();
         for ($i = 0; $i < 7; $i += 2) {
             $RealPos[$i/2]["X"] = $X + round($coords[$i] * $ca + $coords[$i+1] * $sa);
             $RealPos[$i/2]["Y"] = $Y + round($coords[$i+1] * $ca - $coords[$i] * $sa);
         }

         $RealPos[TEXT_ALIGN_BOTTOMLEFT]["X"]	= $RealPos[0]["X"];
         $RealPos[TEXT_ALIGN_BOTTOMLEFT]["Y"]	= $RealPos[0]["Y"];
         $RealPos[TEXT_ALIGN_BOTTOMRIGHT]["X"]	= $RealPos[1]["X"];
         $RealPos[TEXT_ALIGN_BOTTOMRIGHT]["Y"]	= $RealPos[1]["Y"];
         $RealPos[TEXT_ALIGN_TOPLEFT]["X"]		= $RealPos[3]["X"];
         $RealPos[TEXT_ALIGN_TOPLEFT]["Y"]	= $RealPos[3]["Y"];
         $RealPos[TEXT_ALIGN_TOPRIGHT]["X"]		= $RealPos[2]["X"];
         $RealPos[TEXT_ALIGN_TOPRIGHT]["Y"]	= $RealPos[2]["Y"];
         $RealPos[TEXT_ALIGN_BOTTOMMIDDLE]["X"]	= ($RealPos[1]["X"]-$RealPos[0]["X"])/2+$RealPos[0]["X"];
         $RealPos[TEXT_ALIGN_BOTTOMMIDDLE]["Y"]	= ($RealPos[0]["Y"]-$RealPos[1]["Y"])/2+$RealPos[1]["Y"];
         $RealPos[TEXT_ALIGN_TOPMIDDLE]["X"]	= ($RealPos[2]["X"]-$RealPos[3]["X"])/2+$RealPos[3]["X"];
         $RealPos[TEXT_ALIGN_TOPMIDDLE]["Y"]	= ($RealPos[3]["Y"]-$RealPos[2]["Y"])/2+$RealPos[2]["Y"];
         $RealPos[TEXT_ALIGN_MIDDLELEFT]["X"]	= ($RealPos[0]["X"]-$RealPos[3]["X"])/2+$RealPos[3]["X"];
         $RealPos[TEXT_ALIGN_MIDDLELEFT]["Y"]	= ($RealPos[0]["Y"]-$RealPos[3]["Y"])/2+$RealPos[3]["Y"];
         $RealPos[TEXT_ALIGN_MIDDLERIGHT]["X"]	= ($RealPos[1]["X"]-$RealPos[2]["X"])/2+$RealPos[2]["X"];
         $RealPos[TEXT_ALIGN_MIDDLERIGHT]["Y"]	= ($RealPos[1]["Y"]-$RealPos[2]["Y"])/2+$RealPos[2]["Y"];
         $RealPos[TEXT_ALIGN_MIDDLEMIDDLE]["X"]	= ($RealPos[1]["X"]-$RealPos[3]["X"])/2+$RealPos[3]["X"];
         $RealPos[TEXT_ALIGN_MIDDLEMIDDLE]["Y"]	= ($RealPos[0]["Y"]-$RealPos[2]["Y"])/2+$RealPos[2]["Y"];

         return($RealPos);
     }

     /* Set current font properties */
     public function setFontProperties($Format="")
     {
         $R		= isset($Format["R"]) ? $Format["R"] : -1;
         $G		= isset($Format["G"]) ? $Format["G"] : -1;
         $B		= isset($Format["B"]) ? $Format["B"] : -1;
         $Alpha	= isset($Format["Alpha"]) ? $Format["Alpha"] : 100;
         $FontName	= isset($Format["FontName"]) ? $Format["FontName"] : null;
         $FontSize	= isset($Format["FontSize"]) ? $Format["FontSize"] : null;

         if ($R != -1) {
             $this->FontColorR = $R;
         }
         if ($G != -1) {
             $this->FontColorG = $G;
         }
         if ($B != -1) {
             $this->FontColorB = $B;
         }
         if ($Alpha != null) {
             $this->FontColorA = $Alpha;
         }

         if ($FontName != null) {
             $this->FontName = $FontName;
         }

         if ($FontSize != null) {
             $this->FontSize = $FontSize;
         }
     }

     /* Returns the 1st decimal values (used to correct AA bugs) */
     public function getFirstDecimal($Value)
     {
         $Values = preg_split("/\./", $Value);
         if (isset($Values[1])) {
             return(substr($Values[1], 0, 1));
         }
         return(0);
     }

     /* Attach a dataset to your pChart Object */
     public function setDataSet(&$DataSet)
     {
         $this->DataSet = $DataSet;
     }

     /* Print attached dataset contents to STDOUT */
     public function printDataSet()
     {
         print_r($this->DataSet);
     }

     /* Initialise the image map methods */
     public function initialiseImageMap($Name="pChart", $StorageMode=IMAGE_MAP_STORAGE_SESSION, $UniqueID="imageMap", $StorageFolder="tmp")
     {
         $this->ImageMapIndex 		= $Name;
         $this->ImageMapStorageMode		= $StorageMode;

         if ($StorageMode == IMAGE_MAP_STORAGE_SESSION) {
             if (!isset($_SESSION)) {
                 session_start();
             }
             $_SESSION[$this->ImageMapIndex]    = null;
         } elseif ($StorageMode == IMAGE_MAP_STORAGE_FILE) {
             $this->ImageMapFileName 		= $UniqueID;
             $this->ImageMapStorageFolder	= $StorageFolder;

             if (file_exists($StorageFolder."/".$UniqueID.".map")) {
                 unlink($StorageFolder."/".$UniqueID.".map");
             }
         }
     }

     /* Add a zone to the image map */
     public function addToImageMap($Type, $Plots, $Color=null, $Title=null, $Message=null, $HTMLEncode=false)
     {
         if ($this->ImageMapStorageMode == null) {
             $this->initialiseImageMap();
         }

         /* Encode the characters in the imagemap in HTML standards */
         $Title   = str_replace("&#8364;", "\u20AC", $Title);
         $Title   = htmlentities($Title, ENT_QUOTES, "ISO-8859-15");
         if ($HTMLEncode) {
             $Message = htmlentities($Message, ENT_QUOTES, "ISO-8859-15");
             $Message = str_replace("&lt;", "<", $Message);
             $Message = str_replace("&gt;", ">", $Message);
         }

         if ($this->ImageMapStorageMode == IMAGE_MAP_STORAGE_SESSION) {
             if (!isset($_SESSION)) {
                 $this->initialiseImageMap();
             }
             $_SESSION[$this->ImageMapIndex][] = array($Type,$Plots,$Color,$Title,$Message);
         } elseif ($this->ImageMapStorageMode == IMAGE_MAP_STORAGE_FILE) {
             $Handle = fopen($this->ImageMapStorageFolder."/".$this->ImageMapFileName.".map", 'ab');
             fwrite($Handle, $Type.IMAGE_MAP_DELIMITER.$Plots.IMAGE_MAP_DELIMITER.$Color.IMAGE_MAP_DELIMITER.$Title.IMAGE_MAP_DELIMITER.$Message."\r\n");
             fclose($Handle);
         }
     }

     /* Remove VOID values from an imagemap custom values array */
     public function removeVOIDFromArray($SerieName, $Values)
     {
         if (!isset($this->DataSet->Data["Series"][$SerieName])) {
             return(-1);
         }

         $Result = "";
         foreach ($this->DataSet->Data["Series"][$SerieName]["Data"] as $Key => $Value) {
             if ($Value != VOID && isset($Values[$Key])) {
                 $Result[] = $Values[$Key];
             }
         }
         return($Result);
     }

     /* Replace the title of one image map serie */
     public function replaceImageMapTitle($OldTitle, $NewTitle)
     {
         if ($this->ImageMapStorageMode == null) {
             return(-1);
         }

         if (is_array($NewTitle)) {
             $NewTitle = $this->removeVOIDFromArray($OldTitle, $NewTitle);
         }

         if ($this->ImageMapStorageMode == IMAGE_MAP_STORAGE_SESSION) {
             if (!isset($_SESSION)) {
                 return(-1);
             }
             if (is_array($NewTitle)) {
                 $ID = 0;
                 foreach ($_SESSION[$this->ImageMapIndex] as $Key => $Settings) {
                     if ($Settings[3] == $OldTitle && isset($NewTitle[$ID])) {
                         $_SESSION[$this->ImageMapIndex][$Key][3] = $NewTitle[$ID];
                         $ID++;
                     }
                 }
             } else {
                 foreach ($_SESSION[$this->ImageMapIndex] as $Key => $Settings) {
                     if ($Settings[3] == $OldTitle) {
                         $_SESSION[$this->ImageMapIndex][$Key][3] = $NewTitle;
                     }
                 }
             }
         } elseif ($this->ImageMapStorageMode == IMAGE_MAP_STORAGE_FILE) {
             $TempArray = "";
             $Handle    = @fopen($this->ImageMapStorageFolder."/".$this->ImageMapFileName.".map", 'rb');
             if ($Handle) {
                 while (($Buffer = fgets($Handle, 4096)) !== false) {
                     $Fields      = preg_split("/".IMAGE_MAP_DELIMITER."/", str_replace(array(chr(10),chr(13)), "", $Buffer));
                     $TempArray[] = array($Fields[0],$Fields[1],$Fields[2],$Fields[3],$Fields[4]);
                 }
                 fclose($Handle);

                 if (is_array($NewTitle)) {
                     $ID = 0;
                     foreach ($TempArray as $Key => $Settings) {
                         if ($Settings[3] == $OldTitle && isset($NewTitle[$ID])) {
                             $TempArray[$Key][3] = $NewTitle[$ID];
                             $ID++;
                         }
                     }
                 } else {
                     foreach ($TempArray as $Key => $Settings) {
                         if ($Settings[3] == $OldTitle) {
                             $TempArray[$Key][3] = $NewTitle;
                         }
                     }
                 }

                 $Handle = fopen($this->ImageMapStorageFolder."/".$this->ImageMapFileName.".map", 'wb');
                 foreach ($TempArray as $Key => $Settings) {
                     fwrite($Handle, $Settings[0].IMAGE_MAP_DELIMITER.$Settings[1].IMAGE_MAP_DELIMITER.$Settings[2].IMAGE_MAP_DELIMITER.$Settings[3].IMAGE_MAP_DELIMITER.$Settings[4]."\r\n");
                 }
                 fclose($Handle);
             }
         }
     }

     /* Replace the values of the image map contents */
     public function replaceImageMapValues($Title, $Values)
     {
         if ($this->ImageMapStorageMode == null) {
             return(-1);
         }

         $Values = $this->removeVOIDFromArray($Title, $Values);
         $ID = 0;
         if ($this->ImageMapStorageMode == IMAGE_MAP_STORAGE_SESSION) {
             if (!isset($_SESSION)) {
                 return(-1);
             }
             foreach ($_SESSION[$this->ImageMapIndex] as $Key => $Settings) {
                 if ($Settings[3] == $Title) {
                     if (isset($Values[$ID])) {
                         $_SESSION[$this->ImageMapIndex][$Key][4] = $Values[$ID];
                     }
                     $ID++;
                 }
             }
         } elseif ($this->ImageMapStorageMode == IMAGE_MAP_STORAGE_FILE) {
             $TempArray = "";
             $Handle    = @fopen($this->ImageMapStorageFolder."/".$this->ImageMapFileName.".map", 'rb');
             if ($Handle) {
                 while (($Buffer = fgets($Handle, 4096)) !== false) {
                     $Fields      = preg_split("/".IMAGE_MAP_DELIMITER."/", str_replace(array(chr(10),chr(13)), "", $Buffer));
                     $TempArray[] = array($Fields[0],$Fields[1],$Fields[2],$Fields[3],$Fields[4]);
                 }
                 fclose($Handle);

                 foreach ($TempArray as $Key => $Settings) {
                     if ($Settings[3] == $Title) {
                         if (isset($Values[$ID])) {
                             $TempArray[$Key][4] = $Values[$ID];
                         }
                         $ID++;
                     }
                 }

                 $Handle = fopen($this->ImageMapStorageFolder."/".$this->ImageMapFileName.".map", 'wb');
                 foreach ($TempArray as $Key => $Settings) {
                     fwrite($Handle, $Settings[0].IMAGE_MAP_DELIMITER.$Settings[1].IMAGE_MAP_DELIMITER.$Settings[2].IMAGE_MAP_DELIMITER.$Settings[3].IMAGE_MAP_DELIMITER.$Settings[4]."\r\n");
                 }
                 fclose($Handle);
             }
         }
     }

     /* Dump the image map */
     public function dumpImageMap($Name="pChart", $StorageMode=IMAGE_MAP_STORAGE_SESSION, $UniqueID="imageMap", $StorageFolder="tmp")
     {
         $this->ImageMapIndex 		= $Name;
         $this->ImageMapStorageMode		= $StorageMode;

         if ($this->ImageMapStorageMode == IMAGE_MAP_STORAGE_SESSION) {
             if (!isset($_SESSION)) {
                 session_start();
             }
             if ($_SESSION[$Name] != null) {
                 foreach ($_SESSION[$Name] as $Key => $Params) {
                     echo $Params[0].IMAGE_MAP_DELIMITER.$Params[1].IMAGE_MAP_DELIMITER.$Params[2].IMAGE_MAP_DELIMITER.$Params[3].IMAGE_MAP_DELIMITER.$Params[4]."\r\n";
                 }
             }
         } elseif ($this->ImageMapStorageMode == IMAGE_MAP_STORAGE_FILE) {
             if (file_exists($StorageFolder."/".$UniqueID.".map")) {
                 $Handle = @fopen($StorageFolder."/".$UniqueID.".map", 'rb');
                 if ($Handle) {
                     while (($Buffer = fgets($Handle, 4096)) !== false) {
                         echo $Buffer;
                     }
                 }
                 fclose($Handle);

                 if ($this->ImageMapAutoDelete) {
                     unlink($StorageFolder."/".$UniqueID.".map");
                 }
             }
         }

         /* When the image map is returned to the client, the script ends */
         exit();
     }

     /* Return the HTML converted color from the RGB composite values */
     public function toHTMLColor($R, $G, $B)
     {
         $R= (int)$R;
         $G= (int)$G;
         $B= (int)$B;
         $R=dechex($R<0?0:($R>255?255:$R));
         $G=dechex($G<0?0:($G>255?255:$G));
         $B=dechex($B<0?0:($B>255?255:$B));
         $Color="#".(strlen($R) < 2?'0':'').$R;
         $Color.=(strlen($G) < 2?'0':'').$G;
         $Color.= (strlen($B) < 2?'0':'').$B;
         return($Color);
     }

     /* Reverse an array of points */
     public function reversePlots($Plots)
     {
         $Result = "";
         for ($i=count($Plots)-2;$i>=0;$i=$i-2) {
             $Result[] = $Plots[$i];
             $Result[] = $Plots[$i+1];
         }
         return($Result);
     }

     /* Mirror Effect */
     public function drawAreaMirror($X, $Y, $Width, $Height, $Format="")
     {
         $StartAlpha	= isset($Format["StartAlpha"]) ? $Format["StartAlpha"] : 80;
         $EndAlpha		= isset($Format["EndAlpha"]) ? $Format["EndAlpha"] : 0;

         $AlphaStep = ($StartAlpha-$EndAlpha)/$Height;

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

         for ($i=1;$i<=$Height;$i++) {
             if ($Y+($i-1) < $this->YSize && $Y-$i > 0) {
                 imagecopymerge($Picture, $this->Picture, $X, $Y+($i-1), $X, $Y-$i, $Width, 1, $StartAlpha-$AlphaStep*$i);
             }
         }

         imagecopy($this->Picture, $Picture, 0, 0, 0, 0, $this->XSize, $this->YSize);
     }
 }
