文本_逐字分割_快速

jr21066

又修改了一下.同时还发现如果代码中使用清除数组时.会带来严重的性能下降.....

  

子程序名	返回值类型	公开	备 注
文本_逐字分割_快速	整数型		超长文本计算时有优势
参数名	类 型	参考	可空	数组	备 注
参_内容	文本型
参_文本数组	文本型

变量名	类 型	静态	数组	备 注
返回值	文本型

返回值 ＝ 取空白文本 (取文本长度 (参_内容) × 2)
置入代码 ({ 139, 69, 8, 139, 48, 139, 125, 252, 172, 168, 128, 117, 23, 60, 32, 116, 247, 60, 9, 116, 243, 60, 13, 70, 116, 238, 132, 192, 116, 28, 170, 176, 9, 170, 235, 228, 60, 161, 117, 10, 134, 224, 172, 60, 161, 116, 217, 134, 224, 78, 170, 172, 170, 176, 9, 170, 235, 206, 49, 192, 170 })
参_文本数组 ＝ 分割文本 (返回值, 到文本 ({ 9 }), )
返回 (取数组成员数 (参_文本数组))
' mov eax,dword ptr [ebp+08h]  '取参数一地址
' mov esi,dword ptr [eax]
' mov edi ,dword ptr [ebp-04h]  '取变量一地址
' begin:
' lodsb
' test al,10000000b
' jnz addr_cn  '如果是汉字跳
' cmp al,32  '不算空格
' jz begin
' cmp al,9  '不算tab
' jz Begin
' cmp al,13  '不算回车
' inc esi
' jz begin
' test al,al  '内容结束
' jz addr_end
' stosb
' mov al,9  '增加分割符
' stosb
' jmp begin
' addr_cn:
' cmp al,161  '中文全角空格
' jnz addr3
' xchg ah,al
' lodsb
' cmp al,161
' jz begin
' xchg ah,al
' dec esi
' addr3:
' stosb
' lodsb
' stosb
' mov al,9
' stosb
' jmp begin
' addr_end:  '文本结束标记
' xor eax,eax
' stosb

.版本 2<br /> <br /> .子程序 文本_逐字分割_快速, 整数型, , 超长文本计算时有优势<br /> .参数 参_内容, 文本型<br /> .参数 参_文本数组, 文本型, 数组<br /> .局部变量 返回值, 文本型<br /> <br /> 返回值 ＝ 取空白文本 (取文本长度 (参_内容) × 2)<br /> 置入代码 ({ 139, 69, 8, 139, 48, 139, 125, 252, 172, 168, 128, 117, 23, 60, 32, 116, 247, 60, 9, 116, 243, 60, 13, 70, 116, 238, 132, 192, 116, 28, 170, 176, 9, 170, 235, 228, 60, 161, 117, 10, 134, 224, 172, 60, 161, 116, 217, 134, 224, 78, 170, 172, 170, 176, 9, 170, 235, 206, 49, 192, 170 })<br /> 参_文本数组 ＝ 分割文本 (返回值, 到文本 ({ 9 }), )<br /> 返回 (取数组成员数 (参_文本数组))<br /> ' mov eax,dword ptr [ebp+08h]  '取参数一地址<br /> ' mov esi,dword ptr [eax]<br /> ' mov edi ,dword ptr [ebp-04h]  '取变量一地址<br /> <br /> ' begin:<br /> ' lodsb<br /> <br /> ' test al,10000000b<br /> ' jnz addr_cn  '如果是汉字跳<br /> <br /> ' cmp al,32  '不算空格<br /> ' jz begin<br /> ' cmp al,9  '不算tab<br /> ' jz Begin<br /> ' cmp al,13  '不算回车<br /> ' inc esi<br /> ' jz begin<br /> ' test al,al  '内容结束<br /> ' jz addr_end<br /> <br /> ' stosb<br /> ' mov al,9  '增加分割符<br /> ' stosb<br /> ' jmp begin<br /> <br /> ' addr_cn:<br /> ' cmp al,161  '中文全角空格<br /> ' jnz addr3<br /> ' xchg ah,al<br /> ' lodsb<br /> ' cmp al,161<br /> ' jz begin<br /> ' xchg ah,al<br /> ' dec esi<br /> ' addr3:<br /> ' stosb<br /> ' lodsb<br /> ' stosb<br /> ' mov al,9<br /> ' stosb<br /> ' jmp begin<br /> <br /> ' addr_end:  '文本结束标记<br /> ' xor eax,eax<br /> ' stosb

jr21066

唉.刚才优化过头了.判断失误.再来一发

  

子程序名	返回值类型	公开	备 注
文本_逐字分割_快速	整数型		超长文本计算时有优势
参数名	类 型	参考	可空	数组	备 注
参_内容	文本型
参_文本数组	文本型

