rendered paste body# ïğîöåäóğà î÷èñòêè îòâåòîâ îò ìóñîğà ïåğåä ñğàâíåíèåì
proc ::tpub::filter {text} {
regsub -all {[;:()\[\]!?.,/\\{}]} [tolower $text] "" text;
return [string trim $text]
}
### ğåàêöèÿ íà ïóáëè÷íûå êîìàíäû
bind pubm - * ::tpub::msg_pub
proc ::tpub::msg_pub {nick uhost hand chan text} { global botnick; variable conf
# Ïğîâåğÿåì âîçìîæíîñòü èãğû íà ıòîì êàíàëå.
if {[string range $chan 0 0] == "#" && ![playground exists $chan]} {
return
}
# îãğàíè÷èâàåìñÿ îäíèì êàíàëîì
if {![playground exists $chan]} {
return
}