Stuff

on *:TEXT:!dupe*:#: {
notice $nick ..::0 Results in PVT1 ::....
var %x = $lines(DB.txt)
var %limitedupe = 1
%nick = $nick
    while ((%x >= 1) && (%limitedupe <= 20)) {
      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 %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
    }
if (%limitedupe == 1) {msg %nick ..::0 Not found in the Data Base1 ::..}
  }

on *:TEXT:!pre*:#: {
var %x = $lines(DB.txt)
var %limitepre = 1
%chan = $chan
    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
    }
if (%limitepre == 1) {msg %chan ..::0 Not found in the Data Base1 ::..}
  }