ChristianEthics-VSIXc V3.2
Updated Sept 2006 to work on VSIXc Chat Network
www.VSIXc.com

_________________________________________________________________________
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/
__________________________________________________________________________

Sleeper Profanity Kick.
Edited October 2004
Updated May 2006 to send kick message.
1) to Add more kick words, scroll down and copy and paste the commands,
and add a new word.
-----------------------------------------------------------------------
Sleeper Auto Nick Kick/Ban and Annoying Nick-Kick

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.

2) This file can also kick participants who join your room with nicknames
that have profanity, or porn content in their names.
*You can add words below, that will cause an auto kick if the word is 
contained in the nickname of the joiner.

3) This file also auto kicks/bans users who are using the: Random Gate 
numbers. If you do not want to kick random gate users, then delete 
the gate numbers from the file named: 'randomgates' (Its in the
ParticipantsList folder)

4) This file also auto kicks/bans many of the known porn/spam bot gate 
numbers. If you do not want to kick random gate users, then delete 
the gate numbers from the file named: 'spam/porn' (Its in the
ParticipantsList folder) 

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

*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.


*Random Gate List from tech gear download.
*Porn List from Extreme Boards List.
*Thankyou to SudsyUncle for posting the example for the:'fr txt file' kick.
______________________________________________________________________________
;[Flooding-Scrolling Sleepr-Kick]


on *:TEXT:*:#:{   
  if ($nick !isop $chan) || ( $nick !== $me ) {
    inc -u15 [ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] 1
    if ([ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] >= 5) { 
      if (%scrlm = $null) %scrlm = $nick, stop scrolling or you will be auto kicked/speced.
      /msg $chan $nick %scrlm  
    }
    if ([ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] >= 7) {
      /pass %pass  
      if (%scrolkickm = $null) %scrolkickm = No! Scrolling
      if (%scrolban != $null) access $chan add deny $address($nick,2) %scrolban Scrolling
      kick $chan $nick : (scrolling) %scrolkickm Banned %scrolban minute(s) 
      /mode $chan -o $me
      /mode $chan -q $me
    }
  }
}
on *:ACTION:*:#:{ 
  if ($nick !isop $chan) || ( $nick !== $me ) {
    inc -u15 [ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] 1
    if ([ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] >= 5) { 
      if (%scrlm = $null) %scrlm = $nick, stop scrolling or you will be auto kicked/speced.
      /pass %pass  
    }
    if ([ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] >= 7) {
      mode $me +h %pass  
      if (%scrolkickm = $null) %scrolkickm = No! Scrolling
      if (%scrolban != $null) access $chan add deny $address($nick,2) %scrolban Scrolling
      kick $chan $nick : (scrolling) %scrolkickm Banned %scrolban minute(s) 
      /mode $chan -o $me
      /mode $chan -q $me
    }
  }
}
on *:NOTICE:*:#:{ 
  if ($nick !isop $chan) || ( $nick !== $me ) {
    inc -u15 [ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] 1
    if ([ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] >= 5) { 
      if (%scrlm = $null) %scrlm = $nick, stop scrolling or you will be auto kicked/speced.
      /msg $chan $nick %scrlm  
    }
    if ([ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] >= 7) {
      /pass %pass
      if (%scrolkickm = $null) %scrolkickm = No! Scrolling
      if (%scrolban != $null) access $chan add deny $address($nick,2) %scrolban Scrolling
      kick $chan $nick : (scrolling) %scrolkickm Banned %scrolban minute(s) 
      /mode $chan -o $me
      /mode $chan -q $me
    }
  }
}




;[porn detector]
on *:TEXT:*http*:?: { if ($nick !isop $chan) /pass %pass 
  access $chan add deny $nick 0 ProbablePorn 
  kick $chan $nick : ('http' said in whisper, possible porn kick) 
  /mode $chan -o $me
  /mode $chan -q $me
}
on *:TEXT:*cyber*:?: { if ($nick !isop $chan) /pass %pass 
  access $chan add deny $nick 0 Porn 
  kick $chan $nick : ('cyber' said in whisper, possible porn kick) 
  /mode $chan -o $me
  /mode $chan -q $me
}
on *:TEXT:*cyber sex*:?:  { if ($nick !isop $chan) /pass %pass 
  access $chan add deny $nick 0 Porn 
  kick $chan $nick : ('sex' said in whisper, possible porn kick) 
  /mode $chan -o $me
  /mode $chan -q $me
}
on *:TEXT:*naked*:?:  { if ($nick !isop $chan) /pass %pass 
  access $chan add deny $nick 0 Porn 
  kick $chan $nick: ('sex' said in whisper, possible porn kick) 
  /mode $chan -o $me
  /mode $chan -q $me
}

