레이어 BORD에 있는 블록을 선택 해서 스크립을 이용 BURST 할 생각 입니다… 그런데 지금 리습은 BORD에 있는 블록을 모두선택 선택 하는건뎅..
만약 CI라는 블럭이 있으면..이 블럭만 선택 안하고 BORD 레이어에 있는 나머지 블럭을 선택하는 리습을 만들고자 하는뎅…실력이 딸리내용..ㅠㅠ
(defun c:but ()
(GRAPHSCR)
(setq ata (getvar “attdia”))
(setq cdo (getvar “cmdecho”))
(setvar “attdia” 0)
(setvar “cmdecho” 0)
(COMMAND “ucs” “”)
(command “ZOOM” “E”)
(setq ss (ssget “x” ‘((0 . “insert”)(8 . “BORD”))))
(setq sst (ssname ss 0))
(setq ss1 (entget sst))
(COMMAND “PSELECT” “p” “”)
(princ)
)