批处理之家 - Powered by Discuz! Board

标题: [其他] BAT+VBS音乐播放器（彩色歌词+自动下载） [打印本页]

作者: netbenton 时间: 2012-9-15 04:19 标题: BAT+VBS音乐播放器（彩色歌词+自动下载）

批处理音乐播放器
多彩（移动鼠标可见）动态歌词显示，自动下载歌词，
使用方法：
拖曳音乐文件到BAT文件上开始播放
或者打开后按回车键再输入音乐文件

按键    功能

空格键    暂停/继续
上，下键快退/快进
左，右键音量: 小/大
Esc键    退出（直接关闭窗口也可以）
Page Up/Down 如果歌词不正确，有多个选择时，手动选择下载歌词
8  /  2 键  上或下一首歌曲
"c”键    锁定显示的颜色
"d"键       打开正在使用的歌词文件
Del键    删除当前正在使用歌词文件，并重新下载
Enter       添加歌曲文件或歌曲目录或歌曲列表
"s"键    重新搜索本在歌词环境
[Tab]键切换歌词显示方式（居中/右/左）

注：循环播放
播放时移动鼠标，可以实时改变颜色
模拟的卡拉OK歌词效果
打开音乐文件播放时，自动在.\lrcs目录或者搜索后的环境中找歌词，找不到时会自动网上下载并保存到.\lrcs。

该播放器文件列表如下（只有3个）：
gui2.bat  BAT主程序，实现主体功能，文件调度
gui4.vbs  VBS子程序，实现下载和音乐播放功能
syxq.com 16位的com小过程，实现彩色显示，按键、鼠标功能

2012-9-14首发，
2012-9-15更新，歌词下载不正确时，按Page Up/Down 选择下载。
2012-9-17更新，修正了，输入的路径中含有双引号的错误。并开启了列表播放功能，
         按键 8 / 2 为上一首和下一首。
2012-9-19更新，修正一些Bug, 增加按 "c" 键可以锁定/活动颜色，歌曲可以目录加入，列表文件加入，或单文件加入。
         按"Del"键，重新下载歌词，按 "d“ 键打开正在使用的歌词。
2012-9-22更新，修正了一些Bug，增加按 "s"键重新搜索本在歌词环境；增加了按[Tab]键切换歌词显示方式（居中/右/左）。

下载地址：
- - - - - - * - - - - - - - - - - - - - - - - - - - - - - - - - - - * - - - - - - - -
BAT音乐播放器链接: https://pan.baidu.com/s/1MmdV3Gd0rtBVd7Z1BoV4CQ?pwd=debh
- - - - - * - - - - - - - - - - - - - - - - - - - - - - - - - - - - * - - - - - - - -

作者: cjiabing 时间: 2012-9-15 11:12

不得不服，超强悍！~

作者: plp626 时间: 2012-9-15 14:42

批处理都快无所不能了...

syxq.com 语法很恶劣，仅开发者比较熟悉；

什么时候升级为32位的，支持表达式语句呢？

作者: holucan 时间: 2012-9-15 16:18

呵呵，批处理也行能弄到这地步，真的是强！

作者: cutebe 时间: 2012-9-15 17:14

歌词下错，能不能换下阿

作者: netbenton 时间: 2012-9-16 12:04

回复 5# cutebe
谢谢提议，已经加入选择歌词文件控制

作者: netbenton 时间: 2012-9-16 12:06

回复 3# plp626

要是有人需要，就慢慢做，无人用就不搞了

作者: Demon 时间: 2012-9-16 21:48

批处理都快无所不能了...

syxq.com 语法很恶劣，仅开发者比较熟悉；

什么时候升级为32位的，支持表达 ...
plp626 发表于 2012-9-15 14:42

先把需要的功能用其他语言实现，再用批处理调用一下，的确是无所不能。

作者: wosliming 时间: 2012-9-17 18:40

在我的电脑上实现不了，不知道为什么，貌似是vbs启动不了，没法

作者: holucan 时间: 2012-9-18 00:46

呵呵，在繁体语言的环境里头画面是乱码，虽然能播放，
当然不能有中文的目录？不然无法播放？
如图：

作者: h2ngnd 时间: 2012-9-18 12:05

好東西就是太棒了
技術+1

作者: netbenton 时间: 2012-9-19 18:27

答wosliming ：你没有拖入文件吧，或者按回车后再拖入文件

答holucan ：繁体呀，没用过，不知道是怎么回事。

又做了一点更新。
修正一些Bug, 增加按 "c" 键可以锁定/活动颜色，歌曲可以目录加入，列表文件加入，或单文件加入。
请下载一楼的，wsh03.rar是最新的

作者: lky216 时间: 2012-9-20 12:09

很好很强大。

