menu channel {
  .....Floodprotection 
  ....floodprotection for $chan $+ :
  ...floodprotection on:{ .set %flood. $+ $chan on | set %lineset. $+ $chan $?="how many lines" | set %time. $+ $chan $?="in how many seconds" | echo -ag set Floofprotection for $chan on. }
  ...floodprotection off:/.set %flood. $+ $chan off | echo -ag set Floodprotection for $chan off. 
  ...settings:{ set %lineset. $+ $chan $?="how many lines" | set %time. $+ $chan $?="in how many seconds" | echo -ag set lines: %lineset. [ $+ [ $chan ] ] and time: %time. [ $+ [ $chan ] ] }
  ....Show settings:{ if (%flood. [ $+ [ $chan ] ] == on) { if (%flood. [ $+ [ $chan ] ] == on) || (%flood. [ $+ [ $chan ] ] == off) { msg $chan floodsettings for chan: %lineset. [ $+ [ $chan ] ] lines per %time. [ $+ [ $chan ] ] seconds. }
    } 
  }
}
on *:text:*:#:{ if (%lines. [ $+ [ $nick ] ] == %lineset. [ $+ [ $chan ] ]) && (%flood. [ $+ [ $chan ] ] == on) { mode $chan +b $address($nick,1) | kick $chan $nick ÄLÄ Floodaa $chan kanavalla: %lineset. [ $+ [ $chan ] ] lines in %time. [ $+ [ $chan ] ] seconds. | unset %lines. $+ $nick $+ $chan | timer 1 120 mode $chan -b $address($nick,1) }
  if (%lines. [ $+ [ $nick ] ] != %lineset. [ $+ [ $chan] ]) && (%flood. [ $+ [ $chan ] ] == on) { inc %lines. $+ $nick | timer 1 %time. [ $+ [ $chan ] ] unset %lines. $+ $nick }
}
alias flood { if (%flood. [ $+ [ $chan ] ] == on) || (%flood. [ $+ [ $chan ] ] == off) { msg $chan floodsettings for chan: %lineset. [ $+ [ $chan ] ] lines per %time. [ $+ [ $chan ] ] seconds. }
  if (%flood. [ $+ [ $chan ] ] != on) && (%flood. [ $+ $chan ] ] != off) { msg $chan Floofprotection is not activated. }
}
 

Commenting Options