[Auto CAD] <LISP> "OSMODE"

<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