易语言 取随机长整数 范围:-9223372036854775808~9223372036854775807 (返回长整数型)

CNWTEPRG

1. 
   
2. .版本 2
   
3. .支持库 eCalc
   
4. 
   
5. .程序集 程序集1
   
6. 
   
7. .子程序 _启动子程序, 整数型, , 请在本子程序中放置易模块初始化代码
   
8. 
   
9. 置随机数种子 ()
   
10. _临时子程序 ()  ' 在初始化代码执行完毕后调用测试代码
    
11. 返回 (0)  ' 可以根据您的需要返回任意数值
    
12. 
    
13. .子程序 _临时子程序
    
14. .局部变量 最小值, 长整数型
    
15. .局部变量 最大值, 长整数型
    
16. .局部变量 随机数, 长整数型
    
17. 
    
18. 最小值 ＝ -10000
    
19. 最大值 ＝ 10000
    
20. .计次循环首 (100, )
    
21.     随机数 ＝ 取长随机数 (最小值, 最大值)
    
22.     .如果真 (随机数 ＜ 最小值 或 随机数 ＞ 最大值)
    
23.         暂停 ()
    
24.     .如果真结束
    
25.     输出调试文本 (随机数)
    
26. .计次循环尾 ()
    
27. 
    
28. .子程序 取长随机数, 长整数型, 公开, 在使用本命令取一系列的随机数之前，应该先使用“置随机数种子”命令为随机数生成器初始化一个种子值。
    
29. .参数 欲取随机数的最小值, 长整数型, 可空, 留空默认 -9223372036854775808
    
30. .参数 欲取随机数的最大值, 长整数型, 可空, 留空默认 9223372036854775807
    
31. .局部变量 最小值, 大数
    
32. .局部变量 最大值, 大数
    
33. .局部变量 随机数, 大数
    
34. .局部变量 随机数据, 字节集
    
35. .局部变量 指针, 整数型
    
36. .局部变量 常量, 大数, 静态, , 固定:9223372036854775808
    
37. .局部变量 常量1, 大数, 静态, , 固定:1
    
38. .局部变量 INT_MIN, 长整数型, 静态, , 固定:-9223372036854775808
    
39. .局部变量 INT_MAX, 长整数型, 静态, , 固定:9223372036854775807
    
40. .局部变量 随机长整数, 长整数型
    
41. 
    
42. .如果真 (INT_MIN ＝ 0 或 INT_MAX ＝ 0)
    
43.     INT_MIN ＝ 取字节集数据 ({ 0, 0, 0, 0, 0, 0, 0, 128 }, #长整数型, )
    
44.     INT_MAX ＝ 取字节集数据 ({ 255, 255, 255, 255, 255, 255, 255, 127 }, #长整数型, )
    
45.     常量.导入文本 (“9223372036854775808”)
    
46.     常量1.导入数字 (1)
    
47. .如果真结束
    
48. 欲取随机数的最小值 ＝ 选择 (是否为空 (欲取随机数的最小值), INT_MIN, 欲取随机数的最小值)
    
49. 欲取随机数的最大值 ＝ 选择 (是否为空 (欲取随机数的最大值), INT_MAX, 欲取随机数的最大值)
    
50. .判断开始 (欲取随机数的最大值 ＜ 欲取随机数的最小值)
    
51.     交换变量 (欲取随机数的最大值, 欲取随机数的最小值)
    
52. .判断 (欲取随机数的最大值 ＝ 欲取随机数的最小值)
    
53.     返回 (欲取随机数的最小值)
    
54. .默认
    
55. 
    
56. .判断结束
    
57. 最小值.导入数字 (欲取随机数的最小值)
    
58. 最大值.导入数字 (欲取随机数的最大值)
    
59. 随机数据 ＝ 取空白字节集 (8)
    
60. .计次循环首 (8, 指针)
    
61.     随机数据 [指针] ＝ 取随机数 (, )
    
62. .计次循环尾 ()
    
63. 随机长整数 ＝ 取字节集数据 (随机数据, #长整数型, )
    
64. .如果真 (欲取随机数的最小值 ＝ INT_MIN 且 欲取随机数的最大值 ＝ INT_MAX)
    
65.     返回 (随机长整数)
    
66. .如果真结束
    
67. 随机数.导入数字 (随机长整数)
    
68. 最小值 ＝ 最小值.加 (常量)
    
69. 最大值 ＝ 最大值.加 (常量)
    
70. 随机数 ＝ 随机数.加 (常量).求余 (最大值.减 (最小值).加 (常量1)).加 (最小值)
    
71. 返回 (随机数.减 (常量).导出长整数 ())
    
72. 
    

复制代码

1心1亿

抢沙发

开开心心

好长的数字....

醉菲i

看一看

222

222，如果您要查看本帖隐藏内容请回复

zjlove1989

好东西，看看有什么作用

纸飞机

好玩意我也来看看

夹心饼干

康一康