php不用GD库生成当前时间的PNG格式图象的程序
更新时间：2008年09月28日 14:40:24 作者：
该程序是不用GD库可以生成当前时间的PNG格式图象，给人大开眼界，很有参考价值. teaman整理
$date = getdate();
$s = $date["seconds"];
$m = $date["minutes"];
$h = $date["hours"];
$digits = array(95, 5, 118, 117, 45, 121, 123, 69, 127, 125);
$lines = array(1, 1, 1, 2, 0, 1, 0, 2, 1, 0, 1, 1, 0, 0, 0, 1, 0, 2, 1, 2, 0, 1, 1, 1, 0, 0, 1, 0);
draw2digits(4, 2, $h);
draw2digits(30, 2, $m);
draw2digits(56, 2, $s);
set_4pixel(0, 0, 0, 26, 7);
set_4pixel(0, 0, 0, 26, 13);
set_4pixel(0, 0, 0, 52, 7);
set_4pixel(0, 0, 0, 52, 13);
// 创建循环冗余码校验表
$z = -306674912; // = 0xedb88320
for ($n = 0; $n < 256; $n++) {
$c = $n;
for ($k = 0; $k < 8; $k++) {
$c2 = ($c >> 1) & 0x7fffffff;
if ($c & 1) $c = $z ^ ($c2); else $c = $c2;
}
$crc_table[$n] = $c;
}
// PNG file signature
$result = pack("c*", 137,80,78,71,13,10,26,10);
// IHDR chunk data:
// width: 4 bytes
// height: 4 bytes
// bit depth: 1 byte (8 bits per RGB value)
// color type: 1 byte (2 = RGB)
// compression method: 1 byte (0 = deflate/inflate)
// filter method: 1 byte (0 = adaptive filtering)
// interlace method: 1 byte (0 = no interlace)
$data = pack("c*", ($sx >> 24) & 255,
($sx >> 16) & 255,
($sx >> 8) & 255,
$sx & 255,
($sy >> 24) & 255,
($sy >> 16) & 255,
($sy >> 8) & 255,
$sy & 255,
8,
2,
0,
0,
0);
add_chunk("IHDR");
// 以下不敢乱翻译，请自行参考
// scanline:
// filter byte: 0 = none
// RGB bytes for the line
// the scanline is compressed with "zlib", method 8 (RFC-1950):
// compression method/flags code: 1 byte ($78 = method 8, 32k window)
// additional flags/check bits: 1 byte ($01: FCHECK = 1, FDICT = 0, FLEVEL = 0)
// compressed data blocks: n bytes
// one block (RFC-1951):
// bit 0: BFINAL: 1 for the last block
// bit 1 and 2: BTYPE: 0 for no compression
// next 2 bytes: LEN (LSB first)
// next 2 bytes: one's complement of LEN
// LEN bytes uncompressed data
// check value: 4 bytes (Adler-32 checksum of the uncompressed data)
//
$len = ($sx * 3 + 1) * $sy;
$data = pack("c*", 0x78, 0x01,
1,
$len & 255,
($len >> 8) & 255,
255 - ($len & 255),
255 - (($len >> 8) & 255));
$start = strlen($data);
$i2 = 0;
for ($h = 0; $h < $sy; $h++) {
$data .= chr(0);
for ($w = 0; $w < $sx * 3; $w++) {
$data .= $pixels[$i2++];
}
}
// calculate a Adler32 checksum with the bytes data[start..len-1]
$s1 = 1;
$s2 = 0;
for ($n = $start; $n < strlen($data); $n++) {
$s1 = ($s1 + ord($data[$n])) % 65521;
$s2 = ($s2 + $s1) % 65521;
}
$adler = ($s2 << 16) | $s1;
$data .= chr(($adler >> 24) & 255);
$data .= chr(($adler >> 16) & 255);
$data .= chr(($adler >> 8) & 255);
$data .= chr($adler & 255);
add_chunk("IDAT");
// IEND: marks the end of the PNG-file
$data = "";
add_chunk("IEND");
// 列印图象
echo($result);
?>
//如何调用，其实很简单，将上面存为Timeimg.php
//然后新建一个页面如下：
<html>
<head>
<title>test</title>
<meta http-equiv="Content-Type" content="text/html">
</head>
<body>
<img src="Timeimg.php"> //以图象连接方式调用PHP文件
</body>
</html>
相关文章
这篇文章介绍了php字符串截取的简单方法，有需要的朋友可以参考一下2013-07-07
PHP7显著提高了整体性能。实际上主要的特性有null合并运算符或返回类型声明。如果你不知道它们，那么你应该去查看PHP文档。这里有一些很少人知道的、可能有用的特性。2021-05-05
本篇文章给大家分享了关于PHP写程序的小技巧，关于内存释放以及垃圾回收的相关问题，有兴趣的朋友学习下。2018-03-03
php fread函数用于从文件中读取一定长度的字符，本文章向大家介绍fread读取文件的实例以及使用该函数读取文件需要注意的几个地方，需要的朋友可以参考一下。2016-09-09
php结果集的分页，后面都有详细的说明。最近的php将会让你学到更多。2009-03-03
这篇文章主要为大家详细介绍了php mvc框架skymvc文件上传实现代码，支持多文件上传操作，感兴趣的小伙伴们可以参考一下2016-05-05
大家都知道PHP中两个数组合并可以使用+或者array_merge，但之间还是有区别的，而且这些区别如果了解不清楚项目中会要命的！这篇文章给加总结介绍了PHP合并数组的2种方法，有需要的朋友们可以参考借鉴，下面来一起学习学习吧。2016-11-11
下面小编就为大家带来一篇老生常谈PHP位运算的用途。小编觉得挺不错的，现在就分享给大家，也给大家做个参考。一起跟随小编过来看看吧2017-03-03
详谈php中 strtr 和 str_replace 的效率问题
下面小编就为大家带来一篇详谈php中 strtr 和 str_replace 的效率问题。小编觉得挺不错的，现在就分享给大家，也给大家做个参考。一起跟随小编过来看看吧2017-05-05
这篇文章主要介绍了WebQQ最新登陆协议的用法,分析了WebQQ协议的原理与用法,具有一定的实用价值,需要的朋友可以参考下2014-12-12
最新评论