본문 바로가기
AutoCAD/AutoLisp

(list x y z) x y 좌표로 변경

by Crony 2012. 3. 17.
(defun 3dPoint->2dPoint	(3dpt)
	(list (float(car 3dpt)) (float(cadr 3dpt)))
)