┰计锣いゅ计ㄧ计

- い瓣WEB秨祇呼蹈 (http://www.webasp.net)
-- м砃毙祘 (http://www.webasp.net/article/)
--- ┰计锣いゅ计ㄧ计 (http://www.webasp.net/article/13/12716.htm)
-- ゼ
-- 祇ら戳 2004-08-30
程惠璶糶┰计锣いゅ计ㄧ计穓弘地跋ǎ摸
稰谋и衡猭ぃ岿┮禟ㄓㄉ
狦璶ノ肂锣传癸计场だ矪瞶璶暗э
<?php
function ch_num($num,$mode=true) {
$char = array("箂","滁","禠","","竩","ヮ","嘲","琺","","╤");
$dw = array("","珺","ㄕ","","","窾","货","");
$dec = "翴";
$retval = "";

if($mode)
preg_match_all("/^0*(\d*)\.?(\d*)/",$num, $ar);
else
preg_match_all("/(\d*)\.?(\d*)/",$num, $ar);

if($ar[2][0] != "")
$retval = $dec . ch_num($ar[2][0],false); //狦Τ计患耴矪瞶计
if($ar[1][0] != "") {
$str = strrev($ar[1][0]);
for($i=0;$i<strlen($str);$i++) {
$out[$i] = $char[$str[$i]];
if($mode) {
$out[$i] .= $str[$i] != "0"? $dw[$i%4] : "";
if($str[$i]+$str[$i-1] == 0)
$out[$i] = "";
if($i%4 == 0)
$out[$i] .= $dw[4+floor($i/4)];
}
}
$retval = join("",array_reverse($out)) . $retval;
}
return $retval;
}

//echo ch_num("12345006789001.123");
//echo ch_num("880079.1234");
echo ch_num("300045.0123");

?>
webasp.net