# Mesaj methodu. ("NOTICE" veya "PRIVMSG")
set msgmethod "NOTICE"

bind raw * notice snotice:connect
proc snotice:connect {from keyword text} {
global botnick msgmethod
    if {[string match -nocase "*client connecting*" $text]} {
    set nick [lindex $text 9]
        putquick "$msgmethod $nick :MESAJ 1"
        putquick "$msgmethod $nick :MESAJ 2"
        putquick "$msgmethod $nick :MESAJ 3"
        putquick "$msgmethod $nick :MESAJ 4"
        putquick "$msgmethod $nick :MESAJ 5"
    }
}