用PHP实现登陆验证码(类似条行码状)

2008-02-23 06:25:49来源:互联网 阅读 ()

新老客户大回馈,云服务器低至5折

<?php

function UPCAbarcode($code) {
$lw = 2; $hi = 100;
$Lencode = array('0001101','0011001','0010011','0111101','0100011',
'0110001','0101111','0111011','0110111','0001011');
$Rencode = array('1110010','1100110','1101100','1000010','1011100',
'1001110','1010000','1000100','1001000','1110100');
$ends = '101'; $center = '01010';
/* UPC-A Must be 11 digits, we compute the checksum. */
if ( strlen($code) != 11 ) { die("UPC-A Must be 11 digits."); }
/* Compute the EAN-13 Checksum digit */
$ncode = '0'.$code;
$even = 0; $odd = 0;
for ($x=0;$x<12;$x ) {
if ($x % 2) { $odd = $ncode[$x]; } else { $even = $ncode[$x]; }
}
$code.=(10 - (($odd * 3 $even) % 10)) % 10;
/* Create the bar encoding using a binary string */
$bars=$ends;
$bars.=$Lencode[$code[0]];
for($x=1;$x<6;$x ) {
$bars.=$Lencode[$code[$x]];
}
$bars.=$center;
for($x=6;$x<12;$x ) {
$bars.=$Rencode[$code[$x]];
}
$bars.=$ends;
/* Generate the Barcode Image */
$img = ImageCreate($lw*95 30,$hi 30);
$fg = ImageColorAllocate($img, 0, 0, 0);
$bg = ImageColorAllocate($img, 255, 255, 255);
ImageFilledRectangle($img, 0, 0, $lw*95 30, $hi 30, $bg);
$shift=10;
for ($x=0;$x<strlen($bars);$x ) {
if (($x<10) || ($x>=45 && $x<50) || ($x >=85)) { $sh=10; } else { $sh=0; }
if ($bars[$x] == '1') { $color = $fg; } else { $color = $bg; }
ImageFilledRectangle($img, ($x*$lw) 15,5,($x 1)*$lw 14,$hi 5 $sh,$color);
}
/* Add the Human Readable Label */
ImageString($img,4,5,$hi-5,$code[0],$fg);
for ($x=0;$x<5;$x ) {
ImageString($img,5,$lw*(13 $x*6) 15,$hi 5,$code[$x 1],$fg);
ImageString($img,5,$lw*(53 $x*6) 15,$hi 5,$code[$x 6],$fg);
}
ImageString($img,4,$lw*95 17,$hi-5,$code[11],$fg);
/* Output the Header and Content. */
header("Content-Type: image/png");
ImagePNG($img);
}

UPCAbarcode('12345678901');

?>

标签:

版权申明:本站文章部分自网络,如有侵权,请联系:west999com@outlook.com
特别注意:本站所有转载文章言论不代表本站观点,本站所提供的摄影照片,插画,设计作品,如需使用,请与原作者联系,版权归原作者所有

上一篇:用Socket发送电子邮件(利用需要验证的SMTP服务器)

下一篇:用PHP调用Oracle存储过程