/ScriptServ

[script]
n0=on 1:load:{
n1=
n2=  set %fl.time 5
n3=
n4=  set %fl.lines 5
n5=
n6=  echo 2 -a The Channel flood protection script has been loaded in successfully.
n7=
n8=  echo 2 -a Use the channel popups, or the menubar popups to adjust sensitivity (the default is 5 lines in 5 secs).
n9=
n10=  echo 2 -a What this script does: If anyone tries too flood, with ie. sending many different lines repeatetly, it kicks and bans them for 30 seconds.
n11=
n12=  echo 2 -a The same apply for actions (/me commands).
n13=
n14=  echo 2 -a If you wish to use this as a part of your script, you're welcome to do so, I really don't care :)
n15=
n16=  echo 2 -a If you encounter any problems, please mail me at xerath@xerath.net, thanks.
n17=
n18=}
n19=
n20=
n21=
n22=menu channel,menubar {
n23=
n24=  &Floodprotection
n25=
n26=  .&Channel flood
n27=
n28=  ..&On:.enable #floodprot | echo -a 2Channel flood protection enabled.
n29=
n30=  ..&Off:.disable #floodprot | echo -a 2Channel flood protection disabled.
n31=
n32=  ..-
n33=
n34=  ..&Options
n35=
n36=  ...&Lines/seconds:/if ($$?="Enter max lines" isnum) { set %fl.lines $! } | /if ($$?="At this number of seconds:" isnum) { set %fl.time $! }
n37=
n38=
n39=
n40=}
n41=
n42=
n43=
n44=#floodprot on
n45=
n46=on 1:TEXT:*:#:{
n47=
n48=  inc %flood. [ $+ [ $nick ] ]
n49=
n50=  .timer 1 %fl.time unset %flood. [ $+ [ $nick ] ]
n51=
n52=  if (%flood. [ $+ [ $nick ] ] >= %fl.lines) { goto kill }
n53=
n54=  else { goto end }
n55=
n56=  :kill
n57=
n58=  if ($me isop $chan) {
n59=
n60=    if (($nick isop $chan) || ($nick isvo $chan)) { halt }
n61=
n62=    else {
n63=
n64=      ban -u3 $chan $nick 3
n65=
n66=      kick $chan $nick flood (3 sec ban)
n67=
n68=    }
n69=
n70=  }    
n71=
n72=  :end
n73=
n74=}
n75=
n76=on 1:ACTION:*:#:{
n77=
n78=  inc %floodact. [ $+ [ $nick ] ]
n79=
n80=  .timer 1 %fl.time unset %floodact. [ $+ [ $nick ] ]
n81=
n82=  if (%floodact. [ $+ [ $nick ] ] >= %fl.lines) { goto kill }
n83=
n84=  else { goto end }
n85=
n86=  :kill
n87=
n88=  if ($me isop $chan) {
n89=
n90=    if (($nick isop $chan) || { halt }
n91=
n92=    else {
n93=
n94=      ban -u3 $chan $nick 3
n95=
n96=      kick $chan $nick flood (3 sec ban)
n97=
n98=    }
n99=
n100=  }    
n101=
n102=  :end
n103=
n104=}
n105=
n106=
n107=
n108=#floodprot end