|
发表于 2011-9-28 13:11:18
|
显示全部楼层
广东省云浮市
本帖最后由 exit11 于 2011-9-28 13:11 编辑
[e]
.版本 2
.支持库 spec
.子程序 __启动窗口_创建完毕
子程序1 (16, 6)
.子程序 子程序1, 文本型, , 浓缩型
.参数 位数
.参数 方式
.局部变量 x, 整数型
.局部变量 临时文本, 文本型
.如果真 (位数 < 1)
位数 = 16
.如果真结束
.如果真 (方式 < 1 或 方式 > 6)
方式 = 5
.如果真结束
.计次循环首 (位数, x)
临时文本 = 临时文本 + 多项选择 (方式, 字符 (取随机数 (65, 90)), 字符 (取随机数 (97, 122)), 选择 (取随机数 (1, 2) = 1, 字符 (取随机数 (65, 90)), 字符 (取随机数 (97, 122))), 多项选择 (取随机数 (1, 3), 到文本 (取随机数 (0, 9)), 字符 (取随机数 (65, 90)), 字符 (取随机数 (97, 122))), 到文本 (取随机数 (0, 9)), 到文本 (取随机数 (0, 9)))
.计次循环尾 ()
调试输出 (选择 (方式 = 6, “0.” + 临时文本, 临时文本))
返回 (选择 (方式 = 6, “0.” + 临时文本, 临时文本))
[/e] |
|