精易论坛

标题: 分享个刚自己研究的循序轮流分割字节献丑鸟 [打印本页]

作者: 超级菜鸟王 时间: 2015-8-25 00:40
标题: 分享个刚自己研究的循序轮流分割字节献丑鸟
献丑鸟
分享个俺刚研究出来的分割字节集
我知道外面满地都是可俺还是愿意把俺自己研究出来的方式分享希望你们喜欢
-----------------------------请看源码

.版本 2
.支持库 commobj

.子程序分割字节集_循序分割, 整数型, 公开
.参数字节集, 字节集, 可空
.参数文件路径, 文本型, 可空
.参数字节集组, 字节集, 数组
.参数分割字节单位, 整数型
.局部变量快速字节, 快速字节集对象
.局部变量初始数值, 整数型

.如果真 (字节集 ≠ {  } 且文件路径 ≠ “”)
信息框 (“要想俺愉快的合作咋能在字节集与文件路径之间二选一不”, 0, , )
返回 (0)
.如果真结束

.如果真 (字节集 ≠ {  })
快速字节.置字节集 (字节集)
.如果真结束
.如果真 (文件路径 ≠ “”)
快速字节.从文件读 (文件路径)
.如果真结束

初始数值＝到整数 (快速字节.取长度 () ÷ 分割字节单位)
.计次循环首 (初始数值, )
加入成员 (字节集组, 快速字节.取字节集 (0, 分割字节单位))
快速字节.删除字节 (0, 分割字节单位)
.计次循环尾 ()
快速字节.清除字节集 ()
返回 (到整数 (取数组成员数 (字节集组)))

.局部变量 XX, 字节集, , "0"

调试输出 (分割字节集_循序分割 ({ 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10 }, , XX, 4))

输出结果：数组:2{字节集:4{0,1,2,3},字节集:4{4,5,6,7}}

调试输出 (分割字节集_循序分割 (, “D:\桌面\测试.txt”, XX, 4))
输出结果：数组:2{字节集:4{0,1,2,3},字节集:4{4,5,6,7}}

搞定嘎嘎

作者: 梦羽 时间: 2015-8-25 00:42
看看就好

作者: 易语言爱好者小K 时间: 2015-8-25 00:57
不明觉厉~顶一下

作者: 苏烟式 时间: 2015-9-1 13:58
看不懂,学习了

作者: 一杯就醉 时间: 2015-9-23 11:49
不明觉厉~顶一下

作者: yangyangwansui1 时间: 2015-9-28 18:25
不明白啊看来我还得加强学习啊

欢迎光临精易论坛 (https://125.confly.eu.org/)