Clone – Eski nick uyarı

Eski nicklerle giriş yapan kullanıcıları gösterme

on *:start:if $isfile(eskinicks.63) { hmake eskinicks | hload eskinicks eskinicks.63 }
on *:join:#: { 
  if !$ial { ial on }
  if $nick == $me || $regex($wildsite,/(Admin|Op)/i) { return }
  hadd -m eskinicks $wildsite $addtok($hget(eskinicks,$wildsite),$nick,32)
  hsave eskinicks eskinicks.63
  if $numtok($hget(eskinicks,$wildsite),32) >= 2 {
    echo #  $wildsite  hostundan girmis eski nickler: $hget(eskinicks,$wildsite)
  }
  if $ialchan($wildsite,#,0) >= 2 { 
    var %x 1 | while $ialchan($wildsite,#,%x) { var %v1 $token($v1,1,$asc(!)) | var %nicks %nicks %v1 | inc %x }
    echo #   $wildsite  bagli kanaldaki cloneler: %nicks
  }
}