Anonymous

on *:text:!group*:#testes5:{
  msg $chan 0[14Group00] 00 $+ $2 $+  (Searching...)
  set %group.nick $2
  var %x = $lines(db.txt)
  var %z = $lines(db.txt)
  var %c = $lines(db.txt)
  var %Releases
  var %Nuke
  var %UnNuke
  if ($1 == !group) {
    while (%x >= 1) {
      var %line = $read(db.txt,%x)
      if ((* $+ PRE $+ * iswm %line) && (* $+ $2 $+ * iswm %line)) {
        inc %Releases
        write groups.txt %x
      }
      dec %x
    }
    while (%z >= 1) {
      var %line = $read(db.txt,%z)
      if ((* $+ NUKE $+ * iswm %line) && (* $+ $2 $+ * iswm %line)) {
        inc %Nuke
      }
      dec %z
    }
    while (%c >= 1) {
      var %line = $read(db.txt,%c)
      if ((* $+ UNNUKE $+ * iswm %line) && (* $+ $2 $+ * iswm %line)) {
        inc %UnNuke
      }
      dec %c
    }
    ;FIRST
    var %line1 = $read(groups.txt,1)
    var %line2 = $read(db.txt,%line1)
    var %release = $deltok(%line2,$numtok(%line2,32),32)
    var %release = $deltok(%release,$numtok(%release,32),32)
    var %release = $deltok(%release,1-2,32)
    var %timestamp = $duration($calc($ctime - $ctime($deltok(%line2,1- $+ $calc($numtok(%line2,32) - 2),32))))
    ;LAST
    var %liness = $lines(groups.txt)
    var %line11 = $read(groups.txt,%liness)
    var %line22 = $read(db.txt,%line11)
    var %release2 = $deltok(%line22,$numtok(%line22,32),32)
    var %release2 = $deltok(%release2,$numtok(%release2,32),32)
    var %release2 = $deltok(%release2,1-2,32)
    var %timestamp2 = $duration($calc($ctime - $ctime($deltok(%line22,1- $+ $calc($numtok(%line22,32) - 2),32))))
    msg $chan 0[14Releases00] 00 %Releases 0[14Nukes00] 00 %Nuke 0[14Unnukes00] 00 %UnNuke 
    msg $chan 0[14FIRST00]  $+ %Release 14got released00 %timestamp ( $+ $gettok(%line2,4,32) $+ ) 14ago 00[ 0702 $+ $gettok(%line2,2,32) $+  00/  $+ %group.nick $+  ]
    write -c groups.txt
  }
}