안녕하세요.
종종 사용하던 면적 산출 리습이 언젠가부터 갑자기 오류가 나서,
고수님들의 지혜를 빌리고자 글을 올리게 되었습니다.
지난달쯤까지는 아무 문제 없이 사용되던 리습이었습니다.
ART 라는 명령어로 세팅을 해놨고,
사용 시 해당 객체의 면적을 M2 와 평 단위로 각각 텍스트로 출력시켜주는 기능을 구현해놨었지요.
헌데, 뭐가 문젠지 언젠가부터 면적을 텍스트로 출력시켜주는 기능이 말을 안듣더라구요;
이상한것은, 저는 캐드바이러스 방지용으로 모든 리습파일들은 읽기 전용으로 체크해놨거든요 ㅠㅠ
때문에 리습이 변경된건 아닐탠데, 잘 사용되던것이 갑자기 안되니 이유를 모르겠어서 도움을 구하고자 합니다.
해당 리습은 아래와 같이 만들었어요.
(defun C:ART()
(setvar “cmdecho” 0)
(SSGET)
(command “AREA” “E” (SSGET “P”))
(setq ar (getvar “area”))
(SETQ AR1 (/ AR 1.0))
(prompt “AREA (M2) =”)(prin1 (SETQ AR2 (RTOS (/ AR1 1000000.0) 2 3)))
(PROMPT ” AREA (PY) = “)(prin1 (setq ar3 (RTOS (/ ar1 3305800.0) 2 3)))
(PROMPT ” CLICK TEXT POINT…….”)
(princ)
(SETQ PO (GETPOINT))
(COMMAND “STYLE” “STANDARD” “SIMPLEX” “” “” “” “” “” “”)(PRIN1)
(SETQ TESI (* 2.5 (GETVAR “LTSCALE”)))
(SETQ ART1 (STRCAT AR2 ” M2″))
(SETQ ART2 (STRCAT AR3 ” PY”))
(COMMAND “TEXT” “BC” PO tesi “” ART1)(PRIN1)
(COMMAND “TEXT” “TC” PO TESI “” ART2)(PRIN1)
)
다른부분은 문제가 없는듯한데,
CLICK TEXT POINT 가 출력되고나서, 마우스로 글씨를 출력할 부분을 클릭하면,
알 수 없는 명령 “970 M2”. 도움말을 보려면 F1을 누르십시오.
알 수 없는 명령 “108 PY”. 도움말을 보려면 F1을 누르십시오.
이런식으로 나오네요.
원래는 클릭한 위치에 970 M2 과 그 밑에 108 PY 라는 텍스트가 써지는데 말이죠;;
제 짧은 지식으로는 해결이 안됩니다 ㅠㅠ
어떤점이 잘못된건지 좀 알려주세요 ㅠㅠ
공유