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

Scrolling/Flood kick
Edited October 2004
Edited May 2006 scrolling kicks now warns after 7 and kicks after 9.
__________________________________________________________________________

*Do not edit this file.
__________________________________________________________________________

alias scrolban.set { 
  set %scrolban $$?="SET BAN TIME FOR SCROLL KICK. [Note: ban time is in minutes (24 Hours is 1440 Minutes) or use [0] for indefinite ban and click cancel for no ban.] The current ban set in minutes is: %scrolban " | /splay notify.wav 
}


alias scrlm.set {
  set %scrlm $$?="Enter the message you want displayed for the 1st warning for caps kick/spec. The current message is: %scrlm "
}

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

on *:LOAD:{ 
  set %scrol Kick On  
  /splay notify.wav
}

on *:UNLOAD:{ set %scrol Off
  /splay unload.wav
} 

on *:TEXT:*:#:{   
  if ($me isop $chan) || ($nick !isop $chan) || ( $nick !== $me ) {
    inc -u15 [ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] 1
    if ([ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] >= 6) { 
      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) 
      halt
    }

    if ([ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] >= 4) { 
      if (%scrlm = $null) %scrlm = $nick, stop scrolling or you will be auto kicked/speced.
      /msg $chan $nick %scrlm  
    }
  }
}
on *:ACTION:*:#:{ 
  if ($me isop $chan) || ($nick !isop $chan) || ( $nick !== $me ) {
    inc -u15 [ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] 1
    if ([ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] >= 6) { 
      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) 
      halt
    }

    if ([ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] >= 4) { 
      if (%scrlm = $null) %scrlm = $nick, stop scrolling or you will be auto kicked/speced.
      /msg $chan $nick %scrlm  
    }
  }
}


on *:NOTICE:*:#:{ 
  if ($me isop $chan) || ($nick !isop $chan) || ( $nick !== $me ) {
    inc -u15 [ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] 1
    if ([ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] >= 6) { 
      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) 
      halt
    }
    if ([ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] >= 4) { 
      if (%scrlm = $null) %scrlm = $nick, stop scrolling or you will be auto kicked/speced.
      /msg $chan $nick %scrlm  
    }
  }
}


;*******Script Writters Known by God, Unknown to me*******
