社区 › AutoCAD基础应用 › 新手求助：已取得点n1,n2,如何求得n3，n3为n1和n2的中点。

我擦咧闹不住菇_ 发表于 2014-2-28 22:20:56

新手求助：已取得点n1,n2,如何求得n3，n3为n1和n2的中点。

如题
我现在(setq n1(getpoint "\n请选择第一个点"))
(setq n2(getpoint "\n请选择第二个点"))
取得的两个点n1和n2,现在想求出点n3，n3是n1与n2的中点，要怎么求得n3？
刚开始学习lisp。。。希望得到各位大大的指导



http://bbs.mjtd.com/xwb/images/bgimg/icon_logo.png 该贴已经同步到 我擦咧闹不住菇_的微博

edata 发表于 2014-3-1 10:59:23

中点坐标为（(x1+x2)/2, (y1+y2)/2)
(setq n3(mapcar'(lambda(X Y)(/(+X Y)2.0)) n1 n2))

查看完整版本: 新手求助：已取得点n1,n2,如何求得n3，n3为n1和n2的中点。