품번 리습 오류 질문

기존 CAD 2012에서 사용하던 품번 리습이 CAD 2014Machanical에서 오류가 발생 하였습니다.

Command: nn <Auto number>
Input number<1>:
; 오류: no function definition: LAYER0

LAYER0 오류 같은대 삭제하면 아에 로드가 되지가 않아
수정 가능한지 문의 드립니다.

(defun c:n1 (/ no siz bas cs1) (prompt “nCommand: n1 <Auto number 1>”)
   (graphscr) (setvar “osmode” 0) (setvar “orthomode” 0)
   (setq no   (getint “nInput number<1>: “)) (if (= no nil) (setq no 1))
   (setq siz  (* 4 (getvar “dimscale”)))
   (while
      (layer0)  (setq cs1 (* 12 (getvar “dimscale”)))
      (layer4)  (command “circle” bas “d” cs1)
      (layer3)  (command “text” “m” bas siz 0 no)
      (setq no (1+ no))
   )  (command ^c)   (princ))

(defun c:n2 (/ no siz bas p1 p2 p3) (prompt “nCommand: nn <Auto number>”)
   (setvar “osmode” 0) (setvar “orthomode” 0)
   (setq no  (getint “nInput number<1>: “)) (if (= no nil) (setq no 1))
   (setq siz (* 4 (getvar “dimscale”)))     (graphscr)
   (while
      (layer0)
      (setq p1  (getpoint bas “nSelect end   point :”)
            p2  (polar p1  (angle bas p1)   (* 12 (getvar “dimscale”)))
            p3  (polar p1  (angle bas p1)   (* 6  (getvar “dimscale”))))
      (layer3)  (command “dim1” “leader” bas p1 ^c)
      (layer4)  (command “circle” “2p”   p1  p2)
      (layer3)  (command “text” “m” p3 siz 0 no)
      (setq no (1+ no))  );;end while
      (princ))


* 게시판 사용이 처음이라 수정하였습니다.