利用baidu批量下载歌曲歌词并试听.bat

只是为了方便自己,呵呵~不过在线播放的时候那些快进之类的键不起作用,]]> ‘来源：　http://blog.vkill.net/?action=show&id=186     利用baidu批量下载歌曲歌词并试听.bat 只是为了方便自己,呵呵~不过在线播放的时候那些快进之类的键不起作用,在本地到是蛮好用,我现在一直用mplayer.exe听歌,呵呵~命令行下的,爽~~~ @echo off title 歌曲批量下载\试听 ** 歌词批量下载  by:Ye – * ::~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ::变量配置:::::::::::::::::::::::::::::: ::歌曲格式%x%的设置如下,只可设置一种 ::0 mp3;1 rm;2 wma;3 asf;4 ram;5 mid;6 flash;7 mpg;8 avi;9 mpeg;10 rmvb;11 ra set "x=2" ::获取下载地址的个数%down_n%,这样当第一个下载地址失效时还是可以在别的地址下载的 set "down_n=2" ::歌曲歌词同时下载0 ;只下载歌词1 set "q+c=0" ::歌曲试听0 ;歌曲不试听1(当遇到试听+下载的时候先试听然后再开始下载) set "t=1" ::~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ cls if %t%*==0* if not exist mplayer.exe (       echo 缺少文件mplayer.exe       echo 请到h ttp://www1.mplayerhq.hu/MPlayer/releases/win32/MPlayer-mingw32-1.0pre8.zip       echo 或h ttp://yx127.com/mplayer.rar下载,大小7.65M       pause>nul&goto :eof) ::~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ cls ::设置文件关联 Assoc .lrc=lrc Ftype lrc=C:\WINDOWS\system32\notepad.exe %1 ::测试配置:::::::::::::::::::::::::::::: echo %~p0|find /i "Rar$">nul &&(echo 请把本程序解压到文件夹下使用&pause>nul&goto :eof) if not exist wget.exe (echo 缺少文件wget.exe&pause>nul&goto :eof) if not exist sed.exe (echo 缺少文件sed.exe&pause>nul&goto :eof) if not exist music.txt (       echo 缺少文件music.txt,请手动写入       echo.       echo —–music.txt格式如下——————-       echo 天冷就回来       echo 不得不爱       echo ……       echo —————————————–       pause>nul&goto :eof                         ) echo %x%|findstr "[0-9]">nul||call xxx if not %x%==0 if %x:~0,1%==0 call xxx if 11 lss %x% call xxx echo %q+c%|findstr "[0-9]">nul||call xxx if not %q+c%==0 if %q+c:~0,1%==0 call xxx if 1 lss %q+c% call xxx echo %t%|findstr "[0-9]">nul||call xxx if not %t%==0 if %t:~0,1%==0 call xxx if 1 lss %t% call xxx ping -n 1 mp3.baidu.com>nul||(echo 请先检查网络,ping不通h ttp://mp3.baidu.com&pause>nul&goto :eof) findstr . music.txt>nul||(echo music.txt中没有任何歌曲&pause>nul&goto :eof) ::根据%x%自动设置歌曲格式%n_% ::0 mp3;1 rm;2 wma;3 asf;4 ram;5 mid;6 flash;7 mpg;8 avi;9 mpeg;10 rmvb;11 ra if %x%==0 set x_=mp3 if %x%==1 set x_=rm if %x%==2 set x_=wma if %x%==3 set x_=asf if %x%==4 set x_=ram if %x%==5 set x_=mid if %x%==6 set x_=flash if %x%==7 set x_=mpg if %x%==8 set x_=avi if %x%==9 set x_=mpeg if %x%==10 set x_=rmvb if %x%==11 set x_=ra goto test_ok xxx echo 变量配置错误&pause>nul&goto :eof ::~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ :test_ok cd.>xxxx.txt ::开始下载:::::::::::::::::::::::::::::: cls echo ———————————————————- echo 任意键开始下载下列歌曲,继续添加请打开music.txt添加 echo ———————————————————- more<music.txt echo ———————————————————- for /f "tokens=*" %%? in (’sed "s/ //g" music.txt’) do call :start "%%?" del /q/f temp_.txt&del /q/f index.txt cls findstr . xxxx.txt>nul||(del /q/f xxxx.txt&echo 所有歌曲下载完毕&pause>nul&goto :eof) echo 下面几个歌曲没有下载到&type xxxx.txt&del /q/f xxxx.txt&pause>nul&goto :eof :start cls set "p1=http://mp3.baidu.com/m?f=ms^&tn=baidump3^&ct=134217728^&lf=^&rn=^&word=" set "p2=^&lm=" set "n=%~1" ::url_a是直接baidu搜索歌曲的页面 set "url_a=%p1%%n%%p2%%x%" call :wget.bat "%url_a%" index.txt find "抱歉，没有找到与" index.txt>nul &&(echo 抱歉,没有找到于"%n%"相关的MP3内容&>>xxxx.txt echo %n%&ping -n 1 127.1>nul&goto :eof) :下载歌词 if not exist %n%.lrc ( for /f "tokens=2 delims=★" %%? in (’sed -n "/<td width=10px valign=top>1<\/td>/{n;n;n;n;n;n;n;p;}" index.txt ^|sed "s/\x22/★/g"’) do (call :wget.bat "%%?" temp_.txt)   sed -n "/<div class=\x22pad10L\x22>/{n;n;n;n;n;n;n;n;n;n;n;n;n;n;n;n;n;p;}" temp_.txt |sed  "s/<font style=color:#e10900>//g" |sed "s/<\/font>//g" |sed "s/<br>/,/g">>%n%.lrc   echo 歌曲%n%.%x_%的歌词下载完毕                      ) else (echo 歌曲%n%.%x_%的歌词已经存在) ping -n 1 127.1>nul if "%q+c%"=="1" (if "%t%"=="1" goto end_2) :下载歌曲 ::url_b?是有歌曲下载地址的页面 for /l %%~ in (1,1,%down_n%) do (      if exist %n%.%x_% goto end_2      for /f "tokens=2 delims=★" %%? in (’sed -n "/<td width=10px valign=top>%%~<\/td>/{n;n;p;}" index.txt ^|sed "s/\x22/★/g"’) do (       set "url_b%%~=%%?"       call :wget.bat "%%?" temp_.txt                      ) for /f "tokens=6 delims=★" %%! in (’sed -n "/请点击此链接/{n;p;}" temp_.txt ^|sed "s/\x22/★/g"’) do (            if %t%*==0* call :mplayer.bat "%%!"            if %q+c%*==1* goto end_2            echo 正在下载歌曲%n%.%x_%……            ::重复尝试3次,不安静下载(显示下载进度,要想安静下载加上-q参数)            wget –output-document=%n%.%x_% –tries=3 -q "%%!"            echo 歌曲%n%.%x_%下载完毕                                                                                                        )                                  ) :end_2 ping -n 1 127.1>nul goto :eof ::~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ::call *.bat:::::::::::::::::::::::::::::: :wget.bat cd.>%2 wget –output-document=%2 -q "%~1" goto :eof :mplayer.bat cls title mplayer→→%~1 echo. echo ——播放控制—————————————————————– echo                  ← or →         倒退 or 快进 10 seconds echo                  ↑ or ↓         倒退 or 快进 1  minute echo              pgdown or pgup       倒退 or 快进 10 minutes echo                   p or 空格       暂停/播放 (pause movie^) echo            q or ESC or 回车       结束/下一曲 (stop playing and quit program^) echo                   9 or 0          增加/减少音量 echo                   [ or ]          增加/减少播放速度 echo ——————————————————————————– echo. echo ——歌词———————————————————————- type %n%.lrc echo ——————————————————————————– mplayer "%~1">nul goto :eof 标签: bat 附件: 歌曲批量下载试听歌词批量下载.rar   ]]> http://blog.donews.com/520hacker/archive/2007/01/30/1122633.aspx/feed 0 http://blog.donews.com/520hacker/archive/2007/01/09/1111430.aspx http://blog.donews.com/520hacker/archive/2007/01/09/1111430.aspx#comments Tue, 09 Jan 2007 15:23:00 +0000 520hacker http://blog.donews.com/520hacker/archive/2007/01/09/1111430.aspx 离开了陪伴我几个月的座位 离开了一种奇异的心境 搬家了 到了新的办公室 很多岁月都永远的化为记忆 等我回头再去寻找他们的踪迹的时候 却寥然无踪 最近的痕迹是 kk 照下的这张照片 左边是我新买的 5571  右边是看小说用的 触摸屏本本 还有我的手机 茶杯 以及最新的2007台历 凌乱的桌面 最真实的生活阿。。。 ]]> 离开了陪伴我几个月的座位 离开了一种奇异的心境 搬家了 到了新的办公室 很多岁月都永远的化为记忆 等我回头再去寻找他们的踪迹的时候 却寥然无踪 最近的痕迹是 kk 照下的这张照片 左边是我新买的 5571  右边是看小说用的 触摸屏本本 还有我的手机 茶杯 以及最新的2007台历 凌乱的桌面 最真实的生活阿。。。 ]]> http://blog.donews.com/520hacker/archive/2007/01/09/1111430.aspx/feed 0 http://blog.donews.com/520hacker/archive/2007/01/06/1108907.aspx http://blog.donews.com/520hacker/archive/2007/01/06/1108907.aspx#comments Sat, 06 Jan 2007 08:35:00 +0000 520hacker http://blog.donews.com/520hacker/archive/2007/01/06/1108907.aspx mapbar 和 一个博客排行的统计严重影响速度 去掉了。。。 ]]> http://blog.donews.com/520hacker/archive/2007/01/06/1108907.aspx/feed 0 http://blog.donews.com/520hacker/archive/2007/01/03/1107769.aspx http://blog.donews.com/520hacker/archive/2007/01/03/1107769.aspx#comments Wed, 03 Jan 2007 15:31:00 +0000 520hacker http://blog.donews.com/520hacker/archive/2007/01/03/1107769.aspx 关注我的朋友可以关注一下 http://hi.baidu.com/520hacker 3个与我们常用的软件相关的漏洞.可能导致新的网页木马开始流行 2007-01-03 20:37 关注oblog 关注xml-rpc 自己开发客户端小记 2006-12-20 21:47 http://hi.baidu.com/520hacker 3个与我们常用的软件相关的漏洞.可能导致新的网页木马开始流行 2007-01-03 20:37 关注oblog 关注xml-rpc 自己开发客户端小记 2006-12-20 21:47 关注Wiki 深入分析wiki结构 有机会自己弄一个… 2006-12-19 11:23 tanter那里弄来的菜鸟hack全集 很不错.. 2006-12-18 09:46 [转载]让SQL运行得更快 2006-11-28 12:34 ZT,整理的一些SQL注射的东西 2006-11-07 13:05 破解博讯的一次只能发5贴的限制 2006-11-05 23:30   系统启动时至少有一个服务或驱动程序产生错误 解决方法 2006-10-09 16:35 IE出现新的漏洞 目前暂时还没有研究出来具体的攻击方法 2006-09-20 13:02 ]]> http://blog.donews.com/520hacker/archive/2007/01/03/1107769.aspx/feed 0 http://blog.donews.com/520hacker/archive/2007/01/03/1107762.aspx http://blog.donews.com/520hacker/archive/2007/01/03/1107762.aspx#comments Wed, 03 Jan 2007 15:25:00 +0000 520hacker http://blog.donews.com/520hacker/archive/2007/01/03/1107762.aspx 网址：http://www.chinaunix.net/ 简介：中国最大的linux/unix技术社区。  2、itpub 网址：http://www.itpub.net/  简介：有名气的IT技术论坛，看看它的alexa排名就知道有多火了，尤其以数据库技术讨论热烈而闻名。ITPUB论坛的前身是建立在smiling的oracle小组。 3、51cto 网址：http://w]]> 1、chinaunix 网址：http://www.chinaunix.net/ 简介：中国最大的linux/unix技术社区。  2、itpub 网址：http://www.itpub.net/  简介：有名气的IT技术论坛，看看它的alexa排名就知道有多火了，尤其以数据库技术讨论热烈而闻名。ITPUB论坛的前身是建立在smiling的oracle小组。 3、51cto 网址：http://www.51cto.com/ 简介：由国内知名IT门户网站管理团队，获近千万风险投资，于2005年8月正式创立，是国内首家定位于网络技术人员的综合性服务平台，是中国最大的网络技术网站。 4、csdn 网址：http://www.csdn.net/ 简介：于1999年3月成立，是中国最大的软件开发人员网站，社区热心高手众多，并有不少MVP(微软最有价值专家)长期活跃在这里，类似悬赏的积分制度，也使论坛增添不少乐趣。 5、落伍者 网址：http://www.im286.com/  简介：网站站长都应该知道的地方，只是论坛id需要手工审核。 6、蓝色理想 网址：http://www.blueidea.com/  简介：有名的关于网站设计的网站，拥有大量忠实网友。 7、it写作社区 网址：http://www.donews.com/ 简介：一个可以让你的思维活跃起来的地方,在这里it评论人和撰稿人可以找到很多的文字素材。 8、博客堂 网址：http://blog.joycode.com/  简介：众多MVP交流的地方，这里有各类最新技术，只是网站成员采用邀请制，不提供注册或者申请功能。 9、it英雄榜 网址：http://www.itheroes.cn/ 简介：网站以介绍it界人士为主，广大从事it的人员可以从中获取他们的经验。 10、邪恶八进制 网址：http://www.eviloctal.com/  简介：目前为数不多的一个讨论气氛浓厚，技术水平高的网络安全网站，邪恶八进制信息安全团队也是一个管理规范、人员素质高的网络安全小组。 ]]> http://blog.donews.com/520hacker/archive/2007/01/03/1107762.aspx/feed 0 http://blog.donews.com/520hacker/archive/2006/12/09/1093408.aspx http://blog.donews.com/520hacker/archive/2006/12/09/1093408.aspx#comments Sat, 09 Dec 2006 03:46:00 +0000 520hacker http://blog.donews.com/520hacker/archive/2006/12/09/1093408.aspx 网站的发展方向是什么？ 曾经有1段时间我认为，网站的发展方向在于数据量的提升，海量的数据量能促进一个网站的成长。 但后来我才发现，那样太局限。 网站是做个人看的，没有浏览者的海量数据没有它的价值和意义。 而且海量数据也会带来1些负面的东西，比如空间的占用、数据库文件的占用、由于大数据库文件查询和检索所引起的服务器资源占用问题。 当然也有人会说，这些负面因素可以通过扩大服务器容量和进行服务器群集来解决；很抱歉，我这里提出的问题是在资源有限的考虑下的。 这里我提出几种解决方案。 基于 isapi rewrite 的基础上，虚拟html ，不生成 1 建多个小容量数据库 如access  实现集合 2 将数据保存在 xml 中，sqlserver中只保存link 和 keywords 3 more... 本篇文章使用aigaogao Blog软件发布, “我的Blog要备份” ]]> http://blog.donews.com/520hacker/archive/2006/12/09/1093408.aspx/feed 0 http://blog.donews.com/520hacker/archive/2006/12/09/1093407.aspx http://blog.donews.com/520hacker/archive/2006/12/09/1093407.aspx#comments Sat, 09 Dec 2006 03:46:00 +0000 520hacker http://blog.donews.com/520hacker/archive/2006/12/09/1093407.aspx http://www.oswd.org/ http://www.openwebdesign.org/   本篇文章使用aigaogao Blog软件发布, “我的Blog要备份” ]]> http://blog.donews.com/520hacker/archive/2006/12/09/1093407.aspx/feed 5 http://blog.donews.com/520hacker/archive/2006/11/05/1073004.aspx http://blog.donews.com/520hacker/archive/2006/11/05/1073004.aspx#comments Sun, 05 Nov 2006 15:32:00 +0000 520hacker http://blog.donews.com/520hacker/archive/2006/11/05/1073004.aspx 520hacker.com 原创 转载留个链接 本人新手上路 为了防止高手耻笑 具体研究的过程略过 具体方法为 : 用 UltraEditer 打开 Editor.exe  和 boxun.exe 查找 83f8057e25 把 7e 改为 eb 原理为： 把jle 改为直接跳回 好久没研究跟踪和破解了 一些命令都生疏了 ============================ cmp a，b //比较a与b mov a，b //把b的值送给a，使a＝b ret //返回主程序 nop //无作用，英文"no operation"的简写，意思是"do nothing"(机器码90) (解释:ultraedit打开编辑exe文件时看到90，等同于汇编语句nop) call //调用子程序，子程序以ret结尾 je 或jz //若相等则跳(机器码74 或0F84) jne或jnz //若不相等则跳(机器码75或0F85) jmp //无条件跳(机器码EB) jb //若小于则跳 ja //若大于则跳 jg //若大于则跳 jge //若大于等于则跳 jl //若小于则跳 jle //若小于等于则跳 pop xx //xx出栈 push xx //xx压栈 更为详细的指令请查阅汇编书籍。 总结了个爆破无敌口诀 背会此口诀，你将天下无敌 以后慢慢琢磨，仔细体会，收益多多，千万不要错过哦！ 一条（跳）就死，九筒（90）就胡 (对应上面的（2）――修改为nop) 一条（跳）就胡，一饼（EB）伺候 (对应上面的（1）――修改为jmp) 妻死（74）便妻无（75）  爸死（84）便爸无（85）  ]]> http://blog.donews.com/520hacker/archive/2006/11/05/1073004.aspx/feed 0