13499번 야수님이 올린 리습
다운받아서 실행시켰는데 명령이 안먹네여
모가 문제인거져?
명령어를 치면 꼭이렇게 뜨면서 command로 빠져나가 버리네여
Command:DDD
Select objects: Other corner: 4 found
Select objects:
error: quit / exit abort
(EXIT)
(IF (< (SETQ DCL_ID (LOAD_DIALOG "dd.dcl")) 0) (EXIT))
(TC D)
(IF (OR (= (CDR (ASSOC 0 (ENTGET D))) “TEXT”) (= (CDR (ASSOC 0 (ENTGET D)))
“MTEXT”)) (TC D))
(WHILE (<= 1 B) (SETQ D (SSNAME A C)) (REDRAW D 3) (IF (OR (= (CDR (ASSOC 0
(ENTGET D))) “TEXT”) (= (CDR (ASSOC 0 (ENTGET D))) “MTEXT”)) (TC D)) (SETQ B (-
B 1)) (SETQ C (+ C 1)))
(DD1)
(C:DDD)
*Cancel*
DCL파일을 못찿아서그래요.LSP파일과 DCL파일을 PATH가 걸려있는 (예:SUPPORT방)방에다 넣어놓고 하세요
아니면 리습파일의 “dd.dcl” 을 찿아서 “C:/CAD/LISP/dd.dcl” 로 (당연히dd.dcl이있는디렉토리명이겠죠) 바꾸시던가…
헤헤..야수님 해결했슴당…감사함당…^^ 잘쓰것슴당…