;[kick and ban sentences in whisper ONLY] 
on *:TEXT:*ass hole*:?: sleeperwhisperkick
on *:TEXT:*f u c k*:?: sleeperwhisperkick
on *:TEXT:*pecker head*:?: sleeperwhisperkick 
on *:TEXT:*dick head*:?: sleeperwhisperkick 
on *:TEXT:*cock sucker*:?: sleeperwhisperkick
on *:TEXT:*blow me*:?: sleeperwhisperkick
on *:TEXT:*suck my*:?: sleeperwhisperkick 
on *:TEXT:*blow job*:?: sleeperwhisperkick 
on *:TEXT:*screwed in the ass*:?: sleeperkick 
on *:TEXT:*up the ass*:?: sleeperwhisperkick 
on *:TEXT:*in the ass*:?: sleeperwhisperkick 
on *:TEXT:*ass wipe*:?: sleeperwhisperkick 
on *:TEXT:*dickhead*:?: sleeperwhisperkick 
on *:TEXT:*fuck*:?: sleeperwhisperkick 
on *:TEXT:*fuk*:?: sleeperwhisperkick
on *:TEXT:*phuck*:?: sleeperwhisperkick
on *:TEXT:*phuk*:?: sleeperwhisperkick 
on *:TEXT:*piss*:?: sleeperwhisperkick 
on *:TEXT:*asshole*:?: sleeperkick 
on *:TEXT:*shit*:?: sleeperwhisperkick  
on *:TEXT:*dammit*:?: sleeperwhisperkick  
on *:TEXT:*bitch*:?: sleeperwhisperkick 
on *:TEXT:*bittch*:?: sleeperwhisperkick 
on *:TEXT:*bastard*:?: sleeperwhisperkick 
on *:TEXT:*clit:?: sleeperwhisperkick 
on *:TEXT:*dildo*:?: sleeperwhisperkick 
on *:TEXT:*cunt:?: sleeperwhisperkick  
on:* TEXT:*hail satan*:?: sleeperwhisperkick
on *:TEXT:*hail thy self*:?: sleeperwhisperkick
on *:TEXT:*hail thyself*:?: sleeperwhisperkick
on *:TEXT:*god sucks*:?: sleeperwhisperkick
on *:TEXT:*jesus sucks*:?: sleeperwhisperkick 
on *:TEXT:*god is dead*:?:  sleeperwhisperkick 
on *:TEXT:*Satan loves me*:?: sleeperwhisperkick 
on *:TEXT:*god sucks*:?:  sleeperwhisperkick 
on *:TEXT:*god is a loser*:?: sleeperwhisperkick 
on *:TEXT:*Satan rules*:?: sleeperwhisperkick
on *:TEXT:*I love satan*:?: sleeperwhisperkick 
on *:TEXT:*god is gay*:?: sleeperwhisperkick 
on *:TEXT:*god is a fag*:?: sleeperwhisperkick 
on *:TEXT:*jesus is a loser*:?: sleeperwhisperkick 
on *:TEXT:*jesus is gay*:?: sleeperwhisperkick 
on *:TEXT:*jesus is a fag*:?: sleeperwhisperkick 
on *:TEXT:*god is a fag*:?: sleeperwhisperkick 


