注意,由于空间不支持显示退格键,需要自己手动补上,方法如上图:
接上篇:
: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" "%%~dp0Lyrics" "C:Lyrics" "d:Lyrics" "C:KwDownloadLyric" "d:KwDownloadLyric" "%%APPDATA%%TencentQQMusicQQMusicLyric" "%%ProgramFiles%%kugoukugou2010lyric" "c:Program FilesTTPlayerLyrics" "d:Program FilesTTPlayerLyrics"
"c:TTPlayerLyrics" "d:TTPlayerLyrics" "^!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?itEH>>%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 甲兵时代,为你服务。