홈/ 질문/Q 104392
다음
진행 중
Lv.0
등록일: 2015-06-21T15:48:11+09:00 카테고리:

클라우드 마크 구름모양 삭제하는 리습있을까요?

혹시 클라우드 리비전 클라우드마크 한방에 삭제할수있는 리습이나 소스좀 얻을수있을까요?
도면수정양이 많은데 일일이 손으로 수작업하기엔 너무 시간이 많이소요되어서  문의드립니다 ㅠㅠ
고수분들 도움좀 주세요

공유

    관련 있는 질문들

    6 답변

    1. aalan

    2. 클라우드 도면층이 Balayer 로되어있는데 같은 도면층과 같은 색상으로 되어있는게 너무 많아서
      클라우드마크만 따로잡는게 있나해서 문의드리는겁니다 ㅠㅠ

      • 0

    3. 클라우드는 폴리선이라…안될듯?

      • 0

    4. 전 클라우드 마크 할때만 도면층 변경되게 해서

      지울땐 레이어 통채로 지운다죠.

      • 0
    5. Lv.0

      ……

      • 0

    6. 와…이런 것도 있었네요.

      위에꺼랑 비슷한 리습입니다.

      (defun c:acr (/ s e i a p)
        (if (setq s (ssget “_X” ‘((0 . “LWPOLYLINE”) (410 . “Model”) (-4 . “/=”) (42 . 0) (-4 . “>”) (90 . 4))))
          (repeat (setq i (sslength s))
            (setq e (ssname s (setq i (1- i)))
                  a (length (vl-remove-if-not ‘(lambda (u) (and (eq (car u) 42) (not (eq (cdr u) 0)))) (entget e)))
                  p (length (vl-remove-if-not ‘(lambda (u) (eq (car u) 10)) (entget e)))
            )
            (if (not (or (eq a p) (eq (1+ a) p)))
              (ssdel e s)
            )
          )
        )
        (sssetfirst nil s)
        (princ)
      )
      • 0
    7. Lv.0
      penpen07 님이 보여주시는 코드는 42번 벌지갯수와 10번 포인트 갯수를 비교해서
      4포인트 이상의 곡선만으로 이루어지는 pline을 찾는 코드가 되겟네요.

      저는 42번 벌지값만을 이용했습니다.  제가 알기로는  클라우드는 동일한 벌지값을 사용합니다.
      상큼메론90님이나 피시님도 바로 코딩할 수 있을 만한 내용이라 즉답을 안해준 것이 의외라서
      코드 감추고 올려봣습니다.

      • 0