Tekil Mesaj gösterimi
Alt 11 Temmuz 2010, 16:05   #1
Çevrimdışı
Entrance Doğrulanmış Üye
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Clone tespit.




Skys Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:join:#: {
  
%clones $ialchan($wildsite,#,0)
  
if ( %clones ) {
    var %
count 1
    set 
%clone.nicks -->
    while (%
count <= %clones) {
      %clone.
nicks = %clone.nicks $ial($wildsite,%count).nick
    inc 
%count }
  .
msg %operkanali Clone Tespit Edildi: %clones Tane $remove(%clone.nicks,-->) ) ( $address($nick,211) }
  
set %change read -$+ $address($nick,4notes.ini
  
if (%change == $null) {
    
haltdef
    write notes
.ini $address($nick,4$nick
    halt 
  
}


Güzel Isleyen bir Cod Halt

Admin/Oper muaf tutabilirmiyiz.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:join:#: { if ($regex($address($nick,2),/(Admin|Oper|Ircop)/i)) { halt } %clones = $ialchan($wildsite,#,0) if ( %clones > 2 ) { var %count = 1 set %clone.nicks --> while (%count <= %clones) { %clone.nicks = %clone.nicks $ial($wildsite,%count).nick inc %count } .msg %operkanali Clone Tespit Edildi: %clones Tane ( $remove(%clone.nicks,-->) ) ( $address($nick,2) 11) } set %change $ read -s $+ $address($nick,4) notes.ini if (%change == $null) { haltdef write notes.ini $address($nick,4) $nick halt } }


__________________
-
 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları reklamver bizimmekan