变量名	类 型	静态	数组	备 注
返回值	文本型

返回值 ＝ 取空白文本 (取文本长度 (参_内容) × 2)
置入代码 ({ 139, 69, 8, 139, 48, 139, 125, 252, 172, 168, 128, 117, 26, 60, 32, 116, 247, 60, 9, 116, 243, 60, 13, 116, 239, 60, 10, 116, 235, 132, 192, 116, 28, 170, 176, 9, 170, 235, 225, 60, 161, 117, 10, 134, 224, 172, 60, 161, 116, 214, 134, 224, 78, 170, 172, 170, 176, 9, 170, 235, 203, 49, 192, 170 })
参_文本数组 ＝ 分割文本 (返回值, 到文本 ({ 9 }), )
返回 (取数组成员数 (参_文本数组))
' mov eax,dword ptr [ebp+08h]  '取参数一地址
' mov esi,dword ptr [eax]
' mov edi ,dword ptr [ebp-04h]  '取变量一地址
' begin:
' lodsb
' test al,10000000b
' jnz addr_cn  '如果是汉字跳
' cmp al,32  '不算空格
' jz begin
' cmp al,9  '不算tab
' jz Begin
' cmp al,13  '不算回车
' jz begin
' cmp al,10
' jz begin
' test al,al  '内容结束
' jz addr_end
' stosb
' mov al,9  '增加分割符
' stosb
' jmp begin
' addr_cn:
' cmp al,161  '中文全角空格
' jnz addr3
' xchg ah,al
' lodsb
' cmp al,161
' jz begin
' xchg ah,al
' dec esi
' addr3:
' stosb
' lodsb
' stosb
' mov al,9
' stosb
' jmp begin
' addr_end:  '文本结束标记
' xor eax,eax
' stosb

.版本 2<br /> <br /> .子程序 文本_逐字分割_快速, 整数型, , 超长文本计算时有优势<br /> .参数 参_内容, 文本型<br /> .参数 参_文本数组, 文本型, 数组<br /> .局部变量 返回值, 文本型<br /> <br /> 返回值 ＝ 取空白文本 (取文本长度 (参_内容) × 2)<br /> 置入代码 ({ 139, 69, 8, 139, 48, 139, 125, 252, 172, 168, 128, 117, 26, 60, 32, 116, 247, 60, 9, 116, 243, 60, 13, 116, 239, 60, 10, 116, 235, 132, 192, 116, 28, 170, 176, 9, 170, 235, 225, 60, 161, 117, 10, 134, 224, 172, 60, 161, 116, 214, 134, 224, 78, 170, 172, 170, 176, 9, 170, 235, 203, 49, 192, 170 })<br /> 参_文本数组 ＝ 分割文本 (返回值, 到文本 ({ 9 }), )<br /> 返回 (取数组成员数 (参_文本数组))<br /> ' mov eax,dword ptr [ebp+08h]  '取参数一地址<br /> ' mov esi,dword ptr [eax]<br /> ' mov edi ,dword ptr [ebp-04h]  '取变量一地址<br /> <br /> ' begin:<br /> ' lodsb<br /> <br /> ' test al,10000000b<br /> ' jnz addr_cn  '如果是汉字跳<br /> <br /> ' cmp al,32  '不算空格<br /> ' jz begin<br /> ' cmp al,9  '不算tab<br /> ' jz Begin<br /> ' cmp al,13  '不算回车<br /> ' jz begin<br /> ' cmp al,10<br /> ' jz begin<br /> ' test al,al  '内容结束<br /> ' jz addr_end<br /> <br /> ' stosb<br /> ' mov al,9  '增加分割符<br /> ' stosb<br /> ' jmp begin<br /> <br /> ' addr_cn:<br /> ' cmp al,161  '中文全角空格<br /> ' jnz addr3<br /> ' xchg ah,al<br /> ' lodsb<br /> ' cmp al,161<br /> ' jz begin<br /> ' xchg ah,al<br /> ' dec esi<br /> ' addr3:<br /> ' stosb<br /> ' lodsb<br /> ' stosb<br /> ' mov al,9<br /> ' stosb<br /> ' jmp begin<br /> <br /> ' addr_end:  '文本结束标记<br /> ' xor eax,eax<br /> ' stosb

墨影0620

汇编大佬666666

菜鸟菜鸡秋水

大佬  都是腰间盘 ，  你为啥这么突出，  厉害了  66666666666666

广告推广秦冷烨

顶顶顶顶顶

leejunjie519

牛B   学习到了

leejunjie519

牛牛啊 ！！！

badlwolf

牛逼啊，支持一个！

UA软件

你可以编译后试试呢  有时候调试跟便宜会有出入

宇智波·奶嘴

感谢指教