| New file |
|---|
| 0,0 → 1,585 |
|---|
| <?php |
| /* |
| * This work is hereby released into the Public Domain. |
| * To view a copy of the public domain dedication, |
| * visit http://creativecommons.org/licenses/publicdomain/ or send a letter to |
| * Creative Commons, 559 Nathan Abbott Way, Stanford, California 94305, USA. |
| * |
| */ |
| |
| require_once dirname(__FILE__)."/Plot.class.php"; |
| |
| |
| /** |
| * LinePlot |
| * |
| * @package Artichow |
| */ |
| class awLinePlot extends awPlot implements awLegendable { |
| |
| /** |
| * Add marks to your line plot |
| * |
| * @var Mark |
| */ |
| public $mark; |
| |
| /** |
| * Labels on your line plot |
| * |
| * @var Label |
| */ |
| public $label; |
| |
| /** |
| * Filled areas |
| * |
| * @var bool |
| */ |
| protected $areas = array(); |
| |
| /** |
| * Is the line hidden |
| * |
| * @var bool |
| */ |
| protected $lineHide = FALSE; |
| |
| /** |
| * Line color |
| * |
| * @var Color |
| */ |
| protected $lineColor; |
| |
| /** |
| * Line mode |
| * |
| * @var int |
| */ |
| protected $lineMode = awLinePlot::LINE; |
| |
| /** |
| * Line type |
| * |
| * @var int |
| */ |
| protected $lineStyle = awLine::SOLID; |
| |
| /** |
| * Line thickness |
| * |
| * @var int |
| */ |
| protected $lineThickness = 1; |
| |
| /** |
| * Line background |
| * |
| * @var Color, Gradient |
| */ |
| protected $lineBackground; |
| |
| /** |
| * Line mode |
| * |
| * @var int |
| */ |
| const LINE = 0; |
| |
| /** |
| * Line in the middle |
| * |
| * @var int |
| */ |
| const MIDDLE = 1; |
| |
| /** |
| * Construct a new awLinePlot |
| * |
| * @param array $values Some numeric values for Y axis |
| * @param int $mode |
| */ |
| public function __construct($values, $mode = awLinePlot::LINE) { |
| |
| parent::__construct(); |
| |
| $this->mark = new awMark; |
| $this->label = new awLabel; |
| |
| $this->lineMode = (int)$mode; |
| |
| $this->setValues($values); |
| |
| } |
| |
| /** |
| * Hide line |
| * |
| * @param bool $hide |
| */ |
| public function hideLine($hide) { |
| $this->lineHide = (bool)$hide; |
| } |
| |
| /** |
| * Add a filled area |
| * |
| * @param int $start Begining of the area |
| * @param int $end End of the area |
| * @param mixed $background Background color or gradient of the area |
| */ |
| public function setFilledArea($start, $stop, $background) { |
| |
| if($stop <= $start) { |
| awImage::drawError("Class LinePlot: End position can not be greater than begin position in setFilledArea()."); |
| } |
| |
| $this->areas[] = array((int)$start, (int)$stop, $background); |
| |
| } |
| |
| /** |
| * Change line color |
| * |
| * @param awColor $color |
| */ |
| public function setColor(awColor $color) { |
| $this->lineColor = $color; |
| } |
| |
| /** |
| * Change line style |
| * |
| * @param int $style |
| */ |
| public function setStyle($style) { |
| $this->lineStyle = (int)$style; |
| } |
| |
| /** |
| * Change line tickness |
| * |
| * @param int $tickness |
| */ |
| public function setThickness($tickness) { |
| $this->lineThickness = (int)$tickness; |
| } |
| |
| /** |
| * Change line background color |
| * |
| * @param awColor $color |
| */ |
| public function setFillColor(awColor $color) { |
| $this->lineBackground = $color; |
| } |
| |
| /** |
| * Change line background gradient |
| * |
| * @param awGradient $gradient |
| */ |
| public function setFillGradient(awGradient $gradient) { |
| $this->lineBackground = $gradient; |
| } |
| |
| /** |
| * Get the line thickness |
| * |
| * @return int |
| */ |
| public function getLegendLineThickness() { |
| return $this->lineThickness; |
| } |
| |
| /** |
| * Get the line type |
| * |
| * @return int |
| */ |
| public function getLegendLineStyle() { |
| return $this->lineStyle; |
| } |
| |
| /** |
| * Get the color of line |
| * |
| * @return Color |
| */ |
| public function getLegendLineColor() { |
| return $this->lineColor; |
| } |
| |
| /** |
| * Get the background color or gradient of an element of the component |
| * |
| * @return Color, Gradient |
| */ |
| public function getLegendBackground() { |
| return $this->lineBackground; |
| } |
| |
| /** |
| * Get a mark object |
| * |
| * @return Mark |
| */ |
| public function getLegendMark() { |
| return $this->mark; |
| } |
| |
| public function drawComponent(awDriver $driver, $x1, $y1, $x2, $y2, $aliasing) { |
| |
| $max = $this->getRealYMax(); |
| $min = $this->getRealYMin(); |
| |
| // Get start and stop values |
| list($start, $stop) = $this->getLimit(); |
| |
| if($this->lineMode === awLinePlot::MIDDLE) { |
| $inc = $this->xAxis->getDistance(0, 1) / 2; |
| } else { |
| $inc = 0; |
| } |
| |
| // Build the polygon |
| $polygon = new awPolygon; |
| |
| for($key = $start; $key <= $stop; $key++) { |
| |
| $value = $this->datay[$key]; |
| |
| if($value !== NULL) { |
| |
| $p = awAxis::toPosition($this->xAxis, $this->yAxis, new awPoint($key, $value)); |
| $p = $p->move($inc, 0); |
| $polygon->set($key, $p); |
| |
| } |
| |
| } |
| |
| // Draw backgrounds |
| if($this->lineBackground instanceof awColor or $this->lineBackground instanceof awGradient) { |
| |
| $backgroundPolygon = new awPolygon; |
| |
| $p = $this->xAxisPoint($start); |
| $p = $p->move($inc, 0); |
| $backgroundPolygon->append($p); |
| |
| // Add others points |
| foreach($polygon->all() as $point) { |
| $backgroundPolygon->append(clone $point); |
| } |
| |
| $p = $this->xAxisPoint($stop); |
| $p = $p->move($inc, 0); |
| $backgroundPolygon->append($p); |
| |
| // Draw polygon background |
| $driver->filledPolygon($this->lineBackground, $backgroundPolygon); |
| |
| } |
| |
| $this->drawArea($driver, $polygon); |
| |
| // Draw line |
| $prev = NULL; |
| |
| // Line color |
| if($this->lineHide === FALSE) { |
| |
| if($this->lineColor === NULL) { |
| $this->lineColor = new awColor(0, 0, 0); |
| } |
| |
| foreach($polygon->all() as $point) { |
| |
| if($prev !== NULL) { |
| $driver->line( |
| $this->lineColor, |
| new awLine( |
| $prev, |
| $point, |
| $this->lineStyle, |
| $this->lineThickness |
| ) |
| ); |
| } |
| $prev = $point; |
| |
| } |
| |
| } |
| |
| // Draw marks and labels |
| foreach($polygon->all() as $key => $point) { |
| |
| $this->mark->draw($driver, $point); |
| $this->label->draw($driver, $point, $key); |
| |
| } |
| |
| } |
| |
| protected function drawArea(awDriver $driver, awPolygon $polygon) { |
| |
| $starts = array(); |
| foreach($this->areas as $area) { |
| list($start) = $area; |
| $starts[$start] = TRUE; |
| } |
| |
| // Draw filled areas |
| foreach($this->areas as $area) { |
| |
| list($start, $stop, $background) = $area; |
| |
| $polygonArea = new awPolygon; |
| |
| $p = $this->xAxisPoint($start); |
| $polygonArea->append($p); |
| |
| for($i = $start; $i <= $stop; $i++) { |
| $p = clone $polygon->get($i); |
| if($i === $stop and array_key_exists($stop, $starts)) { |
| $p = $p->move(-1, 0); |
| } |
| $polygonArea->append($p); |
| } |
| |
| $p = $this->xAxisPoint($stop); |
| if(array_key_exists($stop, $starts)) { |
| $p = $p->move(-1, 0); |
| } |
| $polygonArea->append($p); |
| |
| // Draw area |
| $driver->filledPolygon($background, $polygonArea); |
| |
| } |
| |
| } |
| |
| public function getXAxisNumber() { |
| if($this->lineMode === awLinePlot::MIDDLE) { |
| return count($this->datay) + 1; |
| } else { |
| return count($this->datay); |
| } |
| } |
| |
| protected function xAxisPoint($position) { |
| $y = $this->xAxisZero ? 0 : $this->getRealYMin(); |
| return awAxis::toPosition($this->xAxis, $this->yAxis, new awPoint($position, $y)); |
| } |
| |
| public function getXCenter() { |
| return ($this->lineMode === awLinePlot::MIDDLE); |
| } |
| |
| } |
| |
| registerClass('LinePlot'); |
| |
| |
| /** |
| * Simple LinePlot |
| * Useful to draw simple horizontal lines |
| * |
| * @package Artichow |
| */ |
| class awSimpleLinePlot extends awPlot implements awLegendable { |
| |
| /** |
| * Line color |
| * |
| * @var Color |
| */ |
| protected $lineColor; |
| |
| /** |
| * Line start |
| * |
| * @var int |
| */ |
| protected $lineStart; |
| |
| /** |
| * Line stop |
| * |
| * @var int |
| */ |
| protected $lineStop; |
| |
| /** |
| * Line value |
| * |
| * @var flaot |
| */ |
| protected $lineValue; |
| |
| /** |
| * Line mode |
| * |
| * @var int |
| */ |
| protected $lineMode = awLinePlot::LINE; |
| |
| /** |
| * Line type |
| * |
| * @var int |
| */ |
| protected $lineStyle = awLine::SOLID; |
| |
| /** |
| * Line thickness |
| * |
| * @var int |
| */ |
| protected $lineThickness = 1; |
| |
| /** |
| * Line mode |
| * |
| * @var int |
| */ |
| const LINE = 0; |
| |
| /** |
| * Line in the middle |
| * |
| * @var int |
| */ |
| const MIDDLE = 1; |
| |
| /** |
| * Construct a new awLinePlot |
| * |
| * @param float $value A Y value |
| * @param int $start Line start index |
| * @param int $stop Line stop index |
| * @param int $mode Line mode |
| */ |
| public function __construct($value, $start, $stop, $mode = awLinePlot::LINE) { |
| |
| parent::__construct(); |
| |
| $this->lineMode = (int)$mode; |
| |
| $this->lineStart = (int)$start; |
| $this->lineStop = (int)$stop; |
| $this->lineValue = (float)$value; |
| |
| $this->lineColor = new awColor(0, 0, 0); |
| |
| } |
| |
| /** |
| * Change line color |
| * |
| * @param awColor $color |
| */ |
| public function setColor(awColor $color) { |
| $this->lineColor = $color; |
| } |
| |
| /** |
| * Change line style |
| * |
| * @param int $style |
| */ |
| public function setStyle($style) { |
| $this->lineStyle = (int)$style; |
| } |
| |
| /** |
| * Change line tickness |
| * |
| * @param int $tickness |
| */ |
| public function setThickness($tickness) { |
| $this->lineThickness = (int)$tickness; |
| } |
| |
| /** |
| * Get the line thickness |
| * |
| * @return int |
| */ |
| public function getLegendLineThickness() { |
| return $this->lineThickness; |
| } |
| |
| /** |
| * Get the line type |
| * |
| * @return int |
| */ |
| public function getLegendLineStyle() { |
| return $this->lineStyle; |
| } |
| |
| /** |
| * Get the color of line |
| * |
| * @return Color |
| */ |
| public function getLegendLineColor() { |
| return $this->lineColor; |
| } |
| |
| public function getLegendBackground() { |
| return NULL; |
| } |
| |
| public function getLegendMark() { |
| return NULL; |
| } |
| |
| public function drawComponent(awDriver $driver, $x1, $y1, $x2, $y2, $aliasing) { |
| |
| if($this->lineMode === awLinePlot::MIDDLE) { |
| $inc = $this->xAxis->getDistance(0, 1) / 2; |
| } else { |
| $inc = 0; |
| } |
| |
| $p1 = awAxis::toPosition($this->xAxis, $this->yAxis, new awPoint($this->lineStart, $this->lineValue)); |
| $p2 = awAxis::toPosition($this->xAxis, $this->yAxis, new awPoint($this->lineStop, $this->lineValue)); |
| |
| $driver->line( |
| $this->lineColor, |
| new awLine( |
| $p1->move($inc, 0), |
| $p2->move($inc, 0), |
| $this->lineStyle, |
| $this->lineThickness |
| ) |
| ); |
| } |
| |
| public function getXAxisNumber() { |
| if($this->lineMode === awLinePlot::MIDDLE) { |
| return count($this->datay) + 1; |
| } else { |
| return count($this->datay); |
| } |
| } |
| |
| protected function xAxisPoint($position) { |
| $y = $this->xAxisZero ? 0 : $this->getRealYMin(); |
| return awAxis::toPosition($this->xAxis, $this->yAxis, new awPoint($position, $y)); |
| } |
| |
| public function getXCenter() { |
| return ($this->lineMode === awLinePlot::MIDDLE); |
| } |
| |
| } |
| |
| registerClass('SimpleLinePlot'); |
| ?> |