on $*:TEXT:/(#[^ ,]+)/:#Bab:{
  ; this var has to be done so the $istok doesn't mess up the $regml(1)
  var %chan $regml(1)
  if (!$istok(#rshelp #irchelp #rs #swiftswitch #Pc #bka #iKick #dm #SwiftIRC #mSL #mIRC #idle #terror,%chan,32)) {
    if ($nick isreg #) {
      ; this if kick/bans a reg who advertises
      mode $chan +bb c: $+ %chan $address($nick,2)
      kick # $nick Kaithx
      join %chan
      msg %chan Don't spam/advertise...
      part %chan $nick triggered this script in $chan
    }
    ; and only kicks a voice/hop/op who advertises
    else kick # $Nick Don't advertise... 
  }
}