修改MP3文件摘要工具

易语言 2020-06-03 13:29:09

修改MP3文件摘要工具

.计次循环首 (取数组成员数 (数组_文件名), i)
标签_信息.标题 = “开始处理:” + 数组_文件名 [i]
文件 = 读入文件 (目录 + “\” + 数组_文件名 [i])
长度 = 取字节集长度 (文件) - 倒找字节集 (文件, 到字节集 (“TAG”), ) + 1
临时信息 = 取字节集右边 (文件, 长度)
调试输出 (长度, 临时信息, 到文本 (取字节集左边 (临时信息, 3)))
.如果 (取字节集左边 (临时信息, 3) ≠ 到字节集 (“TAG”))
' 标签_信息.标题 = 数组_文件名 [i] + “ 文件信息获取错误!”
到循环尾 ()
.否则
取歌曲信息类 (临时信息)
.如果真 (长度 > 128)
调试输出 (歌曲信息替换 (临时信息), 长度, “sos”)
文件 = 字节集替换 (文件, 取字节集长度 (文件) - (长度 - 128), 长度 - 128, )
.如果真结束
文件 = 字节集替换 (文件, 取字节集长度 (文件) - 128, 128, 歌曲信息替换 (临时信息))
.如果 (写到文件 (目录 + “\” + 数组_文件名 [i], 文件))
' 标签_信息.标题 = 数组_文件名 [i] + “ 处理成功~!!”
.否则
' 标签_信息.标题 = 数组_文件名 [i] + “ 处理失败~!!”