Something

if ($+(*,$chr(35),*) iswm $1-) {
    if ($hget(NoAdverts,$chan) == on) {
  tokenize 32 $remove($1-,$chan)
  var %ban = 1,%banning,%bannum = 1 
  while ($($+($,%ban),2)) { var %text = $v1 | if ($chr(35) isin %text) { var %banning = %banning ~c: $+ %text | inc %bannum } | inc %ban }
  if ($chr(35) isin $remove(%text,$chan)) { mode $chan $str(+b,%bannum) $address($nick,3) %banning | kick $chan $nick 1No Adverts! NOOB! 
  echo Banning $nick in $chan for saying these channels: $remove(%banning,~c:) }
}
}