Çevrimdışı

Selam Arkada$lar Sizin Icin Kolay Bir Reklam Korumasi Isteyeceğim.
Özelime Belirttiğim Kelimeler Yazilinca All Akick Atmak İstiyorum.Yardimci Olabilirmisiniz.

 

Çevrimdışı

Cok Zor Bi$eymi Sordum? Benden Sonra 2 Konu Acildi , iLgilenildi.? :S

 

Çevrimdışı

gelişmiş arama yaptan bi reklam koruması bul sonra birde allban codesi ni arat oradan reklam koruması kickban diye atıyodur ona allban ın atma şeklini yaz kick+ban yerine olur biter bence
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 

Çevrimdışı

alias bdwrd var %& = 1 | while (%& <= $lines(kelimeler.txt)) { if ($regex($2-,$read(kelimeler.txt,%&))) { allkick $1 akick sebebi. | break } | inc %& }
alias allkick if ($1) { var %1 = 1 | while (%1 <= $comchan($1,0)) { if ($regex($nick($comchan($1,%1),$me).pnick,@|&|~|%) || $regex($usermode,A|a|N|C)) { cs akick $comchan($1,%1) add $address($1,2) $2- | cs akick $comchan($1,%1) enforce } | inc %1 } | var %2 %1 - 1 | echo -at %2 kanalda akick uyguladınız. }
on *:text:*:?:bdwrd $nick $1-

Şeklinde işini görür.
Kelimeler.txt dosyasına, alt alta belirlediğin kelimeleri yazman yeterli olur.

 

Çevrimdışı

Tesekkurler L4roXyL Hayranim sana :p

 

Çevrimdışı

L4roXyL Usta kLavyene SağLık
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
;hail;hail;hail;kil
_________________________

takvim Gazetesinin BaşLığı: KOBAY TÜRKLER => Dünyaya Göre Türkiyede ÜretiLen SigaraLarda 3 kat daha fazla Zehir Tespit ediLmiş peki neden.? kişisel yorumum= TekeL'i sattık yabancılar'a onLarda yıkamadıkLarı osmanlıyı böyle yıkmaya çalışıyor bence daha bir çok örnek var ama yazmakla bitmez bu vatan 3 kuruşa alınmadı 5 kuruşa satmayın.
SatanLar Utansın

 

Çevrimdışı

L4roXyL , Verdiğin Kod Calisiyor Fakat Akick Ekliyor ve Enforce Cekiyor Ama Silmiyor , Silmesinide Istiyorum Kod Biraz Karisik Cözemedim Yardimci Olurmusun(uz)
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 

Çevrimdışı

alias bdwrd var %& = 1 | while (%& <= $lines(kelimeler.txt)) { if ($regex($2-,$read(kelimeler.txt,%&))) { allkick $1 akick sebebi. | break } | inc %& }
alias allkick if ($1) { var %1 = 1 | while (%1 <= $comchan($1,0)) { if ($regex($nick($comchan($1,%1),$me).pnick,@|&|~|%) || $regex($usermode,A|a|N|C)) { cs akick $comchan($1,%1) add $address($1,2) $2- | cs akick $comchan($1,%1) enforce } | cs akick $comchan($1,%1) del $address($1,2) | inc %1 } | var %2 %1 - 1 | echo -at %2 kanalda akick uyguladınız. }
on *:text:*:?:bdwrd $nick $1-

eklediğim yeri kırmızı ve kalın bi şekilde gösterdim şimdi silicektir.

 

regex kullanırken /i parametresini kullanmayı unutmayın.
ayrıca /i kullanılırken kelimelerin ,/(kelime) gibi eklenmesi gerekir.

 

Çevrimdışı

Evet alovepoem haklı.

alias bdwrd var %& = 1 | while (%& <= $lines(kelimeler.txt)) { if ($regex($2-,/ $read(kelimeler.txt,%&)/i)) { allkick $1 akick sebebi. | break } | inc %& }
alias allkick if ($1) { var %1 = 1 | while (%1 <= $comchan($1,0)) { if ($regex($nick($comchan($1,%1),$me).pnick,@|&|~|%) || $regex($usermode,A|a|N|C)) { cs akick $comchan($1,%1) add $address($1,2) $2- | cs akick $comchan($1,%1) enforce } | inc %1 } | var %2 %1 - 1 | echo -at %2 kanalda akick uyguladınız. }
on *:text:*:?:bdwrd $nick $1-

Şeklinde yaparsak daha mantıklı olur.