have a look at /help $eval

Code:
on *:text:*:*: { 
  youralias $eval( $nick $1- ,1)
}

; just for you to see what data is stored
youralias {
  set -su %test $1-
}