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

 Kayıt ol  Topluluk
5Beğeni(ler)

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 28 Temmuz 2012, 20:39   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
badnick taraması




on badnick:JOIN:*:{
if ($ulist($nick,koruma,0) >= 1) { return }
elseif !$istok(#kaaa #kanal1 #kanal2 #Kanal5,$chan,32) {
mode $chan +b $nick
kick $chan $nick 1 Badnick
}
}
alias badnicktara {
if $me isop $1 {
set %:bulunan 0
var %s 1
while %s <= $nick($1,0) {
%:gnick = $nick($1,%s)
if %:gnick isreg $1 && $level(%:gnick $+ !*@*) == badnick {
inc %:bulunan 1
mode # +b $address($1,2)(%:gnick,666,1)
kick $1 %:gnick 1 Badnick
}
inc %s
}
echo -a 2 Badnickler tarandi: $1 - %:bulunan badnick bulundu.
}
else {
echo -a 2 $1 kanalinda OP olmaniz gerekmektedir.
}
}
raw badnick:*: {
badnicktara $1
}
on *:join:#: {
if $level($nick $+ !*@*) == badnick {
mode # +b $nick $address($1,2)($nick,666,1)
kick # $nick 1 Badnick
}
}
on *:nick: {
if $level($newnick $+ !*@*) == badnick {
mode # +b $address($1,2)($newnick,666,1)
kickall $nick 1 Badnick
}
}
alias banall {
var %i 1
while %i <= $comchan($1,0) {
if $1 !isop $comchan($1,%i) { mode $comchan($1,%i) +b $2- }
inc %i
}
}
alias kickall {
var %i 1
while %i <= $comchan($1,0) {
if $1 !isop $comchan($1,%i) { kick $comchan($1,%i) $1 $2- }
inc %i
}
}
on *:op:#: {
if $opnick == $me {
badnicktara #
}
}




Elimde boyle güzel bir badnick taramasi var ama op degilken atmiyor ADminim op değilken kanala girdigimde oto tarayıp atması icin ne yapmam lazım

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Benimmekan Mobil Sohbet
Alt 28 Temmuz 2012, 21:05   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: badnick taraması




alias badnicktara {
if $me isop $1 { burayı kaldırman gerekıo sanırım $me isop ben opsam anlamına gelıo die dusunuorum deneyerek öğrenmek qüzeldir : )

birde burası var on *:op:#: {
if $opnick == $me {
badnicktara #
}
}

burasıda op olduqunda oto taraması için sanırım

 
Alıntı ile Cevapla

Alt 28 Temmuz 2012, 22:34   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: badnick taraması




sanırımı yok
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 
Alıntı ile Cevapla

Alt 29 Temmuz 2012, 02:35   #4
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: badnick taraması




1)
on badnick:JOIN:*:
Yukarıdaki satırla başlayan join eventına gerek yok,silinmeli.

2)
Kanala girdiğimde tarasın istiyorsan
on *:join:#: {
satırının hemen altına aşağıdaki satır ilave edilmeli:
if $nick == $me { badnicktara # }

3)
on *:op:#:
raw badnick:*:
bu 2 event'da silinmeli.

4)
Dangerous123 söylediği doğru.
"badnicktara" aliasında ki kanalda op olma şartı (if) ile aksi durum(else) kısımları alias içerisinden çıkarılmalı.Tabii bu çıkarma işlemi dikkatlice yapılmalı her sorgu karşılığına uygun denk gelen } işaretini de beraberinde çıkarmayı gerektirir.

 
Alıntı ile Cevapla

Alt 30 Temmuz 2012, 19:40   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: badnick taraması




