[Kan]

Kod:   Kodu kopyalamak için üzerine çift tıklayın!

alias Clone { 
  var %ğ = $nick(#,0)
  while %ğ {
    if !$hget(host,$address($nick(#,%ğ),2)) { hadd -m host $address($nick(#,%ğ),2) 1 }
    else { hinc host $address($nick(#,%ğ),2) }
    dec %ğ
  }
  echo 4 -st # kanalı için clone taraması başlatıldı...
  echo -s -
  .timer 1 1 .h_al #
}
alias h_al {
  var %ı = $hget(host,0).item
  while %ı {
    if $hget(host,%ı).data > 1 {
      set %y_k yes
      var %ç = $nick($1,0) 
      while %ç {
        if $hget(host,%ı).item == $address($nick($1,%ç),2) { set %_cln $addtok(%_cln,$nick($1,%ç),32) }
        dec %ç
      }
      echo 12 -st 2Adres: $hget(host,%ı).item --- 10Bağlı kullanıcı sayısı: $hget(host,%ı).data --- 4Bağlı rumuzlar: $gettok(%_cln,1-,32)
      unset %_cln
    }
    dec %ı
  }
  echo -s -
  $iif($(%y_k,2) != yes,echo 4 -st $1 kanalında clone bulunamadı.,echo 4 -st $1 kanalı için clone taraması tamamlandı.)
  unset %y_k
  hfree host
}
menu channel {
  .-
  .Clone Tara:.Clone #
}

Yazan Kim Bilmiyorum 1 aralar kullanıyordum.Payla$mak istedim
Kullanımı: /Clone #KanalAdı
Tarama yapılacak olan kanalda olmak zorunludur

[moonshield]

el33t hocam ugrastım olmadı codda tarama yapınca vermesini istedim kanala göre ayarlamak için sadece su kısmı bu sekilde yaptım echo 12 -st yi msg #ahmet bu hatayı verdi

tekrar kodun sitedeki halini yaptım yine bu hatayı veriyor.

HATA:
* /hfree: Böyle bir Tablo yok 'host' (Satır 30, script27.txt)

Buyur sen yardımcı ol.

[PaLiKaRiS]

ßunu Status'e Değilde ßulunduğumuz O Anki Kanala Yansıtacak Olursak Nasıl ßi Add-On Çıkarırız ?

[MavipikSeL]

PaLiKaRiS Nickli Üyeden Alıntı Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

ßunu Status'e Değilde ßulunduğumuz O Anki Kanala Yansıtacak Olursak Nasıl ßi Add-On Çıkarırız ?

/echo -s olan kısımları /echo -a yap.

[L4roXyL]

Kanala yansıtılanı [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] yapmışlar, biraz araştırsanız.

[Cemalizim]

Emegine saglık serdar güsel