반응형
LISP 관련
간단히 리습을 수정하기 위해서는 캐드에 기본 내장된 Visual Lisp 편집기를 사용
명령어 "VLISP"
끝점, 중간점 만 OSMODE를 켤때 ; "OSMODE"=1+2=3 입력.
LISP 예시 |
(defun c:OSON() (setvar "osmode" 3) (prompt "\n OSON 실행 \n") (princ) ) |
스냅코드 목록
OSMODE | 설 명 | OSMODE | 설 명 |
0 | 없음(N) None | 16383 | 모든객체 스냅 지정 |
1 | 끝점(E) Endpoint | 64 | 삽입점(S) Insert |
2 | 중간점(M) Midpoint | 128 | 직교(P) / 수직점(Perpend) |
4 | 중심(C) Center | 256 | 접점(N) Targent |
8 | 노드(D) Node | 512 | 근처점(R) neaRist |
16 | 사분점(Q) Quadrant | 2048 | 가상교차점(A) |
32 | 교차점(I) Intersection | 8192 | 평행(L) |
4096 | 연장선(X) eXtend | 15359 | 전체(1+2+4+......+4096+8192) |
※ 참고
1024 | 모든객체스냅을 지움 |
현재, OSMODE 를 저장하고, OSMODE 변경 후 다시 최초로 변환
STEP | LISP | 설 명 | 비 고 |
1 | (setq now_osmode (getvar "osmode")) | OSMODE값을 now_osmode 변수에 입력 | GETvar ⇔ SETvar |
2 | (setvar "osmode" 0) | OSMODE를 다 꺼라. | 전체ON=15359 |
3 | (setvar "osmode" now_osmode) | OSMODE를 최초의 것으로 다시 설정 | GETvar ⇔ SETvar |
반응형
'침실2_CAD' 카테고리의 다른 글
Auto CAD 관련- 시작 탭 열리지 않게 하기 (0) | 2020.12.01 |
---|---|
Auto CAD- 배경색 변경 (0) | 2020.11.24 |
Auto CAD- LISP ZOOM (0) | 2020.08.04 |
Auto CAD- LISP 객체 길이 합을 구하는 리습(LLE 수정) (0) | 2020.07.14 |
Auto CAD- LISP 문자 스타일 지정 리습 (0) | 2020.07.07 |
Auto CAD- LISP 변환 함수(atoi, itoa, atof, rtos) (0) | 2020.06.04 |
Auto CAD- LISP Getint / Getstring / Getpoint 함수 (0) | 2020.05.29 |
Auto CAD- Funtion KEY (0) | 2020.05.23 |
Auto CAD- 전자전송(파일 외부 참조 결합 하기) (0) | 2020.05.20 |
Auto CAD- DWG To PDF.pc3 플로터 만들기 (0) | 2020.05.01 |