谁会用autolisp画这个图~~~

来源：百度知道 编辑：UC知道 时间：2024/05/31 10:14:32
已知图中两大圆等径并相切，小圆半径为大圆的一半，小圆与大圆同心，矩形与两大圆相切，大圆的圆心和半径自定。

4个画圆+1个画矩形的命令就行了嘛。

(setq cen1 (getpoint "请指定左侧大圆的圆心: "))
(setq rad1 (getreal "请输入大圆的半径: "))

(command "circle" cen1 "D" rad1)

呵呵，刚接触。虽然想起来简单，还是写不出来...