建议，在精易模块8.2.5基础上加：文本_取长度_汇编 ()

gua

为什么要用汇编的呢？大家都肯定知道，汇编快、好，如下图：
都是一模一样的文本，但是显然汇编得快，源码如下：

  

子程序名	返回值类型	公开	备 注
文本_取长度_汇编	整数型		文本_取长度 的汇编版本，比文本_取长度快，对于较长的文本很有优势
参数名	类 型	参考	可空	数组	备 注
文本	文本型

变量名	类 型	静态	数组	备 注
文本指针	整数型

置入代码 ({ 83, 139, 69, 8, 139, 0, 141, 80, 3, 139, 24, 131, 192, 4, 141, 139, 255, 254, 254, 254, 247, 211, 35, 203, 129, 225, 128, 128, 128, 128, 116, 233, 247, 193, 128, 128, 0, 0, 117, 6, 193, 233, 16, 131, 192, 2, 208, 225, 27, 194, 91, 201, 194, 4, 0 })
返回 (0)

.版本 2<br /> <br /> .子程序 文本_取长度_汇编, 整数型, , 文本_取长度 的汇编版本，比文本_取长度快，对于较长的文本很有优势<br /> .参数 文本, 文本型<br /> .局部变量 文本指针, 整数型<br /> <br /> 置入代码 ({ 83, 139, 69, 8, 139, 0, 141, 80, 3, 139, 24, 131, 192, 4, 141, 139, 255, 254, 254, 254, 247, 211, 35, 203, 129, 225, 128, 128, 128, 128, 116, 233, 247, 193, 128, 128, 0, 0, 117, 6, 193, 233, 16, 131, 192, 2, 208, 225, 27, 194, 91, 201, 194, 4, 0 })<br /> <br /> 返回 (0)

在哪里找到的呢？在挂海论坛上找到的，原文链接：http://www.52ghai.com/thread-15893-1-1.html

bf001

精易模块更新的好快

jr21066

这个有源码了.就是源码也是抄的.维护不了.但速度真的快

  

子程序名	返回值类型	公开	备 注
取文本长度_SSE2_汇编	整数型		速度最快
参数名	类 型	参考	可空	数组	备 注
参_文本	通用型				文本变量或文本指针

置入代码 ({ 139, 69, 8, 139, 0, 133, 192, 116, 59, 80, 137, 193, 102, 15, 239, 192, 131, 225, 15, 131, 224, 240, 102, 15, 111, 8, 102, 15, 116, 200, 102, 15, 215, 209, 211, 234, 211, 226, 15, 188, 210, 117, 20, 131, 192, 16, 102, 15, 111, 8, 102, 15, 116, 200, 102, 15, 215, 209, 15, 188, 210, 116, 236, 89, 41, 200, 1, 208, 201, 194, 4, 0 })
' mov eax,dword ptr ss:[ebp+0x8]
' mov eax,dword ptr ds:[eax]
' test eax,eax
' je end_
' push eax
' mov ecx,eax
' pxor xmm0,xmm0
' and ecx,0xF
' and eax,0xFFFFFFF0
' movdqa xmm1,xmmword ptr ds:[eax]
' pcmpeqb xmm1,xmm0
' pmovmskb edx,xmm1
' shr edx,cl
' shl edx,cl
' bsf edx,edx
' jne Label_a
' Label_b:
' add eax,0x10
' movdqa xmm1,xmmword ptr ds:[eax]
' pcmpeqb xmm1,xmm0
' pmovmskb edx,xmm1
' bsf edx,edx
' je Label_b
' Label_a:
' pop ecx
' sub eax,ecx
' add eax,edx
' end_:
' leave
' ret 0x4
返回 (0)

