alias badtara {
  if $me ison $1 {
    set %:bulunan 0
    var %s 1
    while %s <= $nick($1,0) {
      %:gnick = $nick($1,%s)
      if %:gnick isreg $1 && $ulist(%:gnick,bad,1) {
        inc %:bulunan 1
        window -e  @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]s
        echo  @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]s %:gnick
      }
      inc %s
    }
    echo -a Badnickler tarandi: $1 Kanalı bad/kötü nick taraması yapıldı.  - %:bulunan Bad/kötü nick bulundu.
  }
}