[求助]：一个不明白的程序

onej · 发表于 2004-11-13 10:55:27

您需要登录才可以下载或查看，没有账号？立即注册

×

标记的地方看半天不明白。

yjtdkj · 发表于 2004-11-13 11:02:21

aidraft · 发表于 2004-11-13 11:02:26

(setq a 1 b 2 c 3) 等于 (setq a 1) (setq b 2) (setq c 3)

onej · 发表于 2004-11-13 11:47:04

谢谢楼上2位热心的网友，

(* -1(/ angdd 2.0))
为什么要除2，在*-1

aeo · 发表于 2004-11-13 12:43:08

这不是编程问题，是几何问题
(/ ( + ang1 ang2) 2.) ;;角度计算时就是中点角度 (大多的时候是对的)

上面的* -1就是把方向反过来.（有时也不对)

SLMin · 发表于 2004-11-14 12:26:55

这个例题把简单的事情复杂化了！

这样试试：

先修剪小圆

(command "trim" en1 "" (polar cen1 ang (- rr1 rr2) ) "")

不如一笑 · 发表于 2004-11-14 12:58:26

不错，谢谢楼上的，解决了我的大问题

xyp1964 · 发表于 2004-11-14 13:52:16

当小圆半径较大或阵列次数n大于某个数时将会出现“意想不到”的效果！
相关程序讨论：
http://www.xdcad.net/forum/showthread.php?s=&threadid=291240

onej · 发表于 2004-11-14 19:10:00

谢谢各位，楼上的图真的很意想不到哇！

账号		自动登录	找回密码
密码			立即注册

[求助] [求助]：一个不明白的程序