﻿ChristianEthics 9.4
_________________________________________________________________________
E-mail: ChristianEthics2@yahoo.ca 
Messenger: ChristianEthics@hotmail.com 
Home page: http://ca.geocities.com/christianethics2
Message Board: http://groups.yahoo.com/group/ChristianEthics_BibleBotDownloadZone/
__________________________________________________________________________

Auto Nick Kicker/Banner
Edited October 2004
Updated May 2006 so it will send the whole kick message.

1) This file causes nicknames which have been added to the kicklist 
   to be auto kicked on-join. It Bans them via their gate number.

NOTE: Do Not leave empty spaces in the files found in the Lists folder.

*If you want to remove a SPECIFIC gatenumber from a file with several,
 you can use the: 'Search' feature in the upper menu bar of each file.

Cross symbol is: †
-----------------------------------------------------------------------
do not edit below here.
-----------------------------------------------------------------------

on *:join:*:{ 
if ($nick == $me) halt
if ($nick == $mi) halt
if ( $nick isop $chan) halt
if (%nickkickban = $null) %nickkickban = 1
if (%nickkickban = off) %nickkickban = 1
if ($read(Lists\kicklist.txt,w,* $+ $address $+ *)) && ($me isop #) {
 kickklist2
 }
if ($read(Lists\kicklist.txt,w,* $+ $address($nick,1) $+ *)) && ($me isop #) {
 kickklist2
 }
if ($read(Lists\kicklist.txt,w,* $+ $address($nick,6) $+ *)) && ($me isop #) {
 kickklist2
 }
if ($read(Lists\kicklist.txt,w,* $+ $fulladdress $+ *)) && ($me isop #) {
 kickklist2
 }

if ($read(Lists\kicklist.txt,w,* $+ $address $+ *)) && ($mi isop #) {
 kickklist2
 }
if ($read(Lists\kicklist.txt,w,* $+ $address($nick,1) $+ *)) && ($mi isop #) {
 kickklist2
 }
if ($read(Lists\kicklist.txt,w,* $+ $address($nick,6) $+ *)) && ($mi isop #) {
 kickklist2
 }
if ($read(Lists\kicklist.txt,w,* $+ $fulladdress $+ *)) && ($mi isop #) {
 kickklist2
 }
}

alias kickklist2 { 
   sockwrite -tn msn.server. $+ $cid access $msn.get($cid,fullroom) add deny $address %nickkickban KickList
   sockwrite -tn msn.server. $+ $cid kick $msn.get($cid,fullroom) $nick : (kicklist) %nickkickmessage banned %nickkickban minute(s)
}

alias nickkickban.set { 
set %nickkickban $$?="SET BAN TIME FOR NICK KICK. [Note: ban time is in minutes (24 Hours is 1440 Minutes) or use [0] for indefinite ban.] The current ban set in minutes is: %nickkickban (warning, if you choose to use the silent disconnect option, know that most script users cannot be disconnected)" | /splay notify.wav 
}
alias nickkickmessage.set {
set %nickkickmessage $$?="Enter the message you want displayed for Nick Kick. The current message is: %nickkickmessage "
}


on *:LOAD:{ set %nickkicker $=kick partial On | /splay chimes.wav | set %nickkickban $$?="SET BAN TIME FOR NICK KICK. [Note: ban time is in minutes (24 Hours is 1440 Minutes) or use [0] for indefinite ban and the word [off] for no ban] The current ban set in minutes is: %nickkickban " | /splay notify.wav
}
on *:UNLOAD:{ set %nickkicker $=kick Off | /splay unload.wav
}
