on *:text:!group*:#d&r:{ if ($2) { if (%protect.group == on) { msg $chan $nick $+ , You need wait 15seconds for do it again } if ((%protect.group == off) || (%protect.group == $null)) { set %protect.group on .timer 1 20 /unset %protect.group .timerpredelay 1 1 msg # 0[ 14Group00 ] 00 $+ $2 $+  0(14Searching...0) set %group.nick $2 var %x 1 while (%x <= $ini(groups.ini,0)) { if ($ini(groups.ini,%x) = %group.nick) { .timerpredelay2 1 3 msg # 0[14 Releases00 ] 00 $iif($readini(groups.ini,%group.nick,release),$readini(groups.ini,%group.nick,release),0) 0[ 4Nukes00 ] 00 $iif($readini(groups.ini,%group.nick,nuke),$readini(groups.ini,%group.nick,nuke),0) ( $+ $int($calc($calc( $readini(groups.ini,%group.nick,nuke) / $lines(db.txt) ) * 100)) $+ % $+ ) 0[ 9Unnukes00 ] 00 $iif($readini(groups.ini,%group.nick,unnuke),$readini(groups.ini,%group.nick,unnuke),0) ( $+ $int($calc($calc( $readini(groups.ini,%group.nick,unnuke) / $lines(db.txt) ) * 100)) $+ % $+ ) .timerpredelay3 1 5 msg # 0[14 FIRST00 ]  $+ $gettok($readini(groups.ini,%group.nick,first),3,32) 14got released00 $duration($calc($ctime - $ctime($gettok($readini(groups.ini,%group.nick,first),4-,32)))) ( $+ $gettok($readini(groups.ini,%group.nick,first),4,32) $+ ) 14ago 00[ 1407 $+ $gettok($readini(groups.ini,%group.nick,first),2,32) $+  00/  $+ %group.nick $+  ] .timerpredelay4 1 7 msg # 0[14 Last00 ]  $+ $gettok($readini(groups.ini,%group.nick,last),3,32) 14got released00 $duration($calc($ctime - $ctime($gettok($readini(groups.ini,%group.nick,last),4-,32)))) ( $+ $gettok($readini(groups.ini,%group.nick,last),4,32) $+ ) 14ago 00[ 1407 $+ $gettok($readini(groups.ini,%group.nick,last),2,32) $+  00/  $+ %group.nick $+  ] halt } if (%x = $ini(groups.ini,0)) { .timerpredelay5 1 3 msg # ..:: 0This group not found in Data Base ::.. } inc %x } } } else { if (%protect.group == on) { msg $chan $nick $+ , You need wait 15seconds for do it again } if ((%protect.group == off) || (%protect.group == $null)) { set %protect.group on .timer 1 20 /unset %protect.group msg # [7Group Info] - 0Groups [0 $ini(groups.ini,0) ] 0Group Base Size [0 $bytes($file(groups.ini).size).suf ] } } } on *:text:!db:#d&r:{ msg # [7Data Base] - 0Releases [ 0 $iif($gettok($read(DataBase.txt,1),2,32),$gettok($read(DataBase.txt,1),2,32),0) Releases $chr(124) 4 $iif($gettok($read(DataBase.txt,2),2,32),$gettok($read(DataBase.txt,2),2,32),0) NUKE's  $chr(124) 9 $iif($gettok($read(DataBase.txt,3),2,32),$gettok($read(DataBase.txt,3),2,32),0) UNNUKE's ] 0Data Base Size [0 $bytes($file(db.txt).size).suf ] }