kick script which responds to a certain hostmask

Sphinx · Post by **Sphinx** » Wed Mar 12, 2003 6:36 am

does anybody know how to make a simple one or maybe already excists

a script which for example works like !kick then kicks people with a certain hostmask

ppslim · Post by **ppslim** » Wed Mar 12, 2003 7:30 am

This can be used in conjunction with a AUTH script.

At this time, anybody matching a global or channel master, can use it.

Code: Select all

bind pub m|m "!kick" my:pub:kick
proc my:pub:kick {nick uh hand chan arg} {
  set mask [lindex [split $arg] 0]
  if {![string length [set rsn [join [lrange [split $arg] 1 end]]]]} {
    set rsn "Mask kick"
  }
  set list [list]
  foreach user [chanlist $chan] {
    if {[string equals -nocase $user $nick]} { continue }
    if {[string match -nocase $mask [getchanhost $user $chan]]} { lappend list $user }
  }
  putkick $chan [join $list {,}] $rsn
}

Sphinx · Post by **Sphinx** » Wed Mar 12, 2003 7:41 am

ok thanks

so this would kick everybody matching the hostmask when !kick has being enter in the channel?

ppslim · Post by **ppslim** » Wed Mar 12, 2003 9:05 am

Examples in the channel

!kick *!*dcc*@*aol.com AOL XDCC lamers
!kick *aol* No AOL at all
!kick *!*@*.com

You can specify a reason after the mask, but it's not needed.

Sphinx · Post by **Sphinx** » Wed Mar 12, 2003 9:35 am

ah ok got it now
thanks alot