易语言内嵌纯汇编置入代码不操作局部变量实现申请的256字节静态内存空间以及读写演示

CNWTEPRG

1. 
   
2. .版本 2
   
3. 
   
4. .程序集 程序集1
   
5. 
   
6. .子程序 _启动子程序, 整数型, , 请在本子程序中放置易模块初始化代码
   
7. 
   
8. 
   
9. _临时子程序 ()  ' 在初始化代码执行完毕后调用测试代码
   
10. 返回 (0)  ' 可以根据您的需要返回任意数值
    
11. 
    
12. .子程序 _临时子程序
    
13. .局部变量 值, 字节型
    
14. 
    
15. ' 本名称子程序用作测试程序用，仅在开发及调试环境中有效，编译发布程序前将被系统自动清空，请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。
    
16. 
    
17. 
    
18. 读写256字节静态内存 (0, 9, 真)
    
19. 读写256字节静态内存 (1, 10, 真)
    
20. 读写256字节静态内存 (2, 11, 真)
    
21. 读写256字节静态内存 (3, 12, 真)
    
22. 读写256字节静态内存 (255, 123, 真)
    
23. 
    
24. 读写256字节静态内存 (0, 值, 假)
    
25. 输出调试文本 (值)
    
26. 读写256字节静态内存 (255, 值, 假)
    
27. 输出调试文本 (值)
    
28. 
    
29. 
    
30. .子程序 读写256字节静态内存, , 公开
    
31. .参数 地址, 字节型, , 地址范围 0~255(共256字节)
    
32. .参数 值, 字节型, 参考, 必须为字节型变量，否则可能会出错
    
33. .参数 写, 逻辑型, , 真为写，假为读
    
34. 
    
35. 置入代码 ({ 144, 144, 144, 144, 96, 232, 44, 0, 0, 0, 184, 0, 0, 0, 0, 138, 69, 8, 139, 85, 12, 138, 77, 16, 141, 29, 79, 0, 0, 0, 3, 222, 3, 216, 128, 249, 1, 117, 6, 138, 10, 136, 11, 235, 4, 138, 11, 136, 10, 97, 201, 194, 12, 0, 83, 187, 0, 0, 0, 0, 139, 117, 4, 235, 3, 139, 30, 70, 129, 251, 144, 144, 144, 144, 117, 245, 78, 91, 195, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 })
    
36. ' nop
    
37. ' nop
    
38. ' nop
    
39. ' nop
    
40. ' pushad
    
41. ' call GCA
    
42. ' mov eax,0
    
43. ' mov al,[ebp+8]  ;地址
    
44. ' mov edx,[ebp+12] ;值的地址
    
45. ' mov cl,[ebp+16]  ;读写方向 0读1写
    
46. ' lea ebx,RAM
    
47. ' add ebx,esi
    
48. ' add ebx,eax
    
49. ' .if cl == 1  ;写入
    
50. ' mov cl,[edx]
    
51. ' mov [ebx],cl
    
52. ' .elseif   ;读出
    
53. ' mov cl,[ebx]
    
54. ' mov [edx],cl
    
55. ' .endif
    
56. ' popad
    
57. ' leave
    
58. ' retn 12
    
59. ' GCA: ;取置入代码的内存地址
    
60. ' push ebx
    
61. ' mov ebx,0
    
62. ' mov esi,[ebp+4]
    
63. ' .while ebx != 90909090H
    
64. ' mov ebx,[esi]
    
65. ' inc esi
    
66. ' .endw
    
67. ' dec esi
    
68. ' pop ebx
    
69. ' ret
    
70. ' RAM: ;分配256字节的静态内存空间
    
71. ' DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
    
72. ' DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
    
73. ' DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
    
74. ' DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
    
75. ' DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
    
76. ' DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
    
77. ' DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
    
78. ' DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
    
79. ' DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
    
80. ' DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
    
81. ' DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
    
82. ' DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
    
83. ' DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
    
84. ' DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
    
85. ' DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
    
86. ' DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
    

复制代码

1心1亿

这个6了，自己可以改自己。

66大顺

这个隐蔽性6，不知道还能放数据。