14
21
7
初露锋芒
使用道具 举报
63
6297
6283
后起之秀
(setq pt1 (getpoint "\n Specify first point :") pt2 (getpoint "\n Specify second point :") )(setq ents (ssget[b][color="red"] "_w"[/color][/b] pt1 pt2))
114
1万
中流砥柱
( (lambda ( p ) (if p (sssetfirst nil (ssget p))) ) (getpoint "\nPoint: "))
( (lambda ( p ) (if p (sssetfirst nil (ssget "_C" p p))) ) (getpoint "\nPoint: "))
44
3166
2803
(if (setq a (ssget "_c" (getpoint) (getvar 'lastpoint))) (sssetfirst nil a))
54
3755
3583
本版积分规则 发表回复 回帖后跳转到最后一页
微信公众平台
扫描访问手机版
点击图片下载手机App
|关于我们|小黑屋|乐筑天下 繁体中文
GMT+8, 2025-7-6 08:38 , Processed in 0.753505 second(s), 79 queries .
© 2020-2025 乐筑天下
在线时间:10:00-17:00
暂无
扫一扫,关注我们
帮助中心
关于我们
下载APP客户端