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

Time Kick
Edited October 2004
Updated May 2006 to send kick message.
__________________________________________________________________________

*Do not edit this file.
__________________________________________________________________________

on *:LOAD:{ set %timekick $=away On | /splay notify.wav 
}

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

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

alias timemessage.set {
  set %timemessage $$?="Enter the message you want displayed for time kick. The current message is: %timemessage "
}



ctcp 1:time:?: {
  if ($nick isop $chan) halt 
  if ($me isop $chan) {
    if (%timeban = $null) %timeban = off
    if (%timeban = off) { 
      sockwrite -tn msn.server. $+ $cid kick $msn.get($cid,fullroom) $nick : (time check kick) %timemessage
      halt 
    }
    else { 
      sockwrite -tn msn.server. $+ $cid access $msn.get($cid,fullroom) add deny $address %timeban TimeKick. 
      sockwrite -tn msn.server. $+ $cid kick $msn.get($cid,fullroom) $nick : (time check kick) %timemessage Banned %timeban minute(s)
    }
  }

}
