## here you go..short and simple msg invite proc and a channel setting variable


set inviteChan "#somechan"

proc msgInvite {nick uhost hand text} {
   if {![matchattr $nick F|F $::inviteChan]} {return}
   putserv "INVITE $nick $::inviteChan"
}
bind msg - !invite msgInvite

