반응형 True Color2 Remove item in the LIST (vl-remove item list)(setq dx (vl-remove (assoc 420 dx) dx)) ;; remove truecolor 2025. 9. 10. 선택한 것들 bylayer 색상, '0' 레이어로 변경 (SUBST multi CONS) ;; 속성변경에는 다음 명령이 필요하다. (subst) (entmod) (cons);; 단점은 한번에 속성 하나씩 (subst 가 여러개의 cons를 한꺼번에 바꾸지 못함.);; 'dxf' 정보에 기본인 속성은 표시되지 않아, (append) 추가함;; 기존 속성이 있으면, (subst) 로 속성 교체,;; 없으면 (append) 로 추가.;; cons 정보는 list 로 처리함. ;; color: bylayer; layer: 0; (setq conslist (list (cons 62 256) (cons 8 "0")));; 바꿀 속성 conslist 갯수만큼 순환 시킴. 마지막에 (entmod) 실행.;; 아래 샘플 명령 '00'은 선택한 개체들을 bylayer 색상, 0 레이어로 바꿈 (c:00);; .. 2025. 9. 9. 이전 1 다음 반응형