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=

猥琐小胖子

数组Z 可以先判断下最终数量，先提前定义，循环内用赋值这边可以再节约时间。
数组的删除效率是很低的，删除一个整体移动，这个用链表。

jr21066

是那个五代cpu才能用的指令吗?
三代羡慕中

jr21066

反汇编了.原来不是我说的那个

随便把这个也加上吧.效率还是不错的.除了对硬件有要求.
原帖地址: http://bbs.eyuyan.com/read.php?tid=405670&fpage=2

dyx461090975

牛逼 学习一下

aManQ

厉害了，为什么还有10字限制。。。。

wangguan

感谢分享！！！

falali5566

学习一下

cesn

66666666666