on *:text:.lamer *:#kontrolkanali: { 

  if $2 == list { 

    var %i = 1, %end = $ulist(*,lamer,0) 

    .msg %operkanali - Toplam lamer:4 %end Adet Bulunmaktadır. 

  } 

  elseif $2 == ekle {  

    if $3 == $null { .msg $chan $+(",$nick,") Lütfen eklenecek nick yaziniz | return } 

    if $ulist($3,lamer,1) { .msg $chan $+(",$nick,") Belirtiginiz kritere uyan $+(",,$3,,") zaten mevcut | return }     

    .auser lamer $3-  

    .msg $chan $+(",,$3,,") Basariyla lamer Listesine Eklendi 

  } 

  elseif $2 == sil {  

    if $3 == $null { .msg $chan $+(",$nick,") Lütfen silinecek nick/kanal yaziniz | return } 

    if !$ulist($3,lamer,1) { .msg $chan  $+(",$nick,") Belirtiginiz kritere uyan $+(",,$3,,") listede mevcut degil | return } 

    .ruser lamer $3- 

    .msg $chan $+(",,$3,,") Basariyla lamer Listesine Silindi 

  } 

} 

 
- 

 
on *:text:*:#kontrolkanali: { 

  if $nick == $nick { 

    if $1 == !lamer { 

      .lamer $2 

      .msg %operkanali $nick Tarafından " $+ $2 $+ " kanalının Lamer Taraması Gerceklesmistir.  

    } 

  } 

} 

 
- 

 
alias lamer { 

  var %t = 1, 

  while (%t <= $nick($1,0)) { 

    var %bdnick = $nick($1,%t) 

    if ($level($nick($1,%t)) == lamer) { mode $1 +b $ulist(%bdnick) | kick $1 %bdnick Kanal Kurallarına Aykırı Hareket [Clone/Trojen]  } 

    inc %t 1 

  } 

}