请教并讨论调用ARX命令问题

wmz

;;这样可以
(defun c:tt(/ s )
     (setq s (ssget "X" '((8 . "dmx")(0 . "*POLYLINE"))))
     (setq n (sslength s) m 0)
      (command "GCSPZJ" 1 2)
  (repeat n
      (setq e (ssname s m) m (1+ m))
       (command e) ;;;调用等高线注记命令
  )
    (command)
)  
;;这样不可以,出现嵌套超过4层问题，咋办？
(defun c:tt(/ s )
    (setq s (ssget "X" '((8 . "dmx")(0 . "*POLYLINE"))))
    (setq n (sslength s) m 0)
  (repeat n
        (setq e (ssname s m) m (1+ m))
         (command "GCSPZJ" 1 2  e "")
   )
  )  

wmz

;;这样不可以,出现嵌套超过4层问题，咋办？
(defun c:tt(/ s )
    (setq s (ssget "X" '((8 . "dmx")(0 . "*POLYLINE"))))
    (setq n (sslength s) m 0)
  (repeat n
        (setq e (ssname s m) m (1+ m))
         (command "GCSPZJ" 1 2  e "")
   )
  )  

ivde

这样的Cass只会用户越来越少

xiaotao

嵌套超过4层 这是AutoCAD的问题吧！你用2009就不会不出现这样的问题了