易语言MASM汇编置入代码实现逻辑型数值 (并且加取反、或者加取反) 运算 (返回逻辑型)

QAQ

1. 
   
2. .版本 2
   
3. 
   
4. .程序集 程序集1
   
5. 
   
6. .子程序 _启动子程序, 整数型, , 请在本子程序中放置易模块初始化代码
   
7. 
   
8. 
   
9. _临时子程序 ()  ' 在初始化代码执行完毕后调用测试代码
   
10. 返回 (0)  ' 可以根据您的需要返回任意数值
    
11. 
    
12. .子程序 _临时子程序
    
13. 
    
14. ' 本名称子程序用作测试程序用，仅在开发及调试环境中有效，编译发布程序前将被系统自动清空，请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。
    
15. 
    
16. 输出调试文本 (并且加取反 (假, 假))
    
17. 输出调试文本 (并且加取反 (假, 真))
    
18. 输出调试文本 (并且加取反 (真, 假))
    
19. 输出调试文本 (并且加取反 (真, 真))
    
20. 
    
21. 输出调试文本 (或者加取反 (假, 假))
    
22. 输出调试文本 (或者加取反 (假, 真))
    
23. 输出调试文本 (或者加取反 (真, 假))
    
24. 输出调试文本 (或者加取反 (真, 真))
    
25. 
    
26. 
    
27. .子程序 并且加取反, 逻辑型, 公开
    
28. .参数 逻辑值一, 逻辑型
    
29. .参数 逻辑值二, 逻辑型
    
30. 
    
31. 置入代码 ({ 83, 139, 69, 8, 139, 93, 12, 131, 248, 1, 117, 9, 131, 251, 1, 117, 4, 51, 192, 235, 5, 184, 1, 0, 0, 0, 91, 201, 194, 8, 0 })
    
32. ' push ebx
    
33. ' mov eax,[ebp+8]
    
34. ' mov ebx,[ebp+12]
    
35. ' .if eax == 1 && ebx == 1
    
36. ' xor eax,eax
    
37. ' .elseif
    
38. ' mov eax,1
    
39. ' .endif
    
40. ' pop ebx
    
41. ' leave
    
42. ' retn 8
    
43. 返回 (假)
    
44. 
    
45. 
    
46. .子程序 或者加取反, 逻辑型, 公开
    
47. .参数 逻辑值一, 逻辑型
    
48. .参数 逻辑值二, 逻辑型
    
49. 
    
50. 置入代码 ({ 83, 139, 69, 8, 139, 93, 12, 131, 248, 1, 116, 5, 131, 251, 1, 117, 4, 51, 192, 235, 5, 184, 1, 0, 0, 0, 91, 201, 194, 8, 0 })
    
51. ' push ebx
    
52. ' mov eax,[ebp+8]
    
53. ' mov ebx,[ebp+12]
    
54. ' .if eax == 1 || ebx == 1
    
55. ' xor eax,eax
    
56. ' .elseif
    
57. ' mov eax,1
    
58. ' .endif
    
59. ' pop ebx
    
60. ' leave
    
61. ' retn 8
    
62. 返回 (假)
    

复制代码

1心1亿

这贴够水

66大顺

1心1亿 发表于 2019-8-19 13:45
这贴够水

是的是的