on *:join:#:if ($nick == $me) .set -u1 %otomsg ok! 
on *:text:*:?:if (%otomsg) .at $nick 
alias at { 
  var %u $comchan($1,0) 
  while (0 < %u) { 
    ban $comchan($1,%u) $1 2 
    kick $comchan($1,%u) $1 Özelime Otomesaj Yapmak Yasaktır!! 
( $+ $Chan $+ ) Yasaklı Kelime: ( $+ $replace($strip($2-),e,?,a,?,i,?,o,?,u,?,ı,?,ü,?,#,?,é,?,@,?,ß,?) $+ ) 
    dec %u 
  } 
}