![]() |
Bir Tarama Yardımı Ben Şöyle Bir Clone Taraması İstiyorum. Mesela /clonescan Yazacam Tarayacak sonra KArşıma Bir Ufak Kutu Gelsin #bilmemNe kanalında 6 Tane Clone TEspit Edildi Kanadan Uzaklaştırmak için f1 Tusuna Basınız. f1 Tusuna Bastıgımda ise Clone Yasak! [ Clonelerin Ip si] |
alias Clonescan { unset %cs.* set %cs.chan # who # timer 1 4 /scan2 } alias scan2 { window -l @Clones titlebar @Clones in # set %cs.a $nick(#,0) :loop if ($ialchan($address($nick(#,%cs.a),2),#,0) > 1) && ($address($nick(#,%cs.a),2) !isin %cs.d) { set %cs.d %cs.d $address($nick(#,%cs.a),2) set %cs.c $ialchan($address($nick(#,%cs.a),2),#,0) :l aline @clones $ialchan($address($nick(#,%cs.a),2),#,%cs.c).nick (4 $+ $address($nick(#,%cs.a),2) $+ ) dec %cs.c 1 if (%cs.c == 0) { aline @clones - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - | goto next } goto l } :next dec %cs.a 1 if (%cs.a != 0) { goto loop } if (%cs.d == $null) { aline @clones Hiç CLone buLunamadı... } halt } Not : Ben Yazmadım Alıntıdır Sanırım işini Görür.. |
işimi Görürde Atmak için Ne Yapmak Lazım. Yoksa Adamları Kanaldan Tek Tekmi Ayıklayacaz. |
Verilen kod a göre ufak bi ayar yapıldığında sorun çözülüyor.. Umarım istediğin gibi olmuştur. Renk ve Konum ayarlarını istediğin gibi yapabilirsin Ör: echo -s yerine echo -a yada aline @bilmemne gibi... PHP- Kodu: |
Çok Saol Pek Makbule Geçti :D |
önemli değil :p |
Yanlız Bi Sorun Var. Çalışmadı :D incelebilirmisin bi codeyi falsolu ne var |
Alıntı:
Kodu al önce bir txt dosyasına kaydet... Satırların başlarındaqi boşlukları sil... Ve oradan remotelara ekle... Code bölümü içerisinden kopyalanan kodlarda sorun çıqıyor direq kopyalarsan... Sanırım senin sorununda bu yüzdendir... Saygılar... |
kodlarda bir sorun yok dostum. kendim bizzat denedim. Son Mohikan kardeşimizin dediğine kulak vermeni tavsiye ederim. Sevgiler... Saygılar... |
Code Tag'ları ([code&/code]) Arasında Kodlar Zarar Görüyor... Yani Çalışmayabilir. Kodları Buraya Normal Olarak Yapıştırırsanız yada PHP tagları içine Alırsanır Daha iyi olur... |
alias Clonescan { .unset %cs.* .set %cs.chan # .who # .timer 1 4 /scan2 } alias scan2 { .echo -s # kanalı için clone scan... set %cs.a $nick(#,0) :loop if ($ialchan($address($nick(#,%cs.a),2),#,0) > 1) && ($address($nick(#,%cs.a),2) !isin %cs.d) { set %cs.d %cs.d $address($nick(#,%cs.a),2) set %cs.c $ialchan($address($nick(#,%cs.a),2),#,0) :l .echo -s $ialchan($address($nick(#,%cs.a),2),#,%cs.c).nick (4 %4$s $address($nick(#,%cs.a),2) %4$s ) .set %cs.eklenen $ialchan($address($nick(#,%cs.a),2),#,%cs.c).nick .set %cs.nickler $addtok(%cs.nickler,%cs.eklenen,32) dec %cs.c 1 if (%cs.c == 0) { echo -s - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - | goto next } goto l } :next dec %cs.a 1 if (%cs.a != 0) { goto loop } if (%cs.d == $null) { echo -s Hiç CLone buLunamadı... } .echo -s 4 Eğer cL0ne'u olanlara ceza vermek istiyorsanız (Kick+Ban), F5 e basınız!.. cL0ne'Lar:14 %cs.nickler halt } alias F5 { %cs.i = 0 while ($gettok(%cs.nickler,0,32) > %cs.i) { .inc %cs.i 1 %cs.atilan = $gettok(%cs.nickler,%cs.i,32) mode %cs.chan +b $address(%cs.atilan,2) kick %cs.chan %cs.atilan cL0ne Yasak!.. } halt Ben Cloneye Ayrı Bir Yorum getirmek İstiorum Mesela Cloneler Olduu Zaman Tek Bir KAnalda Bana Msg Olarak Gelsin Örneğin a Kanalında Ve Clone SAyısı 3 ü Geçtii Zaman Zline Atayım Sebebi Clonesin İşte :) Olsun Ama İdentinde Helper Yazanları Atmasın Ve Remote X Kanalında İşlemesin |
yol göstermesi acısından sana yardımı olur.. if ($chan = #x && *help* iswm $address($nick,5)) { return } |
Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 04:54. |
Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk