Since orlydb.com no longer is a viable source, I was trying to update this script to PreDB.me. I'm getting parsing errors that I hope someone can help with..
!pretest Mr. Robot returns this
[PreDB.mePreDB.me33 releasesCategoriesMoviesSDHDDiscsTVSDHDDiscsMusicAudioVideosDiscsGamesPCXboxPlaystationNintendoAppsWindowsLinux</a]
14:05 @BoT • [>MacMobileBookseBooksAudio BooksXXXVideosImagesDoxUnknownMr Robot11.7 daysTVHDMr.Robot.S01E09.DIRFIX.1080p.HDTV.x264-TASTETV11.7 daysTVHDMr..Robot.S01E09.1080p.HDTV.x264-TASTETV11.7 daysTVSDMr.Robot.S01E09.HDTV.x264-DEFiNE18.7 days</]
14:05 @BoT • [>MacMobileBookseBooksAudio BooksXXXVideosImagesDoxUnknownMr Robot11.7 daysTVHDMr.Robot.S01E09.DIRFIX.1080p.HDTV.x264-TASTETV11.7 daysTVHDMr..Robot.S01E09.1080p.HDTV.x264-TASTETV11.7 daysTVSDMr.Robot.S01E09.HDTV.x264-DEFiNE18.7 days</]
alias pre {
unset %pre.nn %pre.release %pre.type %pre.data
sockclose pre
set %prel 0
sockopen pre predb.me 80
}
on *:sockopen:pre:{
if ($sockerr) { echo >> Error Connecting... | halt }
else {
sockwrite -n $sockname GET %pre.q HTTP/1.1
sockwrite -n $sockname User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1)
sockwrite -n $sockname Host: predb.me
sockwrite -n $sockname $crlf
}
}
on *:sockread:pre:{
if ($sockerr > 0) return
sockread %read
;echo -a %read
if (class="data isin %read) { set %pre.data 1[ $+ ?14 $+ $striphtml(%read) $+ 1] }
if (class="tl-term isin %read) { set %pre.type 1[10 $+ $striphtml(%read) $+ 1] }
;if (class="p-title isin %read) { set %pre.release 5 $+ $striphtml(%read)
msg %pre.chan %pre.type %pre.release %pre.data
inc %pre.nn
}
if (%pre.nn >= 5) { sockclose pre }
}
alias striphtml {
noop $regsub($1-,/(<(?:.+?)>)/g,$null,%string)
return %string
}
on *:text:!pretest*:#:{
set %pre.chan $chan
unset %pre.q
set %pre.q /?search= $+ $replace($2-,$chr(32),+)
pre
}
on *:input:*:{
if (.pre == $1) {
set %pre.chan $active
unset %pre.q
set %pre.q /?q= $+ $replace($2-,$chr(32),+)
pre
}
}