Timeban

[mssxx]

Hello there Wink


I was wondering if someone can make a script like this:


!timeban nick

The script should:

timeban the nick!*@, kick him from channel with reason : blabla and remove it after 60 mins.


Thanks in advance.

Flags: Opers

[metroid]

Code: Select all

bind PUB o|o !timeban pub:timeban

proc pub:timeban {nickname hostname handle channel arguments} {
  if {[llength [set arguments [split $arguments]]] < 1} {
    putquick "NOTICE $nickname :Usage: !timeban nickname"
  } elseif {![onchan [set nick [lindex $arguments 0]] $channel]} {
    putquick "NOTICE $nickname :I don't see $nick on $channel!"
  } else {
    # IRCd should fix the banmask itself
    putquick "MODE $channel +b $nick"
    putquick "KICK $channel $nick :blabla"

    timer 60 [list putquick "MODE $channel -b $nick"]
  }
}