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/)
-   -   badnick taraması (https://www.ircforumlari.net/mirc-scripting-sorunlari/497920-badnick-taramasi.html)

XDie 28 Temmuz 2012 20:39

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

Dangerous123 28 Temmuz 2012 21:05

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

XDie 28 Temmuz 2012 22:34

Cevap: badnick taraması
 
sanırımı yok :)

Difuzyon 29 Temmuz 2012 02:35

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.

LineS 30 Temmuz 2012 19:40

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

Krieq 30 Temmuz 2012 22:41

Cevap: badnick taraması
 
Alıntı:

LineS Nickli Üyeden Alıntı (Mesaj 1041183796)
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.

Carpediem 26 Eylül 2012 21:28

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

OkyAnuS 27 Eylül 2012 08:44

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.

IRC-Dancer 27 Eylül 2012 19:35

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ş:)),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ş:)),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ş:)),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ş:)),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

Bilecikli 06 Aralık 2012 17:38

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


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

Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net