Re-action or Reslapper script for

This one works automattically.

;Re-action
on *:ACTION:$(* $+ $me $+ *):*: {
if (!%action. [ $+ [ $address($nick,2) ] ]) {
/describe $target $replace($1-,$me,$nick)
/set -u5 %action. [ $+ [ $address($nick,2) ] ] $nick
}
}