简易的易语言MP3分割器

.如果真 (是否已取位置 ＝ 真)
文件号 ＝ 打开文件 (分割文件 [1], #读写, #无限制)
文件长度 ＝ 取文件长度 (文件号)
移动读写位置 (文件号, #文件首, 文件长度 ÷ 100 × 分割变量 [1])
临时文本 ＝ 读入字节集 (文件号, 文件长度 ÷ 100 × (分割变量 [2] － 分割变量 [1]))
.如果 (取字节集长度 (临时文本) ＝ 0)
信息框 (“读取数据错误，请重试!”, #错误图标, “提示...”)
.否则
通用对话框.类型 ＝ 1
通用对话框.过滤器 ＝ “音乐文件|*.mp3”
通用对话框.默认文件后缀 ＝ “MP3”
.如果真 (通用对话框.打开 ())
分割文件 [2] ＝ 通用对话框.文件名
.如果真 (写到文件 (分割文件 [2], 临时文本))
信息框 (“分割并保存成功！”, #信息图标, “提示...”)
按钮_止点.禁止 ＝ 真
按钮_开始分割.禁止 ＝ 真
.如果真结束

.如果真结束

.如果结束
关闭文件 (文件号)