cLoNe UyaRı - Seversintabi.com Türkiye'nin En Büyük Forumu Bence Seversin Tabi

**sedoist** · #1 24 October 2008, 17:09

1-Aşağıdaki kodu bi notdefterine kopyalayıp belge adını clone.txt olarak kaydedin.
2-Kaydettiğiniz belgeyi script inizin kurulu olduğu klasöre atın.
3-Mirc i açın ve sohbet ettiğiniz kısma /load -rs clone.txt yazınız.

Kod:

#cloneuyar on
on *:join:*: {
  %clones = $ialchan($wildsite,#,0)
  if ( %clones > 1 ) {
    var %count = 1
    set %clone.nicks -->
    while (%count <= %clones)  {
      %clone.nicks = %clone.nicks  $ial($wildsite,%count).nick
    inc %count  }
  /echo $chan 2*** 4Clone Tespit Edildi!12: $remove(%clone.nicks,-->) 4 %clones 12Tane2!! }
  set %change $read -s $+ $address($nick,4) notes.ini
  if (%change == $null) {
    haltdef
    write kelebek\scripting\notes.ini $address($nick,4) $nick
    halt  
  }
}
#cloneuyar end

BiLgi:Aynı ip adresi üzerinden yapılan birden çok giriş olduğunda haber verir.