Rev 66 | Blame | Compare with Previous | Last modification | View Log | RSS feed
<?php//=======================================================================// File: JPGRAPH_LED.PHP// Description: Module to generate Dotted LED-like digits// Created: 2006-11-26// Ver: $Id: jpgraph_led.php 1674 2009-07-22 19:42:23Z ljp $//// Copyright 2006 (c) Aditus Consulting. All rights reserved.//// Changed: 2007-08-06 by Alexander Kurochkin (inspector@list.ru)//========================================================================// Constants for color schemaDEFINE('LEDC_RED', 0);DEFINE('LEDC_GREEN', 1);DEFINE('LEDC_BLUE', 2);DEFINE('LEDC_YELLOW', 3);DEFINE('LEDC_GRAY', 4);DEFINE('LEDC_CHOCOLATE', 5);DEFINE('LEDC_PERU', 6);DEFINE('LEDC_GOLDENROD', 7);DEFINE('LEDC_KHAKI', 8);DEFINE('LEDC_OLIVE', 9);DEFINE('LEDC_LIMEGREEN', 10);DEFINE('LEDC_FORESTGREEN', 11);DEFINE('LEDC_TEAL', 12);DEFINE('LEDC_STEELBLUE', 13);DEFINE('LEDC_NAVY', 14);DEFINE('LEDC_INVERTGRAY', 15);// Check that mb_strlen() is availableif( ! function_exists('mb_strlen') ) {JpGraphError::RaiseL(25500);//'Multibyte strings must be enabled in the PHP installation in order to run the LED module// so that the function mb_strlen() is available. See PHP documentation for more information.'}//========================================================================// CLASS DigitalLED74// Description:// Construct a number as an image that looks like LED numbers in a// 7x4 digital matrix//========================================================================class DigitalLED74{private $iLED_X = 4, $iLED_Y=7,// fg-up, fg-down, bg$iColorSchema = array(LEDC_RED => array('red','darkred:0.9','red:0.3'),// 0LEDC_GREEN => array('green','darkgreen','green:0.3'),// 1LEDC_BLUE => array('lightblue:0.9','darkblue:0.85','darkblue:0.7'),// 2LEDC_YELLOW => array('yellow','yellow:0.4','yellow:0.3'),// 3LEDC_GRAY => array('gray:1.4','darkgray:0.85','darkgray:0.7'),LEDC_CHOCOLATE => array('chocolate','chocolate:0.7','chocolate:0.5'),LEDC_PERU => array('peru:0.95','peru:0.6','peru:0.5'),LEDC_GOLDENROD => array('goldenrod','goldenrod:0.6','goldenrod:0.5'),LEDC_KHAKI => array('khaki:0.7','khaki:0.4','khaki:0.3'),LEDC_OLIVE => array('#808000','#808000:0.7','#808000:0.6'),LEDC_LIMEGREEN => array('limegreen:0.9','limegreen:0.5','limegreen:0.4'),LEDC_FORESTGREEN => array('forestgreen','forestgreen:0.7','forestgreen:0.5'),LEDC_TEAL => array('teal','teal:0.7','teal:0.5'),LEDC_STEELBLUE => array('steelblue','steelblue:0.65','steelblue:0.5'),LEDC_NAVY => array('navy:1.3','navy:0.95','navy:0.8'),//14LEDC_INVERTGRAY => array('darkgray','lightgray:1.5','white')//15),/* Each line of the character is encoded as a 4 bit value0 ____1 ___x2 __x_3 __xx4 _x__5 _x_x6 _xx_7 _xxx8 x___9 x__x10 x_x_11 x_xx12 xx__13 xx_x14 xxx_15 xxxx*/$iLEDSpec = array(0 => array(6,9,11,15,13,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(4,4,4,4,4,0,4),'?' => array(6,9,1,2,2,0,2),'#' => array(0,9,15,9,15,9,0),'@' => array(6,9,11,11,10,9,6),'-' => array(0,0,0,15,0,0,0),'_' => array(0,0,0,0,0,0,15),'=' => array(0,0,15,0,15,0,0),'+' => array(0,0,4,14,4,0,0),'|' => array(4,4,4,4,4,4,4), //vertical line, used for simulate rus 'Ы'',' => array(0,0,0,0,0,12,4),'.' => array(0,0,0,0,0,12,12),':' => array(12,12,0,0,0,12,12),';' => array(12,12,0,0,0,12,4),'[' => array(3,2,2,2,2,2,3),']' => array(12,4,4,4,4,4,12),'(' => array(1,2,2,2,2,2,1),')' => array(8,4,4,4,4,4,8),'{' => array(3,2,2,6,2,2,3),'}' => array(12,4,4,6,4,4,12),'<' => array(1,2,4,8,4,2,1),'>' => array(8,4,2,1,2,4,8),'*' => array(9,6,15,6,9,0,0),'"' => array(10,10,0,0,0,0,0),'\'' => array(4,4,0,0,0,0,0),'`' => array(4,2,0,0,0,0,0),'~' => array(13,11,0,0,0,0,0),'^' => array(4,10,0,0,0,0,0),'\\' => array(8,8,4,6,2,1,1),'/' => array(1,1,2,6,4,8,8),'%' => array(1,9,2,6,4,9,8),'&' => array(0,4,10,4,11,10,5),'$' => array(2,7,8,6,1,14,4),' ' => array(0,0,0,0,0,0,0),'•' => array(0,0,6,6,0,0,0), //149'°' => array(14,10,14,0,0,0,0), //176'†' => array(4,4,14,4,4,4,4), //134'‡' => array(4,4,14,4,14,4,4), //135'±' => array(0,4,14,4,0,14,0), //177'‰' => array(0,4,2,15,2,4,0), //137 show right arrow'™' => array(0,2,4,15,4,2,0), //156 show left arrow'Ў' => array(0,0,8,8,0,0,0), //159 show small hi-stick - that need for simulate rus 'Ф'"\t" => array(8,8,8,0,0,0,0), //show hi-stick - that need for simulate rus 'У'"\r" => array(8,8,8,8,8,8,8), //vertical line - that need for simulate 'M', 'W' and rus 'М','Ш' ,'Щ'"\n" => array(15,15,15,15,15,15,15), //fill up - that need for simulate rus 'Ж'"Ґ" => array(10,5,10,5,10,5,10), //chess"µ" => array(15,0,15,0,15,0,15), //4 horizontal lines// latin'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),'M' => array(8,13,10,8,8,8,8),// need to add \r'N' => array(9,9,13,11,9,9,9),'O' => array(6,9,9,9,9,9,6),'P' => array(14,9,9,14,8,8,8),'Q' => array(6,9,9,9,13,11,6),'R' => array(14,9,9,14,12,10,9),'S' => array(6,9,8,6,1,9,6),'T' => array(14,4,4,4,4,4,4),'U' => array(9,9,9,9,9,9,6),'V' => array(0,0,0,10,10,10,4),'W' => array(8,8,8,8,10,13,8),// need to add \r'X' => array(9,9,6,6,6,9,9),'Y' => array(10,10,10,10,4,4,4),'Z' => array(15,1,2,6,4,8,15),// russian utf-8'А' => array(6,9,9,15,9,9,9),'Б' => array(14,8,8,14,9,9,14),'В' => array(14,9,9,14,9,9,14),'Г' => array(15,8,8,8,8,8,8),'Д' => array(14,9,9,9,9,9,14),'Е' => array(15,8,8,14,8,8,15),'Ё' => array(6,15,8,14,8,8,15),//Ж is combine: >\n<'З' => array(6,9,1,2,1,9,6),'И' => array(9,9,9,11,13,9,9),'Й' => array(13,9,9,11,13,9,9),'К' => array(9,10,12,10,9,9,9),'Л' => array(7,9,9,9,9,9,9),'М' => array(8,13,10,8,8,8,8),// need to add \r'Н' => array(9,9,9,15,9,9,9),'О' => array(6,9,9,9,9,9,6),'П' => array(15,9,9,9,9,9,9),'Р' => array(14,9,9,14,8,8,8),'С' => array(6,9,8,8,8,9,6),'Т' => array(14,4,4,4,4,4,4),'У' => array(9,9,9,7,1,9,6),'Ф' => array(2,7,10,10,7,2,2),// need to add Ў'Х' => array(9,9,6,6,6,9,9),'Ц' => array(10,10,10,10,10,15,1),'Ч' => array(9,9,9,7,1,1,1),'Ш' => array(10,10,10,10,10,10,15),// \r'Щ' => array(10,10,10,10,10,15,0),// need to add \r'Ъ' => array(12,4,4,6,5,5,6),'Ы' => array(8,8,8,14,9,9,14),// need to add |'Ь' => array(8,8,8,14,9,9,14),'Э' => array(6,9,1,7,1,9,6),'Ю' => array(2,2,2,3,2,2,2),// need to add O'Я' => array(7,9,9,7,3,5,9)),$iSuperSampling = 3, $iMarg = 1, $iRad = 4;function __construct($aRadius = 2, $aMargin= 0.6) {$this->iRad = $aRadius;$this->iMarg = $aMargin;}function SetSupersampling($aSuperSampling = 2) {$this->iSuperSampling = $aSuperSampling;}function _GetLED($aLedIdx, $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)*$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);if( array_key_exists($aLedIdx, $this->iLEDSpec) ) {$d = $this->iLEDSpec[$aLedIdx];}else {$d = array(0,0,0,0,0,0,0);}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, $aFileName = '') {$this->StrokeNumber($aValStr, $aColor, $aFileName);}function StrokeNumber($aValStr, $aColor = 0, $aFileName = '') {if( $aColor < 0 || $aColor >= sizeof($this->iColorSchema) ) {$aColor = 0;}if(($n = mb_strlen($aValStr,'utf8')) == 0) {$aValStr = ' ';$n = 1;}for($i = 0; $i < $n; ++$i) {$d = mb_substr($aValStr, $i, 1, 'utf8');if( ctype_digit($d) ) {$d = (int)$d;}else {$d = strtoupper($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);}if( $aFileName != '' ) {$number_img->Stream($aFileName);} else {$number_img->Headers();$number_img->Stream();}}}?>