성심 성의껏 질문을 작성하여 주세요, 대충하시면 답변도 대충작성합니다.^^
- 제목 작성시 금지어
만들어주세요? 해주세요? 안되는데 이렇게 변경해주세요? 등등
- 특정분과 질문은 제목에 분과삽입 [건축]
좋은예) [분과]무엇에 대해 문의합니다. /[분과]B로 바꾸는 방법을 알고싶습니다.
- 말머리 필수
① CAD 종류 : AutoCAD
② VERSION : 2012
③ 운영 체제 : 윈도우7
④ 질문내용 및 스크린샷(이미지 및동영상)
여러분, 새해 복 많이 받으세요.
아키모아에서 다운 받은 면적 lisp 같은데요.
현재는 두 줄로 m2과 평이 나옵니다.
그런데 이걸 한 줄로 나오게 바꾸고 싶습니다.
<현재>
<변경후>
;;ID : anold88
;;NAME : KANG MIN SOO
;;DATE : 1998/04/23
(defun c:A2(/ d_s ent_p ar_1 ar_2 py_1 py_2 t_p n_p)
(graphscr)
(setvar "cmdecho" 0)
(setq d_s (getvar "dimscale"))
(command "units" "" "8" "" "" "" "")
(setq ent_p (entsel "\n 피라인을 선택하세요!! :"))
(command "area" "e" ent_p)
(setq ar_1 (/ (getvar "area" ) 1.0e+06))
(setq ar_2 (rtos ar_1 2 3))
(setq py_1 (* ar_1 0.3025))
(setq py_2 (rtos py_1 2 3))
(command "units" "" "0" "" "" "" "")
(prompt "\nArea (M2):")(princ ar_2)
(prompt "\nArea (Py):")(princ py_2)(princ)
(setq t_p (getpoint "\nText Point:"))
(setq t_h (getreal "\nText Hihg:"))
(setq n_p (list (car t_p) (- (cadr t_p) (* t_h 2))))
(command "text" t_p t_h "" (strcat "* Area (M2) : " ar_2))
(command "text" n_p t_h "" (strcat "* Area (Py) : " py_2))
(setvar "cmdecho" 1)
(princ)
)
살짝만 고치면 될 것 같은데 잘 몰라서요. strcat 요부분 고쳤는데 안되더라구요... ㅜㅜ
능력자님들 부탁드릴게요.
파일 첨부 하겠습니다.
또 일전에 pgp랑 lisp 안되는 것 때문에 질문 올렸었었는데요..
사무실 인터넷 차단되어 있고 바쁘기도 하고 집에 오면 잊어버리고 하다 보니 카페에 들어오질 못했었습니다.
답글 달아주신 분들께 감사드립니다.
제가 보니까 순수한 pgp는 먹더라구요. 그니까 설치하고 안 건드리면 됩니다.
건드린 순간 그 pgp는 아예 인식을 못하더군요. 단축키 전체가... ㅋㅋㅋ
그래서 그냥 기본 pgp 그대로 쓰기로 했습니다.
그리고 lisp의 경우 저는 항상 자동로드를 acad20xxdoc.lsp에 걸어서 사용을 했었는데 적용이 안되서
자주 쓰는 몇가지만 책가방에 넣어서 쓰는 방법을 택했는데 이마저도 면적 프로그램만 되고 다른 건 안되네요
(책가방 = command : appload -> 시작하기 세트)
그래서 파일 열 때마다 수동 로드해서 쓰고 있습니다.
이유가 뭘까요? 저만 그런게 아니라서 제가 잘못한 게 절대 아니랍니다.
또 최근에 문제가 생겼는데....properties가 어느날부터 갑자기 안됩니다.
2015 설치하는 중 allied product is not found 라고 뜨면서 설치가 안됐습니다.
요거 때문인지.... 앙~~ 정말 괴로와요...
문제가 많죠?! 제발 도와주세요.
⑤ 파일첨부 (LISP/DWG) - DWG 첨부시 보다 정확한 답변을 얻을수 있습니다.
A2.LSP
※ 유의사항
- ①말머리 : 말머리를 달아야 구분이 쉽겠죠^^
- ②Screenshot : 이해를 돕기위해 삽입요망.
- ③파일 첨부 : 상위버전에서 테스트할 파일이 아니면 가급적 하위버전으로 저장후 첨부.
해당리습/해당파일(DWG) 도 같이 첨부하여 주세요.
- ④제 목 : 질문 내용 반영(개략적인 내용), 예) 해치를 만들고 싶어요, pline을 연결할려면?
- ⑤질문글 삭제금지 : 질문후 댓글이 달린글은 삭제금지.
여러 리플러들이 소중한 시간을 내어서 고민한후 댓글을 작성한 이상 "강력조치" 토록 하겠음.
※ 정답만이 댓글은 아닙니다. 그 답이 맞던 틀리던 그건 그 댓글로서 존중되어야 합니다.
회원님들이 글을 읽었다는것과 댓글을 달았다는건 그만큼 관심을 가지고 있고 또 그 답을 해주기 위해
검색도 해보고 도움말도 보고 고민도 하는 일련의 과정을 거치면서 나오기 때문이죠.
이에 대한 고마움과 감사함을 모르는 테러행위(?)는 없었으면 합니다.
첫댓글 2012가 참 리습로드에 애로사항이 많네요.. 고캐드에도 비숫한 질문이 많이 올라왔던데 시원한 해결 방안은 없는듯 ^^;;
(command "text" t_p t_h "" (strcat ar_2 "㎡/" py_2"py")) <= 요렇게 하시면 됩니다
2015에서..mapcar를 쌩까는 어이없는 경우에 비함.. 이정도는 깜찍하죠..^^; ㅎㅎㅎ
@3:16 그래요 대단하네 자동책상
2012버전은 안쓰는게...정신건강에 좋을 거 같네요..^^;
고맙습니다. 근데 2012 왜요?
매카니컬 2012 는 어떻습니까??
음~~
http://cafe.daum.net/archimore/ESJj/16195
여기 주소 가시면 2012리습 로드 할수있는 방법 있습니다.