;[kick and ban sentences] 
on *:TEXT:*shut your hole*:: sleeperkick 
on:* TEXT:*hail satan*:*: sleeperkick
on *:TEXT:*hail thy self*:*: sleeperkick
on *:TEXT:*hail thyself*:*: sleeperkick
on *:TEXT:*god sucks*:*: sleeperkick
on *:TEXT:*jesus sucks*:*: sleeperkick 
on *:TEXT:*god is dead*:*:  sleeperkick 
on *:TEXT:*Satan loves me*:*: sleeperkick 
on *:TEXT:*god sucks*:*:  sleeperkick 
on *:TEXT:*god is a loser*:*: sleeperkick 
on *:TEXT:*Satan rules*:*: sleeperkick
on *:TEXT:*I love satan*:*: sleeperkick 
on *:TEXT:*god is gay*:*: sleeperkick 
on *:TEXT:*god is a fag*:*: sleeperkick 
on *:TEXT:*jesus is a loser*:*: sleeperkick 
on *:TEXT:*jesus is gay*:*: sleeperkick 
on *:TEXT:*jesus is a fag*:*: sleeperkick 
on *:TEXT:*god is a fag*:*: sleeperkick 
on *:TEXT:*ass hole*:*: sleeperkick
on *:TEXT:*f u c k*:*: sleeperkick
on *:TEXT:*pecker head*:*: sleeperkick 
on *:TEXT:*dick head*:*: sleeperkick 
on *:TEXT:*cock sucker*:*: sleeperkick
on *:TEXT:*suck my*:*: sleeperkick 
on *:TEXT:*blow job*:*: sleeperkick 
on *:TEXT:*suck on this*:*: sleeperkick 
on *:TEXT:*screwed in the ass*:*: sleeperkick 
on *:TEXT:*up the ass*:*: sleeperkick 
on *:TEXT:*in the ass*:*: sleeperkick 
on *:TEXT:*ass wipe*:*: sleeperkick 
on *:TEXT:*dickhead*:*: sleeperkick 
on *:TEXT:*fuck*:*: sleeperkick 
on *:TEXT:*fuk*:*: sleeperkick 
on *:TEXT:*phuck*:*: sleeperkick 
on *:TEXT:*phuk*:*: sleeperkick 
on *:TEXT:*piss*:*: sleeperkick 
on *:TEXT:*asshole*:*: sleeperkick 
on *:TEXT:*shit*:*: sleeperkick 
on *:TEXT:*dammit*:*: sleeperkick  
on *:TEXT:*bitch*:*: sleeperkick 
on *:TEXT:*bittch*:*: sleeperkick 
on *:TEXT:*bastard*:*: sleeperkick 
on *:TEXT:*clit*:*: sleeperkick 
on *:TEXT:*dildo*:*: sleeperkick 
on *:TEXT:*cunt*:*: sleeperkick 

;[Action Form kick and ban sentences] 
on *:action:*shut your hole*:: sleeperkick 
on:* action:*hail satan*:*: sleeperkick
on *:action:*hail thy self*:*: sleeperkick
on *:action:*hail thyself*:*: sleeperkick
on *:action:*god sucks*:*: sleeperkick
on *:action:*jesus sucks*:*: sleeperkick 
on *:action:*god is dead*:*:  sleeperkick 
on *:action:*Satan loves me*:*: sleeperkick 
on *:action:*god sucks*:*:  sleeperkick 
on *:action:*god is a loser*:*: sleeperkick 
on *:action:*Satan rules*:*: sleeperkick
on *:action:*I love satan*:*: sleeperkick 
on *:action:*god is gay*:*: sleeperkick 
on *:action:*god is a fag*:*: sleeperkick 
on *:action:*jesus is a loser*:*: sleeperkick 
on *:action:*jesus is gay*:*: sleeperkick 
on *:action:*jesus is a fag*:*: sleeperkick 
on *:action:*god is a fag*:*: sleeperkick 
on *:action:*ass hole*:*: sleeperkick
on *:action:*f u c k*:*: sleeperkick
on *:action:*pecker head*:*: sleeperkick 
on *:action:*dick head*:*: sleeperkick 
on *:action:*cock sucker*:*: sleeperkick
on *:action:*suck my*:*: sleeperkick 
on *:action:*blow job*:*: sleeperkick 
on *:action:*suck on this*:*: sleeperkic? 
on *:action:*screwed?in the ass*:*: sleeperkick 
on *:action:*up the ass*:*: sleeperkick 
on *:action:*in the ass*:*: sleeperkick 
on *:action:*ass wipe*:*: sleeperkick 
on *:action:*dickhead*:*: sleeperkick 
on *:action:*fuck*:*: sleeperkick 
on *:action:*fuk*:*: sleeperkick 
on *:action:*phuck*:*: sleeperkick 
on *:action:*phuk*:*: sleeperkick 
on *:action:*piss*:*: sleeperkick 
on *:action:*asshole*:*: sleeperkick 
on *:action:*shit*:*: sleeperkick 
on *:action:*dammit*:*: sleeperkick  
on *:action:*bitch*:*: sleeperkick 
on *:action:*bittch*:*: sleeperkick 
on *:action:*bastard*:*: sleeperkick 
on *:action:*clit*:*: sleeperkick 
on *:action:*dildo*:*: sleeperkick 
on *:action:*cunt*:*: sleeperkick 


