批处理版MPlayer播放器（甲兵时代原创批处理）（下）

注意，由于空间不支持显示退格键，需要自己手动补上，方法如上图：

接上篇：

批处理版音视频播放器上（甲兵时代原创批处理）

:Bc
cls
COLOR 2F
echo.
call :colour "2E" " 批处理编辑器"
echo.&echo.
call :colour "2E" " ★ 可编写一般的批处理代码，可以复制粘贴和拖入BAT文件查看代码。★"&echo.
call :colour "2E" " ★ 结果mpb.bat在临时文件夹Temp下。变量延迟【SETL】for【FOR】。★"&echo.
call :colour "2E" " ★ 新建【XJ】另存【LC】执行【ZX】打开【DK】C【CMD】退出【Q】。★"&echo.
echo. __________________________________________________________________________
echo.
echo @echo off>"%temp%\mpb.bat"
set var_num=0
:bc_sets
set /a var_num+=1
if !var_num! lss 10 (
call :colour "2C" "BEdit0!var_num!﹥"
set /p "input="
) else (
call :colour "2C" "BEdit!var_num!﹥"
set /p "input="
)

:bc_cl
if /i "!input!"=="c" (
echo.
call :colour "0C" "您已经入命令行提示符界面！返回编辑器请使用【EXIT】命令"
echo.&echo.
set /p input=%~pds0&call :input_sets&CMD /k !input!
echo.
call :colour "0C" "按任意键返回编辑器……"
echo.
pause>nul
echo.
goto bc_sets
)
:bc_hotkey
if /i "!input!"=="setl" (
set input=setlocal enabledelayedexpansion
echo !input!>>"%temp%\mpb.bat"&echo !input!
goto bc_sets
)
if /i "!input!"=="for" (
set "input=for /f "tokens=* delims=" %%%%a in (".") do echo %%%%a"
echo !input!>>"%temp%\mpb.bat"&&echo !input!
goto bc_sets
)
if /i not "!input!"=="q" (
if exist "!input!" (
type "!input!"
echo.
call :colour "0C" "按任意键返回编辑器……"
echo.
pause>nul
echo.
goto bc_sets
)
:xj
if /i "!input!"=="xj" (
del /q /f /s /a "%temp%\_mpb.bat">nul 2>nul
echo @echo off>"%temp%\mpb.bat"
echo echo.>>"%temp%\mpb.bat"
echo echo.>>"%temp%\mpb.bat"
echo echo.>>"%temp%\mpb.bat"
echo ::pause>>"%temp%\mpb.bat"
echo ::exit>>"%temp%\mpb.bat"
goto bc
)
:zx
if /i "!input!"=="zx" (
del /q "%temp%\_mpb.bat">nul 2>nul
echo echo.>>"%temp%\mpb.bat"
echo pause>>"%temp%\mpb.bat"
echo exit>>"%temp%\mpb.bat"
copy "%temp%\mpb.bat" "%temp%\_mpb.bat">nul 2>nul
start "mpb" "%temp%\_mpb.bat"
goto bc_sets
)
:dk
if /i "!input!"=="dk" (
echo pause>>"%temp%\mpb.bat"
echo exit>>"%temp%\mpb.bat"
start "" notepad.exe "%temp%\mpb.bat"
goto bc_sets
)
:lc
if /i "!input!"=="lc" (
set /p mbp=另存为（桌面【ZM】当前【DQ】返回【Q】）：
if /i "!mbp!"=="" goto bc_sets
if /i "!mbp!"=="Q" goto bc_sets
if /i "!mbp!"=="zm" (
echo pause>>"%temp%\mpb.bat"
echo exit>>"%temp%\mpb.bat"
copy "%temp%\mpb.bat" "%USERPROFILE%\桌面"
goto bc_sets
)
if /i "!mbp!"=="dq" (
echo pause>>"%temp%\mpb.bat"
echo exit>>"%temp%\mpb.bat"
copy "%temp%\mpb.bat" "%~pd0"
goto bc_sets
)
echo pause>>"%temp%\mpb.bat"
echo exit>>"%temp%\mpb.bat"
copy "%temp%\mpb.bat" "!mbp!"&goto bc_sets
)
call :input_sets
echo !input!>>"%temp%\mpb.bat"
goto bc_sets
)
goto :eof

