Kod: Kodu kopyalamak için üzerine çift tıklayın!
#Konusma icin zaman sureci (Dk cinsinden)
set zaman_araligi "15"
#Uygulamanin calismasi icin
#botun oper login ve nick login paslari
#oper login
set o_login "global"
#Oper Login sifresi
set o_pass "123654789globalbot"
#Nick identify sifresi
set b_ipass "123654789"
#bind
bind evnt - init-server baglanti:ayari
#mesajlar
set global_msg {
"Mesajı buraya yazınız."
"mesajı bu şekilde asagıya ekleyebilirsiniz."
"kolay gelsin"
}
if {![string match "*konusma_zamani*" [timers]]} {
timer $zaman_araligi konusma_zamani
}
proc konusma_zamani {} {
global global_msg zaman_araligi
set global_rmsg [lindex $global_msg [rand [llength $global_msg]]]
putserv "NOTICE $* $global_rmsg"
timer $zaman_araligi konusma_zamani
return 1
}
proc baglanti:ayari {type} {
putserv "NICKSERV IDENTIFY $b_ipass
putserv "OPER $o_login $o_pass"
putserv "WALLOPS :Global mesaj sistemi aktif!"
}
putlog "Global mesaj atma sistemi yuklendi"
putlog "Bot OPER ve Global kullanma izni olmadigi surece"
putlog "Calismayacaktir!"
putlog "mail:
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
"
Bu kod içindeki bilgileri düzgün sekilde doldur ve global msj atmasını istedin eggdrop bot'a TCL 'yi ekle..Eklemiş oldun eggdrop bot'un global msj atma yetkisinin olduna emin ol aksi takdirde atmıycakdır.Veya bazı arkadaslarda yetkisi var diyor ama bot atmıyor diyorlar bunun içinde bot'un yetkisi oper ve ircop ise /os oper add eggdrop'un Nick
Admin ve üzeri bi yetkide ise /os admin add eggdrop'un Nick'i şeklinde OperServ erişimine eklemen gerekir.İyi Forumlar..