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*!*@*

LauReLL 29 Şubat 2008 04:08

Cevap: badnicke dönüşte koddaki hata
 
seviye yazan yere 155 yazmalısın

on seviye:nick: {
var %x = 1
while $comchan($newnick,%x).op {
if $istok(#kanal1 #kanal2 #kanal3,$v1,32) { halt }
ban -k $v1 $newnick 2 sebebin.
inc %x
}
}

bunun gb

veyada

on @666:join:#:{
if ($nick != $me) {
kick # $nick 7Düşman Listemdesin %logo
mode # +b $address($nick,2)
}
}

yukardaki kodu ekle ve kişileride şu şekilde ekle;
.auser 666 nick gibi eklemeler yap o zaman Kod işine Yarıyacaktır...


----------

Değiştirme : )

detay 29 Şubat 2008 04:11

Cevap: badnicke dönüşte koddaki hata
 
bu benim onceden kullandigim kod 666 badnick seviyesi sen kendine gore degistir
Kod:

on *:nick: {
  if $level($+($newnick,!*@*)) == 666 { 
    var %x = 1 | while $comchan($newnick,%x) { var %' = $v1 | if $me isop %' && !$istok(#kanal1 #kanal2,%',32) { mode %' +b $newnick | kick %' $newnick Sebep } | inc %x }
  }
}


OperServ 12 Ocak 2009 18:04

Cevap: badnicke dönüşte koddaki hata
 
valla bise anladimsa arap olayim

sniper 12 Ocak 2009 19:37

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

detay Nickli Üyeden Alıntı (Mesaj 360564)
bu benim onceden kullandigim kod 666 badnick seviyesi sen kendine gore degistir
Kod:

on *:nick: {
  if $level($+($newnick,!*@*)) == 666 { 
    var %x = 1 | while $comchan($newnick,%x) { var %' = $v1 | if $me isop %' && !$istok(#kanal1 #kanal2,%',32) { mode %' +b $newnick | kick %' $newnick Sebep } | inc %x }
  }
}


şimdi bu kod örnek levels bölümünde nickler şöyle ekli ise çalışırmı wildcard algılarmı arkadaşın dediği o sanırım örnek

badnick:*****!*@*
badnick:got!*@*
badnick:penis*!*@*
badnick:*sex!*@*

Gibi wildcard ları algılıyormu demek istiyor sanırım badnick: arkadaşta 155: gibi ekli sanırım aynı şey zaten 666 badnick olarak değiştirsek çalışırmı? tşk :)

OperServ 12 Ocak 2009 20:19

Cevap: badnicke dönüşte koddaki hata
 
kod calismiyor.

Difuzyon 12 Ocak 2009 20:25

Cevap: badnicke dönüşte koddaki hata
 
Neyi , nasıl eklediniz? bir görelim , ona göre cevap yazalım...

OperServ 12 Ocak 2009 20:30

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

on *:nick: {
  if $level($+($newnick,!*@*)) == 666 { 
    var %x = 1 | while $comchan($newnick,%x) { var %' = $v1 | if $me isop %' && !$istok(#kanal1 #kanal2,%',32) { mode %' +b $newnick | kick %' $newnick Sebep } | inc %x }
  }
}

sunu ekledim

*** deneme Nick değişerek *** Oldu

ole yaptim ama atmadi

Difuzyon 12 Ocak 2009 21:16

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

on *:nick: {
  if $level($newnick) == 666 { 
    var %x = 1 | while $comchan($newnick,%x) { if $me isop $comchan($newnick,%x) { mode $comchan($newnick,%x) +b $newnick | kick $comchan($newnick,%x) $newnick Sebep } | inc %x }
  }
}
alias badekle {
  .auser 666 $1
  echo -a $1 badnick olarak eklendi.
}
alias badsil {
  .ruser 666 $1
  echo -a $1 badnick listesinden silindi.
}

Önceki kodları silelim,baştan yeniden yapalım.Kodu remote kısmına ekliyorsun.

Sonrada scriptinde aşağıdaki şekilde yazıyorsun.
/badekle ***
/badekle gay

Ardından kanalda nick değişenler bu eklediklerindeki bir nicke geçerse , senin @ op olduğun kanallarda varsa ,sadece @ olduğun kanallarda banlayıp atacaktır.

Denedim çalışıyor...

OperServ 12 Ocak 2009 21:38

Cevap: badnicke dönüşte koddaki hata
 
valla ben yapamadim bu isi daha dogrusu anlmadim tam :(

sniper 12 Ocak 2009 22:47

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

operserv Nickli Üyeden Alıntı (Mesaj 621206)
Kod:

on *:nick: {
  if $level($+($newnick,!*@*)) == 666 { 
    var %x = 1 | while $comchan($newnick,%x) { var %' = $v1 | if $me isop %' && !$istok(#kanal1 #kanal2,%',32) { mode %' +b $newnick | kick %' $newnick Sebep } | inc %x }
  }
}

sunu ekledim

*** deneme Nick değişerek *** Oldu

ole yaptim ama atmadi

ben bu kodu denedim çalışıyor ve wildcard algılayarak çalışıyor
levels bölümünde şöyle ekli olması gerek

666:****!*@*
666:***!*@*
666:*****!*@*
666:****!*@*

not: sende dene bende sorun çıkmadı gibi ama sende dene sorumluluk almıyim :D yanlış nick falan atar bilemem kolay gelsin

Difuzyon 12 Ocak 2009 23:24

Cevap: badnicke dönüşte koddaki hata
 
Arkadaşlar normalde , join event'ında (kanal girişte) $fulladdress kısmını görebilirsiniz.
Ama nick event'ında fulladdress bilgisini alamazsınız.Yani $nick değişerek $newnick olduğu zaman sadece nick kısmından işlem yapar.

Şimdi siz bu !*@* kısmını eklemekle diğer korumalarınızla ortak çalışmasını sağlamış oluyorsunuz.Başka bir korumadan da aynı anda faydalanmayı sağlamışsınız sniper.

Kanala giren badnick korumasında nick!ident@host biligisinden diyelimki ident bilgisini banlamak istediniz.Aynı ekleme stiliyle *!ident@* kodun dengesini bozmamış oluyoruz.

Her iki kodda çalışıyor.

OperServ 12 Ocak 2009 23:31

Cevap: badnicke dönüşte koddaki hata
 
ben denedim yine calismadi :(

detay 15 Ocak 2009 12:53

Cevap: badnicke dönüşte koddaki hata
 
arkadasim senin mirc sürümün eski demekki yazilan kodda $v1 var bunu tanimlamiyorsa mircin calismasini bekleme zaten

sniper 15 Ocak 2009 15:35

Cevap: badnicke dönüşte koddaki hata
 
detay ben mirc 6.16 ile denedim çalışıyor operserv sende bir yanlışlıkvar kardeşim yaptığın işlemleri anlatırsan belki sorunu bulabilirler iyi forumlar


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

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