bind pub -|- !addpre echo_proc set srcchan "#pre.test1" set destchan "#pre.test2" set srcnick "PORCELAiN" set ::lastadd "" proc echo_proc {nick uhost handle chan args} { global srcchan destchan srcnick putquick "PRIVMSG $destchan : DEBUG1: proc was tiggered once" if { $chan == $srcchan && $nick == $srcnick } { putquick "PRIVMSG $destchan : DEBUG2: passed checkpoint 1 - target channel & bot OK" set bits [split $args " "] if { $::lastadd == [lindex $bits 0] } { return 0 } set ::lastadd [lindex $bits 0] set release [lindex $bits 0] set section [lindex $bits 1] set group [lindex [split $release "-"] end] putquick "PRIVMSG $destchan : $release $section $group" } }