开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

用微信号发送消息登录论坛

新人指南 邀请好友注册 - 我关注人的新帖 教你赚取精币 - 每日签到


求职/招聘- 论坛接单- 开发者大厅

论坛版规 总版规 - 建议/投诉 - 应聘版主 - 精华帖总集 积分说明 - 禁言标准 - 有奖举报

查看: 4470|回复: 15
收起左侧

[易语言纯源码] 汇编版 分割文本到数组 带指定分割符 修复 删前四个问题

[复制链接]
结帖率:97% (31/32)
发表于 2018-9-14 20:05:21 | 显示全部楼层 |阅读模式   福建省福州市
分享源码
界面截图: -
是否带模块: -
备注说明: -
  
子程序名返回值类型公开备 注
汇编_分割文本整数型 返回分割总个数
参数名类 型参考可空数组备 注
参_文本内容文本型
参_文本数组文本型
参_分隔符文本型
置入代码 ({ 139, 85, 8, 139, 18, 139, 93, 12, 139, 27, 131, 195, 4, 199, 3, 1, 0, 0, 0, 137, 83, 4, 139, 77, 16, 139, 9, 138, 41, 138, 10, 128, 249, 0, 116, 25, 56, 233, 117, 18, 56, 106, 1, 116, 13, 198, 2, 0, 66, 255, 3, 139, 3, 137, 20, 131, 235, 227, 66, 235, 224, 201, 194, 12, 0 })
返回 (0)


结帖率:20% (1/5)

签到天数: 28 天

发表于 2021-2-25 13:42:48 | 显示全部楼层   四川省成都市


