캐드 리습 3d2d 사용중인데 로드가되어 있는데도 사용시로드해야만 사용됩니다.

캐드 바이러스는 v3로 안잡힙니다.  다른걸로 잡아야 돼요. 검색하면 나옵니다.

그리고 파일 경로를 확인해 보세요.

질문에서는 단서가 별로 없어서 (에러 메시지등등), 답을 유추하기가 힘들구요.

바이러스와 파일경로,  두가지 문제점이 아니면, 딱~히 문제 될게 없는것 같네요~~~

.

우선 v3 말고 캐드바이러스 프로그램으로 다 해봤습니다. 경로도 지원파일검색 경로 및 작업지원파일 검색 경로 해놨구요 신뢰할수 있는 위치도 해놨습니다. 캐드 처음 실행시 appload하면 시작하기세트에도 등록이 되어 있구요 로드된 응용파일에도 되어 있습니다. 그런데 명령어 3D2D를 치면 안되고 APPLOAD 실행후 로드버튼 눌러서 실행한후 하면 명령어가 먹습니다.

계속 불러와야만 실행이 된다면 아래와 같은 방법도 있겠습니다. (autoload "리습파일이름" '("3d2d")) <–이것을 acad2016doc.lsp 마지막에 추가하는 방법.

그전에 아래것을 한번 appload해서 시작세트에 불러와 보세요. 되는지 안되는지…

(defun Gerr(app msg)      (defun *error* (msg)               (if OLDERROR (setq *error* OLDERROR))               (if OLDCMD (setvar "cmdecho" OLDCMD))               (princ)      )      (if msg              (alert (strcat " Application error: "                           app                           " nn  "                           msg                           "  n"                        )              )      ) )

(defun noele(dev num / olddata newdata data data1)             (setq data (cdr (assoc num dev)))             (setq  olddata  (assoc num dev))             (setq  data1 (list (car data) (cadr data) 0))             (setq  newdata (cons num data1))               (setq dev (subst newdata olddata dev))            )

(defun chtime(data / rtcode)            (setq rtcode (strcat (rtos (/ data 3600.) 2 0) ":"))            (setq data (- data (* (fix (/ data 3600)) 3600.)))            (setq rtcode (strcat rtcode (rtos (/ data 60.) 2 0) ":"))            (setq data (- data (* (fix (/ data 60)) 60.)))            (setq rtcode (strcat rtcode (rtos data 2 0))) )

;|*********************Dim Text Change**********************************|; (defun c:3d2d (/                       dcl_id3 selobj selnum idnum ed obj name starttime endtime                     )   (setq OLDCMD (getvar "cmdecho")             OLDERROR  *error*            *error* Gerr   )   (setvar "cmdecho" 0)     

  (princ "n>>Select Object<<")   (setq selobj (ssget))    (setq selnum (sslength selobj))    (setq starttime (getvar "DATE"))   (setq starttime (fix (* (- starttime (fix starttime)) 100000.)))    (setq idnum 0.)   (repeat selnum                    (setq ed (entget (ssname selobj idnum)))         (setq o38 (assoc 38 ed))       (setq n38 (cons (car o38) 0.0))       (setq ed (subst n38 o38 ed))       (setq obj (cdr (assoc 0 ed)))       (setq name (cdr (assoc 1 ed)))       (setq ed (noele ed 10))       (setq ed (noele ed 11))       (setq ed (noele ed 13))       (setq ed (noele ed 14))          (setq ed (noele ed 21))       (setq ed (noele ed 30))       (setq ed (noele ed 31))       (entmod ed)       (setq idnum (1+ idnum))       (princ (strcat "Converting Data Num : " (rtos idnum 2 0) "(" (rtos (* (/ idnum selnum) 100) 2 0) "%)" (chr 13)))   )   (setvar "ELEVATION" 0)   (setq endtime (getvar "DATE"))   (setq endtime (fix (* (- endtime (fix endtime)) 100000.)))    (princ (strcat "nElapsed Time : " (chtime (- endtime starttime)) "nConverting End….."))   (setq *error* OLDERROR)   (setvar "cmdecho" OLDCMD)   (princ)           ) ;|**********************************************************************|;

;(defun C:3d2d() (3d2d_main)) ;(princ "nLoading Complete……  Programed by Shin Jong-Hwa by DooSan ENG.nType : 3d2d") ;(princ)

;;;

위의 리습으로 해봤지만 여전히 똑같습니다. 로드를 해야지만 실행됩니다. 마지막 방법은 등록이군요..