## Bota söz dinleteceğiniz kanal
set okanal "#ops"

bind pub - !tumban tumban

proc tumban { n u h c a } {
global okanal
if {$okanal != $c || [llength $a] < 1} {return 0}
set nick [lindex $a 0]
    foreach kanal [channels] {
        if {[onchan $nick $kanal]} {
        putquick "mode $kanal +b *!*[string range [getchanhost $nick] [string first @ [getchanhost $nick]] e]" 
        putquick "kick $kanal $nick Tüm Kanallarımdan Atıldın..!"
        }
    }
}

### Tumban Tcl
## Kullanımı; Belirlediğiniz kanal genelinde  !tumban nick  şeklindedir.
# Coded By BuCaLI