音乐搜索MP3外链获取播放及歌词同步源码

.如果 (文件是否存在 (取运行目录 () ＋ “\temp\” ＋ 超级列表框1.取标题 (超级列表框1.现行选中项, 1) ＋ 超级列表框1.取标题 (超级列表框1.现行选中项, 0) ＋ “.mp3”) ＝ 真)
时钟1.时钟周期 ＝ 1000
媒体播放1.打开 (取运行目录 () ＋ “\temp\” ＋ 超级列表框1.取标题 (超级列表框1.现行选中项, 1) ＋ 超级列表框1.取标题 (超级列表框1.现行选中项, 0) ＋ “.mp3”)
媒体播放1.播放 (-1, )
.否则
.如果 (写到文件 (取运行目录 () ＋ “\temp\” ＋ 超级列表框1.取标题 (超级列表框1.现行选中项, 1) ＋ 超级列表框1.取标题 (超级列表框1.现行选中项, 0) ＋ “.mp3”, HTTP读文件 (“http://link.hhtjim.com/xiami/” ＋ 超级列表框1.取标题 (超级列表框1.现行选中项, 0) ＋ “.mp3”)) ＝ 真)
.如果真 (媒体播放1.打开 (取运行目录 () ＋ “\temp\” ＋ 超级列表框1.取标题 (超级列表框1.现行选中项, 1) ＋ 超级列表框1.取标题 (超级列表框1.现行选中项, 0) ＋ “.mp3”) ＝ 真)
时钟1.时钟周期 ＝ 1000
媒体播放1.播放 (-1, )
.如果真结束

.否则
信息框 (“获取失败！ 请重试！”, 0, , )
返回 ()
.如果结束

.如果结束
进度条1.最大位置 ＝ 媒体播放1.取总时间 ()
进度条1.可视 ＝ 真
标题 ＝ “正在播放 ” ＋ 超级列表框1.取标题 (超级列表框1.现行选中项, 1) ＋ “ ID: ” ＋ 超级列表框1.取标题 (超级列表框1.现行选中项, 0)
歌词 ()