RET.LSP
(defun c:ret()
(prompt ” Loaded.. n”)
(setq point01 (getpoint “n Enter First Point : “))
(setq point03 (getcorner point01 “n Enter Second Point : “))
(setq height (getdist point01 “n Enter of Height : “))
(setq point02 (list (car point01) (cadr point03)))
(setq point04 (list (car point03) (cadr point01)))
(setq xpoint (/ (+ (car point01) (cadr point04)) 2.0))
(setq ypoint (/ (+ (cadr point01) (cadr point02)) 2.0))
(setq point05 (list xpoint ypoint height))
(command “3dface” point01 point02 point03 point04 “”)
(command “3dface” point01 point05 point04 “” “”)
(command “3dface” point01 point05 point02 “” “”)
(command “3dface” point02 point05 point03 “” “”)
(command “3dface” point03 point05 point04 “” “”)
(prompt “n By PNP”)
(prompt “n Copytight 2000”)
(princ)
)
사각뿔을 그리는 리습입니다.
(command “3dface” point01 point02 point03 point04 “”)
1. 이 부분에서 3dface는 뭘 의미하는 건가요?
2. 끝에 “”는 뭘 의미하는 건가요?
3. 그 밑에 줄부터는 “”””이 두개씩 있는데 그 이유는 뭔가요?
혼자서 독학하고는 있는데 부딪히는 부분이 아직 많네요..
도움 부탁드립니다.
ENTER 입니다.
(command “3dface”)
라고 입력해보면 알것입니다.
키보드에서 입력하는 것과 같은 것입니다.
감사합니다^^