CAFE

★ CAD/LISP/분과 Q&A

[[Lisp]]도면층 병합하기 -lm 리습중 의문

작성자돌파구|작성시간08.12.01|조회수880 목록 댓글 5

;->merge start
   (if (= ky1 9) (if (and oln nln)(progn
         (setq la2 (nth (atoi nln) la-lst))
         (setq k1lst (@tx_num_lst oln))
         (setq n 0)
         (command "undo" "be")
         (repeat (length k1lst)
            (setq k1 (fix (nth n k1lst)))
            (setq la1 (nth k1 la-lst))
            (command "laymrg" "n" la1 "" "n" la2 "y")
            (setq n (+ n 1)) )
        (command "undo" "e")
        (setq kk (+ kk 1))
   ) ) )
;<-merge end
   (if (and (= ky1 4) (> kk 0))
       (progn (setq ky1 9 kk (- kk 1))(command "u"))
   )
   (setq oln nil nln nil)
);while end
   (unload_dialog dcl_id)
(prin1))

 

 

저는 캐드 2002버전인데요.

레이어 병합리습을 이용 하고 싶은데 잘안되네요.

앞에 빨간색 부분에서 오류가 발생되는 되여.

버전이 낮아서 그런건가요.

 

 command "laymrg" 이  실행되지 안네요.

고수님 답변 부탁드립니다.

 

command 에서 laymrg 명령어 ???

 

다음검색
현재 게시글 추가 기능 열기

댓글

댓글 리스트
  • 작성자주말농부 | 작성시간 08.12.01 본 리습은 2007을 바탕으로 만들어졌습니다. 제가 2008이 없어서 테스트을 못하네요. 버전에 따라 laymrg명령어 사용이 바뀔수 있으니 그에 맞게 수정해야됩니다.^^
  • 작성자돌파구 작성자 본인 여부 작성자 | 작성시간 08.12.01 버전을 올리기 전까지 사용못 하겠네요 아쉬워라. 좋은리습인데.... 주말농부님 답변감사!!
  • 작성자3:16 | 작성시간 08.12.01 laymrg라 함은..선택객체들을 골라서...혹은 레이어명을 입력해서...병함하려는 객체를 선택해서...레이어들을 서로 병합하는 명령어입니다^^*
  • 작성자3:16 | 작성시간 08.12.01 다른버전에선...어떤 명령어로 대체 되는지까지는 잘 모르겠네요...;;
  • 작성자현   | 작성시간 08.12.01 예전 버전에서는 express에 포함되어 있는 명령어입니다. 그래서인지 리습에서 command 명령어로 실행은 안 된답니다. 2006까지도 안 되더군요. 리습으로 올린 명령이 command 문으로 실행되지 않는 것과 같은 이치랍니다.
댓글 전체보기
맨위로

카페 검색

카페 검색어 입력폼