复制代码代码如下所示：

*数字量转换为中国首都的功能
要通过字符串int转换的小写数字或小写字符串
*返回首都
*小数位数为2。
**
功能get_amount（$num）{
$ C1 =lingyiersansiwuluqibajiu ；
美元=几十万美元；
美元=圆（$，2）；
100美元；
如果（strlen（$num）> 10）{
返回数据太长，没有这么大的钱，检查它。
}
$ I = 0；
= $ ；
当（1）{
如果（$ = = 0）{
$ N = substr（$num，strlen（$num）- 1, 1）；
{人}
美元= $ % 10；
}
$ P1 = substr（$ C1，3 * $ n，3）；
$ P2 = substr（$ C2，3美元，3）；
如果（n）！= 0| |（N = = '0'（$ P2 = = $ P2 = = '''亿| || |万元= = $ P2）{））
美元= P1。$ P2。$ C；
{人}
美元= P1。$ C；
}
$ i = $ i + 1；
10；
$ =（int）$；
如果（$ = 0）{
打破；
}
}
$ j＝0；
$ Slen = strlen（$ C）；
而（J < $ Slen）{
$ M = substr（$ C，J，6）；
如果（$ M = == =零|美元美元| M M | |亿的| | = = $ M = = 00）{
为左= substr（$ C，0，J）；
右= substr（美元$ C，J + 3）；
美元=左。对美元；
J = $ J-3；
$slen = $slen-3;
}
$ j = $ J + 3；
}

如果（substr（$ C，strlen（$ C）- 3, 3）= =零）{
$c = substr（$ C，0，strlen（$ C）- 3）；
}
如果（空（$））{
返回零元；
其他{ }
返回$ 全部；
}
}