on *:text:*something*:#channel1,#channel2,#channel3,#channel4: msg #mychan $1- [ /msg $nick you said something]
on *:text:!on:#mychan:{
invite $nick #anotherchan
notice $nick join #anotherchan and find your cb matches!
}
on *:part:#mychan: kick #anotherchan $nick stay in #mychan while you are in this channel please.
on *:text:!on*:#mychan: notice $nick !on - nothing more
<- i need this in tcl. hope someone can help me. thanx