on *:JOIN:#:{
  if ($nick == $me) && (%invited. [ $+ [ $chan ] ] ==1) {
    set %users. [ $+ [ $chan ] ] $nick($chan,0)
    var %i = 1
    bread botlist.txt 0 9999 &botlist
    while (%i <= %users. [ $+ [ $chan ] ]) {
      if ($bfind(&botlist, 1, $nick($chan,%i).text) 
      dec %users. [ $+ [ $chan ] ] 
    }
    if (%users. [ $+ [ $chan ] ] <= 5) part $chan More than 5 people must be in the chan. Current: %users. [ $+ [ $chan ] ]
    unset %users. [ $+ [ $chan ] ]
    unset %invited. [ $+ [ $chan ] ]
  }
}


on *:INVITE:#: {
  set %invited. [ $+ [ $chan ] ] 1
  join $chan
  if ($readini(channels.ini, $chan, status) == $null) || ($readini(channels.ini, $chan, status) == deactivated) {
    var %status [ $+ [ $chan ] ] Deactivated
    timer 1 3 notice $nick Currently not activated in $chan - Please type: !achan $me $+ 
  }
  elseif ($readini(channels.ini, $chan, status) == activated) {
    join $chan 
    var %status [ $+ [ $chan ] ] Activated
    if (%ban. [ $+ [ $chan ] ] == 1) part $chan Channel Blacklisted
    else {
      msg # 1[1Serv1] *** 14Invited by: $nick 1| 14Kick Counts: $iif(%kick. [ $+ [ $chan ] ] == $null,0,%kick. [ $+ [ $chan ] ]) 1| 14Status: %status [ $+ [ $chan ] ] 1| 14For commands type: !list
    }
  }
}