开宝马的浪子 发表于 2011-8-2 21:15:00

有关相对坐标点的表示

各位大虾，小弟在此请教一个问题；已知P1(X,Y)   P2与P点的水平距离为10，求p点在lisp程序里应该怎么表示？    小弟先谢了

Andyhon 发表于 2011-8-2 21:38:00

(polar pt 0.0 10)
or
(mapcar '+ pt '(10 0))

EMD 发表于 2011-8-2 21:40:00


(setq P2 (list (+ (car p1) 10) (cadr p1))) ;; P2在P1右侧, P2的X比P1加10
(setq P2 (list ( - (car p1) 10) (cadr p1)));;P2在P1左侧, P2的 x比P1减10
哦. 不对,我写的这个是P2与p1相差10.用p1表示p2的..你的问题好像缺少条件..无法表示.

李钊伟2012 发表于 2022-7-25 21:58:00

(setq P2 (list (+ (car p1) 10) (cadr p1))) ;; 这种写法+X ,+Y太复杂，trans好像解决不了？
页: [1]
查看完整版本: 有关相对坐标点的表示