您好,欢迎来到三六零分类信息网!老站,搜索引擎当天收录,欢迎发信息

织梦之GB码转换成Big5码

2024/4/1 0:05:57发布31次查看
转换
/********************************
//gb码转换成big5码
*********************************/
function gb2big5($text) {
 global $gb_data;
 if(empty($gb_data)){
  $filename = dirname(__file__)./data/gb-big5.table;
  $fp = fopen($filename, rb);
  $gb = fread($fp,filesize($filename));
  fclose($fp);
 }
 $max = strlen($text)-1;
 for($i=0;$i  $h = ord($text[$i]);
  if($h>=0x80) {
   $l = ord($text[$i+1]);
   if($h==161 && $l==64) {
   $big =  ;
   }else{
    $p = ($h-160)*510+($l-1)*2;
    $big = $gb_data[$p].$gb_data[$p+1];
   }
   $text[$i] = $big[0];
   $text[$i+1] = $big[1];
   $i++;
  }
 }
 return $text;
}
该用户其它信息

VIP推荐

免费发布信息,免费发布B2B信息网站平台 - 三六零分类信息网 沪ICP备09012988号-2
企业名录 Product