![]() |
!spamekle tcl Buyrun! Arkadaşlar adındanda belli eggdrop dotunuza uyarlarsanız güzel bir koruma saglıcaktır.. !spamekle kelime / !spamekle k e l i m e şeklinde ekleme yapabilirsiniz boşluklu ve boşlukluz !spamsil kelime dir komutları. umarım işinize yarar kolay gelsin. Kod : if {![info exists userinfover] } { putlog "*** spamekle Tcl Yuklenemiyo 2.0 -- Userinfo v1.01 .tcl Yuklu Olmak Zorunda.!" return 0 } bind pub - !spamadd spam:msg proc spam:msg {n u h c a} { global botnick admin_chan set spam_msg [join [split $a .] .?] set yspam_msg [join [split $spam_msg " "] .] set vspam [stripcodes bcru $yspam_msg] set spam [spam:tmz $vspam] if {[onchan $n $admin_chan]==1} { putquick "SPAMFILTER add cpNna gzline 30h 14sunucu_kurallarına_aykırı_reklam/küfür/argo_söz_kullanımdından_dolayı_sunucuya_girişiniz_ yasaklanmıştır2(4CHM2) ^$spam$" putquick "PRIVMSG $c ^$spam$ 15-14-1> 4spamfiltera eklendi" } if {[onchan $n $admin_chan]==0} { putserv "PRIVMSG $admin_chan 5$n 2!spamekle $a 14komutunu kullanmaya çalıştı!" } } bind pub - !spamekle spam:ek proc spam:ek {n u h c a} { global botnick admin_chan if {[onchan $n $admin_chan]==1} { putquick "SPAMFILTER add cpNna gzline 30h 14sunucu_kurallarına_aykırı_reklam/küfür/argo_söz_kullanımdından_dolayı_sunucuya_girişiniz_ yasaklanmıştır2(4CHM2) $a" putquick "PRIVMSG $c $a 15-14-1> 4spamfiltera eklendi" } if {[onchan $n $admin_chan]==0} { putserv "PRIVMSG $admin_chan 5$n 2!spamadd $a 14komutunu kullanmaya çalıştı!" } } bind pub - !spamdel spamsil:msg proc spamsil:msg {n u h c a} { global botnick admin_chan set spam_msg [join [split $a .] .?] set yspam_msg [join [split $spam_msg " "] .] set vspam [stripcodes bcru $yspam_msg] set spam [spam:tmz $vspam] if {[onchan $n $admin_chan]==1} { putquick "SPAMFILTER del cpNna gzline - - ^$spam$" putquick "PRIVMSG $c $a 15-14-1> 4spamfilterdan çıkarıldı" } if {[onchan $n $admin_chan]==0} { putserv "PRIVMSG $admin_chan 5$n 2!spamsil $a 14komutunu kullanmaya çalıştı!" } } bind pub - !spamsil spam:sil proc spam:sil {n u h c a} { global botnick admin_chan if {[onchan $n $admin_chan]==1} { putquick "SPAMFILTER del cpNna gzline - - $a" putquick "PRIVMSG $c $a 15-14-1> 4spamfilterdan çıkarıldı" } if {[onchan $n $admin_chan]==0} { putserv "PRIVMSG $admin_chan 5$n 2!spamdel $a 14komutunu kullanmaya çalıştı!" } } putlog "spamekle" |
Cevap: !spamekle tcl Buyrun! Alıntı:
Bu sekilde bi hata verdi kardes nedendir aceba? while executing "?" (file "scripts/spam.tcl" line 5) invoked from within "source scripts/spam.tcl" (file "koruma.conf" line 110) [18:37] * CONFIG FILE NOT LOADED (NOT FOUND, OR ERROR) |
Cevap: !spamekle tcl Buyrun! arkadaşım bu kodlar sana ait değil ScanX.tcl den almışsın bu 1. si ve altına by aspava yazman ne kadar etik 2. si bu çalışmaz admin kanalı belirtilmemiş admin kanalında uygular bu komutu 3. arkadaşın hata almamısın sebebi 5. satırda forumda görülmeyen bir karakter var onu silmen lazım |
Cevap: !spamekle tcl Buyrun! ben yazdım demedim ki :) kendi kullandıgım tcl mi attım sadece :) |
Cevap: !spamekle tcl Buyrun! :) sen yazdın demedin evet kimin yazdığınıda demedin ve putlog "spamekle by aspava" diye koduda tcl nin sonuna ekledin :D bu ne demek oluyor peki neyse kullanmak isteyen kullanır son olarakda şunu tekrar belirteyim set admin_chan "#admin" şeklinde admin kanalınızı tcl ye eklemeniz gerekmektedir. |
Cevap: !spamekle tcl Buyrun! düzeltiriz :) valla farkında bile degilim direk koydum tcl yi |
Cevap: !spamekle tcl Buyrun! kodu denedim ben çalışmıyor Mirkan58 arkadaşın dediği gibi hata veriyordu if {![info exists userinfover] } { bu kısmı kaldırdım ve 5.satırda olan } bunuda kaldırdım bind pub ile başlayan satırların başına set admin_chan "#opers" olarak ekledim ve tcl bot conf tcl yide aktif ederek bot sunucuda olup !spamekle kelime ve !spamsil gibi komutlar çalışmıyor tcl de bir hata olabilirmi? |
Cevap: !spamekle tcl Buyrun! Kod İçindeki Prosedürlerde: spam:tmz Adında Bir Prosedürün Var Olması Gerektiği Görülmesine Rağmen Yukarıda Verilen Kod'da Böyle Bir Prosedür Yok! Ayrıca Userinfo.tcl'nin Yüklü Olması Gibi Bir Gereklilik, Yukarıdaki Kod İçin; Hiçbir Anlam İfade Etmiyor! Çünkü Userinfo.tcl'ye Ait Hiçbir Komut Yukarıda Yok! Hal Böyleyken O'nada Gerek Yok! Bu Script Çalışmaz! Geçiniz... |
Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 07:02. |
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