;[On-Join Profanity in Name Kick and Nick Kicker]
on *:join:*:{ 
  if ($nick == $me) /halt

  if (sex isin $nick ) { Profanitynickkick 
  }
  if (fuck isin $nick ) { Profanitynickkick 
  }
  if (bitch isin $nick ) { Profanitynickkick 
  }
  if (dammit isin $nick ) { Profanitynickkick 
  }
  if (www. isin $nick ) { Profanitynickkick 
  }
  if (dickhead isin $nick ) { Profanitynickkick 
  }
  if (nipple isin $nick ) { Profanitynickkick 
  }
  if (nippel isin $nick ) { Profanitynickkick 
  }
  if (blowjob isin $nick ) { Profanitynickkick 
  }
  if (cunt isin $nick ) { Profanitynickkick 
  }
  if (penis isin $nick ) { Profanitynickkick 
  }
  if (bastard isin $nick ){ Profanitynickkick 
}
if (shit  isin $nick ) { Profanitynickkick 
} 
if (pervert isin $nick ) { Profanitynickkick 
} 
if (bittch isin $nick ) { Profanitynickkick  
}
if (dildo isin $nick ) { Profanitynickkick  
}
if (slut isin $nick ) { Profanitynickkick  
}
if (cocksucker isin $nick ) { Profanitynickkick  
}
if (asshole isin $nick ) { Profanitynickkick  
}
if (asswhip isin $nick ) { Profanitynickkick  
}
if (naked isin $nick ) { Profanitynickkick  
}

if ($read(Lists\spamporn.txt,w,* $+ $nick $+ *)) {
  spammkick
}
if ($read(Lists\spamporn.txt,w,* $+ $address($nick,2) $+ *))  {
  spammkick
}
if ($read(Lists\kicklist.txt,w,* $+ $nick $+ *)) {
  kickklist
}
if ($read(Lists\kicklist.txt,w,* $+ $address($nick,2) $+ *)) {
  kickklist
}

if ($read(Lists\disconnectlist.txt,w,* $+ $nick $+ *))  {
  disconnectt
}
if ($read(Lists\disconnectlist.txt,w,* $+ $address($nick,2) $+ *)) {
  disconnectt
}

if ($read(Lists\randomgates.txt,w,* $+ $address($nick,2) $+ *)) {
  randomgatekick
}
}

alias spammkick { 
/pass %pass
if (%bantimes !== $null) access $chan add deny $address($nick,2) %bantimes SpamList
kick $chan $nick : (Spam List) Banned for %bantimes mins
/mode $chan -o $me
/mode $chan -q $me
}

alias kickklist { 
/pass %pass
if (%bantimes !== $null) access $chan add deny $address($nick,2) %bantimes KickList
kick $chan $nick : (Kick List) Banned for %bantimes mins.
/mode $chan -o $me
/mode $chan -q $me
}
alias Profanitynickkick { 
/pass %pass
if (%bantimes !== $null) access $chan add deny $address($nick,2) %bantimes ProfanityInName
kick $chan $nick : (Profanity In Name) Banned for %bantimes mins.
/mode $chan -o $me
/mode $chan -q $me
}
alias randomgatekick {
/pass %pass
if (%bantimes !== $null) access $chan add deny $address($nick,2) %bantimes RandomGate 
kick $chan $nick : (Random Gate) Banned for %bantimes mins.
/mode $chan -o $me
/mode $chan -q $me
}
alias disconnectt { 
/pass %pass 
if (%bantimes !== $null) access $chan add deny $address($nick,2) %bantimes KickListed  
privmsg $nick You are on Auto Disconnect List. | .timer -m 30 100 .ctcp $nick time  
echo $color(kick text) -at [ $nick -Disconnect List. Attempting to Silent-Disconect] 
echo $color(kick text) -at If $nick is NOT disconnected, it is because they are using a script with protection.   
/mode $chan -o $me
/mode $chan -q $me
}


