alias randtok return $gettok($1,$r(1,$numtok($1,$$2)),$2)
only need one $$2

var %exp = $calc($1)
var %exp = $1

echo $color(CTCP) -ts $eval([,0) $+ $nick PING]
echo -cts CTCP $eval([,0) $+ $nick PING]