317 lines
10 KiB
PHP
317 lines
10 KiB
PHP
|
<?php
|
|||
|
|
//=======================================================================
|
|||
|
|
// File: JPGRAPH_LED.PHP
|
|||
|
|
// Description: Module to generate Dotted LED-like digits
|
|||
|
|
// Created: 2006-11-26
|
|||
|
|
// Ver: $Id: jpgraph_led.php 957 2007-12-01 14:00:29Z 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: "ԡ <20>\r <20>\r <20>| <20><> <20>\r >\n< W\r"
|
|||
|
|
// <09> <20> <20> <20> <20> <20> <20> 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
|
|||
|
|
{
|
|||
|
|
private $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 '<27>'
|
|||
|
|
',' => 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),
|
|||
|
|
'<27>' => array(0,0,6,6,0,0,0), //149
|
|||
|
|
'<27>' => array(14,10,14,0,0,0,0), //176
|
|||
|
|
'<27>' => array(4,4,14,4,4,4,4), //134
|
|||
|
|
'<27>' => array(4,4,14,4,14,4,4), //135
|
|||
|
|
'<27>' => array(0,4,14,4,0,14,0), //177
|
|||
|
|
'<27>' => array(0,4,2,15,2,4,0), //137 show right arrow
|
|||
|
|
'<27>' => array(0,2,4,15,4,2,0), //156 show left arrow
|
|||
|
|
'<27>' => array(0,0,8,8,0,0,0), //159 show small hi-stick - that need for simulate rus '<27>'
|
|||
|
|
"\t" => array(8,8,8,0,0,0,0), //show hi-stick - that need for simulate rus '<27>'
|
|||
|
|
"\r" => array(8,8,8,8,8,8,8), //vertical line - that need for simulate 'M', 'W' and rus '<27>','<27>' ,'<27>'
|
|||
|
|
"\n" => array(15,15,15,15,15,15,15), //fill up - that need for simulate rus '<27>'
|
|||
|
|
"<EFBFBD>" => array(10,5,10,5,10,5,10), //chess
|
|||
|
|
"<EFBFBD>" => 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
|
|||
|
|
'<27>' => array(6,9,9,15,9,9,9),
|
|||
|
|
'<27>' => array(14,8,8,14,9,9,14),
|
|||
|
|
'<27>' => array(14,9,9,14,9,9,14),
|
|||
|
|
'<27>' => array(15,8,8,8,8,8,8),
|
|||
|
|
'<27>' => array(14,9,9,9,9,9,14),
|
|||
|
|
'<27>' => array(15,8,8,14,8,8,15),
|
|||
|
|
'<27>' => array(6,15,8,14,8,8,15),
|
|||
|
|
//<2F> is combine: >\n<
|
|||
|
|
'<27>' => array(6,9,1,2,1,9,6),
|
|||
|
|
'<27>' => array(9,9,9,11,13,9,9),
|
|||
|
|
'<27>' => array(13,9,9,11,13,9,9),
|
|||
|
|
'<27>' => array(9,10,12,10,9,9,9),
|
|||
|
|
'<27>' => array(7,9,9,9,9,9,9),
|
|||
|
|
'<27>' => array(8,13,10,8,8,8,8),// need to add \r
|
|||
|
|
'<27>' => array(9,9,9,15,9,9,9),
|
|||
|
|
'<27>' => array(6,9,9,9,9,9,6),
|
|||
|
|
'<27>' => array(15,9,9,9,9,9,9),
|
|||
|
|
'<27>' => array(14,9,9,14,8,8,8),
|
|||
|
|
'<27>' => array(6,9,8,8,8,9,6),
|
|||
|
|
'<27>' => array(14,4,4,4,4,4,4),
|
|||
|
|
'<27>' => array(9,9,9,7,1,9,6),
|
|||
|
|
'<27>' => array(2,7,10,10,7,2,2),// need to add <20>
|
|||
|
|
'<27>' => array(9,9,6,6,6,9,9),
|
|||
|
|
'<27>' => array(10,10,10,10,10,15,1),
|
|||
|
|
'<27>' => array(9,9,9,7,1,1,1),
|
|||
|
|
'<27>' => array(10,10,10,10,10,10,15),// \r
|
|||
|
|
'<27>' => array(10,10,10,10,10,15,0),// need to add \r
|
|||
|
|
'<27>' => array(12,4,4,6,5,5,6),
|
|||
|
|
'<27>' => array(8,8,8,14,9,9,14),// need to add |
|
|||
|
|
'<27>' => array(8,8,8,14,9,9,14),
|
|||
|
|
'<27>' => array(6,9,1,7,1,9,6),
|
|||
|
|
'<27>' => array(2,2,2,3,2,2,2),// need to add O
|
|||
|
|
'<27>' => 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();
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
?>
|