set haters [list "123.45.*" "67.89.*" "0.0.0.7"] ;# Hedef Host / IP Listesi

bind join - *!*@* nochat4haters

proc nochat4haters {nick uhost hand chan} {
     if {[isbotnick $nick] || ![channel get $chan shutup]} { return }
     set host [lindex [split [getchanhost $nick] @] 1]
     if {[expr {[lsearch $::haters $host]}] != "-1"} {
          # pushmode $chan +M 
          pushmode $chan +b ~q:*!*@$host
          flushmode $chan
          return 1
     } 
     return 0
}
# .chanset #kanal +shutup
setudef flag shutup