Stuff

on *:text:!group*:#d&r:{
  if (%protect.group == on) { msg $chan $nick $+ , You need wait 15secounds for do it again }
  if ((%protect.group == off) || (%protect.group == $null)) {
    set %protect.group on
    timer 1 20 /unset %protect.group
    msg $chan 0[ 14Group00 ] 00 $+ $2 $+  0(14Searching...0)
    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[14 Releases00 ] 00 %Releases 0[ 4Nukes00 ] 00 %Nuke 0[ 9Unnukes00 ] 00 %UnNuke 
    msg $chan 0[14 FIRST00 ]  $+ %Release 14got released00 %timestamp ( $+ $gettok(%line2,4,32) $+ ) 14ago 00[ 1407 $+ $gettok(%line2,2,32) $+  00/  $+ %group.nick $+  ]
    write -c groups.txt
  }
}