.版本 2<br /> <br /> .子程序 取文本长度_SSE2_汇编, 整数型, 公开, 速度最快<br /> .参数 参_文本, 通用型, 参考, 文本变量或文本指针<br /> <br /> 置入代码 ({ 139, 69, 8, 139, 0, 133, 192, 116, 59, 80, 137, 193, 102, 15, 239, 192, 131, 225, 15, 131, 224, 240, 102, 15, 111, 8, 102, 15, 116, 200, 102, 15, 215, 209, 211, 234, 211, 226, 15, 188, 210, 117, 20, 131, 192, 16, 102, 15, 111, 8, 102, 15, 116, 200, 102, 15, 215, 209, 15, 188, 210, 116, 236, 89, 41, 200, 1, 208, 201, 194, 4, 0 })<br /> ' mov eax,dword ptr ss:[ebp+0x8]<br /> ' mov eax,dword ptr ds:[eax]<br /> ' test eax,eax<br /> ' je end_<br /> <br /> ' push eax<br /> ' mov ecx,eax<br /> ' pxor xmm0,xmm0<br /> ' and ecx,0xF<br /> ' and eax,0xFFFFFFF0<br /> ' movdqa xmm1,xmmword ptr ds:[eax]<br /> ' pcmpeqb xmm1,xmm0<br /> ' pmovmskb edx,xmm1<br /> ' shr edx,cl<br /> ' shl edx,cl<br /> ' bsf edx,edx<br /> ' jne Label_a<br /> <br /> ' Label_b:<br /> ' add eax,0x10<br /> ' movdqa xmm1,xmmword ptr ds:[eax]<br /> ' pcmpeqb xmm1,xmm0<br /> ' pmovmskb edx,xmm1<br /> ' bsf edx,edx<br /> ' je Label_b<br /> <br /> ' Label_a:<br /> ' pop ecx<br /> ' sub eax,ecx<br /> ' add eax,edx<br /> <br /> ' end_:<br /> ' leave<br /> ' ret 0x4<br /> 返回 (0)

jr21066

这个有源码了.就是源码也是抄的.维护不了.但速度真的快

  

子程序名	返回值类型	公开	备 注
取文本长度_SSE2_汇编	整数型		速度最快
参数名	类 型	参考	可空	数组	备 注
参_文本	通用型				文本变量或文本指针

置入代码 ({ 139, 69, 8, 139, 0, 133, 192, 116, 59, 80, 137, 193, 102, 15, 239, 192, 131, 225, 15, 131, 224, 240, 102, 15, 111, 8, 102, 15, 116, 200, 102, 15, 215, 209, 211, 234, 211, 226, 15, 188, 210, 117, 20, 131, 192, 16, 102, 15, 111, 8, 102, 15, 116, 200, 102, 15, 215, 209, 15, 188, 210, 116, 236, 89, 41, 200, 1, 208, 201, 194, 4, 0 })
' mov eax,dword ptr ss:[ebp+0x8]
' mov eax,dword ptr ds:[eax]
' test eax,eax
' je end_
' push eax
' mov ecx,eax
' pxor xmm0,xmm0
' and ecx,0xF
' and eax,0xFFFFFFF0
' movdqa xmm1,xmmword ptr ds:[eax]
' pcmpeqb xmm1,xmm0
' pmovmskb edx,xmm1
' shr edx,cl
' shl edx,cl
' bsf edx,edx
' jne Label_a
' Label_b:
' add eax,0x10
' movdqa xmm1,xmmword ptr ds:[eax]
' pcmpeqb xmm1,xmm0
' pmovmskb edx,xmm1
' bsf edx,edx
' je Label_b
' Label_a:
' pop ecx
' sub eax,ecx
' add eax,edx
' end_:
' leave
' ret 0x4
返回 (0)

