几何尺寸与公差论坛------致力于产品几何量公差标准GD&T (GDT:ASME)|New GPS(ISO)研究/CAD设计/CAM加工/CMM测量

几何尺寸与公差论坛------致力于产品几何量公差标准GD&T (GDT:ASME)|New GPS(ISO)研究/CAD设计/CAM加工/CMM测量 (http://www.dimcax.com/hust/index.php)
-   ObjectARX(AutoLISP) (http://www.dimcax.com/hust/forumdisplay.php?f=178)
-   -   指定点向右偏移100,怎么写呀 (http://www.dimcax.com/hust/showthread.php?t=12117)

yang686526 2009-04-26 09:28 PM

指定点向右偏移100,怎么写呀
 
指定点向右偏移100,怎么写呀
www.dimcax.com
指定点向右偏移100,怎么写呀
我用
(setq b1 (getpoint "请指定左下角基点"))
想得到向右 x 轴线向右偏移100,向 y 轴线偏移50 的公式怎么写啊
本人是菜鸟
d
1、(setq b2 (polar (polar b1 0 100) (/ pi 2) 50))
2、(setq b2 (mapcar '+ b1 '(100 50 0)))
3、(setq b2 (list (+ (car b1) 100) (+ (cadr b1) 50) (last b1)))
踅摸
d


所有的时间均为北京时间。 现在的时间是 04:59 AM.