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

Spec Scrolling.
__________________________________________________________________________

*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 use the cancel button for no bans.] 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 spec On | scrlm.set | /splay notify.wav 
}

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




on *:text:*:#:{  
 if ($me isop $chan) || ($nick !isop $chan) || ( $nick !== $me ) {
  inc -u10 [ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] 1 
    if ([ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] >= 7) {  
          if ($nick !isop $chan) /mode $chan -v $nick 
          $iif(m isin $gettok($chan($chan).mode,1,32),$style(1)) if (%scrolban != $null) access $chan add deny $address($nick,2) %scrolban Scrolling.
          $iif(m isin $gettok($chan($chan).mode,1,32),$style(1)) kick $chan $nick %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 -u10 [ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] 1 
    if ([ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] >= 7) {  
          if ($nick !isop $chan) /mode $chan -v $nick 
          $iif(m isin $gettok($chan($chan).mode,1,32),$style(1)) if (%scrolban != $null) access $chan add deny $address($nick,2) %scrolban Scrolling.
          $iif(m isin $gettok($chan($chan).mode,1,32),$style(1)) kick $chan $nick %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 -u10 [ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] 1 
    if ([ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] >= 7) {  
          if ($nick !isop $chan) /mode $chan -v $nick 
          $iif(m isin $gettok($chan($chan).mode,1,32),$style(1)) if (%scrolban != $null) access $chan add deny $address($nick,2) %scrolban Scrolling.
          $iif(m isin $gettok($chan($chan).mode,1,32),$style(1)) kick $chan $nick %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 Writter Known by God, Unknown to me*******
