or you can just do

;looks to see if slap and ur nick is in it $1-
on *:action:$($+(*,slap,*,$me,*)):#:{ 
  ;if it is it set\'s a local var with responses
  var %slap 7miss!,12block!,4 $r(510,1000) $+ !,4 $r(1150,2570) $+ !
  ;then picks one to say back
  describe # : $gettok(%slap,$r(1,4),44)
}