QQ登录

只需一步,快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步,快速开始

展开

通知     

全站
2天前
查看: 9493|回复: 10
收起左侧

[已答复] 有没有什么方法, 一次性将多条直线变为多段线???

[复制链接]
发表于 2008-9-3 09:43:48 | 显示全部楼层 |阅读模式 来自: 中国辽宁鞍山

马上注册,结识高手,享用更多资源,轻松玩转三维网社区。

您需要 登录 才可以下载或查看,没有帐号?注册

x
有没有什么方法, 一次性将多条直线变为多段线???
发表于 2008-9-3 09:58:20 | 显示全部楼层 来自: 中国广东广州
请看下面:3 t- m1 a, J  A9 t  S, t6 Q6 c
多段线.gif

评分

参与人数 1三维币 +5 收起 理由
唐昕晨 + 5 应助

查看全部评分

发表于 2008-9-3 20:41:53 | 显示全部楼层 来自: 中国浙江宁波
命令:PEDIT,选一条直线,输入选项选J,选择多条直线,就行了!
; Z5 x9 j% U6 K$ x) q# R9 T$ R9 a$ ]- x# H1 L/ ~
[ 本帖最后由 sealive_leafage 于 2008-9-3 20:43 编辑 ]

评分

参与人数 1三维币 +5 收起 理由
唐昕晨 + 5 应助

查看全部评分

发表于 2008-9-4 14:33:19 | 显示全部楼层 来自: 中国江苏无锡
原帖由 maoyangmy 于 2008-9-3 09:43 发表 http://www.3dportal.cn/discuz/images/common/back.gif
7 q& o+ c0 L. s/ D有没有什么方法, 一次性将多条直线变为多段线???
/ f$ a2 Y& I8 C% i7 v

* r  Z8 G1 }1 i$ b. ?- Z我觉得楼主可能是想问有没有快捷的方法..不是指用
) u3 R3 l% V% R) W  z# E6 aPEDIT的命令..

