精易论坛

标题: 数值 文本相加 算法 [打印本页]

作者: cf2006a    时间: 2019-11-5 21:53
标题: 数值 文本相加 算法
本帖最后由 cf2006a 于 2019-11-5 22:21 编辑
  
子程序名返回值类型公开备 注
文本_求和整数型 将有规律文本相加
参数名类 型参考可空数组备 注
参_数值文本文本型
参_分隔符文本型如 + 好 或者 | 等自己喜欢用什么分割就用什么
置入代码 ({ 49, 192, 49, 210, 49, 255, 139, 93, 8, 139, 27, 133, 219, 116, 60, 139, 77, 12, 139, 9, 133, 201, 116, 51, 138, 41, 138, 11, 132, 201, 116, 43, 67, 128, 249, 47, 127, 2, 235, 242, 128, 249, 57, 127, 237, 15, 182, 209, 131, 234, 48, 128, 59, 0, 116, 11, 56, 43, 116, 7, 1, 208, 107, 192, 10, 235, 215, 1, 208, 1, 199, 49, 192, 235, 207, 137, 248, 201, 194, 8, 0 })
返回 (0)







作者: TBit    时间: 2019-11-5 22:12
汇编大佬  膜拜膜拜
作者: LLJ    时间: 2019-11-6 00:37
  1. xor eax, eax
  2. xor edx, edx
  3. xor edi, edi
  4. mov ebx, dword [ebp+0x08]
  5. mov ebx, dword [ebx]
  6. test ebx, ebx
  7. je label4
  8. mov ecx, dword [ebp+0x0C]
  9. mov ecx, dword [ecx]
  10. test ecx, ecx
  11. je label4
  12. mov ch, byte [ecx]
  13. label1:
  14. mov cl, byte [ebx]
  15. test cl, cl
  16. je label4
  17. inc ebx
  18. cmp cl, 0x2F
  19. jnle label2
  20. jmp label1
  21. label2:
  22. cmp cl, 0x39
  23. jnle label1
  24. movzx edx, cl
  25. sub edx, 0x30
  26. cmp byte [ebx], 0x00
  27. je label3
  28. cmp byte [ebx], ch
  29. je label3
  30. add eax, edx
  31. imul eax, eax, 0x0A
  32. jmp label1
  33. label3:
  34. add eax, edx
  35. add edi, eax
  36. xor eax, eax
  37. jmp label1
  38. label4:
  39. mov eax, edi
  40. leave
  41. retn 0x0008
复制代码

作者: 外星星人    时间: 2019-11-6 13:28
汇编大佬  膜拜膜拜
作者: 安雨尘    时间: 2019-11-6 15:28
谢谢分享学习

作者: cf2006a    时间: 2019-11-7 15:00
.版本 2

.子程序 文本_求和, 整数型, , 作者*F006a   将有规律文本相加 2019-11-6  修改支持负数
.参数 参_数值文本, 文本型
.参数 参_分隔符, 文本型, , 如 + 号 或者 | 等自己喜欢用什么分割就用什么

置入代码 ({ 49, 192, 49, 255, 139, 93, 8, 139, 27, 133, 219, 116, 78, 139, 77, 12, 139, 9, 133, 201, 116, 69, 138, 41, 49, 192, 190, 1, 0, 0, 0, 138, 11, 132, 201, 116, 54, 128, 249, 45, 117, 5, 67, 247, 222, 235, 240, 67, 128, 249, 47, 127, 2, 235, 225, 128, 249, 57, 127, 220, 107, 192, 10, 15, 182, 209, 131, 234, 48, 1, 208, 138, 11, 132, 201, 116, 6, 56, 233, 116, 2, 235, 220, 15, 175, 198, 1, 199, 67, 235, 189, 137, 248, 201, 194, 8, 0 })
返回 (0)
支持负数~!!!!!!
作者: tianxi    时间: 2019-12-14 14:29
这种 人才  才是助力易语言长久发展的功呈
作者: cf2006a    时间: 2020-2-21 20:58
[e=0].版本 2

.子程序 文本_求和, 整数型, 公开, 作
作者: 8wy721719    时间: 2020-2-21 21:41
cf2006a 发表于 2019-11-7 15:00
.版本 2

.子程序 文本_求和, 整数型, , 作者*F006a   将有规律文本相加 2019-11-6  修改支持负数

.版本 2
.支持库 spec

调试输出 (文本_求和 (“10086+3+121+322”, “+”))
调试输出 (到整数 (10086 + 3 + 121 + 322))

开始运行被调试程序
* 10540
* 10532
被调试易程序运行完毕
求出来的合不对
作者: cf2006a    时间: 2020-2-23 10:07
8wy721719 发表于 2020-2-21 21:41
.版本 2
.支持库 spec

{ 49, 255, 49, 192, 139, 93, 8, 139, 27, 133, 219, 116, 55, 15, 175, 198, 1, 199, 49, 192, 190, 1, 0, 0, 0, 128, 249, 45, 117, 2, 247, 222, 128, 249, 0, 116, 31, 138, 11, 128, 249, 0, 116, 225, 67, 128, 249, 48, 124, 219, 128, 249, 57, 127, 214, 107, 192, 10, 15, 182, 209, 131, 234, 48, 1, 208, 235, 225, 137, 248, 201, 194, 4, 0 }




欢迎光临 精易论坛 (https://125.confly.eu.org/) Powered by Discuz! X3.4