IT 정보와 함께합니다.

AutoLisp을 공부하는 분들께 도움이 되고자, 사각형(Rectang)을 그리는 Lisp 예제를 만들어 보았습니다.아래의 내용을 이해해 주시고, 문법 및 함수는 [AutoLisp 문법 설명 참조]를 확인바랍니다.;;Rectang 사각형 그리기를 Lisp으로 구현함. (defun c:rec1() (setq ptLB(getpoint "\n좌측 하단점:")) (setq ptRT(getcorner ptLB "\n우측 상단점:")) (setq ptLT(list (car ptLB) (cadr ptRT) 0)) (setq ptRB(list (car ptRT) (cadr ptLB) 0)) (command "pline" ptLB ptLT ptRT ptRB "c") (princ) ) GetPoint : 사용자에게 Poi..

지금부터 AutoLisp의 규칙을 알아보도록 합니다.1. 숫자정수와 실수로 나뉜다.정수는 1,2,3,4,5….. 실수는 1.2345 등정수는 32bit범위를 갖는다. ( -2147483648 ~ +21474883647)(참고, 일부의 정수는 -32768 ~ +32767의 16Bit 범위) 2. 문자열Lisp에서는 사용자에게 전달을 하거나 데이터값으로 문자열을 사용한다.“” 을 이용하여 표현하며 다음과 같이 사용한다.예) “ABC” “홍길동”문자열은 대소문자를 구분하지 않는다.다만, 사용자에게 보여질 Prompt는 문자열 그대로를 보여주며, 변수와 상수는 구분하지 않는다. 3. () 괄호AutoLisp은 반드시 괄호를 통하여 정의 시작부터 끝까지 표현한다.표현식 : (함수 변수1 값1 변수2 값2 . . ..