rendered paste bodyon *:TEXT:!dupe*:#: {
if (%protect.dupe == on) { msg $chan $nick $+ , You need wait 15secounds for do it again }
if ((%protect.dupe == off) || (%protect.dupe == $null)) {
set %protect.dupe on
timer 1 20 /unset %protect.dupe
set %dupe.nick $Nick
var %x = $lines(DB.txt)
var %limitedupe = 1
while ((%x >= 1) && (%limitedupe <= 20)) {
var %line = $read(DB.txt,%x)
if (* $+ $2- $+ * iswm %line) {
if (%send.msg.see == $null) {
notice %dupe.nick 15..:: 0Results in PVT ::..
set %send.msg.see on
timer 1 10 unset %send.msg.see
}
if (%send.msg.see != $null) {
var %type = $gettok(%line,1,32)
var %timestamp = $duration($calc($ctime - $ctime($deltok(%line,1- $+ $calc($numtok(%line,32) - 2),32))))
inc %limitedupe
if (%type == PRE) {
var %category = $gettok(%line,2,32)
var %release = $deltok(%line,$numtok(%line,32),32)
var %release = $deltok(%release,$numtok(%release,32),32)
var %release = $deltok(%release,1-2,32)
msg $nick .:: 0Search ::. .::0 %release ::. 7was pred .::0 %timestamp ago ::. 7in .::0 %category ::.
}
else {
var %release = $gettok($read(DB.txt,%x),2,32)
if (%type == NUKE) {
var %type = %type
var %why = 4 $+ $gettok($read(DB.txt,%x),3,32)
var %cor = 4
}
if (%type == UNNUKE) {
var %type = %type
var %why = 9 $+ $gettok($read(DB.txt,%x),3,32)
var %cor = 9
}
msg $nick .:: 0Search ::. .::0 %release ::.7 was pred .::0 %timestamp ::. %cor $+ was $+ $upper(%type) $+ D because .:: %why ::.
}
}
}
dec %x
}
}
}
on *:TEXT:!pre*:#: {
var %x = $lines(DB.txt)
var %limitepre = 1
while ((%x >= 1) && (%limitepre <= 1)) {
var %line = $read(DB.txt,%x)
if (* $+ $2- $+ * iswm %line) {
var %type = $gettok(%line,1,32)
var %timestamp = $duration($calc($ctime - $ctime($deltok(%line,1- $+ $calc($numtok(%line,32) - 2),32))))
inc %limitepre
if (%type == PRE) {
var %category = $gettok(%line,2,32)
var %release = $deltok(%line,$numtok(%line,32),32)
var %release = $deltok(%release,$numtok(%release,32),32)
var %release = $deltok(%release,1-2,32)
msg $chan .:: 0Search ::. .::0 %release ::. 7was pred .::0 %timestamp ago ::. 7in .::0 %category ::.
}
else {
var %release = $gettok($read(DB.txt,%x),2,32)
if (%type == NUKE) {
var %type = %type
var %why = 4 $+ $gettok($read(DB.txt,%x),3,32)
var %cor = 4
}
if (%type == UNNUKE) {
var %type = %type
var %why = 9 $+ $gettok($read(DB.txt,%x),3,32)
var %cor = 9
}
msg $chan .:: 0Search ::. .::0 %release ::.7 was pred .::0 %timestamp ::. %cor $+ was $+ $upper(%type) $+ D because .:: %why ::.
}
}
dec %x
}
}