到满多网站都有即时简繁切换的功能,只是都不见有人提供做法,因 此我也写了一段转换程式,给有需要的人参考: wjjLinux联盟
wjjLinux联盟
以下程式所用的table档是a4chinese的big5-gb.table,其版权为a4chinese作者所有;PHP程式码部分则可自由修改应用,唯不得出售营利..^^ wjjLinux联盟
wjjLinux联盟
wjjLinux联盟 wjjLinux联盟
wjjLinux联盟
1.先取得big5-gb.table档,你可在文章下面的链接找到.wjjLinux联盟
wjjLinux联盟
2.加入下列PHP程式码:
wjjLinux联盟
wjjLinux联盟
wjjLinux联盟
wjjLinux联盟
function big52gb($Text){
wjjLinux联盟
wjjLinux联盟
$fp = fopen("big5-gb.table", "r");
wjjLinux联盟
wjjLinux联盟
$max=strlen($Text)-1;
wjjLinux联盟
wjjLinux联盟
for($i=0;$i<$max;$i++){
wjjLinux联盟
wjjLinux联盟
$h=ord($Text[$i]);
wjjLinux联盟
wjjLinux联盟
if($h>=160){
wjjLinux联盟
wjjLinux联盟
$l=ord($Text[$i+1]);
wjjLinux联盟
wjjLinux联盟
if($h==161 && $l==64){
wjjLinux联盟
wjjLinux联盟
$gb=" ";
wjjLinux联盟
wjjLinux联盟
}else{
wjjLinux联盟
wjjLinux联盟
fseek($fp,($h-160)*510+($l-1)*2);
wjjLinux联盟
wjjLinux联盟
$gb=fread($fp,2);
wjjLinux联盟
wjjLinux联盟
}
wjjLinux联盟
wjjLinux联盟
$Text[$i]=$gb[0];
wjjLinux联盟
wjjLinux联盟
$Text[$i+1]=$gb[1];
wjjLinux联盟
wjjLinux联盟
$i++;
wjjLinux联盟
wjjLinux联盟
}
wjjLinux联盟
wjjLinux联盟
}
wjjLinux联盟
wjjLinux联盟
fclose($fp);
wjjLinux联盟
wjjLinux联盟
return $Text;
wjjLinux联盟
wjjLinux联盟
}
wjjLinux联盟
wjjLinux联盟
wjjLinux联盟
wjjLinux联盟
wjjLinux联盟
wjjLinux联盟
3.接著就可以用了 wjjLinux联盟
wjjLinux联盟
wjjLinux联盟
wjjLinux联盟
$a="繁体转简体"; wjjLinux联盟
wjjLinux联盟
$a=big52gb($a); wjjLinux联盟
wjjLinux联盟
wjjLinux联盟
wjjLinux联盟
以上程式码是最简单的方法,也就是一个一个翻,至於速度 还可以,若要快点,那就要改写一下方法了(我不是用这种方法,不过因为我的方法还在测试中,还不知稳不稳定, 所以暂时没写出来)...^^wjjLinux联盟
|
