简体中文转换为繁体中文的PHP函数,简体中文转换为繁体中文的PHP函数
感谢网友Keyes提供移植用的Delphi源代码。其调用方式为$txt=gbtobig5($txt)。
（注：源代码中的include "&这个文件在就是一个数组，在，请编辑下载到上，做一个链接，因为这个文件我过几天就要删除了。）
<?
/***********************************************************************
Written by caocao
[email protected]
With the help of Keyes
[email protected]net
~
***********************************************************************/
function isgb($code)
{
if (strlen($code)=2)
{
$code=strtok($code,"");
if ((ord($code[0]) < 161)||(ord($code[0]) = 247))
{
return (0);
}
else
{
if ((ord($code[1]) <= 161)||(ord($code[1]) = 254))
{
return (0);
}
else
{
return (1);
}
}
}
else
{
return (1);
}
}
function gboffset($code)
{
if (strlen($code) = 2)
{
$code=strtok($code,"");
return ((ord($code[0]) - 161) * 94 + (ord($code[1]) - 161));
}
else
{
return(-1);
}
}
functionwordtostring($code)
{
return (chr(hexdec(substr($code,0,2))).chr(hexdec(substr($code,2,2))));
}
function gbtobig5($code)
{
include "&;;
$output="";
$length=strlen($code);
$code=strtok($code,"");
$idx=0;
while ($idx < $length)
{
$tmpStr=$code[$idx].$code[$idx+1];
if (isgb($tmpStr))
{
$offset=gboffset($tmpStr);
if (($offset = 0)||($offset <= 8177))
{
$output.=wordtostring($gborder[$offset]);
$idx++;
}
else
{
