echo RMB_Transform(0.0121);

exit("\n");

/**

*函数名称: RMB_Transform作者: Dandy.Mu

*谱写日期: 忘记了

*函数说明: 将指定的金额转换为中文大写模式

*参数说明:

* @Money => 金额[数字型]

*返回信息: 转换后的大写字符

*/

function RMB_Transform($Money)

{

if ( ! is_numeric($Money) ) return false;

$Number  = array('零','壹','贰','叁','肆','伍','陆','柒','捌','玖');// 数字翻译

$lMarked = array('拾','佰','仟');// 小数点左边数字的标示

$rMarked = array('角','分','哩','毫');// 小数点右边数字的标示

$bMarKed = array('圆', '万', '亿');// 每组尾数的标识

list($Left, $Right) = explode('.', $Money);// 分割小数点的左右

while (strlen($Left) >= 1) {// 将数字分割为4个一组

$aLeft[] = substr($Left, -4, 4);$Left = substr($Left, 0, -4);

}

krsort($aLeft);// 逆向排序数组，因为要先翻译最大的数

foreach ($aLeft as $Key1 => $Value1) {// 循环上面的分组后的字符

$tLeft = str_split($Value1);$ctLeft = count($tLeft) - 2;// 将分组后的字符分割并计算数组的长度

# ------- Head ------------------------- #

# 循环分割为单个字符的数组,然后进行翻译。#

# 如果值为0的话，则只赋值并不赋予标识。  #

# ------- End -------------------------- #

foreach ($tLeft as $Key2 => $Value2)

$tretData .= $Value2 ? $Number[$Value2].$lMarked[$ctLeft-$Key2] : $Number[0];

$tretData = preg_replace('/('.$Number[0].')+$/', '', $tretData);// 去除尾部的 零

$retData .= $tretData.(empty($tretData) ? '' : $bMarKed[$Key1 > 2 ? 1 : $Key1]);// 给最终结果赋值，并增加特殊位标识也就是 圆 万 亿

unset($Key2, $Value2, $tretData);

}

unset($tLeft, $ctLeft, $aLeft, $Left, $Key1, $Value1);

// 如果有小数点后面的数字的话，则进行翻译。

if ( is_numeric($Right) ) {

foreach (str_split(substr($Right, 0, 4)) as $Key3 => $Value3) {

$tretData .= $Value3 ? $Number[$Value3].$rMarked[$Key3] : $Number[0];

}

$tretData = preg_replace('/^('.$Number[0].')+/', '', $tretData);// 去除尾部的 零

}

$retData .= preg_replace('/('.$Number[0].')+/', $Number[0], $tretData);// 将多个的 零 替换为一个 零

unset($Right, $Key3, $Value3, $tretData, $Number, $lMarked, $rMarked, $bMarKed);

return $retData;

}