vla-addPoint by AfraLisp