大家给看看，程序执行完，命令行有多余的话

tjzcj

程序执行完，命令行有“未知命令“SUM”。按 F1 查看帮助。“如何去掉？？
(defun c:sum ()
  (setvar "cmdecho" 0)
  (setq selct (ssget '((0 . "text"))))
  (setq        n 0
        sum1 0
  )
  (repeat (sslength selct)
    (setq en (ssname selct n))
    (setq endata (entget en))
    (setq entxt (cdr (assoc 1 endata)))
    (setq entxt (atof entxt))
    (setq sum1 (+ sum1 entxt))
    (setq n (+ n 1))
  )
  (setq pt (getpoint "\n输入文字插入点:"))
  (command "text" "j" "c" pt "4" "" (rtos sum1 2 1) "")
  (prin1)
)

lockmyeye

在
　　(command "text" "j" "c" pt "4" "" (rtos sum1 2 1) "")
最后的""是多余的。

建议用entmake生成注记，命令text的参数受当前样式的影响，不尽相同。

tjzcj

多谢指点，十分感谢！！！