IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
  sohbet

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 07 Haziran 2009, 15:33   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
!clone Tara sistemi




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

on *:Text:*:#:{
if !clone isin $1- {
.set %clonechan $chan
clone
}
}





BEN BU CODU #KANALOPS kanalında ,

!clone #ss

YAPTIGIMDA #ss kanalında bulunan cloneleri göstermesini istiyorum mümkünmüdür .

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Benimmekan Mobil Sohbet
Alt 07 Haziran 2009, 15:43   #2
Regex
Guest
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Yüzdesi:(%)
Cevap: !clone Tara sistemi




Alias bölümü aynen kalsın, on TEXT eventını aşağıdakiyle değiştir.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:!clone &:#:set %clonechan $2 | clone


 
Alıntı ile Cevapla

Alt 07 Haziran 2009, 15:49   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: !clone Tara sistemi




Regex , Hocam

ben #mircturkops kanalında Bota !clone #mircturk yazdığımda

#mircturkops kanalına cloneleri yazıcak.

12 2Adres: $hget(host,%ı).item --- 10Bağlı kullanıcı sayısı: $hget(host,%ı).data --- 4Bağlı rumuzlar: $gettok(%_cln,1-,32)

ama
bişi
olmadı
hocam


on *:text:!clone &:#:set %clonechan $2 | cloneif !clone isin $1- {
.set %clonechan $chan
clone
}
}

 
Alıntı ile Cevapla

Alt 07 Haziran 2009, 16:15   #4
Regex
Guest
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Yüzdesi:(%)
Cevap: !clone Tara sistemi




İlla bana, baştan kod yaz diyorsun?
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Peki, yazalım.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias klon { if ($2) { var %* = $nick($1,0) while (%*) { $iif(!$hget(host,$address($nick($1,%*),2)),hadd -m,hinc) host $address($nick($1,%*),2) dec %ğ } .msg $2 4 $1 kanalı için clone taraması başlatıldı. .msg $2 - .timer 1 1 $yeah($1,$2) } } alias -l yeah var %½ = $hget(host,0).item | while (%½) { if ($hget(host,%½).data > 1) { var %- = ok,%$ = $nick($1,0) | while (%$) { if ($istok($hget(host,%½).item,$address($nick($1,%$),2),32)) { var %^ = $addtok(%^,$nick($1,%$),32) } | dec %$ } | .msg $2 12 2Adres: $hget(host,%½).item - 10Bağlı kullanıcı sayısı: $hget(host,%½).data - 4Bağlı rumuzlar: $gettok(%^,1-,32) } | dec %½ } | .msg $2 - | .msg $2 $1 $iif($(%-,2) != ok,kanalında clone bulunamadı.,kanalı için clone taraması tamamlandı.) | hfree host on *:text:!clone &:#:$klon(#,$2)


Umarım işine yarar.

 
Alıntı ile Cevapla

Cevapla

Etiketler
clone, mirc, mirc download, mirc indir, sistemi, tara


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 
Seçenekler
Stil

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Clone Tarama Sistemi Burce mIRC Scripting Hazır Kodlar 1 29 Mart 2012 14:19
Dağınık Clone Tarama Sistemi. uFuK mIRC Scripting Hazır Kodlar 5 31 Ağustos 2011 00:00
@clone Penceresinde Nick1 Nick2 Nick3 gibi Clone'ları Göstersin. DarK^ mIRC Scripting Sorunları 8 22 Ekim 2008 17:13
!Clone tara lacremel mIRC Scripting Sorunları 1 08 Mayıs 2007 08:28
Clone Gostergesi / Clone Bans morveotesii mIRC Scripting Sorunları 3 23 Şubat 2006 16:01