bind pub - .gir joinchan

set kanallar "oyun radyo istanbul zurna ankara"

proc joinchan { n u h c a } {
if { [lsearch -exact $::kanallar [string map {"#" ""} [lindex $a 0]]] > -1 } {
putquick "SAJOIN $n #$a"
}
}