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

- Eggdrop, NeoStats, BNC (https://www.ircforumlari.net/eggdrop-neostats-bnc/)

- - Trojan Sorununuz mu Var ? BUYRUN :) (https://www.ircforumlari.net/eggdrop-neostats-bnc/45711-trojan-sorununuz-mu-var-buyrun.html)

Trojan Sorununuz mu Var ? BUYRUN :)

Sunuculara Girerek Reklam Atan Trojanlara Karşı Bir Paylaşımda Bulunmak İstiyorum İzninizle...
Ne Denli Çözüm Olacağını Düşünür, Ne Denli Kullanmak İstersiniz Bilemiyorum Ama Ben Yaklaşık 2 Aydan Beri Kullanıyorum ve Sorunsuz Olarak Çalıştığını Söyleyebilirim. SaW'a da Teşekkür Etmeden Geçmeyeceğim Elbette :)

Anope Servis Kullanan Değerli Dostlar;
Servislerinize ircd_wallonregister Modülünü Kurduktan Sonra Bir Alttaki Mesajımda Paylaşacağım Tcl'yi Eggdrop Botunuza Yüklemeniz Kâfi Olacaktır...
Nedir Bu TCL'nin Özelliği?
Bu TCL Sunucunuz İçerisinde, Kullanıcının ( Botun ) Sunucuya Girişinden Sonra Sizin Belirlediğiniz Zaman Dilimleri İçerisinde Nick Şifreleyen Kişiler Yada Reklamcı Trojanların Sunucudan Banlanmasını Sağlar.
Örnek Verecek Olursak;
irc.KATILSANA.Com Sunucusuna Bağlanıpta İlk 20 Saniye İçinde Nick Şifrelerseniz Eggdrop Sizi Otomatik Olarak Trojan Sebebi İle Sunucudan Banlayacaktır.
Burda Verilen 20 Saniye Yalnızca Bir Örnektir. Dilediğiniz Gibi Düzenlemek Elbetteki Sizin Elinizde.
Bu Sayede Yok Versionları Banlayalım, Yok email ve Şifreleri Spam'a Ekleyelim vs vs Gibi Sıkıntılardan da Büyük Ölçüde Kurtulmuş Olacaksınız Sanırım.
Saygılar...

Kod:

 

bind raw * notice asnotice

proc asnotice {from keyword arg} {

if { [string match "*Client connecting*" $arg] } {

if {[lindex $arg 6] == "on"} {set sa 9}

if {[lindex $arg 6] == "at"} {set sa 8}

if {![info exists ::zfr([set nck [lindex $arg $sa]])]} {

set ::zfr($nck) 1

utimer 15 [list unset ::zfr($nck)]

}

}

}

bind raw * notice psnotice

proc psnotice {from keyword arg} {

if {[string match "*ifreleyenin hostu*" $arg]} {

if {[info exists ::zfr([set nck [stripcodes bcru [lindex $arg 7]]])]} {

putquick "gzline [lindex $arg 7] :9,1Trojan Tespit Edilmiştir. Banned ßy 1,1KaranLIK"

putquick "privmsg nickserv drop [lindex $arg 7]"

}

}

}

Bir Önceki Mesajımda Belirtmeyi Unuttuğum Bir Nokta Daha Var Sanırım.
Bu TCL; Trojan'ı Banladıktan Sonra Banladığı Nickin de Nick Kaydını Silerek DB'lerinizde Şişme Olmasını Engellemektedir.
Saygılar...