Sen clone taramasını nick üzerinden mi yapıyorsun tek tek, yoksa bütün kanala birden mi bakıyor tek komutla?

yo ben senin su whislenecekler dongusunu kullanmaya calisiyorum yani away olanlar ora kayit ediliyorya ayni anda bunlar clonemi diye yaptirmaya calistimda yapamadim biraktim artik cunku basim sisti tam bilgi olmadimi cok zor

Bu koruma tek bir kanal için mi olacak?

flyman kodu yazdım ve denedim ancak mirc feci sekilde donuyo while icinde if li ialchan taraması dehşet kasıyor.

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
Utku bura bak hele işine yarar belki :P

mephisto evet tek kanal icin olsa yeterli

halen ben yapabilmis degilim
bu kadar zormu away nicke clone taramasi yaptirmak bilen biri icin zor olamsa gerek

raw 352:*: { if (G isin $7) { if $ialchan($address($6,4),#kanaladı,0) > 1 { set %kicklenecekler $addtok(%kicklenecekler,$6,32) } | else { set %whoislenecekler $addtok(%whoislenecekler,$6,32 } }

Burayı bu şekilde değiştir önce.

raw 301:*:{ if $istok(%kicklenecekler,$2,32) == $true { ackick $2 | halt } | var %i $lines(aways.txt) | while $read(aways.txt,%i) { .set %awmsg $ifmatch | if (%awmsg isin $3-) { .ucur $2 } | dec %i } | unset %awmsg }

Bunu da böyle değiştir.

alias ackick { var %a = $address($1,4) | var %x = $ialchan(%a,#kanaladı,0) | mode #kanaladı +b %a | while %x { kick #kanaladı #ialchan(%a,#kanaladı,%x) Away & Clone tespit edildi. | dec %x } }

Bunu da ekle, bir de böyle dene bakalım. Kanal ismini yazmayı unutma.

denemeden bu neyi kickleyecek mephisto sanki gordugum kadari ile bu yine awayind ekufur ve cloneyi kickleyecek olani kickleyecek sanirim yanlismi bakiyorum
awayinde kufur olmayip ayni zamanda clone olani da kicklermi bu

kline yedim mephisto saol :))) bi hata var daha kanalda away yokken excess floodtan kline yedim :))

mephisto zaten whosilenecekleri set yapiyoriz ya o koda sadece clonemi bu awayleride ekliyebiliriz kufur etmismi cek yapiyor zaten bide clonemi yapar clonesede baska yere yonlendirip atilir daha kolay olmazmi o sekilde

