Çevrimdışı

Alıntı:

# Etkilenmeyecek version cevaplarini yazin yildiz koymadigin taktirde tam kelime hali neyse onu almaktadir # mirc iswm operatoru gibi calismaktadir. set admin_chan "#opers" set bv_finger { "*kelebek*" "*mirc v6.16*" "*mirc*" "*v*" "*eggdrop*" "*eggdrop v1.6.17*" "*Chatfox*" "*java*" "*yaprak*" "*eggdropv1.6.17*" "*Script*" "*Elit*" "*take*" "*Yuzuk*" "*yüzük*" "*mIRC*" "*esChat*" "*seconds*" "*zurna*" "*Max*" "*«»*" "*Final*" "*%*" "mIRC v1.0*" "mIRC v6.35*" "mIRCv6.35*" "mIRCv1.0*" "Türkçe mIRC v1.0*" } ## Oper Bilgileri set onick "sanane" set opass "asdasd" ## Finger sorgulamasi sonucu atilacak gline mesaji set bv_reason "4Banlandiniz!.. 2Kurallara uymadiginiz tespit edilmistir. Sunucu kurallarina uymadiginiz icin uzaklastirildiniz. Bilgisayar4(lar)2'inizda 4virus(trojan)2 Olabilir. Lutfen temizleyiniz... Guvenli Girisler icin,4 [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 2Adresini Kullanabilirsiniz..." ## Atilacak olan gline suresi (sn cinsinden) set bv_bantime 1440 ### Bindings ### bind ctcr - FINGER ctcr:bv_ctcp bind raw - NOTICE bv:notice bind evnt - init-server bv:initsrv ### Main Procs ### proc bv:notice {from keyword text} { set text [split $text] set what [join [lrange $text 4 5]] if {$what == "Client connecting"} { set nick [lindex $text 9] putserv "PRIVMSG $nick :\001FINGER\001" } } proc bv:initsrv {type} { global onick opass botnick putserv "OPER $onick $opass" putserv "mode $botnick +s +c" } proc ctcr:bv_ctcp {nick uhost hand dest key arg} { global botnick bv_finger bv_bantime bv_reason if {[string tolower $nick] != [string tolower $botnick]} { foreach finger $bv_finger { if {[string match "[string tolower $finger]" [string tolower $arg]]} { return } else { putserv "SAJOIN $nick #spam " putserv "shun $nick +2h mIRCBot/Saldiri" putserv "PRIVMSG #opers :$nick FINGER icin istenilen cevap'i vermedi.( $arg ) #spam " } } } } ### End ### putlog "TCL loaded: badfinger.tcl Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. "

belirledigim scriptleride shunluyor napmam lazım finger'i gecmesi için ekledigim scriptlerin?