on *:text:!group*:#testepr3:{ 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) { set %totalgroup $calc( $iif($readini(groups.ini,%group.nick,release),$readini(groups.ini,%group.nick,release),0) + $iif($readini(groups.ini,%group.nick,nuke),$readini(groups.ini,%group.nick,nuke),0) + $iif($readini(groups.ini,%group.nick,unnuke),$readini(groups.ini,%group.nick,unnuke),0) ) .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) / %totalgroup ) * 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) / %totalgroup ) * 100)) $+ % $+ ) if ($gettok($readini(groups.ini,%group.nick,first),1,32) = PRE) { .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)))) 14ago 00[ 1407 $+ $gettok($readini(groups.ini,%group.nick,first),2,32) $+  00/  $+ %group.nick $+  ] } elseif ($gettok($readini(groups.ini,%group.nick,first),1,32) = NUKE) { .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),5-,32)))) 14ago was nuked because 00 $gettok($readini(groups.ini,%group.nick,first),4,32) [ 1407 $+ $gettok($readini(groups.ini,%group.nick,first),2,32) $+  00/  $+ %group.nick $+  ] } else { .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),5-,32)))) 14ago was unnuked because 00 $gettok($readini(groups.ini,%group.nick,first),4,32) [ 1407 $+ $gettok($readini(groups.ini,%group.nick,first),2,32) $+  00/  $+ %group.nick $+  ] } if ($gettok($readini(groups.ini,%group.nick,last),1,32) = PRE) { .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)))) 14ago 00[ 1407 $+ $gettok($readini(groups.ini,%group.nick,last),2,32) $+  00/  $+ %group.nick $+  ] } elseif ($gettok($readini(groups.ini,%group.nick,last),1,32) = NUKE) { .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),5-,32)))) 14ago was nuked because 00 $gettok($readini(groups.ini,%group.nick,last),4,32) [ 1407 $+ $gettok($readini(groups.ini,%group.nick,last),2,32) $+  00/  $+ %group.nick $+  ] } else { .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),5-,32)))) 14ago was unnuked because 00 $gettok($readini(groups.ini,%group.nick,last),4,32) [ 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 ] msg # [7Group Database] - 0Groups [0 $ini(groups.ini,0) ] 0Group Base Size [0 $bytes($file(groups.ini).size).suf ] }}