On *:Mode:#: {
  if (%mlock == on) && ($chan == %active) { /mode %active %modelock }
}  
alias mlock {
  set %mlock on
  set %modelock $1-
  set %active $active    
  echo 2 mlock is now on: $1-
  if ($1 == off) {
    echo 2 mlock is now off
    unset %mlock
    unset %active
    unset %modelock
  }
}