on *:join:#: {
satırının hemen altına aşağıdaki satır ilave edilmeli:
if $nick == $me { badnicktara # }


peki burada kanal belirtilmelimi join eventinde sunucu girişlerinde 3 4 veya daha fazla kanala aynı anda giriş yapılıyor mahsuru olurmu Difuzyon usta

 
Alıntı ile Cevapla

Alt 30 Temmuz 2012, 22:41   #6
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: badnick taraması




LineS Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
on *:join:#: {
satırının hemen altına aşağıdaki satır ilave edilmeli:
if $nick == $me { badnicktara # }


peki burada kanal belirtilmelimi join eventinde sunucu girişlerinde 3 4 veya daha fazla kanala aynı anda giriş yapılıyor mahsuru olurmu Difuzyon usta

Kanal belirtmezsen girdiğin her kanalda badnick taraması yapacaktır.
on *:join:#: {
if $nick == $me { badnicktara # }
Dediğinde #sohbet #kelime #oyun girdiğinde hepsi için ayrı ayrı tarayacaktır.Sana kalmış birşey ama bence genel sohbet kanalı hangisiyse onu yaz,şayet birden çok global sohbet kanalı olan büyük bir sunucuda değilsen.Ama tüm kanallarda tarayıp hepsinden atsın dersen kanal belirtme.Sakıncası mirci kasmak olabilir bir ihtimal.

 
Alıntı ile Cevapla

Alt 26 Eylül 2012, 21:28   #7
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: badnick taraması




Benim scriptimdeki Bad nick listesini bu kodla taratıp çalıştırabilirmiyiz? /tara yazdiğimizda tüm kanallarda bad nickleri cikartsa?

__________________
Learn from yesterday, live for today, hope for tomorrow.
 
Alıntı ile Cevapla

Alt 27 Eylül 2012, 08:44   #8
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: badnick taraması




Forumu biraz daha incelerseniz soruların cevaplarını %90 oranda bulursunuz.

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] şu link'i inceleyin.

__________________
Ne Gülüyorsun, Anlattığım Senin Hikâyen..
 
Alıntı ile Cevapla

Alt 27 Eylül 2012, 19:35   #9
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: badnick taraması




#göster off
on ^*:hotlink:*Uyarı*:#:return
on ^*:hotlink:*Kick*:#:return
on ^*:hotlink:*Kick+ban*:#:return
on ^*:hotlink:*Badnick-Ekle*:#:return
on *:hotlink:*:#:{
if $remove($1,$chr(40),$chr(41)) == Uyarı {
var %line $gettok($strip($remove($gettok($strip($hotline),1, 40),Giriş
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
),2,93)
set %lastnick $strip(%line)
notice %line %line kullanmış olduğunuz nick yasaklanmıştır. Eğer 60 saniye içinde nickinizi değiştirmezseniz kanaldan uzaklaştırılıcaksınız!
$+(timer,$strip(%line)) 1 60 uzaklastir $chan %line Badnick yasaktır. Nickinizi değiştiriniz.
}
elseif $remove($1,$chr(40),$chr(41)) == Kick {
var %line $gettok($strip($remove($gettok($strip($hotline),1, 40),Giriş
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
),2,93)
kick $chan %line Badnick yasaktır. Nickinizi değiştiriniz.
}
elseif $remove($1,$chr(40),$chr(41)) == Kick+ban {
var %line $gettok($strip($remove($gettok($strip($hotline),1, 40),Giriş
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
),2,93)
mode $chan +b %line | kick $chan %line Badnick yasaktır. Nickinizi değiştiriniz.
}
elseif $remove($1,$chr(40),$chr(41)) == Badnick-Ekle {
var %line $gettok($strip($remove($gettok($strip($hotline),1, 40),Giriş
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
),2,93)
badnick ekle %line
kick $chan %line Badnick yasaktır. Nickinizi değiştiriniz.
}
}
on *:part:#:{
if $timer($nick) {
timer $+ $nick off
}
}
on *:quit:{
if $timer($nick) {
timer $+ $nick off
}
}
on ^*:join:#:{
.haltdef
if $hfind(badnick,$nick,1,W).data {
echo $chan $+(2[,$time,]) Giriş: 4 $+ $nick $+ 2 $remove($+($chr(40),$address($nick,1),$chr(41)),*, !) 5Badnick! 4(1Uyarı4) 10 4(1Kick4) 10 4(1Kick+ban4)
}
else {
echo $chan $+(2[,$time,]) Giriş: $nick $remove($+($chr(40),$address($nick,1),$chr(41)),*, !) 4(1Badnick-Ekle4)
}
}
#göster end
#kickle off
on *:join:#:{
if $hfind(badnick,$nick,1,W).data {
uzaklastir $chan $nick Badnick yasaktır. Nickinizi değiştiriniz.
}
}
#kickle end

alias badnick {
if $1 == ekle {
if !$hfind(badnick,$2,1,W).data {
hadd -m badnick $r(1000,999999) $2
hsave badnick badnick.Vt-Aux
hload badnick badnick.Vt-Aux
echo -a 10Badnick listesine $+(2,,$2,10) eklendi.
}
else {
echo -a 10 $+(2,,$2,10) zaten badnick listesinde mevcut.
}
}
elseif $1 == sil {
if $hfind(badnick,$2,1,W).data {
hdel badnick $ifmatch
hsave badnick badnick.Vt-Aux
hload badnick badnick.Vt-Aux
echo -a 10 $+(2,,$2,10) badnick listemden silindi.
}
else {
echo -a 10 $+(2,,$2,10) zaten badnick listemde yok.
}
}
else {
echo -a 10 Komutu yalnış kullandınız.
echo -a 10 Örnek: 2 /badnick ekle nick* 10 gibi eklemelerinizde wildcard geçerlidir.
}
}
on *:nick:{
if $nick == %lastnick {
$+(.timer,%lastnick) off
}
if $hfind(badnick,$newnick,1,W).data {
var %a = 1, %b = $comchan($newnick,0)
while %a <= %b {
if $me isop $comchan($newnick,%a) {
mode $v2 +b $newnick
kick $v2 $newnick /Nick YENINICK seklinde rumunuzu degistirip oyle kanala giris yapabilirsiniz. • Vt-Aux-SyS •
}
inc %a
}
}
}

alias uzaklastir {
mode $1 +b $2
kick $1 $2 $3-
}
alias yordam {
if $1 == göster {
echo -a Artık badnickler'i kanalınıza girdiğinde Manuel işlem yapabiliceksiniz.
enable #göster
hload badnick badnick.Vt-Aux
}
elseif $1 == kickle {
if $2 == on {
echo -a Artık badnickler otomatik olarak atılıcaktır.
enable #kickle
hload badnick badnick.Vt-Aux
}
elseif $2 == off {
echo -a Kickleme durumu kapatıldı.
disable #kickle
}
}
elseif $1 == durum {
if !%ilkcalisma {
hmake badnick
set %ilkcalisma 1
echo -a Addon ilk defa çalıştırıldığı için herhangi bir yordam açık değil.
echo -a Lütfen /Aux durum komutunu tekrar deneyin.
}
else {
echo -a Sistemdeki Aux durumu:
echo -a Manuel Kontrol: $iif($group(#göster).status == on,Aktif,Çalışmıyor)
echo -a Otomatik Kontrol: $iif($group(#kickle).status == on,Aktif,Çalışmıyor)
echo -a Zamanlı listeleme: $iif(%listeleme,Aktif,Çalışmıyor)
if $group(#kickle).status == off && $group(#göster).status == off {
echo -a Şuanda kanalınız korunaksız.
echo -a Herhangi birini açmak için: /yordam göster|kickle kullanabilirsiniz.
echo -a Otomatik olarak badnick listelemek için: /Aux listele saniye #kanal kapatmak için /Auxlisteleme #kanaladı şeklinde yapabilirsiniz.
}
}
}
elseif $1 == listele {
if $2 && $3 {
set %listeleme $addtok(%listeleme,$3,32)
$+(.timer,$3) 0 $2 badtara $3
echo -a Vt-Aux-Sys artık $2 saniyede bir $3 kanalını badnick taraması yapacaktır.
}
}
elseif $1 == listeleme {
if $2 {
set %listeleme $remtok(%listeleme,$2,32)
$+(.timer,$2) off
echo -a $2 Badnick Tarama kontrolü durduruldu.Vt-Sys
}
}
elseif $1 == off {
disable #kickle
disable #göster
echo -a Tüm Aux kapandı. Kanalınız Muaf
}
else {
echo -a Yalnış komut kullanımı.
echo -a Lütfen /Aux istatislik komutunu Kullan.
}
}


alias badtara {
if $1 {
var %/ 1
while %/ <= $hget(badnick,*).item {
if $hfind(badnick,$nick($1,%/),1,W).data {
mode $chan +b $nick($1,%/) | kick $chan $nick($1,%/) /Nick YENINICK seklinde rumunuzu degistirip oyle kanala giris yapabilirsiniz. • Vt-Aux-SyS •
}
inc %/
}
}
}
on *:op:#:$iif($opnick == $me,badtara $chan,return)
on *:start:hmake badnick | hload badnick badnick.Vt-Aux

__________________
kS.-.cMGz
 
Alıntı ile Cevapla

Alt 06 Aralık 2012, 17:38   #10
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: badnick taraması




arkadaşlar forumda baktım göremedim bi yardımcı olurmusunuz kanalda herhangi bir nick badnick`e geçtiğinde korumam tarafından atılsın istiyorum böyle bir kod varsa bana verebilirsiniz lütfen

 
Alıntı ile Cevapla

Cevapla

Etiketler
badnick, taraması


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Badnick Taraması Kod istegi yardım Nothinq mIRC Scripting Sorunları 11 22 Şubat 2013 20:42
Klon Taraması JohnGalt mIRC Scripting Sorunları 3 18 Ağustos 2011 17:44
İp Taraması kilicli_32 mIRC Scripting Sorunları 3 19 Ocak 2010 21:16
Clone Taraması Kan mIRC Scripting Hazır Kodlar 5 07 Ekim 2007 10:41
clone taraması Absolve mIRC Scripting Sorunları 3 11 Ekim 2006 21:14