ChristianEthics 9.0 Glory to His Holy Name.
_________________________________________________________________________
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/
__________________________________________________________________________

Mode Lock.
Edited October 2004
____________________________________________________________________________

You can change the modes which are locked by editing the file below.
__________________________________________________________________________
on *:LOAD:{ set %model $=mdl On | /splay notify.wav 
}

on *:UNLOAD:{ set %model $=mdl Off | /splay unload.wav 
}

on *:Mode:#:{ 
if ($nick == $me) halt
if ($nick == $mi) halt
  If (+p isin $1-) /Mode # -p 
  If (+i isin $1-) /Mode # -i  
  If (+m isin $1-) /echo $color(kick text) -at [ $nick Set Moderated Room]
  IF (-m isin $1-) /echo $color(kick text) -at [ $nick De-Activated Moderated Room ]
  If (-t isin $1-) /Mode # +t 
  If (+s isin $1-) /Mode # -s 
  if (+k isin $1-) /mode # -k $2  
  if (-n isin $1-) /mode # +n
  if (+mwW isin $1-) /Mode # -mwW  
  If (+mnti isin $1-) /mode # -im 
  if (-nt isin $1-) /mode # +nt 
  if (-u isin $1-) /mode # +u 
  if (+smi isin $1-) /mode # -smi   
  /msg $chan [Mode Lock is on]
}


