bcd码 php,php bcd码压缩-把十进制数字压缩到十六进制数据中

foreach($bytes as $ch) {

$str .= bin2hex(chr($ch));

}

return $str;

}

/**

* asc码转成16进制数据

* @param $asc asc数字字符串

* @param $AscLen 需要转换的字符串长度

* @return 16进制数组

* @author  phpff.com

*/

public static function AscToHex( $asc, $AscLen) {

$i=0;

$Hex=array();

for($i = 0; 2*$i < $AscLen; $i++)

{

/*A:0x41(0100 0001),a:0x61(0110 0001),右移4位后都是0001,加0x90等0xa*/

$Hex[$i] =  (chr($asc[2*$i]) << 4);

if (!(chr($asc[2*$i]) >= '0' && chr($asc[2*$i]) <= '9' )){

$Hex[$i] +=  0x90;

}

if(2*$i+1 >= $AscLen){

break;

}

$Hex[$i] |= (chr($asc[2*$i+1]) & 0x0f);

if (!(chr($asc[2*$i+1]) >= '0' && chr($asc[2*$i+1]) <= '9' )){

$Hex[$i] += 0x09;

}

}

return $Hex;

}

/**

* 将16进制的数据转换成asc码

* @param $Hex 16进制数组

* @param $HexLen 16进制数组长度

* @return asc数组

* @author  phpff.com

*/

public static function HexToAsc($Hex, $HexLen) {

$i=0;

$Temp=0;

for($i = 0; $i < $HexLen; $i++ )

{

$Temp = ($Hex[$i] & 0xf0) >> 4;

if ($Temp < 10){

$Asc[2*$i] =  (0x30 + $Temp);

}else{

$Asc[2*$i] =   (0x37 + $Temp);

}

$Temp = $Hex[$i] & 0x0f;

if ($Temp < 10){

$Asc[2*$i+1] = (0x30 + $Temp);

}else{

$Asc[2*$i+1] =  (0x37 + $Temp);

}

}

return $Asc;

}

}

?>