金額轉中文大寫（二）

這個函數是PHPChina的網友收藏的，比以前本身寫的異常強大，特拿來分享下！

代碼轉載自：http://bbs.phpchina.com/forum.php?mod=viewthread&tid=249650&page=1#pid2083533

function cny($ns) {
 static $cnums=array("零","壹","貳","叄","肆","伍","陸","柒","捌","玖"),
     $cnyunits=array("圓","角","分"),
     $grees=array("拾","佰","仟","萬","拾","佰","仟","億");
 list($ns1,$ns2)=explode(".",$ns,2);
 $ns2=array_filter(array($ns2[1],$ns2[0]));
 $ret=array_merge($ns2,array(implode("", _cny_map_unit(str_split($ns1), $grees)), ""));
 $ret=implode("",array_reverse(_cny_map_unit($ret,$cnyunits)));
 return str_replace(array_keys($cnums), $cnums,$ret);
}
function _cny_map_unit($list,$units) {
 $ul=count($units);
 $xs=array();
 foreach (array_reverse($list) as $x) {
     $l=count($xs);
     if ($x!="0" || !($l%4)) $n=($x=='0'?'':$x).($units[($l-1)%$ul]);
     else $n=is_numeric($xs[0][0]) ? $x : '';
     array_unshift($xs, $n);
 }
 return $xs;
}