:help
cls
COLOR 27
echo.
call :colour "2E" " 使用说明"&echo.
echo. __________________________________________________________________________
echo.
echo ★ 按提示输入后需回车才执行，但播放中使用控制键时一般不需回车。
echo ★ 将（单个）音频、视频文件或文件列表（TXT格式）拖入窗口并回车开始播放。
echo ★ 将（多个）媒体文件拖至程序图标（非窗口）自动生成播放列表并自动播放。
echo ★ 可直接输入盘符、文件夹和文件路径回车播放。
echo ★ 可使用TAB键；可直接回车播放_playlists.txt中的歌曲，但不是每次有效。
echo ★ 可使用URL（http、rtsp、vcd、dvd类）播放网络音乐和设备媒体。
echo ★ 网络音乐存至My Documents\_urlplaylists.txt，需保证URL正确和网络流畅。
echo ★ 使用循环模式需先设置播放列表，且只对当前播放有效。
echo ★ 使用歌词显示，仅窗口输入有效；歌词模式时播放列表中的歌曲不宜多；
echo ★ 可在主界面使用DOS命令、CMD和BAT编辑器，可用【%%mpp%%】调取播放器。
echo ★ 请使用并熟悉全局通用键和播放控制键，可网络搜索音乐和设置定时关机。
echo ★ 本程序默认使用暴风影音自带的MPlayer.exe，须先安装MPlayer(或暴风影音)。
echo ★ 无法播放请手动设置其路径，或%SYSTEMROOT%\MPlayerPath.ini中的路径。
echo ★ 可通过MPlayer的官方网站下载原版MPlayer程序： http://www.mplayerhq.hu
echo ★ MPlayer偶尔会出现一些小故障，与MPlayer有关的更多内容请参考其官方说明。
echo.
echo. __________________________________________________________________________
echo.
pause
call :entry
call :play_sets
call :about
goto :eof
:entry
COLOR 27
cls
echo.
call :colour "2E" " 通用输入键"&echo.
echo. __________________________________________________________________________
call :colour "2F" " 名词 热键 说明"
echo.
echo quit Q 退出\返回上一层；
echo setting S 设置选项；
echo find F 搜索与创建文件列表；
echo cmd C 进入命令行提示符；
echo bat B 进入批处理编辑器；
echo help H 帮助说明；
echo hotkey HK 播放器快捷键说明；
echo option and help OP 播放器命令参数设置说明；
echo repeat and stochastic RS 循环与随机播放；
echo geci GC 歌词模式；
echo background music BM 播放背景音乐；
echo shutdown SD 自动关机设置；
echo cjiabing CB 打开本程序作者空间；
echo bathome BH 打开批处理之家论坛；
echo cn-dos CD 打开中国DOS联盟论坛；
echo mplayerhq MP 打开MPlayer官网主页；
echo. __________________________________________________________________________
call :colour "2E" " [★ 快捷键全局有效，注意看提示。]"&pause
goto hotkey
:hotkey
cls
COLOR 27
echo.
call :colour "2E" " 基本控制键"&echo.
echo. __________________________________________________________________________
echo.
echo p 或 SPACE 或 ^> 暂停播放(按任意键继续)；
echo q 或 ESC 停止播放并退出；
echo pgdown 或 pgup 上一首 / 下一首；
echo down 或 up 快进 / 后退 1 分钟；
echo ] 或 [ 快速播放 / 慢速播放；
echo ) 或 ( 增加或减少音量，每次+/-3%%；
echo * 或 / 增加或减少pcm音量；
echo m 静音；
echo f 全屏；
echo o 循环切换 OSD 模式：无/定位条/定位条+计时器；
echo z 或 x 调整字幕延迟+/-0.1秒；
echo r 或 t 上/下调整字幕位置；
echo 1 或 2 调整对比度；
echo 3 或 4 调整亮度；
echo 5 或 6 调整色调
echo 7 或 8 调整饱和度。
echo. __________________________________________________________________________
call :colour "2E" " [★ 部分控制键可能在特定条件下才有效]"&echo.
echo.
pause
goto :eof
:about
cls
COLOR 27
echo.
call :colour "2E" " 关 于"&echo.
echo. __________________________________________________________________________
echo.
echo ★ 当前版本：批处理版音视频播放器 BatMPlayer V5.3 歌词版。
echo ★ 本程序基于命令行版MPlayer播放器，以批处理的方式运行。
echo ★ MPlayer是一款优秀的开源软件，任何人都可以永久免费安装使用。
echo ★ MPlayer支持各种常见的音频、视频媒体格式，支持网络播放。
echo ★ 本程序为MPlayer添加了一个类似GUI的批处理交互界面。
echo ★ 极大地支持多种输入播放，可以使用快捷键控制播放。
echo ★ 本程序版权归cjiabing所有。免费共享，但不可用于商业与非法目的。
echo ★ 难免存在缺陷，使用须自担风险，欢迎反馈交流。
echo ★ 献给喜欢简单和怀旧的年轻朋友，祝大家生活愉快！
call :colour "2E" " 甲兵时代"&echo.
echo 2010.10.10
echo http://hi.baidu.com/cjiabing
echo. __________________________________________________________________________
echo.
pause
goto start

:play_sets
cls
COLOR 27
echo.
call :colour "2E" " 播放器参数设置说明"&echo.
echo. __________________________________________________________________________
echo.
echo ★ 因MPlayer的设置较复杂，这里只做介绍，具体使用请参照官方说明。
echo ★ 使用说明man_page.html位于MPlayer目录下，是英文的。
echo ★ MPlayer的用户配置位于~/.mplayer/config，可自行配置。
echo ★ 本程序也支持使用自定义的MPlayer命令配置，使用方法如下：
echo ★ 在主界面使用【%%mpp%%】代替MPlayer，遵循MPlayer命令格式。
echo ★ 如指定字幕文件：%%mpp%% -sub ^<somesubtitlefile^> ^<somefile^>
echo ★ 如设置缓存：%%mpp%% -cache 8192 -cache-min 50 -playlist ^<file or url^>
echo.
echo.
echo. __________________________________________________________________________
call :colour "2E" " [★ 更多内容请阅读官方说明]"&echo.
echo.
pause
cls
COLOR 27
echo.
call :colour "2E" " 播放器参数设置说明"&echo.
echo. __________________________________________________________________________
echo.
echo -playlist ^<文件^> 指定播放列表文件
echo -ss ^<位置^> 定位至给定（秒数或时:分:秒 - hh:mm:ss）位置
echo -nosound 不播放声音
echo -fs -vm -zoom 全屏播放选项(fullscr,vidmode chg,softw.scale)
echo -x ^<x^> -y ^<y^> 设置显示的分辨率（用以与 -vm 或 -zoom 一起使用）
echo -vid x -aid y 选择播放视频流（x）和音频流（y）
echo -fps x -srate y 改变视频帧率为 x（fps），音频采样率为 y（Hz）
echo -pp ^<质量^> 启用后期处理过滤器（详见于手册相关页面manpage/docs）
echo -framedrop 启用丢帧（用于运行慢的机器）
echo -vo ^<drv^> 选择视频输出驱动程序（查看驱动程序列表用“-vo help”）
echo -ao ^<drv^> 选择音频输出驱动程序（查看驱动程序列表用“-ao help”）
echo vcd://^<曲目号^> 播放 (S)VCD（超级VCD）曲目（无格式设备，无需装载）
echo dvd://^<标题号^> 从设备而不是从普通文件上播放 DVD 标题
echo -sub ^<文件^> 指定所使用的字幕文件（另见 -subfps、-subdelay）
echo -alang/-slang 选择DVD音轨/字幕的语言(使用两位的国家代码)
echo.
echo. __________________________________________________________________________
call :colour "2E" " [★ 更多内容请阅读官方说明]"&echo.
echo.
pause
cls
COLOR 27
echo. __________________________________________________________________________
echo %%mpp%% ^[options^] ^[ file ^| URL ^| playlist ^| - ^]
echo %%mpp%% ^[global options^] file1 ^[specific options^] ^[file2^] ^[specific options^]
echo %%mpp%% ^[global options^] {group of files and options} ^[group specific options^]
echo %%mpp%% dvd^:^/^/^[title ^| ^[start_title^]-end_title ^] ^[options^]
echo %%mpp%% vcd^:^/^/track^[^/device^]
echo %%mpp%% tv^:^/^/^[channel^] ^[options^]
echo %%mpp%% dvb^:^/^/^[card_number@^]channel ^[options^]
echo %%mpp%% mf^:^/^/filemask ^[-mf options^] ^[options^]
echo %%mpp%% ^[cdda^|cddb^]^:^/^/track^[^:speed^]^[^/device^] ^[options^]
echo %%mpp%% cue^:^/^/file^[^:track^] ^[options^]
echo %%mpp%% ^[file^|mms^[t^]^|http^|http_proxy^|rt^[s^]p^|ftp^|udp^|unsv^]^:^/^/ ^[user^:passwd^@^]URL^[^:port^] ^[options^]
echo %%mpp%% sdp^:^/^/file ^[options^]
echo %%mpp%% mpst^:^/^/host^[^:port^]^/URL ^[options^]
echo %%mpp%% tivo^:^/^/host^/list ^[options^]
echo %%mpp%% tivo^:^/^/host^/llist ^[options^]
echo %%mpp%% tivo^:^/^/host^/fsid ^[options^]
echo gmplayer ^[options^] ^[-skin skin^]
echo mencoder ^[options^] ^[ file ^| URL ^| - ^] ^[-o file^]
echo mencoder ^[global options^] file1 ^[specific options^] ^[file2^] ^[specific options^]
echo. __________________________________________________________________________
call :colour "2E" " [★ 更多内容请阅读官方说明]"&pause
goto :eof

:Lyrics
cd.>%SYSTEMROOT%\Lyrics.bat
echo ^@echo off^&setlocal enabledelayedexpansion>>%SYSTEMROOT%\Lyrics.bat
echo title BatMPlayerMiniLyrics>>%SYSTEMROOT%\Lyrics.bat
echo MODE con: COLS=50 LINES=15>>%SYSTEMROOT%\Lyrics.bat
echo COLOR 2e>>%SYSTEMROOT%\Lyrics.bat
echo :lyrics_path>>%SYSTEMROOT%\Lyrics.bat
echo rem 获取歌词路径>>%SYSTEMROOT%\Lyrics.bat
echo if exist %%SYSTEMROOT%%\MPlayerPath.ini (>>%SYSTEMROOT%\Lyrics.bat
echo for /f "tokens=1,* delims== " %%%%i in (%%SYSTEMROOT%%\MPlayerPath.ini) do if /i "%%%%i"=="lyrc" if exist %%%%~j set "lyrc_way=%%%%j">>%SYSTEMROOT%\Lyrics.bat
echo )>>%SYSTEMROOT%\Lyrics.bat
echo for %%%%a in ("%%~dp0" "%%~dp0\Lyrics" "C:\Lyrics" "d:\Lyrics" "C:\KwDownload\Lyric" "d:\KwDownload\Lyric" "%%APPDATA%%\Tencent\QQMusic\QQMusicLyric\" "%%ProgramFiles%%\kugou\kugou2010\lyric" "c:\Program Files\TTPlayer\Lyrics" "d:\Program Files\TTPlayer\Lyrics" "c:\TTPlayer\Lyrics" "d:\TTPlayer\Lyrics" "^!lyrc_way^!") do if exist %%%%a set var_lyrp=%%%%~a>>%SYSTEMROOT%\Lyrics.bat
echo :lyrics_input>>%SYSTEMROOT%\Lyrics.bat
echo rem 获取输入歌曲文件名>>%SYSTEMROOT%\Lyrics.bat
echo for %%%%x in (^^!input^^!) do if exist "^!var_lyrp^!\%%%%~nx.lrc" (>>%SYSTEMROOT%\Lyrics.bat
echo set var_lyrpone="^!var_lyrp^!\%%%%~nx.lrc">>%SYSTEMROOT%\Lyrics.bat
echo call :lyrics_exist>>%SYSTEMROOT%\Lyrics.bat
echo ) else (call :lyrics_unexist)>>%SYSTEMROOT%\Lyrics.bat
echo ping /n 30 127.0.1^>nul>>%SYSTEMROOT%\Lyrics.bat
echo exit>>%SYSTEMROOT%\Lyrics.bat
echo :lyrics_exist>>%SYSTEMROOT%\Lyrics.bat
echo rem 假设存在与歌曲文件名同名的歌词文件>>%SYSTEMROOT%\Lyrics.bat
echo call :lyrics_head>>%SYSTEMROOT%\Lyrics.bat
echo call :Lyrics_edit>>%SYSTEMROOT%\Lyrics.bat
echo call :lyrics_read>>%SYSTEMROOT%\Lyrics.bat
echo goto :eof>>%SYSTEMROOT%\Lyrics.bat
echo :lyrics_unexist>>%SYSTEMROOT%\Lyrics.bat
echo rem 假设歌曲文件名与歌词文件文件名不同，拆解歌曲文件名并据此搜索歌词>>%SYSTEMROOT%\Lyrics.bat
echo for %%%%m in (^^!input^^!) do (>>%SYSTEMROOT%\Lyrics.bat
echo if not "%%%%~nm"=="-" (>>%SYSTEMROOT%\Lyrics.bat
echo for /f "tokens=1,2,* delims=-- " %%%%x in ("%%%%~nm") do (>>%SYSTEMROOT%\Lyrics.bat
echo if not "%%%%z"=="" for /f "tokens=*" %%%%a in ('dir /a-d /b /s "^!var_lyrp^!\*%%%%~nz*.lrc"') do set var_lyrpone="%%%%a"^&echo ^^!var_lyrpone^^!>>%SYSTEMROOT%\Lyrics.bat
echo if not "%%%%y"=="" for /f "tokens=*" %%%%a in ('dir /a-d /b /s "^!var_lyrp^!\*%%%%~ny*.lrc"') do set var_lyrpone="%%%%a"^&echo ^^!var_lyrpone^^!>>%SYSTEMROOT%\Lyrics.bat
echo if not "%%%%x"=="" for /f "tokens=*" %%%%a in ('dir /a-d /b /s "^!var_lyrp^!\*%%%%~nx*.lrc"') do set var_lyrpone="%%%%a"^&echo ^^!var_lyrpone^^!>>%SYSTEMROOT%\Lyrics.bat
echo )^>nul 2^>nul>>%SYSTEMROOT%\Lyrics.bat
echo )>>%SYSTEMROOT%\Lyrics.bat
echo )>>%SYSTEMROOT%\Lyrics.bat
echo call :lyrics_head>>%SYSTEMROOT%\Lyrics.bat
echo call :Lyrics_edit>>%SYSTEMROOT%\Lyrics.bat
echo call :lyrics_read>>%SYSTEMROOT%\Lyrics.bat
echo goto :eof>>%SYSTEMROOT%\Lyrics.bat
echo ::^&echo ^^!var_lyrpone^^!>>%SYSTEMROOT%\Lyrics.bat
echo :lyrics_head>>%SYSTEMROOT%\Lyrics.bat
echo rem 读取该歌词并显示头部信息>>%SYSTEMROOT%\Lyrics.bat
echo set str_head=0>>%SYSTEMROOT%\Lyrics.bat
echo if exist ^^!var_lyrpone^^! (>>%SYSTEMROOT%\Lyrics.bat
echo for /f "usebackq tokens=1,2,3,* delims=]:.,/=[+-*\#^@" %%%%a in (^^!var_lyrpone^^!) do (>>%SYSTEMROOT%\Lyrics.bat
echo set /a str_head+=^1>>%SYSTEMROOT%\Lyrics.bat
echo if /i "%%%%a"=="ti" call :colour "0d" "歌 曲"^&call :colour "d1" "【%%%%b】"^&echo.>>%SYSTEMROOT%\Lyrics.bat
echo if /i "%%%%a"=="ar" call :colour "0d" "歌 手"^&call :colour "d1" "【%%%%b】"^&echo.>>%SYSTEMROOT%\Lyrics.bat
echo if /i "%%%%a"=="al" call :colour "0d" "专 辑"^&call :colour "d1" "【%%%%b】"^&echo.>>%SYSTEMROOT%\Lyrics.bat
echo if /i "%%%%a"=="by" call :colour "0d" "制 作"^&call :colour "d1" "【%%%%b】"^&echo.>>%SYSTEMROOT%\Lyrics.bat
echo if "^!str_head^!"=="6" call :colour "07" "≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡"^&echo.>>%SYSTEMROOT%\Lyrics.bat
echo if "^!str_head^!"=="5" set str_head5=%%%%d>>%SYSTEMROOT%\Lyrics.bat
echo if "^!str_head^!" gtr "7" goto :eof>>%SYSTEMROOT%\Lyrics.bat
echo )>>%SYSTEMROOT%\Lyrics.bat
echo ) else (>>%SYSTEMROOT%\Lyrics.bat
echo echo.>>%SYSTEMROOT%\Lyrics.bat
echo call :colour "2e" " #"^&call :colour "f4" "没有找到歌词！请检查歌曲或歌词名称！#"^&echo.>>%SYSTEMROOT%\Lyrics.bat
echo ping /n 5 127.0.1^>nul>>%SYSTEMROOT%\Lyrics.bat
echo exit>>%SYSTEMROOT%\Lyrics.bat
echo )>>%SYSTEMROOT%\Lyrics.bat
echo call :colour "07" "≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡"^&echo.>>%SYSTEMROOT%\Lyrics.bat
echo goto :eof>>%SYSTEMROOT%\Lyrics.bat
echo :lyrics_read>>%SYSTEMROOT%\Lyrics.bat
echo rem 呈现歌词>>%SYSTEMROOT%\Lyrics.bat
echo call :colour "04" " →"^&echo, >>%SYSTEMROOT%\Lyrics.bat
echo call :colour "04" " →"^&echo, ^^!str_head5^^!>>%SYSTEMROOT%\Lyrics.bat
echo for /f "usebackq tokens=1-3,* delims=][:." %%%%a in ("%%temp%%\_Lyric.tmp") do (>>%SYSTEMROOT%\Lyrics.bat
echo set vtm=^^!stm^^!>>%SYSTEMROOT%\Lyrics.bat
echo set stm=%%%%a:%%%%b.%%%%c>>%SYSTEMROOT%\Lyrics.bat
echo call :Lyrics_time>>%SYSTEMROOT%\Lyrics.bat
echo if ^^!rvc^^! geq 0 %%SYSTEMROOT%%\sleep.exe %%1^^!rvc^^!^^!rvb^^!^^!rva^^!0-10^>nul 2^&^&call :colour "04" " →"^&echo,%%%%d>>%SYSTEMROOT%\Lyrics.bat
echo )>>%SYSTEMROOT%\Lyrics.bat
echo goto :eof>>%SYSTEMROOT%\Lyrics.bat
echo :Lyrics_time>>%SYSTEMROOT%\Lyrics.bat
echo rem 计算歌词时间差【分、秒、毫秒】>>%SYSTEMROOT%\Lyrics.bat
echo set vtma=1^^!vtm:~-4,1^^!^^!vtm:~-2,2^^!>>%SYSTEMROOT%\Lyrics.bat
echo set vtmb=^^!vtm:~-5,1^^!>>%SYSTEMROOT%\Lyrics.bat
echo set vtmc=^^!vtm:~-8,2^^!>>%SYSTEMROOT%\Lyrics.bat
echo set stma=1^^!stm:~-4,1^^!^^!stm:~-2,2^^!>>%SYSTEMROOT%\Lyrics.bat
echo set stmb=^^!stm:~-5,1^^!>>%SYSTEMROOT%\Lyrics.bat
echo set stmc=^^!stm:~-8,2^^!>>%SYSTEMROOT%\Lyrics.bat
echo if ^^!stma^^! lss ^^!vtma^^! (>>%SYSTEMROOT%\Lyrics.bat
echo set /a rva=1000+^^!stma^^!-^^!vtma^^!^>nul 2^>nul>>%SYSTEMROOT%\Lyrics.bat
echo set /a rvb=^^!stmb^^!-1^>nul 2^>nul>>%SYSTEMROOT%\Lyrics.bat
echo ) else (>>%SYSTEMROOT%\Lyrics.bat
echo set /a rva=^^!stma^^!-^^!vtma^^!^>nul 2^>nul>>%SYSTEMROOT%\Lyrics.bat
echo )^>nul 2^>nul>>%SYSTEMROOT%\Lyrics.bat
echo if ^^!stmb^^! lss ^^!vtmb^^! (>>%SYSTEMROOT%\Lyrics.bat
echo if ^^!stma^^! lss ^^!vtma^^! (set /a rvb=6-^^!vtmb^^!+^^!stmb^^!-1^>nul 2^>nul) else (set /a rvb=6-^^!vtmb^^!+^^!stmb^^!^>nul 2^>nul)>>%SYSTEMROOT%\Lyrics.bat
echo set /a rvc=^^!stmc^^!-^^!vtmc^^!-1^>nul 2^>nul>>%SYSTEMROOT%\Lyrics.bat
echo ) else (if ^^!stma^^! lss ^^!vtma^^! (set /a rvb=^^!stmb^^!-^^!vtmb^^!-1^>nul 2^>nul) else (set /a rvb=^^!stmb^^!-^^!vtmb^^! ^>nul 2^>nul))^>nul 2^>nul>>%SYSTEMROOT%\Lyrics.bat
echo if ^^!stmc^^! geq ^^!vtmc^^! if ^^!stmb^^! geq ^^!vtmb^^! set /a rvc=^^!stmc^^!-^^!vtmc^^!^>nul 2^>nul>>%SYSTEMROOT%\Lyrics.bat
echo goto :eof>>%SYSTEMROOT%\Lyrics.bat
echo :colour>>%SYSTEMROOT%\Lyrics.bat
echo rem 呈现颜色>>%SYSTEMROOT%\Lyrics.bat
echo pushd "%%temp%%">>%SYSTEMROOT%\Lyrics.bat
echo ^>"%%~2",set/p= ^<nul>>%SYSTEMROOT%\Lyrics.bat
echo findstr /a:%%~1 .* "%%~2*">>%SYSTEMROOT%\Lyrics.bat
echo del "%%~2">>%SYSTEMROOT%\Lyrics.bat
echo popd>>%SYSTEMROOT%\Lyrics.bat
echo goto :eof>>%SYSTEMROOT%\Lyrics.bat
echo :Lyrics_edit>>%SYSTEMROOT%\Lyrics.bat
echo rem 处理歌词>>%SYSTEMROOT%\Lyrics.bat
echo cd.^>"%%temp%%\_Lyric.tmp">>%SYSTEMROOT%\Lyrics.bat
echo cd.^>"%%temp%%\_Lyrics.tmp">>%SYSTEMROOT%\Lyrics.bat
echo for /f "usebackq tokens=1-9,* delims=][:." %%%%a in (^^!var_lyrpone^^!) do (>>%SYSTEMROOT%\Lyrics.bat
echo if "%%%%a%%%%b%%%%c" lss "707000" if "%%%%a%%%%b%%%%c" gtr "000000" echo [%%%%a:%%%%b.%%%%c] %%%%d %%%%e %%%%f %%%%g %%%%h %%%%i %%%%j>>%SYSTEMROOT%\Lyrics.bat
echo if "%%%%a%%%%b%%%%c" lss "707000" if "%%%%a%%%%b%%%%c" gtr "000000" if "%%%%d%%%%e%%%%f" lss "707000" if "%%%%d%%%%e%%%%f" gtr "000000" echo [%%%%d:%%%%e.%%%%f] %%%%g %%%%h %%%%i %%%%j>>%SYSTEMROOT%\Lyrics.bat
echo if "%%%%a%%%%b%%%%c" lss "707000" if "%%%%a%%%%b%%%%c" gtr "000000" if "%%%%d%%%%e%%%%f" lss "707000" if "%%%%d%%%%e%%%%f" gtr "000000" if "%%%%g%%%%h%%%%i" lss "707000" if "%%%%g%%%%h%%%%i" gtr "000000" echo [%%%%g:%%%%h.%%%%i] %%%%j>>%SYSTEMROOT%\Lyrics.bat
echo )^>^>"%%temp%%\_Lyric.tmp">>%SYSTEMROOT%\Lyrics.bat
echo for /f "usebackq tokens=1* delims=]" %%%%a in ("%%temp%%\_Lyric.tmp") do (>>%SYSTEMROOT%\Lyrics.bat
echo set var_lyrtmp=%%%%b>>%SYSTEMROOT%\Lyrics.bat
echo for /l %%%%i in (0,1,9) do set var_lyrtmp=^^!var_lyrtmp:%%%%i=^^!>>%SYSTEMROOT%\Lyrics.bat
echo echo %%%%a] ^^!var_lyrtmp^^!>>%SYSTEMROOT%\Lyrics.bat
echo )^>^>"%%temp%%\_Lyrics.tmp">>%SYSTEMROOT%\Lyrics.bat
echo cd.^>"%%temp%%\_Lyric.tmp">>%SYSTEMROOT%\Lyrics.bat
echo sort "%%temp%%\_Lyrics.tmp"^>^>"%%temp%%\_Lyric.tmp">>%SYSTEMROOT%\Lyrics.bat
echo goto :eof>>%SYSTEMROOT%\Lyrics.bat
goto :eof

:sleep
del %SYSTEMROOT%\sleep.com,sleep.exe>nul 2>nul
:: Sleep.bat - Sleep/Delay/Wait n seconds
:: Herbert Kleebauer(Germany) - 2005/05/29
:: Modified by Will Sort - 2005/06/02, 07-25
echo q | debug>nul
echo Bj@jzh`0X-`/PPPPPPa(DE(DM(DO(Dh(Ls(Lu(LX(LeZRR]EEEUYRX2Dx=>%SYSTEMROOT%\sleep.com
echo 0DxFP,0Xx.t0P,=XtGsB4o@$?PIyU WwX0GwUY Wv;ovBX2Gv0ExGIuht6>>%SYSTEMROOT%\sleep.com
echo T}{z~~@GwkBG@OEKcUt`~}@MqqBsy?seHB~_Phxr?@zAB`LrPEyoDt@Cj?>>%SYSTEMROOT%\sleep.com
echo pky_jN@QEKpEt@ij?jySjN@REKpEt@jj?jyGjN@SEKkjtlGuNw?p@pjirz>>%SYSTEMROOT%\sleep.com
echo LFvAURQ?OYLTQ@@?~QCoOL~RDU@?aU?@{QOq?@}IKuNWpe~FpeQFwH?Vkk>>%SYSTEMROOT%\sleep.com
echo _GSqoCvH{OjeOSeIQRmA@KnEFB?p??mcjNne~B?M??QhetLBgBPHexh@e=>>%SYSTEMROOT%\sleep.com
echo EsOgwTLbLK?sFU`?LDOD@@K@xO?SUudA?_FKJ@N?KD@?UA??O}HCQOQ??R>>%SYSTEMROOT%\sleep.com
echo _OQOL?CLA?CEU?_FU?UAQ?UBD?LOC?ORO?UOL?UOD?OOI?UgL?LOR@YUO?>>%SYSTEMROOT%\sleep.com
echo dsmSQswDOR[BQAQ?LUA?_L_oUNUScLOOuLOODUO?UOE@OwH?UOQ?DJTSDM>>%SYSTEMROOT%\sleep.com
echo QTqrK@kcmSULkPcLOOuLOOFUO?hwDTqOsTdbnTQrrDsdFTlnBTm`lThKcT>>%SYSTEMROOT%\sleep.com
echo @dmTkRQSoddTT~?K?OCOQp?o??Gds?wOw?PGAtaCHQvNntQv_w?A?it\EH>>%SYSTEMROOT%\sleep.com
echo {zpQpKGk?Jbs?FqokOH{T?jPvP@IQBDFAN?OHROL?Kj??pd~aN?OHROd?G>>%SYSTEMROOT%\sleep.com
echo Q??PGT~B??OC~?ipO?T?~U?p~cUo0x>>%SYSTEMROOT%\sleep.com
%SYSTEMROOT%\sleep.com>%SYSTEMROOT%\sleep.exe
del %SYSTEMROOT%\sleep.com
start "" "%ComSpec%" /k "!var_sleep!"
exit

本篇为原创，转载请注明出处。http://hi.baidu.com/cjiabing甲兵时代，为你服务。