[求助]利用计算器找中点的困惑

秋枫

(defun getmidpt        (pt1 pt2 / strlst)
  (setq        strlst (mapcar '(lambda (x1 x2) (rtos (/ (+ x1 x2) 2) 2 16))
                       pt1
                       pt2
               ) ;_ end of mapcar
  ) ;_ end of setq
  (strcat (car strlst) "," (cadr strlst) "," (caddr strlst))
) ;_ end of defun

mccad

会出现捕捉时捕捉到的值为：X向只是单个点的坐标，Y坐标为两个点的计算后的坐标。
虽然在数据显示时没有错，但出来的点还是有错。