캐드 분류
지시선 텍스트 자동 입력 질문
컨텐츠 정보
- 1,041 조회
- 4 댓글
- 0 추천
- 0 비추천
-
목록
본문
(defun c:m6 ()
(command "leader" pause pause "" "m6 tap thru" "")(princ)
)
(defun c:c6 ()
(command "leader" pause pause "" "m6 C'Bore Dp6″ "")(princ)
)
(defun c:cs ()
(command "leader" pause pause "" "m6 C'Sink" "")(princ)
)
예전 게시글에 올라온 리습입니다.
여기서 텍스트를 아래 위로 두개를 만들수 있을까요??
그리고 혹시 QLEADER 처럼 화살표와 선 설정도 가능한지..
부탁드립니다…
관련자료
댓글 4
/ 1 페이지
상큼메론90님의 댓글
.gif)
leader도 당연히 딤설정으로 화살표 크기 조절 가능합니다.
(defun c:m6 (/ p1 p2 dis) (setq p1 (getpoint "n첫째점 : ")) (command "_.leader" p1 (setq p2 (getpoint p1 " 다음점 :")) "" "m6 tap" "thru" "") (setq dis (+ (/ (+ (* (* (getvar "dimtxt") (getvar "dimscale")) 2) (* (getvar "dimtxt") (getvar "dimscale"))) 2) (* (getvar "dimgap") (getvar "dimscale"))) ) (command "_.stretch" "c" (polar p2 (dtr 215) 1.0) (polar p2 (dtr 45) 1.0) "" "0,0″ (list 0 dis)) (princ) ) ; defun (defun dtr (a) (* pi ( / a 180.0)))
;;;
