Cevap: !temizle Tcl
##############
# Temizleme tclsi #
# By intelbilisim#
##############
set tmzl "0,0_____________________________________________ __________________________________________________ __________________________________________________ __________________________________________________ __________________________________________________ __________________________________________________ __________________________________________________ __________________________________________________ _____________"
bind pub - !temizle temizlik
proc temizlik {nick user hand chan arg} {
global tmzl
if {![isop $nick $chan]} {return 0}
putquick "PRIVMSG $chan : $tmzl ______ "
putquick "PRIVMSG $chan : $tmzl _____ "
putquick "PRIVMSG $chan : $tmzl ____ "
putquick "PRIVMSG $chan : $tmzl ___ "
putquick "PRIVMSG $chan : $tmzl __ "
putquick "PRIVMSG $chan : $tmzl _ "
putquick "PRIVMSG $chan : $tmzl "
putquick "PRIVMSG $chan : Kanal ekranı temizlendi.."
}
Biraz değişiklik yaptım Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. fena Olmadı Hani Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. denedim Süper çalışıyor Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. |