on $*:text:/^!sp\so(n|ff)$/iS:#: {
  if (!%f) { inc -u5 %f | if ($nick(#,$nick,oh)) {
      var %s *** Spam protection is now
      $+($replace($regml(1),n,.en,ff,.dis),able) #spam
  .msg # $iif($group(#spam) != on,%s off!,%s on!) } }
}
#spam on
on @*:text:*:#:url $1-
on @*:action:*:#:url $1-
on @*:notice:*:#:url $1-
alias -l url {
  var %s = /(?<=^|\s)((?>\S{3,8}:\/\/|w{3}\56)\S+)/iS
  if (($regex($1-,%s)) && ($nick(#,$nick,rv))) {
    ban -ku300 # $nick 2 Spamming is not allowed in this channel!
  }
}
#spam end