查看单个帖子
旧 2009-11-11   #9
xyuer
中级会员
级别:2 | 在线时长:24小时 | 升级还需:6小时级别:2 | 在线时长:24小时 | 升级还需:6小时
 
xyuer 的头像
 
注册: 07年03月08日
帖子: 55
声望力: 20
声望: 31 xyuer 初领妙道
积分:1
精华:1
现金:71两梁山币
资产:71两梁山币
致谢数: 0
获感谢文章数:0
获会员感谢数:0
回复: 请教 如何转换中文数字为阿拉伯数字?

引用:
作者: net0532 查看帖子
很强大~~~很复杂
4.62可以用的:
#alias tran {#var %1 0;#var tr_num %2;tr_num=%remove("零",@tr_num);tr_num=%replace(@tr_num,"一","1");tr_num=%replace(@tr_num,"二","2");tr_num=%replace(@tr_num,"三","3");tr_num=%replace(@tr_num,"四","4");tr_num=%replace(@tr_num,"五","5");tr_num=%replace(@tr_num,"六","6");tr_num=%replace(@tr_num,"七","7");tr_num=%replace(@tr_num,"八","8");tr_num=%replace(@tr_num,"九","9");#if %pos("十",@tr_num)=1 {tr_num=%replace(@tr_num,"十","10|")} {tr_num=%replace(@tr_num,"十","0|")};tr_num=%replace(@tr_num,"百","00|");tr_num=%replace(@tr_num,"千","000|");tr_num=%replace(@tr_num,"万","0000|");#forall @tr_num {#add %1 %i}}

用法:tran result "八万八千八百八十八"
然后@result就会被赋值为88888
xyuer 当前离线  
回复时引用此帖