|
helloweenfs Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
|
|
merhaba herkese iyi forumlar dilerim Eggdrop botu üzerinden kanal geneline belirli saat saniye cinsinden bir metin yazdırtmak istiyoruz bu mümkünmüdür yani örneğin timer özelliğini kullanarak kanal geneline say privmsg komutlarıdan zaman ayarli kanal geneline metin yazar gibi böyle bir kod tcl varsa makbule geçer saygılar sevgiler
|
Merhaba.
Kod: Kodu kopyalamak için üzerine çift tıklayın!
set speaks_chans "*"
set speaks_time 60
set speaks_msg {
{"Yazacaginiz yazi"}
{"Yazacaginiz yazi"}
{"Yazacaginiz yazi"}
}
if {![string match "*time_speaks*" [timers]]} {
timer $speaks_time time_speaks
}
proc time_speaks {} {
global speaks_msg speaks_chans speaks_time
if {$speaks_chans == "*"} {
set speaks_temp [channels]
} else {
set speaks_temp $speaks_chans
}
foreach chan $speaks_temp {
set speaks_rmsg [lindex $speaks_msg [rand [llength $speaks_msg]]]
foreach msgline $speaks_rmsg {
puthelp "PRIVMSG $chan :[subst $msgline]"
}
}
if {![string match "*time_speaks*" [timers]]} {
timer $speaks_time time_speaks
}
}
Kırmızı ile belirttiğim yerleri ayarlamanız yeterli.
2'nci tanımladaki 60 rakamı dakika sayısıdır, buna göre yol izleyebilirsiniz.
NOT: TCL alıntıdır.
İyi forumlar.