Subversion-Projekte lars-tiefland.php_share

<?php

//=======================================================================

// File:	JPGRAPH_LED.PHP

// Description:	Module to generate Dotted LED-like digits

// Created: 	2006-11-26

// Ver:		$Id: jpgraph_led.php 854 2007-03-18 20:03:18Z ljp $

//

// Copyright 2006 (c) Aditus Consulting. All rights reserved.

//========================================================================

// Constants for color schema

DEFINE('LEDC_RED',0);

DEFINE('LEDC_GREEN',1);

DEFINE('LEDC_BLUE',2);

DEFINE('LEDC_YELLOW',3);

DEFINE('LEDC_GRAY',4);

//========================================================================

// CLASS DigitalLED74

// Description:

// Construct a number as an image that looks like LED numbers in a

// 7x4 digital matrix

//========================================================================

class DigitalLED74 {

    var $iLED_X = 4, $iLED_Y=7;

    var $iLEDSpec = array( 0 => array(6,9,9,9,9,9,6),

			   1 => array(2,6,10,2,2,2,2),

			   2 => array(6,9,1,2,4,8,15),

			   3 => array(6,9,1,6,1,9,6),

			   4 => array(1,3,5,9,15,1,1),

			   5 => array(15,8,8,14,1,9,6),

			   6 => array(6,8,8,14,9,9,6),

			   7 => array(15,1,1,2,4,4,4),

			   8 => array(6,9,9,6,9,9,6),

			   9 => array(6,9,9,7,1,1,6),

			   '.' => array(0,0,0,0,0,3,3),

			   ' ' => array(0,0,0,0,0,0,0),

			   '#' => array(0,9,15,9,15,9,0),

			   'A' => array(6,9,9,15,9,9,9),

			   'B' => array(14,9,9,14,9,9,14),

			   'C' => array(6,9,8,8,8,9,6),

			   'D' => array(14,9,9,9,9,9,14),

			   'E' => array(15,8,8,14,8,8,15),

			   'F' => array(15,8,8,14,8,8,8),

			   'G' => array(6,9,8,8,11,9,6),

			   'H' => array(9,9,9,15,9,9,9),

			   'I' => array(14,4,4,4,4,4,14),

			   'J' => array(15,1,1,1,1,9,6),

			   'K' => array(8,9,10,12,12,10,9),

			   'L' => array(8,8,8,8,8,8,15)	),

	$iColorSchema = array(0 => array('red','darkred:0.9','red:0.3'),

			      1 => array('green','darkgreen','green:0.3'),

			      2 => array('lightblue:0.9','darkblue:0.85','darkblue:0.7'),

			      3 => array('yellow','yellow:0.4','yellow:0.3'),

			      4 => array('gray:1.4','darkgray:0.85','darkgray:0.7')),

	$iSuperSampling = 3, $iMarg = 1, $iRad = 4 ;

    function DigitalLED74($aRadius=2,$aMargin=0.6) {

	$this->iRad = $aRadius;

	$this->iMarg = $aMargin;

    }

    function SetSupersampling($aSuperSampling=2) {

	$this->iSuperSampling = $aSuperSampling;

    }

    function _GetLED($aLedIdx,$aColor=0) {

	if( $aColor < 0 || $aColor > 4 )

	    $aColor = 0 ;

	$width=  $this->iLED_X*$this->iRad*2 +  ($this->iLED_X+1)*$this->iMarg + $this->iRad ;

	$height= $this->iLED_Y*$this->iRad*2 +  ($this->iLED_Y+1)*$this->iMarg + $this->iRad * 2;

	// Adjust radious for supersampling

	$rad = $this->iRad * $this->iSuperSampling;

	// Margin in between "Led" dots

	$marg = $this->iMarg * $this->iSuperSampling;

	$swidth = $width*$this->iSuperSampling;

	$sheight = $height*$this->iSuperSampling;

	$simg = new RotImage($swidth,$sheight,0,DEFAULT_GFORMAT,false);

	$simg->SetColor($this->iColorSchema[$aColor][2]);

	$simg->FilledRectangle(0,0,$swidth-1,$sheight-1);

	$d = $this->iLEDSpec[$aLedIdx];

	for( $r = 0 ; $r < 7; ++$r ) {

	    $dr = $d[$r];

	    for($c=0; $c < 4; ++$c ) {

		if( ($dr & pow(2,3-$c)) !== 0 ) {

		    $color = $this->iColorSchema[$aColor][0];

		}

		else {

		    $color = $this->iColorSchema[$aColor][1];

		}

		$x = 2*$rad*$c+$rad + ($c+1)*$marg + $rad ;

		$y = 2*$rad*$r+$rad + ($r+1)*$marg + $rad ;

		$simg->SetColor($color);

		$simg->FilledCircle($x,$y,$rad);

	    }

	}

	$img =  new Image($width,$height,DEFAULT_GFORMAT,false);

	$img->Copy($simg->img,0,0,0,0,$width,$height,$swidth,$sheight);

	$simg->Destroy();

	unset($simg);

	return $img;

    }

    function Stroke($aValStr,$aColor=0) {

	$n=strlen($aValStr);

	for( $i=0 ; $i < $n; ++$i ) {

	    $d = substr($aValStr,$i,1);

	    if( ctype_digit($d) )

		$d = (int)$d;

	    else {

		$d = strtoupper($d);

		if( $d != '#' && $d != '.' && ($d < 'A' || $d > 'L') )

		    $d = ' ';

	    }

	    $digit_img[$i] = $this->_GetLED($d,$aColor);

	}

	$w = imagesx($digit_img[0]->img);

	$h = imagesy($digit_img[0]->img);

	$number_img = new Image($w*$n,$h,DEFAULT_GFORMAT,false);

	for($i=0; $i < $n; ++$i ) {

	    $number_img->Copy($digit_img[$i]->img,$i*$w,0,0,0,$w,$h,$w,$h);

	}

	$number_img->Headers();

	$number_img->Stream();

    }

}

?>