리습 예제 1부

메인리습 서브리습

캐돌이 2022. 8. 8. 15:50

리습 문장 내용이 길거나 많아지면 리습 작성을 간편화할 필요가 있습니다

 

반복되는 단순 문장을 서브리습로 미리 만들고 필요시 마다 호출하여 사용하면 간편합니다

 

 

 

메인리습 은 c:를 첨가하여 선언하며 캐드 명령에 실행합니다

(defun c:maillsp()

)

 

서브리습은 c: 없이 선언 하며 캐드 명령에 응답하지 않습니다

(defun sublsp()

(prompt "\n Sub lsp ")

)

 

메인에서의 서브호출

(defun c:mainlsp()

(prompt "\n Main lsp ")

(sublsp)

)

캐드 명령 mainlsp 결과

Main lsp

Sub lsp

 

(defun c:aaa()

(sublsp)

(prompt "\n AAA")

)

캐드 명령 aaa 결과

Sub lsp

AAA

 

메인리습은 서브리습으로 호출이 불가합니다