URN Logo
UNIX Resources » Linux » China Linux Forum » Python 编 程 » 8 » python版金额大写转换(37行)
announcement 声明: 本页内容为中国Linux论坛的内容镜像,文章的版权以及其他所有的相关权利属于中国Linux论坛和相应文章的作者,如果转载,请注明文章来源及相关版权信息。
Resources
China Linux Forum(finished)
Linux Forum(finished)
FreeBSD China(finished)
linuxforum.net
  业界新闻与评论
  自由软件杂谈
  IT 人生
  Linux软件快递
  翻译作坊
  Linux图书与评论
  GNU Emacs/XEmacs
  Linux 中文环境和中文化
  Linux桌面与办公软件
  Linux 多媒体与娱乐版
  自由之窗Mozilla
  笔记本电脑上的Linux
  Gentoo
  Debian 一族
  网络管理技术
  Linux 安装与入门
  WEB服务器和FTP服务器
  域名服务器和邮件服务器
  Linux防火墙和代理服务器应用
  文件及打印服务器
  技术培训与认证
  Linux内核技术
  Linux 嵌入技术
  Linux设备驱动程序
  Linux 集群技术
  LINUX平台数据库
  系统和网络安全
  CPU 与 编译器
  系统计算研究所专栏
  Linux下的GUI软件开发
  C/C++编程版
  PHP 技 术
  Java&jsp技术
  Shell编程技术
  Perl 编 程
  Python 编 程
  XML/Web Service 技术
  永远的Unix
  FreeBSD世界
   
python版金额大写转换(37行)
Author: wonder365    Posted: 2005-06-12 15:45    Length: 1,483 byte(s)
[Original] [Print] [Top]
参考 方小庆写的delphi版的 金额转换函数
将小于十万亿元的小写金额转换为大写
代码

def IIf( b, s1, s2):
if b:
return s1
else:
return s2

def num2chn(nin=None):
cs =
('零','壹','贰','叁','肆','伍','陆','柒','捌','玖','◇','分','角','圆','拾','佰','仟',
'万','拾','佰','仟','亿','拾','佰','仟','万')
st = ''; st1=''
s = '%0.2f' % (nin)
sln =len(s)
if sln > 15: return None
fg = (nin<1)

for i in range(0, sln-3):
ns = ord(s[sln-i-4]) - ord('0')
st=IIf((ns==0)and(fg or (i==8)or(i==4)or(i==0)), '', cs[ns])
+ IIf((ns==0)and((i<>8)and(i<>4)and(i<>0)or fg
and(i==0)),'', cs[i+13])
+ st
fg = (ns==0)
fg = False
for i in [1,2]:
ns = ord(s[sln-i]) - ord('0')
st1 = IIf((ns==0)and((i==1)or(i==2)and(fg or (nin<1))), '', cs[ns])
+ IIf((ns>0), cs[i+10], IIf((i==2) or fg, '', '整'))
+ st1
fg = (ns==0)
st.replace('亿万','万')
return IIf( nin==0, '零', st + st1)
if __name__ == '__main__':
num = 12340.1
print num
print num2chn(num)
[Original] [Print] [Top]
« Previous thread
关于 Python 的内存回收:如何使 Python 将内存释放给操作系统?
Python 编 程
8
Next thread »
xml.parsers.expat 与 xml.dom.minidom 都不是线程安全的
     

Copyright © 2007 UNIX Resources Network, All Rights Reserved.      About URN | Privacy & Legal | Help | Contact us
备案序号: 京ICP备05006143    webmaster: webmaster@unixresources.net
This page created on 2008-07-17 04:11:11, cost 0.035185813903809 ms.