易语言MASM置入代码实现将字节集数据赋值到字节型数组 数据类型数组转换 (返回逻辑型)

EAX

1. .版本 2
   
2. .支持库 spec
   
3. 
   
4. .程序集 程序集1
   
5. 
   
6. .子程序 _启动子程序, 整数型, , 请在本子程序中放置易模块初始化代码
   
7. 
   
8. 
   
9. _临时子程序 ()  ' 在初始化代码执行完毕后调用测试代码
   
10. 返回 (0)  ' 可以根据您的需要返回任意数值
    
11. 
    
12. .子程序 _临时子程序
    
13. .局部变量 字节集, 字节集
    
14. .局部变量 字节型数组, 字节型, , "0"
    
15. 
    
16. 字节集 ＝ { 1, 2, 3, 4, 5 }
    
17. 调试输出 (字节集_赋值到字节型数组 (字节集, 字节型数组))
    
18. 调试输出 (字节集, 字节型数组)
    
19. 
    
20. .子程序 字节集_赋值到字节型数组, 逻辑型, 公开, 字节集长度若为0则清除数组并返回假，赋值成功返回真 字节型数组到字节集,可使用核心库自带的 到字节集()
    
21. .参数 字节集, 字节集, , ebp+8
    
22. .参数 字节型数组变量, 字节型, 参考 数组, 必须为数组变量 ebp+12
    
23. .局部变量 长度, 整数型, , , ebp-4
    
24. 
    
25. 长度 ＝ 取字节集长度 (字节集)
    
26. .如果真 (长度 ≤ 0)
    
27.     清除数组 (字节型数组变量)
    
28.     返回 (假)
    
29. .如果真结束
    
30. 重定义数组 (字节型数组变量, 真, 长度)
    
31. 置入代码 ({ 80, 83, 81, 82, 86, 139, 117, 252, 139, 69, 8, 139, 0, 131, 192, 8, 139, 93, 12, 139, 27, 131, 195, 8, 51, 201, 235, 7, 138, 20, 1, 136, 20, 25, 65, 59, 206, 114, 245, 94, 90, 89, 91, 88 })
    
32. ' push eax
    
33. ' push ebx
    
34. ' push ecx
    
35. ' push edx
    
36. ' push esi
    
37. ' mov esi,[ebp-4]
    
38. ' mov eax,[ebp+8]
    
39. ' mov eax,[eax]
    
40. ' add eax,8
    
41. ' mov ebx,[ebp+12]
    
42. ' mov ebx,[ebx]
    
43. ' add ebx,8
    
44. ' xor ecx,ecx
    
45. ' .while ecx < esi
    
46. ' mov dl,[eax+ecx]
    
47. ' mov [ebx+ecx],dl
    
48. ' inc ecx
    
49. ' .endw
    
50. ' pop esi
    
51. ' pop edx
    
52. ' pop ecx
    
53. ' pop ebx
    
54. ' pop eax
    
55. 返回 (真)
    

复制代码