menu nicklist {
  [-[-Mute $1 -]-] {
    set %Mute.Nick $1
    set %Mute.Channel $chan
    set %Mute $$?"How many minutes do you want to mute %Mute.Nick for?"
    set %MuteMSG $$?"What do you want the mute message to be?"
    msg $chan 4,1.:[9 $+ %Mute.Nick $+ 4]:. .:[11You have been muted for9 %Mute 11minutes4]:. .:[12Reason:9 %MUTEMSG $+ 4]:.
    .timer 1 $calc(%Mute * 60) mode $chan -b $+ $iif(%Mute.Nick isavoice #,+v) ~q: $+ $address(%Mute.Nick,2) %Mute.Nick
    mode $chan -vqaoh+b %Mute.Nick %Mute.Nick %Mute.Nick %Mute.Nick %Mute.Nick ~q: $+ $address(%Mute.Nick,2)
    .timer 1 $calc(%Mute * 60) msg $chan 4,1.:[0 $+ %Mute.Nick $+ 7]:. .:[4You have been unmuted. In the future, please follow all the rules, and you will not be muted again14]:. .:[11The reason you were muted for is:9 %MuteMSG $+ 4]:.
    .timer 1 $calc(%Mute * 60) mode $chan +v-b %Mute.Nick ~q: $+ $address(%Mute.Nick,2)
    .timer 1 $calc(%Mute * 60) unset %mute*
  }
}
ON *:NICK:{
  if ($nick == %Mute.Nick) {
    set %Mute.Nick $newnick
  }
}
ON *:JOIN:%Mute.Channel:{
  if ($address($nick,2) == $address(%Mute.Nick,2)) {
    mode $chan -v $nick
    set %Mute.Nick $nick
  }
}