Autocad lisp(리습) with VSC(visual code)

• VSC 설치
  1. https://code.visualstudio.com/

Visual Studio Code - Code Editing. Redefined

• autocad 있는지 확인
  1. autocad 2021 version 부터 지원을 한다.
  2. 2007 version으로 아무리 해도 안됨
  3. 확장 프로그램 설치(추가 너무 오래 전에 설치해서 누락됨)
     1. 이름: AutoCAD AutoLISP Extension
        ID: Autodesk.autolispext
        설명: This is a vscode extension for AutoCAD AutoLISP
        버전: 1.6.0
        게시자: Autodesk
        VS Marketplace 링크: https://marketplace.visualstudio.com/items?itemName=Autodesk.autolispext
• autocad 실행

• visual code 실행
  • 폴더 열기

• test용 파일 만들기(test.lsp) 확장자는 꼭 lsp여야 한다.

• 코드작성
  • defun 은 함수 만든다.
  • c:는 command로 autocad command창에서 입력한다.(sub function 만들때는 불필요)
  • test()는 함수 이름
  • setq는 변수 지정
  • p1 을 0,0으로 지정(list를 적어야함), p2도 마찬가지
  • command "line" p1 p2 는 line을 p1, p2로 그린다.
    • 마지막에 있는 ""는  엔터 누른다 혹은 끝낸다.

(defun c:test () 
   (setq p1 (list 0 0))
   (setq p2 (list 1000 1000))
   (command "line" p1 p2 "")
)

• 실행
  • 실행 및 디버그 누르면 오른쪽에 autocad에서 열려있는 Drawing3.dwg 선택할 수 있는 것이 보인다.(그거 클릭)
  • 아래 분홍색 바가 보이고 위에 실행할수 있는 창(아래 사진)이 보이면 정상적으로 실행 된 모습이다. 

실행 창

아래 분홍색 바 뜸

• 실행
  • autocad 창에서 test(vsc에서 선언한 함수 이름) 실행한다.
  • 선이 자동으로 그려진다. (0,0 -> 1000,1000) - 간단하지만 감동임

• 프로그램수정(lisp 파일)(0,0 -> 1000,2000)

(defun c:test () 
   (setq p1 (list 0 0))
   (setq p2 (list 1000 2000))
   (command "line" p1 p2 "")
)

• 다시 시작 버튼 누르기

오른쪽에서 두번째 다시 시작 버튼

• autocad 다시 test 실행

 

 

• note.
  • 정말 간단하다. 보기에는
  • 처음 autocad version 옛날 것 사용해서 안되어서 고생함
  • code 수정후 refresh(다시 시작 버튼) 안 눌려서 고생함
  • 처음에서 텍스트 에디터에서 하다가 뭔가 불편해서 고생함
  • vsc로 하는 이유는 github와 연결해서 큰 작업중(나름) - 가로세로 입력 받아서 도어 자동으로 그리는것 진행중
    • 이부분이 가장큼(코드가 길어지면 감당이 안되어서) - 불편하면 발전하는듯