on *:notice:*:#:{ tokenize 32 $vstrip($1-)
if (AWAY isin $1-) {
  if ($nick == $me) halt 
  if ($nick isop $chan) halt  
  if (%awayflood. [ $+ [ $nick ] ] == $null) {
    set -u25 %awayflood. [ $+ [ $nick ] ] 1
  }
  else { inc %awayflood. [ $+ [ $nick ] ] }
  if (%awayflood. [ $+ [ $nick ] ] >= 4) { 
    /pass %pass
    /msg $chan $nick $+ , if you continue this away flood, you will be auto kicked. 
  }
  if (%awayflood. [ $+ [ $nick ] ] >= 7) {
    if (%awayfloodban == $null) access $chan add deny $address($nick,2) 5 AwayFlood.  
    if (%awayfloodban != $null) access $chan add deny $address($nick,2) %awayfloodban AwayFlood.
    kick $chan $nick : (Away Flood) Banned %awayfloodban minute(s)
    unset %awayflood. [ $+ [ $nick ] ]
    /mode $chan -o $me
    /mode $chan -q $me
  }
}
if (BACK isin $1-) {
  if ($nick == $me) halt 
  if ($nick isop $chan) halt 
  if (%unawayflood. [ $+ [ $nick ] ] == $null) {
    set -u20 %unawayflood. [ $+ [ $nick ] ] 1
  }
  else { inc %unawayflood. [ $+ [ $nick ] ] }
  if (%unawayflood. [ $+ [ $nick ] ] >= 4) { 
    /pass %pass
    /msg $chan $nick $+ , if you continue this back flood, you will be auto kicked. 
  } 
  if (%unawayflood. [ $+ [ $nick ] ] >= 7) {
    if (%awayfloodban == $null) access $chan add deny $address($nick,2) 5 AwayFlood.
    if (%awayfloodban != $null) access $chan add deny $address($nick,2) %awayfloodban AwayFlood.
    kick $chan $nick : (Back Flood) Banned %awayfloodban minute(s)
    unset %unawayflood. [ $+ [ $nick ] ]
    /mode $chan -o $me
    /mode $chan -q $me
  }
}




on *:JOIN:#: { if ($nick == $me) { halt }
  if ($nick isop #) { return }
  .inc -u5 %revolve [ $+ [ $chan $+ [ $nick ] ] ]
  if (%revolve [ $+ [ $chan $+ [ $nick ] ] ] == 4) && ($nick ison #) {
    /pass %pass
    access $chan add deny $address($nick,2) %bantimes JoinLeave.
    kick $chan $nick : (Join-Leave flood) Banned for 5 minute(s).
    /mode $chan -o $me
    /mode $chan -q $me
    halt
  }
}



--------------------------------------------------------------------------------
Do not edit below here.
--------------------------------------------------------------------------------
alias sleeperkick { if ($nick !isop $chan)  
  /pass %pass 
  access $chan add deny $address($nick,2) %bantimes Profanity. 
  kick $chan $nick (sleeper kick) %sleeperkickm . (Ban set for %sleeperkickm $+  mins) 
  /mode $chan -o $me
  /mode $chan -q $me
  /echo $color(highlight text) -at [Auto De-hosted because sleeper kick is on.]
}
alias sleeperwhisperkick { if ($nick isowner $chan) halt 
  if ($nick isop $chan) halt 
  /pass %pass 
  access $chan add deny $address($nick,2) %bantimes Profanity. 
  kick $chan $nick (sleeper kick) Profanity in Whisper. 
  /mode $chan -o $me
  /mode $chan -q $me 
  echo $color(highlight text) -at [Auto De-hosted because sleeper kick is on]
}

alias bantimes.set { 
  set %bantimes $$?="SET BAN TIME FOR SLEEPER KICK. [Note: ban time is in minutes (24 Hours is 1440 Minutes) or use [0] for indefinite ban and use the cancel button for no bans.  The current ban set in minutes is: %bantimes " | /splay notify.wav 
}
on *:UNLOAD: { set %slpr Off 
  /splay unload.wav 
}
on *:LOAD:{ set %slpr On 
  /splay chimes.wav 
  set %pass $$?="Please enter the current Owner or Host Pass" 
  /splay chimes.wav 
  set %bantimes $$?=" SET BAN TIME FOR SLEEPER KICK . [Note: ban time is in minutes (24 Hours is 1440 Minutes) or use [0] for indefinite ban and use the cancel button for no bans. The current ban set in minute is: %bantimes " | /splay notify.wav 
}
alias sleeperkickm.set {
  set %sleeperkickm $$?="Enter the message you want displayed for sleeper kick. The current message is: %sleeperkickm "
}
