[H2] sardine 最速获取下载链接的综合搜索
Posted: 26 Nov 2016, 22:44
为看电影准备的脚本,用最快的速度解析出你最可能要找的下载地址.
第一步,解析常用的搜索网站,包括磁力和电驴网站.
http://www.digbt.org
海盗湾
第一步,解析常用的搜索网站,包括磁力和电驴网站.
http://www.digbt.org
Code: Select all
f:=sardine_cilibaba("西部世界")
MsgBox % ObjTree(f)
sardine_cilibaba(s){
f:=[],p:=[]
f.url:="http://www.digbt.org/search/`%22" uri(s) "`%22-length-1/"
f.Proxy:="127.0.0.1:8008"
f.Decode:=1
oh(f)
for i,n in str_list(f.Decode,"<td class=`"x-item`"","</td></tr>")
{
title:=str_in(n,"<a title=`"","`" class=")
list:= trim(str_in(n,"<ul>","</ul>"),"`n `r`t")
type:="magnet"
btih:=str_in(n,"title`" href=`"/","`">")
File:=str_in(n,"Files: "," Size")
Size:=str_in(n,"Size: "," Downloads:")
link:=str_in(n,"<a class=`"title`" href=`"","`"><span class")
Updated:=str_in(n,"Updated: ","`n")
p.push({title:title,list:list,type:type,file:file,size:size,updated:updated,btih:btih,link:link})
}
Return p
}
Code: Select all
sardine_thepiratebay(s){
f:=[],p:=[]
f.url:="https://thepiratebay.org/search/`%22" uri(s) "`%22"
f.Proxy:="127.0.0.1:8008"
f.Decode:=1
oh(f)
for i,n in str_list(f.Decode,"<td class=`"vertTh`">","</tr>")
{
title:=str_in(n,"Details for ","`">")
Size:=str_in(n,", Size ",",")
Updated:=str_in(n,">Uploaded ",", Size")
link:="magnet" str_in(n,"href=`"magnet","`" title=")
btih:=str_in(link,"btih:","&dn") or substr(link,instr(link,"btih:")+5)
s:=str_list(n,"<td align=`"right`">","</td>")
source:=s.1,
download:=s.2
s:=str_list(n,"More from this category`">","</a>")
type:=s.1,
More:=s.2
p.push({title:title,list:list,type:type,file:file,size:size,updated:updated,btih:btih,link:link,source:source,download:download,more:more})
}
Return p
}