2016.08.30 09:07
(defun c:att (/ radd L:1 L:22 L1 L2 L3 dist dist11 dist22 dist1)
(setvar "cmdecho" 0)
(setvar "blipmode" 0)
(command "color" "bylayer")
; (command "layer" "unlock" "*" "")
(prompt "\n Automatic wire... ")
(setq radd (getvar "filletrad"))
(setq radd (fix radd))
(prompt "\n How much Fillet Radius <")
(prin1 radd)
(setq L:1 (getdist "> : "))
(if (/= L:1 nil)
(progn
(setvar "filletrad" L:1)
(setq radd L:1)
)
(setq L:1 radd)
)
(command "osnap" "QUA,MID")
(setq L1 (getpoint "\n Pick First line point : "))
(setq L2 (getcorner L1 "\n Pick Second point : "))
(setvar "osmode" 0)
(setq L3 (list (car L1) (cadr L2)))
(setq dist11 (distance L3 L1))
(setq dist22 (distance L2 L3))
(if (< dist11 dist22)
(setq dist dist11)
(setq dist dist22)
)
(if (< dist L:1)
(setq L:1 (* 3 (/ dist 4)))
)
(if (or (= (car L1) (car L2)) (= (cadr L1) (cadr L2)))
(command "line" L1 L2 "")
(progn
(command "pline" L1 "w" "0" "" L3 L2 "")
(command "fillet" "r" L:1)
(command "fillet" "p" "L")
(setvar "filletrad" radd)
)
)
(setvar "blipmode" 0)
)
리습을 사용하고나면 스냅옵션이 모두 꺼져요...
어떻게 수정하면 좋을까여
번호 | 제목 | 글쓴이 | 날짜 | 조회 수 |
---|---|---|---|---|
공지 | ★ 드림플러스 질문은 메일 또는 홈페이지에 부탁합니다 ★ | 아저씨 | 2017.05.16 | 2775 |
공지 | 제목이 엉망이면 답변달지 않습니다. [1] | 아저씨 | 2014.04.04 | 23854 |
공지 | 순수 캐드 질문은 고캐드로 | 아저씨 | 2013.05.28 | 68641 |
공지 | 질문 답변 게시판을 만들었습니다. | 아저씨 | 2013.02.09 | 74943 |
1534 | 드림캐드 명령어 인식 불가 [1] | 캐드초보 | 2014.03.18 | 843 |
1533 | 2006, 2008버젼 2개다 사용방법 [1] | 꺼비 | 2014.03.18 | 695 |
1532 | 다중플롯시 폼등록을 했는데.. [1] | ㅁㄴㅇ | 2014.03.21 | 35552 |
1531 | 윈도우7 32비트 설치 오류! [1] | 삐삐누 | 2014.03.22 | 33823 |
1530 | 윈 7 64bit AutoCAD Civil 3D as AutoCAD 2012에서 드림설치.... [1] | 김태훈 | 2014.03.25 | 1416 |
1529 | 드림 설치후 드림을 사용하면 이상한 메시지가 떠네요 [1] | 호열 | 2014.03.25 | 641 |
1528 | 2015버전을 쓰는데요,,,ㅠㅠ [1] | 욱이 | 2014.03.26 | 683 |
1527 | 다중 도면 삽입(MUIN) 질문입니당.. [2] | Mr.Lee | 2014.03.27 | 644 |
1526 | 드림 정렬 질문있습니다. [2] | Mr.Lee | 2014.03.27 | 599 |
1525 | 좌회전 테이퍼 "DTA"명령시 오류 [1] | 공원길 | 2014.03.31 | 692 |
1524 | 면적구하기 명령어 (are)에대한 질문입니다. [1] | 드림너무좋아 | 2014.04.02 | 714 |
1523 | 도면요소 이름에 관한 질문입니다 [2] | 김종성 | 2014.04.02 | 605 |
1522 | AUTOCAD 2013 DreamSub.dll 로드하는 중 에러발생 관련 질문 [1] | 박정대 | 2014.04.02 | 1916 |
1521 | 드림설치후 캐드 다운되는 질문입니다. [1] | 이청재 | 2014.04.02 | 531 |
1520 | 도면 열때마다 appload 해줘야 되는 문제~ [2] | 리물 | 2014.04.02 | 714 |
안녕하세요.
죄송합니다만 제가 리습 언어는 모릅니다.
제가 할줄아는 것은 드림과 관련된 언어뿐입니다.
고캐드 질문 게시판에 질문 남기시는 것이 좋을 것 같습니다.
http://www.gocad.co.kr/