리습으로 3d가구(솔리드”box”) 그리는 것좀 만들어 볼려고 하는데 잘 않되네요. 남들이 만들어 놓은 리습만 쓰다 한번만들어 볼려고 공부하는데 넘 어려운것 같아요.
다른게 아니라 계산은 똑바로 한거 같은데 오류가 뜨고 어쩌다 그려지기도하고 진짜 모르겠더라고요..
강좌도 보고 책도 보는데 다 그게 그건것도 같고 않되네요.
고수 님들께서 좀 도와두세요 ㅜ,ㅜ
“””””””””””””””””””””””””””””””””””
이게 않되요
$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
(defun c:book (/ w d h sw )
(setq w (getreal “n책장의 넓이를 입력 하세요. :”))
(setq d (getreal “n책장의 깊이를 입력 하세요. :”))
(setq h (getreal “n책장의 높이를 입력 하세요. :”))
(setq sw (getreal “n측판의 두께를 입력 하세요. :”))
(command “view” “O” “T”)
(setq poa (list sw d h))
(command “box” “” poa);;측판1
(setq po (- w sw))
(setq s (list po 0 0))
(setq sa (list w d h))
(command “box” s sa);;측판2
(setq pp (- d sw))
(setq po1 (- w sw))
(setq wo (list sw pp 0))
(setq woa (list po1 d h))
(command “box” wo woa);;측판3
)
뭐가 잘못된건가요……
가르처 주세요…