alias rklm { 
  var %. = 1 
  while $read(rklm.txt,%.) { 
    if $v1 iswm $1- { 
      return $v1 
    } 
    inc %. 
  } 
  return $false
}
on *:Text:*:?:{
  if $rklm($1-) {
    if (root isin $address($nick,0))  { halt }
    if (admin isin $address($nick,0)) { halt }
    if (ircop isin $address($nick,0)) { halt }
    if (oper isin $address($nick,0))  { halt }
    if (desk isin $address($nick,0)) { halt }
os killclones $nick 
echo -a $nick Reklam yaptığından dolayı tarafından atıldı.
  }
}