重复调用 好像会出问题



                                            藏起来的小尾巴,不让你看!  
    回复 支持 反对

    使用道具 举报

    签到天数: 5 天

    发表于 2019-4-6 13:34:52 | 显示全部楼层   安徽省芜湖市
    6666666666
    回复 支持 反对

    使用道具 举报

    结帖率:100% (1/1)
    发表于 2019-4-3 23:15:45 | 显示全部楼层   山东省潍坊市
    导入的数组,一旦被重定义,程序就会自己关闭窗口退出。
    回复 支持 反对

    使用道具 举报

    结帖率:97% (31/32)

    签到天数: 25 天

     楼主| 发表于 2018-9-21 20:18:01 | 显示全部楼层   福建省福州市
    cqfans 发表于 2018-9-21 14:18
    测试方式,不一样,我是不断用数字+分割文本拼接,拼接了十万次,用易语言自带的分割文本,3秒多,用大佬 ...

    找到问题了是 截断文本 导致不能释放的 原因你把 要匹配的文本 写到汇编里再去分割就什么问题都没有了
    回复 支持 反对

    使用道具 举报

    结帖率:97% (31/32)

    签到天数: 25 天

     楼主| 发表于 2018-9-21 15:24:12 | 显示全部楼层   福建省福州市
    本帖最后由 cf2006a 于 2018-9-21 15:32 编辑
    cqfans 发表于 2018-9-21 03:05
      
    子程序名返回值类型公开备 注
    汇编_分割文本整数型 返回分割总个数
    [/quote]
    你数组 下标设置0  当然失败了 我这个要预设 数组下标的你填99999999然后跑  数组√静态
    [e=0].版本 2
    子程序名返回值类型公开备 注
    __启动窗口_创建完毕  
    汇编分割测试 ()
    子程序名返回值类型公开备 注
    汇编分割测试  
    变量名类 型静态数组备 注
    文本数组文本型10000000
    文本文本型 
    i整数型 
    a整数型 
    t整数型 
    取数组成员数 (文本数组)
    调试输出 (“开始准备待分割文本”, 取现行时间 ())
    文本 = “1”
    a = 100000
    计次循环首 (a, i)
    文本 = 文本 + “\”到文本 (i)
    计次循环尾 ()
    调试输出 (取文本长度 (文本) ÷ 1024, “kb”, 取现行时间 ())
    ' 清除数组 (文本数组)
    ' 调试输出 (“1.开始分割文本”, 取现行时间 ())
    ' t = 取启动时间 ()
    ' 文本数组 = 分割文本 (文本, “\”, )
    ' 调试输出 (“1.耗时:” + 到文本 (取启动时间 () - t), 取现行时间 ())
    ' 清除数组 (文本数组)
    ' 调试输出 (“2.开始分割文本”, 取现行时间 ())
    t = 取启动时间 ()
    汇编_分割文本 (文本, 文本数组, “\”)
    调试输出 (“2.耗时:”到文本 (取启动时间 () - t), 取现行时间 ())
    子程序名返回值类型公开备 注
    汇编_分割文本整数型 返回分割总个数
    参数名类 型参考可空数组备 注
    参_文本内容文本型
    参_文本数组文本型
    参_分隔符文本型
    置入代码 ({ 139, 85, 8, 139, 18, 139, 93, 12, 139, 27, 131, 195, 4, 199, 3, 1, 0, 0, 0, 137, 83, 4, 139, 77, 16, 139, 9, 138, 41, 138, 10, 128, 249, 0, 116, 25, 56, 233, 117, 18, 56, 106, 1, 116, 13, 198, 2, 0, 66, 255, 3, 139, 3, 137, 20, 131, 235, 227, 66, 235, 224, 201, 194, 12, 0 })
    返回 (0)


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


    这样可以跑不过关闭调试会出错
    回复 支持 反对

    使用道具 举报

    结帖率:67% (2/3)

    签到天数: 27 天

    发表于 2018-9-21 14:20:07 | 显示全部楼层   重庆市重庆市
    cf2006a 发表于 2018-9-21 13:52
    这么大的文本没试过 不过我这边跑了好多次 10m以内的都没出错

    你那么大文本 看下数组有没有越界了

    没有的,都是很正常的,文本大了直接秒。
    回复 支持 反对

    使用道具 举报

    结帖率:100% (1/1)
    发表于 2018-9-21 14:18:18 | 显示全部楼层   重庆市重庆市
    cf2006a 发表于 2018-9-21 14:05
    每个常量都是满的3万字节 这么多个 用换行分割0毫秒 也没崩溃 15万行 也就是说分割出15万个数组都没 ...

    测试方式,不一样,我是不断用数字+分割文本拼接,拼接了十万次,用易语言自带的分割文本,3秒多,用大佬你的汇编代码分割,直接崩了,我也很纳闷呐,你可以看看我贴出来的代码,逻辑应该没问题,可就是崩了,虽然我不懂汇编,但是,这代码肯定是有bug的
    回复 支持 反对

    使用道具 举报

    结帖率:97% (31/32)

    签到天数: 25 天

     楼主| 发表于 2018-9-21 14:05:59 | 显示全部楼层   福建省福州市
    cqfans 发表于 2018-9-21 02:38
    你用多大的文本测试的,我还没试过

    003.jpg

    每个常量都是满的3万字节 这么多个 用换行分割0毫秒 也没崩溃 15万行 也就是说分割出15万个数组都没崩 你们所谓的大文件那有多大啊  
    回复 支持 反对

    使用道具 举报

    结帖率:97% (31/32)

    签到天数: 25 天

     楼主| 发表于 2018-9-21 13:52:41 | 显示全部楼层   福建省福州市
    D-owl 发表于 2018-9-14 20:26
    待分割文本过大,会直接崩溃、、、

    这么大的文本没试过 不过我这边跑了好多次 10m以内的都没出错

    你那么大文本 看下数组有没有越界了
    回复 支持 反对

    使用道具 举报

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

    本版积分规则 致发广告者

    发布主题 收藏帖子 返回列表

    sitemap| 易语言源码| 易语言教程| 易语言论坛| 诚聘英才| 易语言模块| 手机版| 广告投放| 精易论坛
    拒绝任何人以任何形式在本论坛发表与中华人民共和国法律相抵触的言论,本站内容均为会员发表,并不代表精易立场!
    论坛帖子内容仅用于技术交流学习和研究的目的,严禁用于非法目的,否则造成一切后果自负!如帖子内容侵害到你的权益,请联系我们!
    防范网络诈骗,远离网络犯罪 违法和不良信息举报电话0663-3422125,QQ: 800073686,邮箱:800073686@b.qq.com
    Powered by Discuz! X3.4 揭阳市揭东区精易科技有限公司 ( 粤ICP备12094385号-1) 粤公网安备 44522102000125 增值电信业务经营许可证 粤B2-20192173

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