网站建设|北京网站建设|北京网站制作|北京网站建设首选品牌【企通互联】

作者： 北京网站建设   日期：2008-03-27 06:04:48  来源： http://www.qitongnet.com

比较好玩的.大家有兴趣的话可以看下

 

<?北京网页设计
//Header("Content-type: image/jpeg");北京网站制作
set_time_limit(30);网站制作
$stime=time();网站设计
$str=$_GET[str];网页设计
if(strlen($str)>20 or strlen($str)<2)网页设计
{网站建设
echo "汉字字符长度应在1-10您提交的数据不符合标准";北京网站建设
echo "<META HTTP-EQUIV='Refresh' CONTENT='2;URL=index.php?potourl=$imgfont'>";北京网站建设
exit;北京网页设计
}北京网页设计
if(strlen($str)%2<>0)网站设计
{网页设计
echo "字符传包含非汉字字符,本程序暂时不支持英文";北京网页设计
echo "<META HTTP-EQUIV='Refresh' CONTENT='2;URL=index.php?potourl=$imgfont'>";网站设计
exit;北京网站设计
}北京网页设计
$forno=strlen($str)/2;北京网页设计
$url=$_GET[url];北京网页设计
$str1=$str;网站建设 北京网站建设
$n=20; 北京网站制作北京网站制作
for($i=1;$i<=$forno;$i++)北京网站设计
{网页设计
$text[$i]=substr($str1,($i-1)*2,2);网站建设
$text[$i]=iconv("gb2312","UTF-8",$text[$i]);北京网站建设
$font="font\simsun.ttc";北京网页设计
$ima=imagecreate($n,$n);北京网页设计
$black=ImageColorAllocate($ima, 0,0,0);北京网页设计
$white=ImageColorAllocate($ima, 255,255,255);网站设计
ImageTTFText($ima,10,0,4,16,$white,$font,$text[$i]);北京网站制作
//生成图象A 北京网站设计北京网页设计
for($d=0,$a=0;$a<$n;$a++)网站设计
{网站建设
for($b=0;$b<$n;$b++)北京网页设计 北京网页设计
{网页设计
$d++;网站制作
$rgb=imagecolorat($ima,$b,$a);企通互联
//echo $rgb.'<br>';北京网站建设
if($rgb>0)网站设计
{北京网站建设
$f=1;北京网页设计
} 网站制作北京网站设计
else企通互联
{网页设计
$f=0;北京网站建设
}北京网站制作
$color[$d]=$f;北京网站设计
}北京网站制作
}北京网站建设
//计算点阵网站设计
网站设计网页设计
$type=getimagesize($url);北京网站建设
switch ($type)企通互联
{北京网页设计
  case $type[2]=="1":北京网站设计
    $imb=imagecreatefromgif($url);网站设计
    break;网站设计
  case $type[2]=="3":北京网页设计
    $imb=imagecreatefrompng($url);北京网站建设
    break;网站制作
  default:网站建设
$imb=imagecreatefromjpeg($url);北京网站制作
北京网页设计
}网页设计
网站制作
$imc=imagecreate(20,20);北京网站建设
imagecopyresized($imc,$imb,0,0,0,0,20,20,$type[0],$type[1]);网页设计
$imd[$i]=imagecreate($n*20,$n*20);北京网站建设
$w=ImageColorAllocate($imd[$i], 255,255,255);企通互联
imagecolortransparent($imd[$i],$w);网站设计
for($z=0;$z<400;$z++)北京网页设计
{北京网站建设
if($color[$z]==1)网站建设
{北京网站设计
imagecopy($imd[$i],$imc,($z%20)*20,floor($z/20)*20,0,0,20,20);北京网页设计
}北京网站建设
}网页设计
网页设计
网页设计
}//全部循环结束网站制作
$ime=imagecreate($n*20,$n*20*$forno);网页设计
$w=ImageColorAllocate($ime, 255,255,255);企通互联
imagecolortransparent($ime,$w);北京网站设计
for($g=1;$g<=$forno;$g++) 网页设计网站制作 企通互联
{网站建设
imagecopy($ime,$imd[$g],0,($g-1)*$n*20,0,0,$n*20,$n*20);北京网站建设
}北京网页设计
$time=time();网页设计
imagepng($ime,"poto/$time.png");北京网站制作
$imgfont="http://".$_SERVER[SERVER_NAME]."/imgfont/poto/".$time.".png";网站设计
echo "<META HTTP-EQUIV='Refresh' CONTENT='0;URL=index.php?potourl=$imgfont'>";网站建设
exit;北京网站制作
?>