ChristianEthics 9.3
_________________________________________________________________________
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
__________________________________________________________________________

*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 the word [off] 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 $=scl Kick On 
  ;/splay chimes.wav 
  ;scrlm.set 
  ;scrolkickm.set 
  ;scrolban.set  
  /splay notify.wav
}

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

on *:TEXT:*:#:{  
  if ($nick == $me) halt 
  if ($nick isop $chan) halt 
  if ($me isop #) {
    inc -u10 [ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] 1
    if ([ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] > 2) {    
      if ([ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] > 3) { 
        if (%scrlm = $null) %scrlm = $nick, stop scrolling or you will be auto kicked/speced.
        /msg $chan $nick %scrlm  
        if ([ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] > 4) { 
          if (%scrolban = $null) %scrolban = off
          if (%scrolkickm = $null) %scrolkickm = No Scrolling!
          sockwrite -tn msn.server. $+ $cid access $msn.get($cid,fullroom) add deny $address %scrolban Scrolling 
          sockwrite -tn msn.server. $+ $cid kick $msn.get($cid,fullroom) $nick (scrolling kick) %scrolkickm Banned %scrolban minute(s) 
        }
      }
    }
  }
}
on *:ACTION:*:#:{ 
  if ($nick == $me) halt  
  if ($nick isop $chan) halt 
  if ($me isop #) {
    inc -u10 [ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] 1 
    if ([ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] > 2) {
      if ([ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] > 3) {
        if (%scrlm = $null) %scrlm = $nick, stop scrolling or you will be auto kicked/speced.
        /msg $chan $nick %scrlm  
        if ([ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] > 4) {
          if (%scrolban = $null) %scrolban = off
          if (%scrolkickm = $null) %scrolkickm = No Scrolling!
          sockwrite -tn msn.server. $+ $cid access $msn.get($cid,fullroom) add deny $address %scrolban Scrolling 
          sockwrite -tn msn.server. $+ $cid kick $msn.get($cid,fullroom) $nick %scrolkickm Banned %scrolban minute(s)
        }   
      }
    }
  }
}
on *:NOTICE:*:#:{ 
  if ($nick == $me) halt 
  if ($nick isop $chan) halt 
  if ($me isop #) {
    inc -u10 [ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] 1 
    if ([ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] > 2) {
      if ([ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] > 3) {
        if (%scrlm = $null) %scrlm = $nick, stop scrolling or you will be auto kicked/speced.
        /msg $chan $nick %scrlm  
        if ([ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] > 4) {
          if (%scrolban = $null) %scrolban = off
          if (%scrolkickm = $null) %scrolkickm = No Scrolling!
          sockwrite -tn msn.server. $+ $cid access $msn.get($cid,fullroom) add deny $address %scrolban Scrolling 
          sockwrite -tn msn.server. $+ $cid kick $msn.get($cid,fullroom) $nick %scrolkickm Banned %scrolban minute(s)
        }   
      }
    }
  }
}







if ($nick == $mi) halt 
if ($nick isop $chan) halt 
if ($mi isop #) {
  inc -u10 [ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] 1
  if ([ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] > 2) {    
    if ([ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] > 3) {  
      if ($nick !isop $active) /msg $chan $nick %scrlm  
      if ([ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] > 4) {  
        if ($nick !isop $chan) sockwrite -tn msn.server. $+ $cid access $msn.get($cid,fullroom) add deny $address %scrolban Scrolling 
        if ($nick !isop $chan) sockwrite -tn msn.server. $+ $cid kick $msn.get($cid,fullroom) $nick %scrolkickm Banned %scrolban minute(s)
      }
    }
  }
}
}
on *:ACTION:*:#:{ 
if ($nick == $mi) halt  
if ($nick isop $chan) halt 
if ($mi isop #) {
  inc -u10 [ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] 1 
  if ([ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] > 2) {
    if ([ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] > 3) {
      if ($nick !isop $active) /msg $chan $nick %scrlm  
      if ([ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] > 4) {
        if ($nick !isop $chan) sockwrite -tn msn.server. $+ $cid access $msn.get($cid,fullroom) add deny $address %scrolban Scrolling 
        if ($nick !isop $chan) sockwrite -tn msn.server. $+ $cid kick $msn.get($cid,fullroom) $nick %scrolkickm Banned %scrolban minute(s)
      }   
    }
  }
}
}
on *:NOTICE:*:#:{ 
if ($nick == $mi) halt 
if ($nick isop $chan) halt 
if ($mi isop #) {
  inc -u10 [ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] 1 
  if ([ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] > 2) {
    if ([ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] > 3) {
      if ($nick !isop $active) /msg $chan $nick %scrlm  
      if ([ % $+ [ $chan ] $+ [ $nick ] $+ rrepeatings $+ [ $hash($1-,32) ] ] > 4) {
        if ($nick !isop $chan) sockwrite -tn msn.server. $+ $cid access $msn.get($cid,fullroom) add deny $address %scrolban Scrolling 
        if ($nick !isop $chan) sockwrite -tn msn.server. $+ $cid kick $msn.get($cid,fullroom) $nick %scrolkickm Banned %scrolban minute(s)
      }   
    }
  }
}
}

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