易语言汇编置入代码实现极速计算求出一个整数型数组的逆序数值 (返回整数型)

QAQ

1. 
   
2. .版本 2
   
3. .支持库 spec
   
4. 
   
5. .程序集 程序集1
   
6. 
   
7. .子程序 _启动子程序, 整数型, , 请在本子程序中放置易模块初始化代码
   
8. 
   
9. 置随机数种子 ()
   
10. _临时子程序 ()  ' 在初始化代码执行完毕后调用测试代码
    
11. 返回 (0)  ' 可以根据您的需要返回任意数值
    
12. 
    
13. .子程序 _临时子程序
    
14. .局部变量 整数数组, 整数型, , "0"
    
15. .局部变量 计数, 整数型
    
16. 
    
17. .变量循环首 (0, 256, 1, 计数)
    
18.     加入成员 (整数数组, 计数)
    
19.     整数型_数组洗牌 (整数数组)
    
20.     ' 数组排序 (整数数组, 假)
    
21.     调试输出 (整数数组, 求逆序数 (整数数组))
    
22. 
    
23. .变量循环尾 ()
    
24. 
    
25. 
    
26. 
    
27. 
    
28. 
    
29. .子程序 求逆序数_易源码, 整数型
    
30. .参数 数, 整数型, 数组
    
31. .局部变量 ebx, 整数型
    
32. .局部变量 ecx, 整数型
    
33. .局部变量 eax, 整数型
    
34. .局部变量 edx, 整数型
    
35. .局部变量 esi, 整数型
    
36. 
    
37. esi ＝ 取数组成员数 (数)
    
38. .计次循环首 (esi, ebx)
    
39.     edx ＝ 数 [ebx]
    
40.     .变量循环首 (ebx ＋ 1, esi, 1, ecx)
    
41.         .如果真 (数 [ecx] ＜ edx)
    
42.             eax ＝ eax ＋ 1
    
43.         .如果真结束
    
44. 
    
45.     .变量循环尾 ()
    
46. .计次循环尾 ()
    
47. 返回 (eax)
    
48. 
    
49. 
    
50. .子程序 求逆序数_汇编, 整数型, 公开
    
51. .参数 数, 整数型, 数组
    
52. 
    
53. 置入代码 ({ 83, 81, 82, 86, 87, 139, 117, 8, 139, 62, 139, 119, 4, 184, 0, 0, 0, 0, 187, 0, 0, 0, 0, 131, 199, 8, 235, 19, 139, 20, 159, 67, 139, 203, 235, 7, 57, 20, 143, 115, 1, 64, 65, 59, 206, 114, 245, 59, 222, 114, 233, 95, 94, 90, 89, 91, 201, 194, 4, 0 })
    
54. ' push ebx
    
55. ' push ecx
    
56. ' push edx
    
57. ' push esi
    
58. ' push edi
    
59. ' mov esi,[ebp+8]
    
60. ' mov edi,[esi]
    
61. ' mov esi,[edi+4]
    
62. ' mov eax,0
    
63. ' mov ebx,0
    
64. ' add edi,8
    
65. ' .while ebx < esi
    
66. ' mov edx,[edi+ebx*4]
    
67. ' inc ebx
    
68. ' mov ecx,ebx
    
69. ' .while ecx < esi
    
70. ' .if [edi+ecx*4] < edx
    
71. ' inc eax
    
72. ' .endif
    
73. ' inc ecx
    
74. ' .endw
    
75. ' .endw
    
76. ' pop edi
    
77. ' pop esi
    
78. ' pop edx
    
79. ' pop ecx
    
80. ' pop ebx
    
81. ' leave
    
82. ' retn 4
    
83. 
    
84. 返回 (0)
    
85. 
    
86. .子程序 求逆序数, 整数型
    
87. .参数 数, 整数型, 数组
    
88. .局部变量 易源码, 整数型
    
89. .局部变量 汇编, 整数型
    
90. 
    
91. 易源码 ＝ 求逆序数_易源码 (数)
    
92. 汇编 ＝ 求逆序数_汇编 (数)
    
93. 检查 (易源码 ＝ 汇编)
    
94. 返回 (汇编)
    
95. 
    
96. .子程序 整数型_数组洗牌
    
97. .参数 数组, 整数型, 参考 数组
    
98. .局部变量 下标, 整数型
    
99. .局部变量 数组2, 整数型, , "0"
    
100. 
     
101. .判断循环首 (取数组成员数 (数组) ≠ 0)
     
102.     下标 ＝ 取随机整数 (1, 取数组成员数 (数组))
     
103.     加入成员 (数组2, 数组 [下标])
     
104.     删除成员 (数组, 下标, 1)
     
105. .判断循环尾 ()
     
106. 数组 ＝ 数组2
     
107. 
     
108. .子程序 限制整数范围, 整数型
     
109. .参数 数值, 整数型
     
110. .参数 最大值, 整数型
     
111. .参数 最小值, 整数型
     
112. .局部变量 无符号数值, 长整数型
     
113. .局部变量 无符号最大值, 长整数型
     
114. .局部变量 无符号最小值, 长整数型
     
115. .局部变量 无符号答案, 长整数型
     
116. 
     
117. .如果真 (最大值 ＜ 最小值)
     
118.     交换变量 (最大值, 最小值)
     
119. .如果真结束
     
120. 无符号数值 ＝ 数值 ＋ 2147483648
     
121. 无符号最大值 ＝ 最大值 ＋ 2147483648
     
122. 无符号最小值 ＝ 最小值 ＋ 2147483648
     
123. 无符号答案 ＝ 无符号数值 ％ (无符号最大值 － 无符号最小值 ＋ 1) ＋ 无符号最小值
     
124. 返回 (无符号答案 － 2147483648)
     
125. 
     
126. .子程序 取随机整数, 整数型, , 取随机整数 范围 -2147483648~2147483647
     
127. .参数 最大值, 整数型, , 支持负数
     
128. .参数 最小值, 整数型
     
129. .局部变量 字节集, 字节集
     
130. .局部变量 计数, 整数型
     
131. .局部变量 整数, 整数型
     
132. 
     
133. 字节集 ＝ 取空白字节集 (4)
     
134. .计次循环首 (4, 计数)
     
135.     字节集 [计数] ＝ 取随机数 (, )
     
136. .计次循环尾 ()
     
137. 返回 (限制整数范围 (取字节集数据 (字节集, #整数型, 1), 最大值, 最小值))
     
138. 
     

复制代码

小莉今年7岁

用汇编的都是大佬

花心大萝卜

小弟真心看不动