一个自动获取歌词的脚本

lastart

用起来还是很方便的,

2. #!/bin/bash
3. #Usage: getlrc 歌名 [歌手 [专辑]]
4. #   or: getlrc mp3文件名 [歌手 [专辑]]
5. #可以设置mp3文件关联, 就可以直接用它"打开"mp3文件, 下载歌词
6. #要求gnome-terminal, wget
7. #lrcdir可能要适当修改.
8. #by lastart@linuxisr
9. export LC_CTYPE=zh_CN.GBK
10. if [ "$TERM" == dumb ]
11. then
12.         gnome-terminal -x "$0" "$@"
13.         exit
14. fi
16. logfile=/dev/null
17. result=/tmp/a.htm
18. cookies=/tmp/lrc_cookies
19. list="/tmp/lrclist"
20. lrcdir="$HOME/music/lyrics"
21. lrcfile="${1%.mp3}"
22. if [ "$lrcfile" == "$1" ]
23. then
24.         lrcfile="$lrcdir/$lrcfile"
25. fi
26. gm="`basename "$lrcfile"`"
27. gm="${gm// /+}"
28. gm="${gm//_/+}"
29. zj="${3// /+}"
30. gs="${2// /+}"
31. if [ ! -f $cookies ]
32. then
33.         wget -o $logfile -O $logfile --keep-session-cookies --save-cookies=$cookies http://www2.5ilrc.com/souge1.asp
34. fi
35. searchanddown()
36. {
37. wget -o $logfile -O $result --load-cookies=$cookies --post-data='gm='"$gm"'&zj='"$zj"'&search=1&gs='"$gs" --referer="http://www2.5ilrc.com/souge1.asp" http://www2.5ilrc.com/souge1.asp
38. echo -e "No.\t歌名\r\t\t\t专辑\r\t\t\t歌手\r\t\t\t\t\t上传者\r\t\t\t\t\t\t\t下载\t更新时间"
39. riphtm "$result"
40. echo -n "下载序号(r重搜):"
41. read -t 10 xh
42. if [ -z "$xh" ]
43. then
44.         xh=1
45. elif [ "$xh" == "r" ]
46. then
47.     echo "输入歌名:"
48.     read gm
49.     echo "输入歌手:"
50.     read gs
51.     echo "输入专辑:"
52.     read zj
53.     searchanddown
54.     exit
56. fi
57. did=`awk 'FNR=='"$xh"' {print}' /tmp/lrclist`
58. id=`echo $did|sed 's/.*ID=//;s/&.*$//'`
59. if [ -z "$id" ]
60. then
61.         exit
62. fi
63. #wget -O c.htm --load-cookies=/tmp/lrc_cookies --referer="http://www2.5ilrc.com/souge1.asp" http://www2.5ilrc.com/gqShow.asp?ID=239786
64. if wget -o $logfile -O "$lrcfile".lrc --load-cookies=$cookies --referer="http://www2.5ilrc.com/$did" --post-data="id_gc=$id" http://www2.5ilrc.com/downlrc.asp
65. then
66.         echo download lyric successful
67.         sleep 2
68.         exit
69. fi
70. }
71. searchanddown

复制代码

下面是riphtm

2. #!/usr/bin/awk -f
3. BEGIN{RS="<[Tt][Rr]>";FS="</[tT][Dd]>";i=1;printf("")>"/tmp/lrclist"}
4. /点击，查看lrc格式歌词/ {lj=$1;
5.         gsub(".*href="","",lj);
6.         gsub("" target.*$","",lj);
7.         gm=$1;
8.         gsub("[ \n\r\t]*<[^>]*>[\n\r \t]*","",gm)
9.         zj=$2;
10.         gsub("[ \n\r\t]*<[^>]*>[\n\r \t]*","",zj)
11.         gs=$3;
12.         gsub("[ \n\r\t]*<[^>]*>[\n\r \t]*","",gs)
13.         sj=$4;
14.         gsub("[ \n\r\t]*<[^>]*>[\n\r \t]*","",sj)
15.         xz=$5;
16.         gsub("[ \n\r\t]*<[^>]*>[\n\r \t]*","",xz)
17.         scz=$6
18.         gsub("[ \n\r\t]*<[^>]*>[\n\r \t]*","",scz)
19.         print i".\t" gm"\r\t\t\t"zj"\r\t\t\t"gs"\r\t\t\t\t\t"scz"\r\t\t\t\t\t\t\t"xz"\t"sj;
20.         print lj >"/tmp/lrclist";
21.         i++;
22. }

复制代码

redalx

不错，回家的时候试试。

mwmb2

请问楼主，我把这两个脚本分别保存为两个文件，然后让可以成为可执行文件。但是运行起来还是有很多错误。楼主可否把这两个脚本需要的实验环境详细的说明一下。多谢楼主。