piratebay.ini

[script]
name=PirateBay.se
source=PirateBay.se
author=chip
modified=Bovski(ASC) 2012/10/19, Bovski 2013/03/03, chip 2016/06/06
enabled=1
version=3
cookie=tpb=1;

[home]
1=https://thepiratebay.org
2=https://thepiratebay.se
3=https://piratenproxy.nl/thepiratebay.org/
4=https://piratenproxy.nl/thepiratebay.se/
5=https://pirateproxy.pe/

[profiles]
all=search/%SEARCH%/%PAGENUM%/99/0
audio=search/%SEARCH%/%PAGENUM%/99/100
video=search/%SEARCH%/%PAGENUM%/99/200
apps=search/%SEARCH%/%PAGENUM%/99/300
games=search/%SEARCH%/%PAGENUM%/99/400

[nextpage]
type=1
initial=0
morepages=/img/next.gif

[code1]
x=findh(x,@data,`searchResult`,`</tr`,`>`,)
z=find(x,@data,`</table>`)
@data=crop(@data,x,z)
@data=decodetext(@data)
@data=vacuum(@data)
@data=replace(@data,`</TD>`,`<!--EOL--></TD>`)
@data=replace(@data,`TiB`,`TB<!--EOS-->`)
@data=replace(@data,`GiB`,`GB<!--EOS-->`)
@data=replace(@data,`MiB`,`MB<!--EOS-->`)
@data=replace(@data,`KiB`,`KB<!--EOS-->`)
@data=replace(@data,` `,` `)
@r=split(@data,`</tr>`)

j=find(9,@home,`/`)
if (j>0) then
    j=-(1)
    hom=mid(@home,1,j)
    homln=len(hom)
end if

start
@q=split(@r,`</td>`,2)
t=array(@q,1)
$page=extract(@i,t,`href="`,`"`)

if (homln>0) then
    $page=&(hom,$page)
else
    $page=&(@home,$page)
end if

@i=find(@i,t,`detLink`)
$name=extract(@i,t,`>`,`</a>`)
k=find(1,t,`/img/dl.gif`)
j=find(1,t,`/img/icon-magnet.gif`)

if (k>j and j>1) then
    @i=findrev(k,t,`<a `)
    $torrent=extract(@i,t,`href="`,`"`)
    k=mid($torrent,1,1)
    j=mid($torrent,1,4)
else
    @i=findrev(j,t,`<a `)
    $torrent=extract(@i,t,`href="`,`"`)
    k=put(`mag`)
    j=put(``)
end if

if (homln>0 and k=`/`)
    $torrent=&(hom,$torrent)
elseif (k!`mag` and j!`http`)
    $torrent=&(@home,$torrent)
end if

@i=find(@i,t,`"detDesc">Uploaded`)
$date=extract(@i,t,` `,`,`)
$size=extract(@i,t,`Size `,`<!--EOS-->`)
$seeds=array(@q,2)
$leeches=array(@q,3)
aloop
[/code1]