Proyectos de Subversion Moodle

<?php

/*

pSplit - class to draw spline splitted charts

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.

*/

define("TEXT_POS_TOP", 690001);

define("TEXT_POS_RIGHT", 690002);

/* pSplit class definition */

class pSplit

{

	var $pChartObject;

	/* Class creator */

	function __construct(){}

	/* Create the encoded string */

	function drawSplitPath($Object, $Values, array $Format = [])

	{

		$this->pChartObject = $Object;

		$Spacing = isset($Format["Spacing"]) ? $Format["Spacing"] : 20;

		$TextPadding = isset($Format["TextPadding"]) ? $Format["TextPadding"] : 2;

		$TextPos = isset($Format["TextPos"]) ? $Format["TextPos"] : TEXT_POS_TOP;

		$Surrounding = isset($Format["Surrounding"]) ? $Format["Surrounding"] : NULL;

		$Force = isset($Format["Force"]) ? $Format["Force"] : 70;

		$Segments = isset($Format["Segments"]) ? $Format["Segments"] : 15;

		$FontSize = $Object->FontSize;

		$X1 = $Object->GraphAreaX1;

		$Y1 = $Object->GraphAreaY1;

		$X2 = $Object->GraphAreaX2;

		$Y2 = $Object->GraphAreaY2;

		/* Data Processing */

		$Data = $Values->getData();

		$Palette = $Values->getPalette();

		$LabelSerie = $Data["Abscissa"];

		$DataSerie = "";

		foreach($Data["Series"] as $SerieName => $Value) {

			if ($SerieName != $LabelSerie && $DataSerie == "") {

				$DataSerie = $SerieName;

			}

		}

		$DataSerieSum = array_sum($Data["Series"][$DataSerie]["Data"]);

		$DataSerieCount = count($Data["Series"][$DataSerie]["Data"]);

		/* Scale Processing */

		if ($TextPos == TEXT_POS_RIGHT) {

			$YScale = (($Y2 - $Y1) - (($DataSerieCount + 1) * $Spacing)) / $DataSerieSum;

		} else {

			$YScale = (($Y2 - $Y1) - ($DataSerieCount * $Spacing)) / $DataSerieSum;

		}

		$LeftHeight = $DataSerieSum * $YScale;

		/* Re-compute graph width depending of the text mode choosen */

		if ($TextPos == TEXT_POS_RIGHT) {

			$MaxWidth = 0;

			foreach($Data["Series"][$LabelSerie]["Data"] as $Key => $Label) {

				$Boundardies = $Object->getTextBox(0, 0, $Object->FontName, $Object->FontSize, 0, $Label);

				if ($Boundardies[1]["X"] > $MaxWidth) {

					$MaxWidth = $Boundardies[1]["X"] + $TextPadding * 2;

				}

			}

			$X2 = $X2 - $MaxWidth;

		}

		/* Drawing */

		$LeftY = ((($Y2 - $Y1) / 2) + $Y1) - ($LeftHeight / 2);

		$RightY = $Y1;

		$VectorX = (($X2 - $X1) / 2);

		foreach($Data["Series"][$DataSerie]["Data"] as $Key => $Value) {

			$Label = (isset($Data["Series"][$LabelSerie]["Data"][$Key])) ? $Data["Series"][$LabelSerie]["Data"][$Key] : "-";

			$LeftY1 = $LeftY;

			$LeftY2 = $LeftY + $Value * $YScale;

			$RightY1 = $RightY + $Spacing;

			$RightY2 = $RightY + $Spacing + $Value * $YScale;;

			$Settings = array(

				"R" => $Palette[$Key]["R"],

				"G" => $Palette[$Key]["G"],

				"B" => $Palette[$Key]["B"],

				"Alpha" => $Palette[$Key]["Alpha"],

				"NoDraw" => TRUE,

				"Segments" => $Segments,

				"Surrounding" => $Surrounding

			);

			$PolyGon = [];

			$Angle = $Object->getAngle($X2, $RightY1, $X1, $LeftY1);

			$VectorX1 = cos(deg2rad($Angle + 90)) * $Force + ($X2 - $X1) / 2 + $X1;

			$VectorY1 = sin(deg2rad($Angle + 90)) * $Force + ($RightY1 - $LeftY1) / 2 + $LeftY1;

			$VectorX2 = cos(deg2rad($Angle - 90)) * $Force + ($X2 - $X1) / 2 + $X1;

			$VectorY2 = sin(deg2rad($Angle - 90)) * $Force + ($RightY1 - $LeftY1) / 2 + $LeftY1;

			$Points = $Object->drawBezier($X1, $LeftY1, $X2, $RightY1, $VectorX1, $VectorY1, $VectorX2, $VectorY2, $Settings);

			foreach($Points as $Key => $Pos) {

				$PolyGon[] = $Pos["X"];

				$PolyGon[] = $Pos["Y"];

			}

			$Angle = $Object->getAngle($X2, $RightY2, $X1, $LeftY2);

			$VectorX1 = cos(deg2rad($Angle + 90)) * $Force + ($X2 - $X1) / 2 + $X1;

			$VectorY1 = sin(deg2rad($Angle + 90)) * $Force + ($RightY2 - $LeftY2) / 2 + $LeftY2;

			$VectorX2 = cos(deg2rad($Angle - 90)) * $Force + ($X2 - $X1) / 2 + $X1;

			$VectorY2 = sin(deg2rad($Angle - 90)) * $Force + ($RightY2 - $LeftY2) / 2 + $LeftY2;

			$Points = $Object->drawBezier($X1, $LeftY2, $X2, $RightY2, $VectorX1, $VectorY1, $VectorX2, $VectorY2, $Settings);

			$Points = array_reverse($Points);

			foreach($Points as $Key => $Pos) {

				$PolyGon[] = $Pos["X"];

				$PolyGon[] = $Pos["Y"];

			}

			$Object->drawPolygon($PolyGon, $Settings);

			if ($TextPos == TEXT_POS_RIGHT) {

				$Object->drawText($X2 + $TextPadding, ($RightY2 - $RightY1) / 2 + $RightY1, $Label, ["Align" => TEXT_ALIGN_MIDDLELEFT]);

			} else {

				$Object->drawText($X2, $RightY1 - $TextPadding, $Label, ["Align" => TEXT_ALIGN_BOTTOMRIGHT]);

			}

			$LeftY = $LeftY2;

			$RightY = $RightY2;

		}

	}

}

?>