有谁知道相对坐标的输入lisp语言怎么写？
www.dimcax.com
有谁知道相对坐标的输入lisp语言怎么写？有谁知道相对坐标的输入lisp语言怎么写？
d
viewctr 存储当前视口中视图的中心点。该值用 ucs 坐标表示。
viewsize 按图形单位存储当前视口的高度。
vsmax 存储当前视口虚屏的右上角。该值用 ucs 坐标表示。
vsmin 存储当前视口虚屏的左下角。该值用 ucs 坐标表示。
类似的变量可以计算出相对坐标值 再和绝对坐标进行转行即可
d
看下polar函数。
踅摸
d
或者将坐标与向量相加
(defun @ (pt cec) (mapcar '+ pt cec))
;;(@ (getvar "lastpoint")
'(4 5 0))
;;红色是坐标，蓝色是向量
d
谢谢两位版主的帮忙！
d