All pastes #627826 Raw Edit

Miscellany

public text v1 · immutable
·published 2007-07-20 15:21 UTC
rendered paste body
on *:TEXT:*NEW*RELEASE*:#Vir0n-Pr3: {

  if (%protect.dupe == on) { msg $chan 10 $nick $+ , 4You 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
    set %limitepre 1
    unset %line
    var %strip $strip($2-)
    set %line $read(db.txt,w,* $+ %strip $+ *,1)
    if (%line) {
      set %type $gettok(%line,1,32)
      set %timestamp $duration($calc($ctime - $ctime($deltok(%line,1- $+ $calc($numtok(%line,32) - 2),32)))) 

      if (%type == PRE) {
        set %category $gettok(%line,2,32)
        set %release $deltok(%line,$numtok(%line,32),32)
        set %release $deltok(%release,$numtok(%release,32),32)
        set %release $deltok(%release,1-2,32)
        msg $chan 06::: 11Search 06::. .::15 %release  06::: 7was pred 06:::15 %timestamp ago  06::: 7in 06:::12 %category  06:::
      }
      else {
        set %release $gettok(%line,2,32)
        if (%type == NUKE) {
          set %type %type
          set %why 4 $+ $gettok(%line,3,32)
          set %corn 4
        }
        if (%type == UNNUKE) {
          set %type %type
          set %why 9 $+ $gettok(%line,3,32)
          set %corn 9
        }
        msg $chan 06::: 11Search 06::. .::15 %release  06:::7 was pred 06:::15 %timestamp 06::: %corn $+ was  $+ $upper(%type) $+ D because 06::: %why 06:::
      }
    }
    Else {
      notice %dupe.nick 12::: 4Not found in Data Base 12:::
    }

  }

}