On Mon 10-May-1999  3:07p, [EMAIL PROTECTED] wrote:
a> 6. Ban and kickban reasons as well as kick reasons, plus multiple kick,
a> ban and
a> kickban reasons and the abilitiy to use % parameters for things like nicks
a> and
a> stuff. So it could be something like:

a> Kick Reason: Stop pirating Amirc keyfiles %n!

Here's a Temp-Ban-Kick that I added to kuang11's scripts...

It allows you to /tbk nick, or set up a "popup" where you hilight the person
and it kicks for ya...  Change the r='You are outta here!' to be whatever ya
want.

It simply sets a ban, and kicks the person for a few seconds so the person's
script or client does not auto-rejoin on it's own.


tbk:
pr='TempBanKick'
if args='' then do
        cecho(pr,'Usage : /TBK [NICK] <REASON>')
        exit
end
parse var args n r
n=resnick(n)
if~uexists(n) then do
        cecho(pr,'Unknown Nick' bld(n))
        exit
end
host=gethost(n)
if r='' then r='You are outta here!'
channel=getchan()
mod('-o+b' n '*!*@'userdomain(substr(host,pos('@',host)+1)))
if ison(n) then kick(channel,n,r)
delay(350) 
mod('-o-b' n '*!*@'userdomain(substr(host,pos('@',host)+1)))

return 0



John

DR. John M. Hoyt / AKA Warren Peace  -  amicon.net SysAdmin
                       WarNPeace     -  irc.BeyondIRC.Net NetAdmin
                                     -  C-Link! International Coordinator
                                     -  ZenMetal/CNet Alpha Team


__________________________________________________________
AmIRC Mailing List - Info & Archive: http://www.vapor.com/
For Listserver Help: <[EMAIL PROTECTED]>, "HELP"
To Unsubscribe: <[EMAIL PROTECTED]>, "UNSUBSCRIBE"

Reply via email to