간단한 리습을 만들고 있는데요.
제가 원하는 포인트를 클릭하면 원하는 도형이 그려지는 리습입니다.
색상을 변화 시키고 싶은데, 기존에 있는 객체의 색상을 변화시키는건 알겠는데
리습으로 작성하는 객체의 색상은 어떻게 바꾸나요?
아래는 현재 작성한 리습입니다.
(defun c:10c()
(setq point1 (getpoint “원점을 클릭하세요”))
(command “circle” point1 9 )
(command “polygon” “6” point1 “i” 9)
(command “text” “j” “mc” point1 “3” “0” “18/C”)
(princ))
현재는 세가지 객체가 같은 색으로 작성됩니다.
다른색으로 바꾸고 싶습니다.
고수님들 부탁합니다…
와 ~ 감사합니다..
(defun c:10c()
(setq point1 (getpoint “원점을 클릭하세요”))
(setq cColor (getvar ‘cecolor))
(setvar ‘cecolor “1”)
(command “circle” point1 9 )
(setvar ‘cecolor “2”)
(command “polygon” “6” point1 “i” 9)
(setvar ‘cecolor “3”)
(command “text” “j” “mc” point1 “3” “0” “18/C”)
(setvar ‘cecolor cColor)
(princ)
)
entity 바꾸는 것보다 현재 layer 를 바꾼 후 그린 다음 다시 원래 layer 로 돌려 놓는게 편하실겁니다.
많이들 사용하기도 합니다.