New file |
0,0 → 1,316 |
<?php |
//======================================================================= |
// File: JPGRAPH_LED.PHP |
// Description: Module to generate Dotted LED-like digits |
// Created: 2006-11-26 |
// Ver: $Id: jpgraph_led.php 1077 2008-09-19 15:44:30Z ljp $ |
// |
// Copyright 2006 (c) Aditus Consulting. All rights reserved. |
// |
// Changed: 2007-08-06 by Alexander Kurochkin (inspector@list.ru) |
// Added: Decipher 4-bit mask. |
// Added: Chars Latin > 'L', Cyrilic, other symbols and special symbols for |
// simulation some latin and cyrilic chars. |
// Added: New Color schemas. |
// Deleted: Some minor bugs (StrokeNumber first parameter may be eq empty string, |
// false or null - added check see line 294; |
// change color schema check for easy maintenance: 291; |
// change check on key exist in chars array: moved from StrokeNumber |
// function to _GetLED: 251; |
// |
//======================================================================== |
|
// Samples for troubled chars: "Ô¡ Ø\r Ù\r Û| ÞÎ Ì\r >\n< W\r" |
// Ô Ø Ù Û Þ Ì Æ W |
|
//---------------------------------------------------------------------------- |
// Each character is encoded line by line with the "On"-LEDs corresponding to |
// a '1' in the bianry mask of 4 bits. |
// |
// 4-bit mask: |
// |
// 0 ____ |
// 1 ___x |
// 2 __x_ |
// 3 __xx |
// 4 _x__ |
// 5 _x_x |
// 6 _xx_ |
// 7 _xxx |
// 8 x___ |
// 9 x__x |
// 10 x_x_ |
// 11 x_xx |
// 12 xx__ |
// 13 xx_x |
// 14 xxx_ |
// 15 xxxx |
//---------------------------------------------------------------------------- |
|
// Constants for color schema. See definition of iColorSchema below |
DEFINE('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); |
// ! It correlate with two-dimensional array $iColorSchema |
|
//======================================================================== |
// 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, |
|
// fg-up, fg-down, bg |
$iColorSchema = array( |
LEDC_RED => array('red','darkred:0.9','red:0.3'),// 0 |
LEDC_GREEN => array('green','darkgreen','green:0.3'),// 1 |
LEDC_BLUE => array('lightblue:0.9','darkblue:0.85','darkblue:0.7'),// 2 |
LEDC_YELLOW => array('yellow','yellow:0.4','yellow:0.3'),// 3 |
LEDC_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'),//14 |
LEDC_INVERTGRAY => array('darkgray','lightgray:1.5','white')//15 |
), |
|
$iLEDSpec = array( |
0 => array(6,9,11,15,13,9,6), |
//0 => array(6,9,9,9,9,9,6), |
//0 => array(15,9,9,9,9,9,15), |
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(0,6,9,9,9,9,6), |
'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(9,9,9,9,6,6,6), |
'Y' => array(10,10,10,10,4,4,4), |
'Z' => array(15,1,2,6,4,8,15), |
// russian cp1251 |
'À' => 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 DigitalLED74($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 StrokeNumber($aValStr, $aColor = 0) { |
if($aColor < 0 || $aColor >= sizeof($this->iColorSchema)) |
$aColor = 0; |
|
if(($n = strlen($aValStr)) == 0) { |
$aValStr = ' '; |
$n = 1; |
} |
|
for($i = 0; $i < $n; ++$i) { |
$d = substr($aValStr, $i, 1); |
if( $d >= '0' && $d <= '9' ) { |
$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); |
} |
|
$number_img->Headers(); |
$number_img->Stream(); |
} |
} |
?> |