fengyu6913 发表于 2024-6-27 14:38:45

小白求助：如何解析点坐标

小白求助：如何获得以下代码中p1，p2的x、y、z坐标值？



(setq p1 (getpoint "\n点取基点"))
(setq p2 (getpoint p1 "\n点取第二点"))


(setq x1 ......）
(setq y1 ......）
(setq z1 ......）


(setq x2......）
(setq y2 ......）
(setq z2 ......）

ssyfeng 发表于 2024-6-27 14:38:46

(setq x1 (car p1))
(setq y1 (cadr p1)）
(setq z1 (caddr p1)）


(setq x2 (car p2))
(setq y2 (cadr p2)）
(setq z2 (caddr p2)）

fengyu6913 发表于 2024-6-27 15:17:19

谢谢大佬
页: [1]
查看完整版本: 小白求助：如何解析点坐标