人民币数值转中文大写

 

class Num2RmbClass{
    /**
     * 人民币数值转中文大写
     * @author SunsCheung
     * @time 2015.11.11
     * @param string $number 数值 默认为0
     * @param string $int_unit 币种单位，默认"元"，有的需求可能为"圆"
     * @param bool $is_round 是否对小数进行四舍五入
     * @param bool $is_extra_zero 是否对整数部分以0结尾，小数存在的数字附加0,比如1960.30，
     *             有的系统要求输出"壹仟玖佰陆拾元零叁角"，实际上"壹仟玖佰陆拾元叁角"也是对的
     * @param bool $dec_to_int 是否对让小数部分进位到个位，如果进位，个位加1，小数为0，
     * @return string
     */
    public static function num2rmb($number = 0, $int_unit = \'元\', $is_round = TRUE, $is_extra_zero = FALSE, $dec_to_int = FALSE) {
        // 将数字切分成两段
        $parts = explode(\'.\', $number, 2);
        $int = isset($parts[0]) ? strval($parts[0]) : \'0\';
        $dec = isset($parts[1]) ? strval($parts[1]) : \'\';
        // 如果小数点后多于2位，不四舍五入就直接截，否则就处理
        $dec_len = strlen($dec);
        if (isset($parts[1]) && $dec_len > 2) {
            if($is_round){
                if(round(floatval("0.".$dec), 2) == 1 && $dec_to_int){//小数进位到个位
                    $int = empty($int)?1: strval($parts[0]+1);
                    $dec = 0;
                }elseif(round(floatval("0.".$dec), 2) == 1){//小数不进位到个位
                    $dec = "99";
                }else{
                    $dec = substr(strrchr(strval(round(floatval("0.".$dec), 2)), \'.\'), 1);
                    echo $dec;die(\'boss\');
                }
            }else{
                $dec = substr($parts[1], 0, 2);
            }
        }
        // 当number为0.001时，小数点后的金额为0元
        if (empty($int) && empty($dec)) {
            return \'零\';
        }

        // 定义
        $chs = array(\'0\',\'壹\',\'贰\',\'叁\',\'肆\',\'伍\',\'陆\',\'柒\',\'捌\',\'玖\');
        $uni = array(\'\',\'拾\',\'佰\',\'仟\');
        $dec_uni = array(\'角\', \'分\');
        $exp = array(\'\', \'万\');
        $res = \'\';

        // 整数部分从右向左找
        for ($i = strlen($int) - 1, $k = 0; $i >= 0; $k++) {
            $str = \'\';
            // 按照中文读写习惯，每4个字为一段进行转化，i一直在减
            for ($j = 0; $j < 4 && $i >= 0; $j++, $i--) {
                $u = $int{$i} > 0 ? $uni[$j] : \'\'; // 非0的数字后面添加单位
                $str = $chs[$int{$i}] . $u . $str;
            }
            //echo $str."|".($k - 2)."<br>";
            $str = rtrim($str, \'0\');// 去掉末尾的0
            $str = preg_replace("/0+/", "零", $str); // 替换多个连续的0
            if (!isset($exp[$k])) {
                $exp[$k] = $exp[$k - 2] . \'亿\'; // 构建单位
            }
            $u2 = $str != \'\' ? $exp[$k] : \'\';
            $res = $str . $u2 . $res;
        }

        // 如果小数部分处理完之后是00，需要处理下
        $dec = rtrim($dec, \'0\');

        // 小数部分从左向右找
        if (!empty($dec)) {
            $res .= $int_unit;
            // 是否要在整数部分以0结尾的数字后附加0，有的系统有这要求
            if ($is_extra_zero) {
                if (substr($int, -1) === \'0\') {
                    $res.= \'零\';
                }
            }
            for ($i = 0, $cnt = strlen($dec); $i < $cnt; $i++) {
                $u = $dec{$i} > 0 ? $dec_uni[$i] : \'\'; // 非0的数字后面添加单位
                $res .= $chs[$dec{$i}] . $u;
            }
            $res = rtrim($res, \'0\');// 去掉末尾的0
            $res = preg_replace("/0+/", "零", $res); // 替换多个连续的0
        } else {
            $res .= $int_unit . \'整\';
        }
        return  $number < 0 ? "(负)".$res : $res;
    }

}
//$a = new Num2RmbClass;
echo (Num2RmbClass::num2rmb(\'1600020039.9989\',\'圆\',false,false,false));//壹佰贰拾叁圆肆角伍分