.版本 2<br /> <br /> .子程序 取文本长度_SSE2_汇编, 整数型, 公开, 速度最快<br /> .参数 参_文本, 通用型, 参考, 文本变量或文本指针<br /> <br /> 置入代码 ({ 139, 69, 8, 139, 0, 133, 192, 116, 59, 80, 137, 193, 102, 15, 239, 192, 131, 225, 15, 131, 224, 240, 102, 15, 111, 8, 102, 15, 116, 200, 102, 15, 215, 209, 211, 234, 211, 226, 15, 188, 210, 117, 20, 131, 192, 16, 102, 15, 111, 8, 102, 15, 116, 200, 102, 15, 215, 209, 15, 188, 210, 116, 236, 89, 41, 200, 1, 208, 201, 194, 4, 0 })<br /> ' mov eax,dword ptr ss:[ebp+0x8]<br /> ' mov eax,dword ptr ds:[eax]<br /> ' test eax,eax<br /> ' je end_<br /> <br /> ' push eax<br /> ' mov ecx,eax<br /> ' pxor xmm0,xmm0<br /> ' and ecx,0xF<br /> ' and eax,0xFFFFFFF0<br /> ' movdqa xmm1,xmmword ptr ds:[eax]<br /> ' pcmpeqb xmm1,xmm0<br /> ' pmovmskb edx,xmm1<br /> ' shr edx,cl<br /> ' shl edx,cl<br /> ' bsf edx,edx<br /> ' jne Label_a<br /> <br /> ' Label_b:<br /> ' add eax,0x10<br /> ' movdqa xmm1,xmmword ptr ds:[eax]<br /> ' pcmpeqb xmm1,xmm0<br /> ' pmovmskb edx,xmm1<br /> ' bsf edx,edx<br /> ' je Label_b<br /> <br /> ' Label_a:<br /> ' pop ecx<br /> ' sub eax,ecx<br /> ' add eax,edx<br /> <br /> ' end_:<br /> ' leave<br /> ' ret 0x4<br /> 返回 (0)

gzk19860111

支持一下 支持易语言

let4757539

路过，飘过，走过，看过

gua

项目部006 发表于 2020-6-18 10:09
这是机器码, 不是汇编, 虽然可以利用工具反编译出来转成汇编, 但这个意思好像就是你给了个模块, 没有给模 ...

汇编代码：

1. push ebx
   
2. mov eax,[ebp+0x8]
   
3. mov eax,[eax]
   
4. lea edx,[eax+0x3]
   
5. mov ebx,[eax]
   
6. add eax,byte +0x4
   
7. lea ecx,[ebx-0x1010101]
   
8. not ebx
   
9. and ecx,ebx
   
10. and ecx,0x80808080
    
11. jz 0x9
    
12. test ecx,0x8080
    
13. jnz 0x2e
    
14. shr ecx,byte 0x10
    
15. add eax,byte +0x2
    
16. shl cl,1
    
17. sbb eax,edx
    
18. pop ebx
    
19. leave
    
20. ret 0x4

复制代码

police0909

sinewtec 发表于 2020-6-12 11:18
只想知道离开了模块 你还会不会编程

没了模块，没了核心库，我压根连易语言都不装了

项目部006

gua 发表于 2020-6-17 09:53
代码不已经说了？
[e=1].版本 2

这是机器码, 不是汇编, 虽然可以利用工具反编译出来转成汇编, 但这个意思好像就是你给了个模块, 没有给模块源码, 然后告诉我说有工具可以反编译, 你反编译一下模块然后加入到精易模块里, 差不多是这么个意思

gua

项目部006 发表于 2020-6-17 08:14
没有汇编代码不会加入, 如果用到置入代码的, 请提供汇编代码, 不然不好维护修改

.版本 2

.子程序 文本_取长度_汇编, 整数型, , 文本_取长度 的汇编版本，比文本_取长度快，对于较长的文本很有优势
.参数 文本, 文本型
.局部变量 文本指针, 整数型

置入代码 ({ 83, 139, 69, 8, 139, 0, 141, 80, 3, 139, 24, 131, 192, 4, 141, 139, 255, 254, 254, 254, 247, 211, 35, 203, 129, 225, 128, 128, 128, 128, 116, 233, 247, 193, 128, 128, 0, 0, 117, 6, 193, 233, 16, 131, 192, 2, 208, 225, 27, 194, 91, 201, 194, 4, 0 })

返回 (0)