Bu TCL amacına uygun değil zaten @
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] olayı basit şekilde şöyle halledersin;
PHP Kod: Kodu kopyalamak için üzerine çift tıklayın!
set admin_chan "#Opers"
bind pub - !global global:msg
proc global:msg {n u h c a} {
global botnick admin_chan
if {($c != $admin_chan)} { return }
set glob_msg [lindex $a ]
if {$glob_msg == ""} { putquick "privmsg $c :Global mesaji yazmadiniz."; return 0 }
if {[onchan $n $admin_chan]==1} {
putquick "PRIVMSG operserv : global $glob_msg"
putquick "PRIVMSG #Opers : Belirttiginiz mesaj tum sunucuya global olarak gonderildi."
}
if {[onchan $n $admin_chan]==0} {
putquick "MODE $c +b $n"
putquick "KICK $c $n Bu komutu kullanmaya yetkiniz yok!"
}
}
Komut: !global MESAJ