北大侠客行MUD论坛

 找回密码
 注册
搜索
热搜: 新手 wiki 升级
12
返回列表 发新帖
楼主: ppeng

我也请教一个函数

[复制链接]
发表于 2010-1-4 10:10:41 | 显示全部楼层
一千怎么办 1*1000+
北大侠客行Mud(pkuxkx.com),最好的中文Mud游戏!
发表于 2010-1-4 10:37:00 | 显示全部楼层
能存到我帐户不
北大侠客行Mud(pkuxkx.com),最好的中文Mud游戏!
发表于 2010-1-4 10:40:36 | 显示全部楼层
原帖由 killunix 于 2009-10-28 11:50 PM 发表
不仅仅是为了存钱啊,还有别的用处

难道是为了看mm的三围?

强烈建议增加一个道具,lookin,她的三围是 XXX XX XX
北大侠客行Mud(pkuxkx.com),最好的中文Mud游戏!
发表于 2010-1-4 17:09:51 | 显示全部楼层
原帖由 oolong 于 2010-1-4 10:10 AM 发表
一千怎么办 1*1000+

462测试LOG,一千没问题
一千文
1*1000 = 1000


这几句就是特殊处理的
str=" "%1" ";...
str=%replace(@str,"+ ","");
str=%replace(@str," *","");
北大侠客行Mud(pkuxkx.com),最好的中文Mud游戏!
发表于 2010-4-26 15:17:04 | 显示全部楼层
借钱楼主的思路,我写了个函数,可以转换亿元以下的中文数字到阿拉伯数字
我是这样处理的,万以下的数字很简单,直接处理;万以上的数字分开两部分,a*10000+b
我的思路很简单,程序很直白,高手不要笑话我
亿以上数字也类似思路处理即可

#Function figure()
{
#if !%pos("万",%1)
  {
    str=" "%1" "
    str=%replace( @str, "万", "*10000+")
    str=%replace( @str, "千", "*1000+")
    str=%replace( @str, "百", "*100+")
    str=%replace( @str, "十", "*10+")
    str=%replace( @str, "零", "")
    str=%replace( @str, "一", "1")
    str=%replace( @str, "二", "2")
    str=%replace( @str, "三", "3")
    str=%replace( @str, "四", "4")
    str=%replace( @str, "五", "5")
    str=%replace( @str, "六", "6")
    str=%replace( @str, "七", "7")
    str=%replace( @str, "八", "8")
    str=%replace( @str, "九", "9")
    str=%replace( @str, " *", "")
    str=%replace( @str, "+ ", "")
    #return %eval( @str)
  }
  {
    str1=" "%left(%1,%pos("万",%1)-1)" "
    str1=%replace( @str1, "万", "*10000+")
    str1=%replace( @str1, "千", "*1000+")
    str1=%replace( @str1, "百", "*100+")
    str1=%replace( @str1, "十", "*10+")
    str1=%replace( @str1, "零", "")
    str1=%replace( @str1, "一", "1")
    str1=%replace( @str1, "二", "2")
    str1=%replace( @str1, "三", "3")
    str1=%replace( @str1, "四", "4")
    str1=%replace( @str1, "五", "5")
    str1=%replace( @str1, "六", "6")
    str1=%replace( @str1, "七", "7")
    str1=%replace( @str1, "八", "8")
    str1=%replace( @str1, "九", "9")
    str1=%replace( @str1, " *", "")
    str1=%replace( @str1, "+ ", "")
    str2=" "%right(%1,%pos("万",%1)+1)" "
    str2=%replace( @str2, "万", "*10000+")
    str2=%replace( @str2, "千", "*1000+")
    str2=%replace( @str2, "百", "*100+")
    str2=%replace( @str2, "十", "*10+")
    str2=%replace( @str2, "零", "")
    str2=%replace( @str2, "一", "1")
    str2=%replace( @str2, "二", "2")
    str2=%replace( @str2, "三", "3")
    str2=%replace( @str2, "四", "4")
    str2=%replace( @str2, "五", "5")
    str2=%replace( @str2, "六", "6")
    str2=%replace( @str2, "七", "7")
    str2=%replace( @str2, "八", "8")
    str2=%replace( @str2, "九", "9")
    str2=%replace( @str2, " *", "")
    str2=%replace( @str2, "+ ", "")
    #return %eval( @str1)*10000+%eval(@str2)
  }
}
北大侠客行Mud(pkuxkx.com),最好的中文Mud游戏!
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|北大侠客行MUD ( 京ICP备16065414号-1 )

GMT+8, 2024-11-25 02:02 AM , Processed in 0.013772 second(s), 12 queries .

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表