bind msg - "Msg:" say-Msg
proc say-Msg { nick host hand txt } {
if {$nick == "My1" || $nick == "My1xT" || $nick == "My1-mob" || $nick == "My1-roflBNC" || $nick == "My1-BNC"} {
set nlist ""
set msg ""
set target ""
set nlist [split $txt "\>"]
set target [lindex $nlist 0}
set msg [lindex $nlist 1]
    puthelp "PRIVMSG $target : $msg"
}
}

bind msg - "Notc:" say-Notc
proc say-Notc { nick host hand txt } {
if {$nick == "My1" || $nick == "My1xT" || $nick == "My1-mob" || $nick == "My1-roflBNC" || $nick == "My1-BNC"} {
set nlist ""
set msg ""
set target ""
set nlist [split $txt "\>"]
set target [lindex $nlist 0]
set msg [lindex $nlist 1]
    putnotc $target $msg
}
}