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

Profanity Kick/Ban

Edited Sept 2004 to work with both ClearMSN decoded nicklist and Vincula encoded nicklist
Edited Sept 2004 to work with 'show users colors'and 'msn colors' options
Fully Tested
Updated Nov 2004 to kick profanity words sent in action form
Updated April 2006
Updated May 2006 so it will send the whole kick message.
___________________________________________________________________________

1) To add or delete phrases that will cause a profanity kick,
copy and paste the desired command and 
then replace it with a new profanity phrase.

2) Down below is also a spot to add/delete phrases that will cause a
poor language kick, with no ban.

3) NOTE: two of the lists of words below are for whisper ONLY. (but
the whisper profanity kick only works of ChristianEthics has that
room screen open and active) 
________________________________________________________________________________________________________________

on *:TEXT:*gwenstest*:*: profkick
on *:action:*gwenstest*:#: profkick

on *:TEXT:*gwenstest2*:*: profkick2
on *:TEXT:*gwenstest3*:#: profkick3



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


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


;[WHISPER ONLY - kick and ban words]
on *:TEXT:*ass hole*:?: profkick2
on *:TEXT:*asshole*:?: profkick2
on *:TEXT:*ass wipe*:?: profkick2
on *:TEXT:*f u c k*:?: profkick2
on *:TEXT:*damn you*:?: profkick2
on *:TEXT:*pecker head*:?: profkick2
on *:TEXT:*dam you*:?: profkick2
on *:TEXT:*dick head*:?: profkick2
on *:TEXT:*suck on this*:?: profkick2
on *:TEXT:*cock sucker*:?: profkick2
on *:TEXT:*suck my:?: profkick2
on *:TEXT:*blow job:?: profkick2
on *:TEXT:*screw you*:?: profkick2
on *:TEXT:*screwed in the ass*:?: profkick2 
on *:TEXT:*up the ass*:?: profkick2
on *:TEXT:*ass wipe*:?: profkick2
on *:TEXT:*dickhead*:?: profkick2
on *:TEXT:*fuck*:?:  profkick2
on *:TEXT:*fuk:?: profkick2
on *:TEXT:*phuck*:?: profkick2
on *:TEXT:*phuk:?: profkick2 
on *:TEXT:*piss:?: profkick2
on *:TEXT:*asshole*:?: profkick2
on *:TEXT:*shit:?: profkick2
on *:TEXT:*tits:?: profkick2
on *:TEXT:*dammit*:?: profkick2 
on *:TEXT:*bitch*:?: profkick2
on *:TEXT:*bittch*:?: profkick2 
on *:TEXT:*bastard*:?: profkick2
on *:TEXT:*clit:?: profkick2
on *:TEXT:*dildo:?: profkick2
on *:TEXT:*cunt:?: profkick2


;[Kick words - no ban]
on *:TEXT:*wtf:*:  profkick3
on *:TEXT:*(_|_)*:*:  profkick3  
on *:TEXT:*F you*:*: { if (of y isin $1-) halt | if (if y isin $1-) halt | else profkick3 }


-----------------------------------------------------------------------------------------------------
**Do not edit below this line 
__________________________________________________________________________________________________

alias profkick { 
  if (%profban = $null) { %profban = off }
  if ($nick == $me) halt
  if ($nick isop $chan) halt 
  if ($me isop $chan) sockwrite -tn msn.server. $+ $cid access $msn.get($cid,fullroom) add deny $address %profban Profanity 
  if ($me isop $chan) sockwrite -tn msn.server. $+ $cid kick $msn.get($cid,fullroom) $nick : (profanity) %prok Banned %profban minute(s)

}

alias profkick2 { 
  if (%profban = $null) { %profban = off }
  if ($nick == $me) halt 
  if ($nick isop $msn.get($cid,fullroom)) halt
  if ($me isop $msn.get($cid,fullroom)) sockwrite -tn msn.server. $+ $cid access $msn.get($cid,fullroom) add deny $address %profban Profanity 
  if ($me isop $msn.get($cid,fullroom)) sockwrite -tn msn.server. $+ $cid kick $msn.get($cid,fullroom) $nick : (Profanity in whisper) Banned %profban minute(s)

}

alias profkick3 { 
  if ($nick == $me) halt 
  if ($nick isop $chan) halt 
  if ($me isop $chan) sockwrite -tn msn.server. $+ $cid kick $msn.get($cid,fullroom) $nick : Please use respectful language. 
}

alias profban.set { 
  set %profban $$?="SET BAN TIME FOR PROFANITY 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: %profban " | /splay notify.wav 
}


alias profanity-kickwords.set { 
  set %profanity-kickwords $$?="SET BAN TIME FOR PROFANITY 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: %profanity-kickwords " | /splay notify.wav 
}

alias prok.set {
  set %prok $$?="Enter the message you want displayed for profanity kick/spec. The current message is: %prok "
}


on *:LOAD:{ 
  set %profanity $=kick Kick On 
  ;/splay chimes.wav 
  ;prok.set 
  ;profban.set 
  /splay notify.wav 
}

on *:UNLOAD:{ 
  set %profanity $=Kick Off 
  /splay unload.wav
}
