홈/ 질문/Q 101723
다음
진행 중
Lv.0
등록일: 2014-07-16T15:11:14+09:00 카테고리:

블록 갯수 카운트 하는 방법 좀요!

블록 지정 되어 있는거 갯수 파악할수 있게 하는 방법이 있나요?
많이 급합니다.
아시는 분들 답변 좀 달아주세요!!
블록별로 몇개씩 있는지 좀 알려주세요!

공유

    관련 있는 질문들

    4 답변

    1. aalan

    2. 드림(dream)설치하시면 유용한 명령어들이 많은데 그중에 조회에서 블록수량집계라는 명령어가 있습니다.

      • 0
    3. Lv.0

      저는 이걸로 사용합니다.
      사용법은 범위를 먼저 정하고 카운터 할 블럭을 하나 선택하면
      범위안에 있는 블럭 수를 새어줍니다.

      (defun c:bc(/ ss k ss1 ed1 bn1 en ed bn k bco)
        (setq ss (ssget (list (cons 0 “insert”))))
        (setq k 0 ss1 nil bco 0)
        (while (= ss1 nil)
          (setq ss1 (entsel “n블록을 선택해주세요 :”))
        );while
        (setq ed1 (entget (car ss1))
              bn1 (cdr (assoc 2 ed1)))
        (repeat (sslength ss)
          (setq en (ssname ss k)
                ed (entget en))
          (setq bn (cdr (assoc 2 ed)))
          (if (= bn bn1) (setq bco (1+ bco)))
          (setq k (1+ k))
         );repeat
         (princ “n블록 “)(princ bn1)(princ ” 는 총 “)(princ bco)(princ ” 개 입니다.”)
      (princ)
      )

      • 0
    4. Lv.21

      캐드 고유기능은 모르겠고 리습으로는 이렇게 사용하시면 됩니다..

      (defun c:ff(/ ss len)
       (setq name(getstring t “n검색하실 블럭이름:”))
       (setq ss(ssget “x” (list (cons -4 “<AND”)(cons 0 “INSERT”)(cons 2 name)(cons -4 “AND>”))))
       (setq len (sslength ss))
       (princ (strcat “n” name “의 갯수=”))(princ len)(princ)
      )

      • 0

    5. find를 이용해보시죠

      • 0