8 V. X2 \7 b6 I7 q
; f6 \: g: J: \4 ?快捷方法.吗.我觉得应该写个小程序..或者用其它工具..7 w4 }+ C: [6 J  A9 z1 E
: Y6 }- B$ R& a3 J
运行一下命令.只要选定线.就OK了..所以我觉得...应该找个工具给楼主..- D  _+ d* [2 u$ W/ d

6 w* X/ `4 V6 d事实上这样的工具我也需要...  m" J' r& Y3 L: y" t" J

3 Y8 a/ A6 A9 N* K$ J  I! O6 Y问题是:有时,我们作的线段.可能由于精度问题(没有使用精确作图)没有相接.* x7 k8 z1 X& H
所以最好还要设定一个误差值..这样一来.没有相接的线,就自动连接到一起..
9 q% R9 b* P/ C  X4 I) N( a/ N5 Q
这样.有时作简图的时候,就方便多了..
发表于 2008-9-5 20:58:24 | 显示全部楼层 来自: 中国浙江宁波

合并多段线为“多段线”的操作步骤

我也是今天刚从论坛学来的,只不过验证整理详细编辑一下,公布出来,大家享用!
' Y2 d( F, k8 ^$ p# G; |" }使相互连接的不是“多段线”的普通豢瞻孜桓岸喽蜗摺钡牟僮鞑街
发表于 2008-9-7 21:22:10 | 显示全部楼层 来自: 中国江苏无锡
收集到的一个 9 y  ~  r6 z3 a3 a  N' ^7 f
(defun l_to_pl (ssa / ss1 lines ent n)  E/ d" G" _* g+ p+ q
  (defun l_to_pl:main (/ ent ss1 n)3 k: k9 f. ?! T
  (setq ent (ssname lines 0))
3 s% E  B" s/ p& }  (if (member (cdr (assoc 0 (entget ent)))* q8 N9 n0 T- u6 Q
       '("POLYLINE" "LWPOLYLINE" )
3 y- q9 g; ]' @5 P2 ]      )( s  M2 C6 D) T" W" z* T
    (if (/= 1 (logand (cdr (assoc 70 (entget ent))) 1)). ^1 D8 Q- ^% ~6 ]$ J
      (command "._pedit" ent "j" lines "" "" )
0 q% c+ m, L* U. \. D7 Z5 s; z% x    )
: z' g' ~0 V$ ~9 @    (command "._pedit" ent "y" "j" lines "" "" )
! Z$ c9 y9 G* W% }  )
4 S' m7 [4 v# G1 b: D. X- _- @/ ^; `  (setq lines (ssdel ent lines))
1 C( U$ a5 \* M/ Q1 I+ E6 N. T  (setq ss1 (ssadd))
, O- T5 k& ^: F) F# G7 }  (repeat (setq n (sslength lines))* n; e! A2 l$ x+ l( c  s
    (setq ent (ssname lines (setq n (1- n))))3 ?. w: {" U) E! o" w
    (if (entget ent)- c1 G) H5 w  {" }2 h
      (setq ss1 (ssadd ent ss1))) f; @3 e, q5 K% l/ {
    )
: f6 Z; D3 R, E7 ?4 D; m  )
# A9 P8 ^/ g3 d( w/ x  (setq lines ss1)
# E% \' D' H: E, l& ?9 t3 d$ _5 i  (while ( >(sslength lines) 0) (l_to_pl:main))
' D1 y9 I7 C6 r* p0 H)
8 I& U# }/ P" U: i( J$ Q# `9 S  a  (command "._undo" "be" )
  M2 Y* o/ W( y: m& a5 \  F' C  (setq ss1 (ssadd))3 s- @/ o1 B" i  V2 Y
  (repeat (setq n (sslength ssa))
7 e/ W/ B: f* J3 X$ K' E8 _: d    (setq ent (ssname ssa (setq n (1- n))))) H' y0 ~, O# P+ f6 s* F
    (if (and (entget ent)8 z( {0 G# H& T0 J, y7 X. |7 f' X# z
      (member (cdr (assoc 0 (entget ent)))+ R5 H$ h9 c# U$ V) g5 q# ]0 B+ k
      '("LINE" "ARC" "POLYLINE" "LWPOLYLINE" )
% Q$ U1 _# g; C  a  T: R# I      )3 Z. p) s3 n4 _5 }3 U3 D
)# K0 ^; m2 _( B6 e+ [$ H
      (setq ss1 (ssadd ent ss1))2 A- W1 }% H6 d3 {
    )
' j$ y5 V$ C8 ]0 V( s  )
2 \9 b. d& x, J9 t  (setq lines ss1)6 u) s0 B7 R- Y- _3 K
  (l_to_pl:main)
. P+ ?7 v. Y$ |5 B* h/ f  (command "._undo" "e" ). h* L" \$ M6 x% X' X* B3 }- e7 M
)5 H6 \2 i: G0 v( n8 u$ k/ |

; U: X0 m% \" e) a8 i9 |- t3 X(defun c:lp (/ a)
8 v( V4 ]) B! e: s  (setq a (ssget ))2 R+ i) ]0 T5 [6 w3 s* S
  (l_to_pl a)
2 J5 W4 @' E8 G. Z3 U% o0 y' w;;;(l_to_pl lines)
! ]4 o" D4 T$ t4 B;;;(while (> (sslength (setq lines (l_to_pl lines))) 0) (progn))0 [+ a5 J2 k9 Q+ m( d; T8 O
)

评分

参与人数 1三维币 +5 收起 理由
woaishuijia + 5 应助

查看全部评分

发表于 2008-9-7 21:28:30 | 显示全部楼层 来自: 中国浙江温州
原帖由 www1974 于 2008-9-7 21:22 发表 http://www.3dportal.cn/discuz/images/common/back.gif7 g0 i: {7 d7 l7 t$ U8 O+ M
收集到的一个 - L& p4 M2 ^* P" `
(defun l_to_pl (ssa / ss1 lines ent n)
( g* G. Z9 j# H3 k9 P: z  (defun l_to_pl:main (/ ent ss1 n)# q7 a5 v  s% q% V3 y4 ~) w8 V
  (setq ent (ssname lines 0))! n/ V$ o$ c2 ]9 }
  (if (member (cdr (assoc 0 (entget ent)))' v' T; P$ s+ [- r$ y
              '("POLYLINE" "LWPOLYL ...
* R/ _9 b1 e) m$ g
楼上的分明是在灌水,找罚。
, E; H0 O' ]3 W9 z: Z' u( i2楼的厉害,用“合并”工具合并成!
. B# v# f: p( Q5 a: _
+ J* z. B" r8 N- n[ 本帖最后由 CHNLOONG 于 2008-9-7 21:33 编辑 ]
发表于 2008-9-7 21:40:41 | 显示全部楼层 来自: 中国江苏无锡
原帖由 CHNLOONG 于 2008-9-7 21:28 发表 http://www.3dportal.cn/discuz/images/common/back.gif
& {: Z% G  J, e$ x& ~" w3 S3 O9 v+ X; V  [
楼上的分明是在灌水,找罚。
0 B1 j; e5 k( u2楼的厉害,用“合并”工具合并成!

2 h/ E+ z  j; U为人要谦虚,看不懂不要瞎说!$ ^! k) x% p3 x3 J, ^  z* z! e
在ACAd中加载,后运行命令lp。

L2PL.rar

476 Bytes, 下载次数: 46

发表于 2010-3-16 16:02:59 | 显示全部楼层 来自: 中国北京
二楼的确实好用 多谢~~~~~~~~~~~~~~~~
发表于 2010-5-12 19:05:55 | 显示全部楼层 来自: 中国江西赣州
pedit命令学好了就可以弄了
发表于 2012-8-8 12:30:32 | 显示全部楼层 来自: 中国上海
6,8楼用lsp实现,更方便,pe命令需要按m,j,比较麻烦。就如同cad04复制需要按m一样,pe按m也不爽,这个绝对要赞
发表回复
您需要登录后才可以回帖 登录 | 注册

本版积分规则


Licensed Copyright © 2016-2020 http://www.3dportal.cn/ All Rights Reserved 京 ICP备13008828号

小黑屋|手机版|Archiver|三维网 ( 京ICP备2023026364号-1 )

快速回复 返回顶部 返回列表