/*
* 数字转大写
* */
function NumToCNMoney($num,$mode = true,$sim = true){
if(!is_numeric($num)) return '含有非数字非小数点字符!';
$char = $sim ? array('零','一','二','三','四','五','六','七','八','九')
: array('零','壹','贰','叁','肆','伍','陆','柒','捌','玖');
$unit = $sim ? array('','十','百','千','','万','亿','兆')
: array('','拾','佰','仟','','萬','億','兆');
$retval = $mode ? '元':'点';
// $retval = $mode ? '':'点';
//小数部分
if(strpos($num, '.')){
list($num,$dec) = explode('.', $num);
$dec = strval(round($dec,2));
if($mode){
$retval .= "{$char[$dec['0']]}角{$char[$dec['1']]}分";
}else{
for($i = 0,$c = strlen($dec);$i < $c;$i++) {
$retval .= $char[$dec[$i]];
}
}
}
//整数部分
$str = $mode ? strrev(intval($num)) : strrev($num);
for($i = 0,$c = strlen($str);$i < $c;$i++) {
$out[$i] = $char[$str[$i]];
if($mode){
$out[$i] .= $str[$i] != '0'? $unit[$i%4] : '';
if($i>1 and $str[$i]+$str[$i-1] == 0){
$out[$i] = '';
}
if($i%4 == 0){
$out[$i] .= $unit[4+floor($i/4)];
}
}
}
$retval = join('',array_reverse($out)) . $retval;
return $retval;
}
/*
*数字转大写
*
* */
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;
}