(defun C:m ()
(setvar "cmdecho" 0)
(setq css (ssget)) (command "move" css "" "p")
(setq css nil) (setvar "cmdecho" 1)
(prin1) )

这段是移动命令的lsp ,现在我想在手动输入命令m后,CAD就会自动输入P键加空格后的功能(本人是为了不要老去点P键,想让命令在每次手动输入M键后加空格就可以选到了上次选中物体啦),接着步骤不变,麻烦一下版主和流浪大哥完善一下,好吗,感激不尽!!!