1-10w范围内99999组不重复数，生成用时1.2s......

Patek

  

子程序名	返回值类型	公开	备 注
取随机数_asmEx	整数型		真 随机
参数名	类 型	参考	可空	数组	备 注
最小	整数型
最大	整数型

如果真 (最大 ＜ 最小)
返回 (最大 － 1)
置入代码 ({ 81, 82, 15, 49, 185, 23, 0, 0, 0, 247, 225, 131, 192, 7, 139, 77, 12, 43, 77, 8, 65, 51, 210, 247, 241, 3, 85, 8, 139, 194, 90, 89, 201, 194, 8, 0 })
返回 (0)

子程序名	返回值类型	公开	备 注
范围内不重复随机
参数名	类 型	参考	可空	数组	备 注
起始值
目标值
不重复数量
返回数组

变量名	类 型	静态	数组	备 注
n	整数型
数	整数型		0
Z	整数型		0
Random	整数型

重定义数组 (返回数组, 假, 0)
重定义数组 (数, 假, 目标值 － 起始值 ＋ 1)
变量循环首 (起始值, 目标值, 1, n)
数 [n － 起始值 ＋ 1] ＝ n
变量循环尾 ()
计次循环首 (不重复数量, n)
Random ＝ 取随机数_asmEx (1, 取数组成员数 (数))
如果真 (Random ＜ 1)
返回 ()
加入成员 (Z, 数 [Random])
删除成员 (数, Random, )
计次循环尾 ()
返回数组 ＝ Z

.版本 2<br /> <br /> .子程序 取随机数_asmEx, 整数型, 公开, 真 随机<br /> .参数 最小, 整数型<br /> .参数 最大, 整数型<br /> <br /> .如果真 (最大 ＜ 最小)<br />     返回 (最大 － 1)<br /> .如果真结束<br /> 置入代码 ({ 81, 82, 15, 49, 185, 23, 0, 0, 0, 247, 225, 131, 192, 7, 139, 77, 12, 43, 77, 8, 65, 51, 210, 247, 241, 3, 85, 8, 139, 194, 90, 89, 201, 194, 8, 0 })<br /> 返回 (0)<br /> <br /> .子程序 范围内不重复随机, , 公开<br /> .参数 起始值<br /> .参数 目标值<br /> .参数 不重复数量<br /> .参数 返回数组, , 参考 数组<br /> .局部变量 n, 整数型<br /> .局部变量 数, 整数型, , "0"<br /> .局部变量 Z, 整数型, , "0"<br /> .局部变量 Random, 整数型<br /> <br /> 重定义数组 (返回数组, 假, 0)<br /> 重定义数组 (数, 假, 目标值 － 起始值 ＋ 1)<br /> <br /> .变量循环首 (起始值, 目标值, 1, n)<br />     数 [n － 起始值 ＋ 1] ＝ n<br /> .变量循环尾 ()<br /> <br /> .计次循环首 (不重复数量, n)<br />     Random ＝ 取随机数_asmEx (1, 取数组成员数 (数))<br />     .如果真 (Random ＜ 1)<br />         返回 ()<br />     .如果真结束<br />     加入成员 (Z, 数 [Random])<br />     删除成员 (数, Random, )<br /> .计次循环尾 ()<br /> 返回数组 ＝ Z

代码东拼西凑的。

  

子程序名	返回值类型	公开	备 注
子程序1

变量名	类 型	静态	数组	备 注
AA	整数型		0
X
T

T ＝ 取启动时间 ()
范围内不重复随机 (1, 100000, 99999, AA)
调试输出 (取启动时间 () － T, “xxx”)
计次循环首 (取数组成员数 (AA), X)
调试输出 (AA [X])
计次循环尾 ()

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 子程序1<br /> .局部变量 AA, 整数型, , "0"<br /> .局部变量 X<br /> .局部变量 T<br /> <br /> <br /> T ＝ 取启动时间 ()<br /> 范围内不重复随机 (1, 100000, 99999, AA)<br /> 调试输出 (取启动时间 () － T, “xxx”)<br /> .计次循环首 (取数组成员数 (AA), X)<br />     调试输出 (AA [X])<br /> .计次循环尾 ()

镇坛道德标杆

Ex.e (49.51 KB, 下载次数: 65)

2018-1-15 13:58 上传

点击文件名下载附件
下载积分: 精币 -2 枚

那就提升个几百倍，具体原理之类的参考以前的贴子:

http://125.confly.eu.org/forum.php?mod=viewthread&tid=13950852&extra=

随机数可以阅读 JBec 的随机数生成器:

https://125.confly.eu.org/forum.php?mod=viewthread&tid=14101524&extra=

单色

感谢分享，很给力！~

linlin888

不错！！！！！！！！！！！

晶冬赏澄

落款hMZ 发表于 2018-1-16 22:43
asm代码不错
但是取不重复随机数的话，无建议是用【交换变量】，随机把数组随机位置的两个成员交换一下位置 ...

你这想法效率也不高 首先不需要交换变量 因为要交换变量你首先得给数组从头到尾赋值一遍  事实上只需要利用好数组下标就够了然后不需要截取其中一段  事实上需要多少个就交换多少个就够了

落款hMZ

asm代码不错
但是取不重复随机数的话，无建议是用【交换变量】，随机把数组随机位置的两个成员交换一下位置，这样从头到尾交换一遍就是个新的随机顺序的数组了，然后用复制内存截取其中一段

jyanle

好多大佬。。。。

x961025

感谢分享！！！

cesn

66666666666

falali5566

学习一下

wangguan

感谢分享！！！