随机生成身份号源码（关键在出生年份和最后一位）

四水哥

功能 test_点击()
    //这里添加你要执行的代码
    变量 出生月份个位,出生日个位,校验码,身份号码
    出生年份=辅助.随机数(1953,1995)
    出生年份十位=辅助.随机数(5,9)
    出生年份个位=辅助.随机数(0,9)
    出生月份十位=辅助.随机数(0,1)
    如果(出生月份十位==0)
        出生月份个位=辅助.随机数(1,9)
    否则
        出生月份个位=辅助.随机数(1,2)
    如果结束
    出生日十位=辅助.随机数(0,2)
    如果(出生日十位==0)
        出生日个位=辅助.随机数(1,9)
    否则
        如果(出生日十位==0)
            出生日个位=辅助.随机数(0,9)
        否则
            出生日个位=辅助.随机数(0,8)
        如果结束
        
    如果结束
    身份号首数=辅助.随机数(1,9)
    身份号2位=辅助.随机数(0,9)
    身份号3位=辅助.随机数(0,9)
    身份号4位=辅助.随机数(0,9)
    身份号5位=辅助.随机数(0,9)
    身份号6位=辅助.随机数(0,9)
    身份号15位=辅助.随机数(0,9)
    身份号16位=辅助.随机数(0,9)
    身份号17位=辅助.随机数(0,9)
   
    和=身份号首数*7+身份号2位*9+身份号3位*10+身份号4位*5+身份号5位*8+身份号6
位*4+1*2+9*1+出生年份十位*6+出生年份个位*3+出生月份十位*7+出生月份个位*9+出
生日十位*10+出生日个位*5+身份号15位*8+身份号16位*4+身份号17位*2
    余数=和%11
    选择(余数)
        条件 0:
        校验码=1
        条件 1:
        校验码=0
        条件 2:
        校验码="X"
        条件 3:
        校验码=9
        条件 4:
        校验码=8
        条件 5:
        校验码=7
        条件 6:
        校验码=6
        条件 7:
        校验码=5
        条件 8:
        校验码=4
        条件 9:
        校验码=3
        条件 10:
        校验码=2
    选择结束
    身份号码=类型.转字符型(身份号首数&身份号2位&身份号3位&身份号4位&身份号5
位&身份号6位&1&9&出生年份十位&出生年份个位&出生月份十位&出生月份个位&出生日
十位&出生日个位&身份号15位&身份号16位&身份号17位)&类型.转字符型(校验码)
   
编辑框.设置文本("编辑框_临时",身份号码)
功能结束

石中草

支持

元芳

太复杂了 可以简单点的

rainshine

这样效率太低了。。乱。

四水哥

rainshine 发表于 2014-4-16 18:21
这样效率太低了。。乱。

呵呵，我是新手，请问有没有精简或提高效率的好方法？