bind time - !checkdevoice matchfinder::check:devoice
proc matchfinder::check:devoice { } {
variable banner; variable banner2; variable botnick
variable adminchan; variable basechan
## Listing Bot Channels
foreach dchan [channels] {;putlog 1
  ## Checking for mode +m & if bot is devoiced or oped.
  if {[string match -nocase *+m* $dchan] && ![isvoice $botnick $dchan]&& ![isop $botnick $dchan]} {;putlog 2
    ## Message admin channel announcing channel/bot status & why parting..
    puthelp "PRIVMSG $adminchan :$banner \002$dchan\002 is moderated and i'm devoiced, parting..."
    ## Remove Channel
    channel remove $dchan
  }
}
}