raw 352:*: { if (G isin $7) { if $ialchan($address($6,4),#kanaladı,0) > 0 { set %kicklenecekler $addtok(%kicklenecekler,$6,32) } | else { set %whoislenecekler $addtok(%whoislenecekler,$6,32 } } }

raw 301:*:{ if $istok(%kicklenecekler,$2,32) == $true { ackick $2 | halt } | var %i = $lines(aways.txt) | while $read(aways.txt,%i) { .set %awmsg $ifmatch | if (%awmsg isin $3-) { .ucur $2 } | dec %i } | unset %awmsg }

alias ackick { var %a = $address($1,4) | var %x = $ialchan(%a,#kanaladı,0) | mode #kanaladı +b %a | while %x { kick #kanaladı #ialchan(%a,#kanaladı,%x).nick Away & Clone tespit edildi. | dec %x } }

Böyle dene bir de.

deniyeyimd ediyelimki calisti bu set kicklenecekleri sifirlamasi gerekmiyormu islem sonunda ?

Sen bir dene de böyle, olmazsa:

raw 352:*: { if (G isin $7) { set %whoislenecekler $addtok(%whoislenecekler,$6,32 } }

raw 301:*:{ if $ialchan($address($2,4),#kanaladı,0) < 0 { ackick $2 | halt } | var %i = $lines(aways.txt) | while $read(aways.txt,%i) { .set %awmsg $ifmatch | if (%awmsg isin $3-) { .ucur $2 } | dec %i } | unset %awmsg }

bir de böyle dene. %kicklenecekleri sıfırlamasına gerek kalmaz burada, çünkü kullanmayacak. Offff başım....

mephisto hic bi hareketi yok icklenecekler oralark set yapiyor ama sonrasi calismiyor whosileneceklere set yapmiyor

Son yazdığımı denedin mi?

deniyom simdi yeni gordum :)

whoisliyor ama atmiyor 2 clone soktum atmadi sanirim clone taramasinda kaliyor

alias ackick { var %a = $address($1,4) | var %x = $ialchan(%a,#kanaladı,0) | mode #kanaladı +b %a | while %x { kick #kanaladı #ialchan(%a,#kanaladı,%x).nick Away & Clone tespit edildi. | dec %x } }

Bunu eklemişmiydin?

+

/ial on

yaz.

remoteyemi yazayim ial on diye
gerci ebnde clone taramalari var onlar calisiyor ama gerek varmi ial aciktir zaten degilmi clone taramasi calisiyorsa?

birde
alias ackick { var %a = $address($1,4) | var %x = $ialchan(%a,#kanaladı,0) | mode #kanaladı +b %a | while %x { kick #kanaladı #ialchan(%a,#kanaladı,%x).nick Away & Clone tespit edildi. | dec %x } }

kick #kanaladı #ialchan(%a,#kanaladı,% burdaki #ialchan $ialchan olcak degilmi?

yok yine olmuyor whoisliyor baska bisey yok sonuc olarak

bu sekild eaway kufur koruma calisiyor clone kismi calismiyor sanirim orda bi eksigimiz var ial kisminda cunku ackicke yonlenmiyor kod raw 301 ila kisminda bi sorun var sanirim

#ialchan değil, $ialchan olacak. #kanaladı yazan yerlere de op olduğun kanalın adını yazmayı unutmuyorsundur umarım. Onun dışında sorun yok görünürde.

yazdim mephisto hepsini yuzlerce kes deniyom emin ol olmadi senide yorum mephisto o clonede kaliyor ordan gecmiyor difer kisimlari calisiyor ackicke yonlenmiyor

raw 301:*: {
var %s = $ialchan($address($2,2),#kanal,0)
while %s {
var %i = $ialchan($address($2,2),#kanal,%s)
dec %s
}
if ($ialchan($address($2,2),#kanal,0) > 2) {
/ban -k #kanal $address($2,2) 2 hem away hem clonesin sagdan yuru cuzdan bulursun
}

}


mephisto butun pazarim bu kodla gecti basim kazan oldu en sonunda bi kodu kendim evire cevire bu sekile getirdim boyle calisiyor bu awaydeki sahisin clonesini buluyor ve 2 den coksa banlayip kickliyor bu kodu kendim meydana cikardim ama baska kodlara baka baka :))
bundada soyle bisey var isde away in clonelerini atiyor yani 4 clone var ama biri awayse bu hepsini atiyor ben istedimki eger 4 away varsa ve 4 de clonese onlari atsin veya 8 clone var bu clone adresinden 4 u away ya onlari kicklesin ban hepsine aolur mecburen ama kiclemeyi onlara yapsin istemistim ama yapamadim fikri olan varsa yazarsa sevinirim bu kadar becerebildim ben


ama ugrasirken ial olayinida cozdum kazancim o oldu :))

Valla Flyman ben dün gece aynen burada sana verdiğim kodlarla deneme yaptım ve çalışıyordu. Ondan sonra "#ialchan değil, $ialchan olacak. #kanaladı yazan yerlere de op olduğun kanalın adını yazmayı unutmuyorsundur umarım. Onun dışında sorun yok görünürde." yazdım buraya.

Ayrıca;

bu kod çalışıyorsa ben de scripting i bırakırım :D

mephisto dedim ya bu yukardaki kod calisiyor bu sekilde away olan ipnin kanaldaki clonelerini buluyor ve 2 den fazla ise kanaldan atiyor dene istersen calisiyor
a,a dedigim gibi away olanin clonesini buluyor o clone away degilsede atiyor benim istedigimd esadece clonelerin hepsi awayse atmasiydi bunu yazdim yukarda zaten
mephisto senin yazdigin kodun calisiyor dedigin seklini bana buraya toplayip kopyalarmisin ben bidaha deniyeyim ama dedigim gibi kanal ismi ve $ialchan kismini duzeltim denemistim ama yine denerim sen kodun denedigin sekli ile bana kopyala lutfen
scripti birakirim felanda deme sen bize lazimsin :)

İyi güzel de bu koddaki while'ın hiçbir işlevi yok, sallama bir kod bu :D

mephisto ne dersen de ister sallama ister demleme cay de ama bu kod calisiyor ben anlamiyorum cok derin derin while den bi kod vardi onu isime gelcek sekilde yani bu sekle cevirdim ve yine diyorum awayin clonesini bana buluyor 2 dende fazlka iseler atiyor calismasa niye calisiyor diyeyim ama benim istedigim isi tam gormuyor
sen unut su kodu bana senin yazdigin kodun calisir halini yaziver lutfen :)

alias -scmask {
if $window(@Clones) {
dline @Clones 1- $+ $line(@Clones,0)
titlebar @Clones in $1
}
if !$window(@Clones) { window -k0 @Clones }
var %s = $ialchan($1,$2,0)
while %s {
var %i = $ialchan($1,$2,%s)
aline @Clones 12 $+ $ialchan($1,$2,%s).nick 5 $+ $ialchan($1,$2,%s).user $+  $ialchan($1,$2,%s).host
dec %s
}
aline @Clones Found12 $ialchan($1,$2,0) users in12 $2 matching12 $1
}
o kodun orjinel halide buydu mephisto
bu kod normalde yazdigin bi ip nin kanaldaki clonesini veya o ipden varmi yokmu onu buluyordu ben onu degistirdim isde raw301 e gore hepsi