CAD LISP- getvar / setvar

getvar 리습에서 시스템 변수 불러오기 ↔ setvar 시스템 변수값을 변경 할때 사용

 

 

 

 

[GetVar] 리습에서 시스템 변수 불러오기

시스템 변수	활  용	설    명
ACADVER	(getvar "ACADVER")	캐드버전 정보 가져오기
OSMODE	(getvar "OSMODE")	현재 osnap 설정값 가져오기
CDATE	(getvar "CDATE")	날짜와 시간정보 가져오기
DIMSCALE	(getvar "DIMSCALE")	DIM 스케일 값을 가져오기
CMLSCALE	(getvar "CMLSCALE")	다중선 관련 축척을 가져오기
SPLINESEGS	(getvar "SPLINESEGS")	PLINE 관련
CLAYER	(getvar "CLAYER")	현재 Layer 이름 가져오기
CELTYPE	(getvar "CELTYPE")	현재 선타입 가져오기
CECOLOR	(getvar "CECOLOR")	지정된 색깔을 가져오기
DWGNAME	(getvar "DWGNAME")	현재 도면 이름 가져오기
DWGPREFIX	(getvar "DWGPREFIX")	현재도면의 경로 가져오기

 

[SetVar] 시스템 변수 설정

시스템 변수	예   시	설   명
CMDECHO	(setvar "cmdecho" 0)	AutoLISP 명령이 작동하는 동안 프롬프트와 입력이 반향되는지 여부를 조정 0-반향기능 끄기 / 1-반향기능 켜기
SNAPMODE	(setvar "snapmode" 0)	현재 뷰포트에서 스냅 모드를 켜고 끄기 0-끄기 / 1-켜기
OSMODE	(setvar "osmode" 0)	활성 객체 스냅 모드를 설정 0-없음 / ....... / 16384-현재 활성 객체 스냅 억제

 

(setq now_osmode (getvar "osmode")) (setq now_layer (getvar "clayer")) (setvar "osmode" now_osmode) (setvar "clayer" now_layer)

현재 osnap 설정값을 "now_osmode에 저장 현재 layer 값을 "now_layer에 저장 osnap 설정값을 당초로 변경 현재 layer를 당초로 변경