为什么命令执行完就会多出一行空的“命令：”

zark · 发表于 2011-4-10 00:17

(defun c:tt (/ )
  (setq a 0)
  (princ)
  )

命令: *取消*
命令: tt
命令:
命令: tt
命令:
命令: tt
命令:

这种情况下
(defun tt (/ )
  (setq a 0)
  (princ)
  )

命令: *取消*
命令: (tt)
命令: (tt)
命令: (tt)
命令: (tt)

第二种情况下执行后，就不会多出一行，这是什么原因呢？

啵浪鼓 · 发表于 2011-4-10 02:02

同求解，好多程序也有这样的毛病，奇了怪

zark · 发表于 2011-4-12 14:18

怎么没人关注

，在线等答案

xiaxiang · 发表于 2011-4-12 15:51

本帖最后由 xiaxiang 于 2011-4-12 15:58 编辑

如此这般：

(defun c:tt ()
(setq a 0)
(command "redraw")
(princ)
)

以一条command函数结尾。

zark · 发表于 2011-4-12 16:25

回复 xiaxiang 的帖子

迟来的爱，谢谢，灰常感谢你！！！！！

snddd2000 · 发表于 2011-4-12 16:25

果然管用
(DEFUN C:TT() (setq cmdsave (getvar "cmdecho"))(setvar "cmdecho" 0)(command "redraw")(setvar "cmdecho" cmdsave)(prinC ))

tyzhi222 · 发表于 2011-4-14 11:13

没注意过，倒是结尾都会有一句 (princ)

egos · 发表于 2011-4-19 15:48

嘿嘿加上这一句是啥玄机呢

Student · 发表于 2011-4-20 08:49

(princ)
只是为了，不显示最后的结果，以便“安静地结束”

xjf · 发表于 2011-4-20 12:36

+(command "redraw")

是重画屏幕

账号		自动登录	找回密码
密码			注册

[基础] 为什么命令执行完就会多出一行空的“命令：”

浏览过的版块