如何快速选出与柱子有交点的直线

drc123

C:\111.png求一次选出与柱子也就是 矩形 有交点的直线 lsp

ysq101

新手来点思路
取出矩形点表--扩大点表--ssget wp（大点表）

鱼与熊掌

函数:cx-Ssget2Pt
功能:选择矩形点表内物体.
参数:pts点表.
str  :"c"  "w"
fuzz:容差,正数向外,负数向外.
fli  :过滤选择

2. (defun cx-Ssget2Pt(pts str fuzz cps / -fuzz p1 p2)
   
3.         (setq
   
4.                 pts(get-Extents pts)
   
5.                 -fuzz (- 0 fuzz)
   
6.                 p1(cx-PutPtXY (car pts) -fuzz -fuzz)
   
7.                 p2(cx-PutPtXY (cadr pts) fuzz fuzz)
   
8.         )
   
9.         (cx-SsgetZoom str p1 p2 cps)
   
10. )

(defun cx-Ssget2Pt(pts str fuzz cps / -fuzz p1 p2)<br />         (setq <br />                 pts(get-Extents pts)<br />                 -fuzz (- 0 fuzz)<br />                 p1(cx-PutPtXY (car pts) -fuzz -fuzz)<br />                 p2(cx-PutPtXY (cadr pts) fuzz fuzz)<br />         )<br />         (cx-SsgetZoom str p1 p2 cps)<br /> )

;仅供参考.
;需要cxlib支持.
;核心是ssget w c.

drc123

鱼与熊掌 发表于 2015-2-8 15:51
函数:cx-Ssget2Pt
功能:选择矩形点表内物体.
参数:pts点表.

本人完全不懂lsp，能否给个能用编好的lsp，我用来主次梁分层用。万分感激

illcyt

鱼与熊掌 发表于 2015-2-8 15:51
函数:cx-Ssget2Pt
功能:选择矩形点表内物体.
参数:pts点表.

熊掌开始发伪源码了，哈哈

鱼与熊掌

illcyt 发表于 2015-2-8 18:25
熊掌开始发伪源码了，哈哈

只给思路 不支持伸手. 看了不死猫的帖子 发现有伸手D义正言辞.

ld_117

思路不错，记住了

wangshang323

看到结构的同行了。
呵呵
首先建议不要在这个图里面识别主次梁，再配筋文件图形里面识别（因为只有一根基线）。