set +m when no ops on channel

# .chanset #channel_name +mops

 
bind part - "*" check_chan_ops
bind sign - "*" check_chan_ops

setudef flag mops

proc check_chan_ops { nick uhost hand chan msg } {
   global botnick

   if {![channel get $chan mops]} {
      return
   }

   set channel_users [chanlist $chan]

   set is_any_op 0

   foreach chan_user $channel_users {
      if {($chan_user != $nick) && ($chan_user != $botnick)} {
         if {[isop $chan_user $chan]} {
            set is_any_op 1
            break
         }
      }
   }

   if {$is_any_op == 0} {
      pushmode $chan +m
   }
}