作者: shenlong 时间: 2012-9-22 18:42

多谢楼主分享。

作者: netbenton 时间: 2012-9-22 19:51

本帖最后由 netbenton 于 2012-10-2 09:38 编辑

2012-9-22更新，
修正了一些Bug，增加按 "s"键重新搜索本在歌词环境；
增加了一键[Tab]切换歌词显示方式（居中/居右/居左）。
BAT音乐播放器.rar 是最新的。

10月1日，增加了可以多文件拖拽，并生成默认播放列表。下次直接打开时自动播放。

作者: web 时间: 2012-10-16 21:15

批处理的无限发挥很好

作者: ozzw11411o 时间: 2012-11-8 20:46

看看，好强大！！！！！！！！！！

作者: 25点的眼睛 时间: 2012-11-24 23:48

樓主強大!!!!!膜拜！！！

作者: martin0221 时间: 2013-1-9 10:48

太强大了，学习了。

作者: Allen灬煒 时间: 2013-1-12 19:18

看看怎么样~

作者: qrd8008 时间: 2013-1-20 10:13

回复 1# netbenton

BAT音乐播放器

作者: qq692172929 时间: 2013-1-20 23:34

发现小错误
文件拖入无反应，

作者: tcbwltcb 时间: 2013-1-21 13:26

我要下，好好玩！

作者: gavinchou 时间: 2013-2-2 20:59

呃，64位的不能用，可惜了呃

作者: houg 时间: 2013-3-15 22:39

技术了得，界面很炫，感觉非常棒！

作者: T.L 时间: 2013-3-16 13:21

支持一下，很厉害学习

作者: kisssprite 时间: 2013-3-16 19:37

NB!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

作者: 522235677 时间: 2013-4-3 10:49

This version of C:\Users\Admin\Desktop\syxq.com is not compatible with the versi
on of Windows you're running. Check your computer's system information to see wh
ether you need a x86 (32-bit) or x64 (64-bit) version of the program, and then c
ontact the software publisher.

作者: 路随梦寻 时间: 2013-4-20 11:42

呵呵，批处理也行能弄到这地步，真的是强！:

作者: 狱渊 时间: 2013-4-29 15:53

回复 1# netbenton

好强悍啊厉害支持你

作者: hugreen 时间: 2013-7-6 09:10

膜拜大牛很实用、很炫

作者: hao707789 时间: 2013-9-2 08:20

牛X，可是我的电脑换成64位操作系统了，表示不支持啊

作者: ww0000 时间: 2013-9-17 10:34

我下了说是木马!!

作者: yefeng007520 时间: 2013-10-24 15:20

下载试试俺的机子可以，支持一个。。。。

作者: Mdroid.cn 时间: 2013-11-5 17:38

看看。。。。

作者: 919141923 时间: 2013-11-9 12:51

提几点建议：
1 好像有时候会出现9楼的情况，找不到文件gui0001.txt，可以把第一行的@echo off &SETLOCAL ENABLEDELAYEDEXPANSION
改成
@echo off 2>nul 3>nul&SETLOCAL ENABLEDELAYEDEXPANSION
2 Enter键添加歌曲文件或歌曲目录或歌曲列表会留下一行字，建议在第103行(set /p name=输入播放歌曲：的下面)添加cls命令
3 当歌词含有既不是中文也不是英文的字符时会变成一堆问号
下面这张图体现了以上3种情况

4 当文件名含有括号时会这样

当然此时我已echo on,否则什么也看不到
刚才想到了解决方法，把38行的set "zzzz=%* 改成call :setzzzz ""%*""，再在下面建一个标签，内容是
:setzzzz
for /f "delims=" %%1 in (%*) do set "zzzz=%%~1
goto :eof
这样就不会了
5 当列表只有一首歌时播完就停了，不能重复播放。但是当播放列表有几首歌时就会循环播放，不知什么原因
总体来说这个播放器已经做得很好了，但如果能克服这些问题就更好了

作者: suimengsuiai 时间: 2014-3-10 23:13

进度一直停留在0%

作者: 1042058509 时间: 2014-5-12 19:21

太好了，太好了

作者: hnqx 时间: 2014-6-9 10:57

下载测试帮助改进

作者: m91opse 时间: 2018-4-28 01:02

大哥，有win系统 64位版的吗？这个版本的批处理，不支持64位系统

作者: m91opse 时间: 2018-4-28 01:04

大哥，这个版本不支持64位系统，可以搞个支持64位系统的。哈哈就完美了。

作者: a6513375 时间: 2018-9-15 19:20

樓主強大!!!!!膜拜！！！
不过最好把syxq.com换成32位的。

作者: chf0121 时间: 2019-1-7 09:56

这个真的很强

欢迎光临批处理之家 (http://bathome.net./)