汇编极速分割文本演示带源码无模块

jr21066

易语言的分割文本速度真的慢.偏偏论坛里经常有人在用这个功能.这几天基本都没抢回帖.一直在折腾这个了.
过程跳过,最后的结果是这样.不能变成一个很完整的模块功能,在使用上有一点点小限制.但我觉得还是有实用价值的.所以放上来测试一下.

附件里是例子,使用要注意的都有注释.这里也说一下.
易所有使用的变量都是要回收的.在结束的时间.所以定义数组时要进行预定义.我加的大.实际可以根据需要设置.每个成员占一个整数的位置.也就是4字节.怕麻烦的就设置大一些.关系不大.
第一句取数组成员数也是完成数组内存分配的.这个没办法去掉了.
过程很简单.给字节集内容.给数组.分隔符暂时没有考虑.如果功能真的实用了.再考虑.
使用字节集也是为了专门处理大文件.起码可以少转换一次.
最后献上不太长的代码..最后要说的是没有模块.源码是使用了汇编_取随机数做演示才用到了模块.

  

窗口程序集名	保 留	保 留	备 注
程序集1

子程序名	返回值类型	公开	备 注
_启动子程序	整数型		本子程序在程序启动后最先执行

变量名	类 型	静态	数组	备 注
文本数组1	文本型		99999999	牵扯内存释放,所以要预分配,只要大于你分割后的数组成员就行
文本内容	字节集			这里是要分割的文本字节集内容,这里将存在数组内容,数组只是一个指针集合
计数器	整数型
行数	整数型
时间1	整数型

取数组成员数 (文本数组1)  ' 程序结束时易会释放所有变量,需要这一句来给数组预申请内存空间
文本内容 ＝ 读入文件 (“R:\Desktop\123.txt”) ＋ { 0 }
' 文本内容2 ＝ 到文本 (文本内容)
如果真 (取字节集长度 (文本内容) ＜ 4)
调试输出 (“文件为空”)

时间1 ＝ 取启动时间 ()
汇编_分割文本 (文本内容, 文本数组1)
调试输出 (“分割用时: ”, 取启动时间 () － 时间1)
调试输出 (“共”, 取数组成员数 (文本数组1), “成员”)
计次循环首 (4, )
行数 ＝ 汇编_取随机数 (1, 取数组成员数 (文本数组1))
调试输出 (行数, 文本数组1 [行数])
计次循环尾 ()
返回 (0)  ' 可以根据您的需要返回任意数值

子程序名	返回值类型	公开	备 注
汇编_分割文本	整数型
参数名	类 型	参考	可空	数组	备 注
参_文本内容	字节集
参_文本数组	文本型

置入代码 ({ 141, 85, 8, 139, 18, 139, 18, 139, 74, 4, 131, 194, 8, 141, 93, 12, 139, 27, 139, 27, 131, 195, 4, 184, 1, 0, 0, 0, 137, 3, 137, 83, 4, 138, 2, 60, 13, 117, 7, 49, 192, 136, 2, 66, 226, 243, 60, 10, 117, 19, 49, 192, 136, 2, 66, 139, 3, 64, 137, 3, 193, 224, 2, 1, 216, 137, 16, 226, 220, 66, 226, 217, 139, 3, 201, 194, 8, 0 })
返回 (0)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 程序集1<br /> <br /> .子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行<br /> .局部变量 文本数组1, 文本型, , "99999999", 牵扯内存释放,所以要预分配,只要大于你分割后的数组成员就行<br /> .局部变量 文本内容, 字节集, , , 这里是要分割的文本字节集内容,这里将存在数组内容,数组只是一个指针集合<br /> .局部变量 计数器, 整数型<br /> .局部变量 行数, 整数型<br /> .局部变量 时间1, 整数型<br /> <br /> 取数组成员数 (文本数组1)  ' 程序结束时易会释放所有变量,需要这一句来给数组预申请内存空间<br /> 文本内容 ＝ 读入文件 (“R:\Desktop\123.txt”) ＋ { 0 }<br /> ' 文本内容2 ＝ 到文本 (文本内容)<br /> .如果真 (取字节集长度 (文本内容) ＜ 4)<br />     调试输出 (“文件为空”)<br /> .如果真结束<br /> <br /> 时间1 ＝ 取启动时间 ()<br /> 汇编_分割文本 (文本内容, 文本数组1)<br /> 调试输出 (“分割用时: ”, 取启动时间 () － 时间1)<br /> 调试输出 (“共”, 取数组成员数 (文本数组1), “成员”)<br /> .计次循环首 (4, )<br />     行数 ＝ 汇编_取随机数 (1, 取数组成员数 (文本数组1))<br />     调试输出 (行数, 文本数组1 [行数])<br /> .计次循环尾 ()<br /> <br /> 返回 (0)  ' 可以根据您的需要返回任意数值<br /> <br /> .子程序 汇编_分割文本, 整数型<br /> .参数 参_文本内容, 字节集<br /> .参数 参_文本数组, 文本型, 数组<br /> <br /> 置入代码 ({ 141, 85, 8, 139, 18, 139, 18, 139, 74, 4, 131, 194, 8, 141, 93, 12, 139, 27, 139, 27, 131, 195, 4, 184, 1, 0, 0, 0, 137, 3, 137, 83, 4, 138, 2, 60, 13, 117, 7, 49, 192, 136, 2, 66, 226, 243, 60, 10, 117, 19, 49, 192, 136, 2, 66, 139, 3, 64, 137, 3, 193, 224, 2, 1, 216, 137, 16, 226, 220, 66, 226, 217, 139, 3, 201, 194, 8, 0 })<br /> 返回 (0)

e4nzat

谢谢，收下了~

う网淅乄

只能换行符?

浪漫伊波啦

谢谢，收下了~.很强大

jr21066

う网淅乄 发表于 2018-9-11 00:30
只能换行符?

先测试吧.其它的分隔符也可以.要另写代码.
如果分隔符太长.就会变慢不少的.

cf2006a

没能 正确取出数据 还是我用法错误！！

cf2006a

mov edx, dword [edx] mov edx, dword [edx]


mov ebx, dword [ebx]
mov ebx, dword [ebx]


请教下为什么要取两次一样的 值



loop Label2 看了下用了三个 循环 那它的结束条件是什么呢

jr21066

cf2006a 发表于 2018-9-11 07:05
mov edx, dword [edx] mov edx, dword [edx]

数值是传址模式.参数也是传址.就加了两次
结束条件是字节集文本内容的长度.
所以你的例子里没有给文本内容加东西.是空的.因为这里的数据将来是直接给文本数组使用的.可以省掉易重新分配内存的过程.

dice1412

建议再加个参数  自定义分割的字符

hellohexiang

千万级别的 如果连续处理 好像容易崩溃 是不是内存没有释放结束？