alias crack {
 nocrack
 ^assign CRACK_WATCH $0
 ^on -public "$CRACK_WATCH *" {
  ^assign rand_nick $srand($time())$midw($rand($numonchannel()) 1 $chanusers())
  quote PRIVMSG $1 :$reverse(>$rand_nick< $sort($stripc($[60]2-)))
  echo <$N> $reverse(>$rand_nick< $sort($stripc($[60]2-)))
 }
 xecho -banner Crack watch is now in effect for $0
}

alias nocrack {
 ^on public -"$CRACK_WATCH *"
 xecho -banner No longer crack watching $CRACK_WATCH
}

bind ^T parse_command nocrack