무한반복 카피리습인데 오스넵이 처음엔 중심점에 잡히다가 풀리네요 계속 중심점으로 반복카피하고 싶은데요
물론 명령어가 끈나면 원래 오스넵 잡힌거로 돌아가게끔 (setvar “osmode” cqw) 문구를 넣었는데요…
(defun c:A2 ( / cqw)
(setq cqw (getvar “osmode”))
(setvar “osmode” 4)
(setq ss (ssget ))
(princ “nt시작포인트 :”)
(command “copy” ss “” “m” pause)
(setvar “osmode” cqw)
(princ)
)
이 리습도 마찬가지로 처음엔 무한선을 되엇다가 몇번찍으면 1번이엇던게 현제 레이어로 바뀌고요 고수님 원인이 먼지좀 봐주세요
저는 계속 1번으로 갔다가 명령어 끈나면 되엇으면 하는데…..
(defun c:A2 ( / cqw)
(setq cqw (getvar “CLAYER”))
(setvar “CLAYER” “1”)
(command “XLINE” “V” pause)
(setvar “CLAYER” cqw)
(princ)
)
아 있었군요 상큼메론님 너무 고맙습니다. 휴일인데 쉬셔야 되는데 고캐드에 댓글 달아주시고 잘쓰겠습니다.^^
수야12님 감사합니다
상큼메론님 cqwde 부분을 OSMODE 로 고치니 드디어 되네요^^
그런데 2번째 무한선도 똑같이 적용을 했는데
오류: AutoCAD 변수 설정이 거부됨: “CLAYER” 이렇게 나오네요 리습이란 참 어렵네요
;;;;;2번째 무한선
(defun c:A33 (/ FR DD)
(setq FR (getvar “CLAYER”))
(setvar “CLAYER” 1)
(if (setq DD (ssget))
(progn
(command “xline” DD “v”)
(while (/= (getvar “cmdactive”) 0)
(command pause)
(setvar “CLAYER” 1)
); while
); progn
); if
(setvar “CLAYER” FR)
(princ)
)
실행할때마다 레이어와 오스냅을 설정하는 구문이라 풀릴일이 없는데 그러네요 ㅎㅎ;;