on *:TEXT:*join*#*:#: {
  if ($me ishop $chan) || ($me isop $chan) {
    if ($nick isreg $chan) {
      var %x = 1
      while (%x <= $0) {
        if ($left($($+($,%x),2),1) == $chr(35)) && ($($+($,%x),2) != $chan) {
          mode $chan +b ~c: $+ $($+($,%x),2)
          ban -k $chan $nick 2 Banned for channel advertising $+($chr(40),$ord($readini(cbanwarns.ini,total,total)) advertiser banned,$chr(41))
        }
      }
      inc %x
    }
  }
}