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

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   badnicke dönüşte koddaki hata (https://www.ircforumlari.net/mirc-scripting-sorunlari/39628-badnicke-donuste-koddaki-hata.html)

SaintCty 18 Ekim 2007 11:18

badnicke dönüşte koddaki hata
 
arkadaslar baya bir zaman önce yine burdan bir kod aldım ama son zamanlarda kullanmak nasip oldu kodun anlamı kanalda bir kullanıcı badnicke geciş yapıca onu algılayıp atması ama bişi dikkatimi cekti
mesela a.txt de badnickleri yazmışım orda misal veriyorum abaza nicki var bir kullanıcı abaza degilde nickini az yapınca yine atıyor yani badnickin içindeki kelimeye göre atıyor diger bi örnek gotcu bir kullanıcı nicki ot yapınca yine kod badnicke gectigini algılayarak atıyor

kod;
menu status,menubar,channel {
.(V)Nick Badnicke Dönme
..Açık:.enable #badarama | .echo -a 9,1Badnicke Dönme Koruma Açıldı 
..Kapalı:.disable #badarama | .echo -a 13,1Badnicke Dönme Koruma Kapatıldı 
}
#badarama on
on @*:nick:{
if $read(a.txt,w,$addtok(* $+ $newnick,*,0)) {
set %nickc 0
:start
inc %nickc
if ($comchan($newnick,%nickc) != $null) {
mode $comchan($newnick,%nickc) +b $newnick
kick $comchan($newnick,%nickc) $newnick 0,1 Badnicke Gecmek KesinLikLe Yasaktır. 14,1/nick y€ninick
goto start
}
}
}
#badarama end

kod bana ait degil alıntıdır ben sadece enable disable ekledim her zaman calışmasın diye
a.txt de alt alta
eklemişim badnickleri şöyle

travesti
soyun
yalar
gotcu
abaza

kullanıcı nickini ot yapsada calışıyor az yapsada calışıyor yani içinde gecen bişi olsa bile calışıyor yardımlarınız için şimdiden tşkler

L4roXyL 18 Ekim 2007 12:44

Cevap: badnicke dönüşte koddaki hata
 
Bad.txt diye bir dosya oluştur.
İçine yasakladığın nickleri alt alta yaz.
Senin sorunun; $addtok(* $+ $newnick,*,0) buradan kaynaklanıyor.
Birazda wilcards bilginin olması lazım.
Yani ilk öncelikle şunu bilmelisin;
Gay* (Gay kelimesi ile başlıyanları baza alır)
*Gay (Gay kelimesi ile bitenleri baza alır)
*Gay* (İçinde gay kelimesi geçenleri baza alır)

Bu mantıktan yola çıkarak vereceğim kod'da $+($v1,*) kısmını kendine göre değiştirebilirsin.
Buradaki $v1 while döngüsünün okuttuğu bad.txt içindeki kelimelerdir.
Neyse kod'u vereyim daha iyi anlarsın.

on *:nick: { var %_ = 1 | while $read(bad.txt,%_) { if $+($v1,*) iswm $newnick { var %- = 1,%-- = $comchan($me,0) } | inc %_ } | while %- <= %-- { if $me isop $comchan($me,%-) { ban -k $comchan($me,%-) $newnick 2 sebebin. } | inc %- } }

Bu kod'da kalın olarak gösterdiğim yerde, şu işlevi yapar;
Eğer bad.txt içerisine eklediğin kelimelerden herhangi birisi, nick değişen bir kullanıcının nick'iyle başlıyorsa op olduğun tüm kanallardan balıyacaktır.
Yani mesela gay ekledin bad.txt dosyasına, eğer değişen nick; gay_man ile yine banlıyacaktır.
$+($v1,*) bu kısımı yukarıda verdiğim wilcards bilgisine göre;
$+(*,$v1) veya $+(*,$v1,*) şeklinde değişebilirsin.
Umarım demek istediğimi anlamışsındır, zaten bunun için bu kadar açıklama yaptım.

SaintCty 18 Ekim 2007 13:44

Cevap: badnicke dönüşte koddaki hata
 
uıstam eline koluna saglık yanlız şu anda bir sorunla karşılaştım oda bulundugum bütün kanalarda o nick bulummadıgı halde banlıyor
mesela 10 kanaldayım admin operhelp ne bilim op kanalı help kanalı hepsinde banlıyor yani nick o kanalara belki ömür boyu girmiycek yinede maskı mbanlıyor nasıl cözücez yardımcı olursan bir zahmet usta

L4roXyL 18 Ekim 2007 15:11

Cevap: badnicke dönüşte koddaki hata
 
on *:nick: { var %_ = 1 | while $read(bad.txt,%_) { if $+($v1,*) iswm $newnick { var %- = 1,%-- = $comchan($me,0) } | inc %_ } | while %- <= %-- { if $me isop $comchan($me,%-) && $newnick ison $comchan($me,%-) { ban -k $comchan($me,%-) $newnick 2 sebebin. } | inc %- } }

Kalın olarak gösterdiğim yeri eklersen, sorunun çözülecektir.

SaintCty 18 Ekim 2007 17:37

Cevap: badnicke dönüşte koddaki hata
 
Alıntı:

L4roXyL Nickli Üyeden Alıntı (Mesaj 274498)
on *:nick: { var %_ = 1 | while $read(bad.txt,%_) { if $+($v1,*) iswm $newnick { var %- = 1,%-- = $comchan($me,0) } | inc %_ } | while %- <= %-- { if $me isop $comchan($me,%-) && $newnick ison $comchan($me,%-) { ban -k $comchan($me,%-) $newnick 2 sebebin. } | inc %- } }

Kalın olarak gösterdiğim yeri eklersen, sorunun çözülecektir.

ustam cok tşkm ederim son bir ricada bulunacam buda bu adnonu tamamlıycak kodun calışmasını istemedigim bir kac kanal var mesela
#help #operhelp #opkanalı bunları nasıl halt edicez be denedim olmadı

L4roXyL 18 Ekim 2007 18:56

Cevap: badnicke dönüşte koddaki hata
 
on *:nick: { var %_ = 1 | while $read(bad.txt,%_) { if $+($v1,*) iswm $newnick { var %- = 1,%-- = $comchan($me,0) } | inc %_ } | while %- <= %-- { if $me isop $comchan($me,%-) && $newnick ison $comchan($me,%-) && !$istok(#kanal1 #kanal2 #kanal3,$comchan($me,%-),32) { ban -k $comchan($me,%-) $newnick 2 sebebin. } | inc %- } }

Yine kalın olarak gösterdiğim yer.

sniper 22 Kasım 2007 14:22

Cevap: badnicke dönüşte koddaki hata
 
ellerine sağlık ustam anlatım da gayet güzeldi söylenecek söz bulamıyom kılavyene sağlık :D
__________________________
Yaşanmadan Geçen YıLLar Utansın

Cranck 27 Şubat 2008 17:37

Cevap: badnicke dönüşte koddaki hata
 
on *:nick: { var %_ = 1 | while $read(bad.txt,%_) { if $+($v1,*) iswm $newnick { var %- = 1,%-- = $comchan($me,0) } | inc %_ } | while %- <= %-- { if $me isop $comchan($me,%-) && $newnick ison $comchan($me,%-) && !$istok(#kanal1 #kanal2 #kanal3,$comchan($me,%-),32) { ban -k $comchan($me,%-) $newnick 2 sebebin. } | inc %- } }

Peki biz Bunu mircin Kullanıcı listesindeki Kişileri atmamız için ne yapmalıyız.

detay 27 Şubat 2008 17:44

Cevap: badnicke dönüşte koddaki hata
 
Kod:

on seviye:nick: {
  var %_ = 1
 while %- <= %-- { if $me isop $comchan($me,%-) && !$istok(#kanal1 #kanal2 #kanal3,$comchan($me,%-),32) { ban -k $comchan($me,%-) $newnick 2 sebebin. } | inc %- }
}

bu sekilde olur badnick seviyen kacsa onu yazarsin.

Cranck 29 Şubat 2008 02:02

Cevap: badnicke dönüşte koddaki hata
 
CalışmIor Denedim Her hangi Bi Tepki Yok Bad Nickler Su sekilde kullancı kısımında ekli
155:gy*!*@*


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 22:50.

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