Just a simple script that sets a limit to how many times you counterslap when slapped. usage: /setamt

on 1:action:*slap*:#: {
  if ($me isin $1-) && ($nick != $me) { 
    set %calc.amt $calc(%set.amt - %limit)
    if (%calc.amt == -1) { describe $chan steals $nick $+ 's fish to prevent anymore slapping! | timer1 1 10 set %set.amt 0 | halt }
    if (%set.amt == %limit) { timer1 1 10 set %set.amt 0 | halt }
    if (%set.amt < %limit) {
      inc %set.amt 1
    describe $chan counterslaps $nick $+ ! (Limit = %limit $+ , Reached: %set.amt $+ ) }
} }

alias setamt { set %limit $1- | set %set.amt 0 | echo -a Limit is now: $1- }