设为首页收藏本站淘宝杂货铺

从F到0 - From F to 0

 找回密码
 注册已关闭
搜索
查看: 538|回复: 0
收起左侧

易语言MASM置入代码实现整数型带进位相加(加法)/带借位相减(减法) 运算 (返回整数型)

[复制链接]
发表于 2022-11-17 09:08:01 | 显示全部楼层 |阅读模式
1.png
  1. .版本 2

  2. .程序集 程序集1

  3. .子程序 _启动子程序, 整数型, , 请在本子程序中放置易模块初始化代码


  4. _临时子程序 ()  ' 在初始化代码执行完毕后调用测试代码
  5. 返回 (0)  ' 可以根据您的需要返回任意数值

  6. .子程序 _临时子程序
  7. .局部变量 进借位, 逻辑型

  8. ' 本名称子程序用作测试程序用,仅在开发及调试环境中有效,编译发布程序前将被系统自动清空,请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。
  9. 进借位 = 真
  10. 输出调试文本 (整数型_带进位相加 (1, 2, 进借位))
  11. 输出调试文本 (进借位)
  12. 进借位 = 真
  13. 输出调试文本 (整数型_带借位相减 (3, 4, 进借位))
  14. 输出调试文本 (进借位)

  15. .子程序 整数型_带进位相加, 整数型, 公开, 带进位加法运算
  16. .参数 被加数, 整数型
  17. .参数 加数, 整数型
  18. .参数 进位, 逻辑型, 参考, 必须是逻辑型变量,用于传递进位结果

  19. 置入代码 ({ 81, 82, 86, 139, 85, 8, 139, 117, 16, 139, 14, 11, 201, 116, 3, 249, 235, 1, 248, 19, 85, 12, 159, 128, 228, 1, 15, 182, 204, 137, 14, 139, 194, 94, 90, 89, 201, 194, 12, 0 })
  20. ' push ecx
  21. ' push edx
  22. ' push esi
  23. ' mov edx,[ebp+8]  ;被加数
  24. ' mov esi,[ebp+16] ;进位标志地址
  25. ' mov ecx,[esi]  ;是否有进位标志
  26. ' .if ecx
  27. ' stc
  28. ' .else
  29. ' clc
  30. ' .endif
  31. ' adc edx,[ebp+12]
  32. ' lahf
  33. ' and ah,1
  34. ' movzx ecx,ah
  35. ' mov [esi],ecx
  36. ' mov eax,edx
  37. ' pop esi
  38. ' pop edx
  39. ' pop ecx
  40. ' leave
  41. ' retn 12

  42. 返回 (0)

  43. .子程序 整数型_带借位相减, 整数型, 公开, 带借位减法运算
  44. .参数 被减数, 整数型
  45. .参数 减数, 整数型
  46. .参数 借位, 逻辑型, 参考, 必须是逻辑型变量,用于传递借位结果

  47. 置入代码 ({ 81, 82, 86, 139, 85, 8, 139, 117, 16, 139, 14, 11, 201, 116, 3, 249, 235, 1, 248, 27, 85, 12, 159, 128, 228, 1, 15, 182, 204, 137, 14, 139, 194, 94, 90, 89, 201, 194, 12, 0 })
  48. ' push ecx
  49. ' push edx
  50. ' push esi
  51. ' mov edx,[ebp+8]
  52. ' mov esi,[ebp+16]
  53. ' mov ecx,[esi]
  54. ' .if ecx
  55. ' stc
  56. ' .else
  57. ' clc
  58. ' .endif
  59. ' sbb edx,[ebp+12]
  60. ' lahf
  61. ' and ah,1
  62. ' movzx ecx,ah
  63. ' mov [esi],ecx
  64. ' mov eax,edx
  65. ' pop esi
  66. ' pop edx
  67. ' pop ecx
  68. ' leave
  69. ' retn 12
  70. 返回 (0)
复制代码

相关帖子

您需要登录后才可以回帖 登录 | 注册已关闭

本版积分规则

QQ|手机版|Archiver|从F到0 ( 蒙ICP备17002595号-1 )
蒙公网安备15010402000325号

腾讯云安全认证

GMT+8, 2024-3-29 15:40 , Processed in 0.520029 second(s), 22 queries .

Powered by Discuz! X3.4 Licensed

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表