求能够自动上图廓的lsp
www.dimcax.com
本人有一个大比例尺图廓自动生成程序，是测绘方面的，不知你干什么用？
它山之石，可以攻玉。
学以致用，用而知之。
d
提示参数类型出错，是什么原因啊？
d
非常抱歉，错误原因是把
(while (not (setq ss1 (ssget))))
(setq ptbox (aygetssboundbox ss1))
简写为 (setq ptbox (aygetssboundbox (while (not (setq ss1 (ssget))))))啦！
现已经更新。
d
9楼的代码好像只能园和距形 如果可以多边形就好啦
d