Evaluate a pie chart or column chart. Generate a class or example in php.

PHP code: -------------------------------------------------------------------------------- * ------------------------------------------------------------------------- * ModuleName: a 3D pie chart class Author: Avenger (avenger@php.net) LastModif PHP code: Signature :--------------------------------------------------------------------------------
/*-------------------------------------------------------------------------*/
//
// Module Name: a 3D pie chart class
//
// Author: Avenger (avenger@php.net) Last Modify:
// Copyright (c) 2002 by Avenger
/*-------------------------------------------------------------------------*/

// Public functions

// Converts degrees to radians
Function deg2Arc ($ degrees ){
Return ($ degrees * (pi ()/180.0 ));
}

// RGB
Function getRGB ($ color ){
$ R = ($ color> 16) & 0xff;
$ G = ($ color> 8) & 0xff;
$ B = ($ color) & 0xff;
Return (array ($ R, $ G, $ B ));
}

// Obtain the values of the x and y points on an elliptical center (0, 0 ).
Function pie_point ($ deg, $ va, $ vb ){
$ X = cos (deg2Arc ($ deg) * $ va;
$ Y = sin (deg2Arc ($ deg) * $ vb;
Return (array ($ x, $ y ));
}


// 3D pie chart

Class Pie3d {

Var $ a; // The long half-axis of the ellipse.
Var $ B; // specifies the shorter half-axis of an ellipse.
Var $ DataArray; // data of each sector
Var $ ColorArray; // The color of each slice must be written in hexadecimal format, but 0x is not added before.
Var $ Fize; // font size
// Black for the edge and shadow

Function Pie3d ($ pa = 60, $ pb = 30, $ sData = "100,200,300,400,500", $ sColor = "ee00ff, dd0000, cccccc, ccff00, 00 ccff ", $ fontsize = 1 ){
$ This-> a = $ pa;
$ This-> B = $ pb;
$ This-> DataArray = split (",", $ sData );
$ This-> ColorArray = split (",", $ sColor );
$ This-> Fsize = $ fontsize;
}

Function setA ($ v ){
$ This-> a = $ v;
}

Function getA (){
Return $ this->;
}

Function setB ($ v ){
$ This-> B = $ v;
}

Function getB (){
Return $ this-> B;
}

Function setDataArray ($ v ){
$ This-> DataArray = split (",", $ v );
}

Function getDataArray ($ v ){
Return $ this-> DataArray;
}

Function setColorArray ($ v ){
$ This-> ColorArray = split (",", $ v );
}

Function getColorArray (){
Return $ this-> ColorArray;
}


Function DrawPie (){
$ Fsize = $ this-> Fsize;
$ Image = imagecreate ($ this-> a * 2 + 40, $ this-> B * 2 + 40 );
$ PieCenterX = $ this-> a + 10;
$ PieCenterY = $ this-> B + 10;
$ DoubleA = $ this-> a * 2;
$ DoubleB = $ this-> B * 2;
List ($ R, $ G, $ B) = getRGB (0 );
$ ColorBorder = imagecolorallocate ($ image, $ R, $ G, $ B );
$ DataNumber = count ($ this-> DataArray );

// $ DataTotal
For ($ I = 0; $ I <$ DataNumber; $ I ++) $ DataTotal + = $ this-> DataArray [$ I]; // calculates the data and

// Fill in the background
Imagefill ($ image, 0, 0, imagecolorallocate ($ image, 255,255,255 ));

/*
** Draw each slice
*/

$ Degrees = 0;
For ($ I = 0; $ I <$ DataNumber; $ I ++ ){
$ StartDegrees = round ($ Degrees );
$ Degrees + = ($ this-> DataArray [$ I]/$ DataTotal) * 360 );
$ EndDegrees = round ($ Degrees );
$ Percent = number_format ($ this-> DataArray [$ I]/$ DataTotal * 100, 1 );
List ($ R, $ G, $ B) = getRGB (hexdec ($ this-> ColorArray [$ I]);
$ CurrentColor = imagecolorallocate ($ image, $ R, $ G, $ B );
If ($ R> 60 and $ R <256) $ R = $ R-60;
If ($ G> 60 and $ G <256) $ G = $ G-60;
If ($ B> 60 and $ B <256) $ B = $ B-60;
$ CurrentDarkColor = imagecolorallocate ($ image, $ R, $ G, $ B );

// Draw slice arc
Imagearc ($ image, $ PieCenterX, $ PieCenterY, $ DoubleA, $ DoubleB, $ StartDegrees, $ EndDegrees, $ CurrentColor );

// Draw a straight line
List ($ ArcX, $ ArcY) = pie_point ($ StartDegrees, $ this-> a, $ this-> B );
Imageline ($ image, $ PieCenterX, $ PieCenterY, floor ($ PieCenterX + $ ArcX), floor ($ PieCenterY + $ ArcY), $ CurrentColor );

// Draw a straight line
List ($ ArcX, $ ArcY) = pie_point ($ EndDegrees, $ this-> a, $ this-> B );
Imageline ($ image, $ PieCenterX, $ PieCenterY, ceil ($ PieCenterX + $ ArcX), ceil ($ PieCenterY + $ ArcY), $ CurrentColor );

// Fill the slice
$ MidPoint = round ($ EndDegrees-$ StartDegrees)/2) + $ StartDegrees );
List ($ ArcX, $ ArcY) = Pie_point ($ MidPoint, $ this-> a * 3/4, $ this-> B * 3/4 );

Imagefilltoborder ($ image, floor ($ PieCenterX + $ ArcX), floor ($ PieCenterY + $ ArcY), $ CurrentColor, $ CurrentColor );
Imagestring ($ image, $ fsize, floor ($ PieCenterX + $ ArcX-5), floor ($ PieCenterY + $ ArcY-5), $ percent. "%", $ colorBorder );

// Shadow
If ($ StartDegrees> = 0 and $ StartDegrees <= 180 ){
If ($ EndDegrees <= 180 ){
For ($ k = 1; $ k <15; $ k ++)
Imagearc ($ image, $ PieCenterX, $ PieCenterY + $ k, $ DoubleA, $ DoubleB, $ StartDegrees, $ EndDegrees, $ CurrentDarkColor );
} Else {
For ($ k = 1; $ k <15; $ k ++)
Imagearc ($ image, $ PieCenterX, $ PieCenterY + $ k, $ DoubleA, $ DoubleB, $ StartDegrees, 180, $ CurrentDarkColor );
}
}
}

// Output the generated image
Imagepng(images image,'consture.png ');
Imagedestroy ($ image );
} // End drawPie ()
} // End class
$ Pie = new Pie3d;
$ Pie-> Pie3d ($ pa = 300, $ pb = 150, $ sData = "100,200,300,400,500", $ sColor = "ee00ff, dd0000, cccccccc, ccff00, ddddaa ", $ fontsize = 5 );
$ Pie-> DrawPie ();
Echo '';

?>