![]() 超级会员
|
|
||
![]() TotalCommder、EveryThing、batch、AutoHotKey、EverEdit 精通Word、Excel、PPT的安装与卸载 熟练掌握VB、C++、SQL的拼读与缩写 |
![]() 高级会员
|
|
||
![]() 热心会员
|
引用:
代码:
# 提取单个小说标题_作者_分类 # 用于下载单本小说或者根据小说url列表下载小说的下载正文阶段 { if ($0 ~ /作者:<a href='\/search\.(aspx|php)\?key=.+' target='_blank'>.+<\/a> 分类:\[.+\] .*/){ # 获取小说标题、作者和分类,并设置已下载完的章节页码(默认为0) str = gensub(/ +(.+) 作者:<a href='\/search\.(aspx|php)\?key=[^']+' target='_blank'>([^<]+)<\/a> 分类:\[(.+)\].*/,"\\1\t0\t\\3\t\\4","g") # 转换各字段中的特殊字符 str = gensub(/\*/,"","g",str) str = gensub(/\?/,"?","g",str) str = gensub(/:/,":","g",str) str = gensub(/\\/,"\","g",str) str = gensub(/\//,"/","g",str) str = gensub(/</,"〈","g",str) str = gensub(/>/,"〉","g",str) str = gensub(/|/,"","g",str) # 把英文感叹号转为中文,防止在批处理中启用变量延迟时丢失感叹号 str = gensub(/!/,"!","g",str) str = gensub(/&/,"&","g",str) # 去除每个字段尾部的点号或空格,以防创建文件夹时不能在尾部包含点号或空格 # 必须有两条一样的语句,才能完整处理在尾部同时包含点号和空格的情形 str = gensub(/[. ]+\t/,"\t","g",str) str = gensub(/[. ]+\t/,"\t","g",str) str = gensub(/[. ]+$/,"","g",str) str = gensub(/[. ]+$/,"","g",str) print str } } |
|||
![]() 今天你尾了吗? |
![]() 热心会员
|
这个不错,对于经常看小说的有福了,谢谢啦
|
||