Guest Drafter_J 发表于 2022-7-5 22:15:06

绕过李需要帮助

你好
 
我需要以下代码的帮助,这些代码用于检查cmdactive变量,如果脚本正在运行,则绕过例程。
 
代码是:

;;s::startup section from Lee_Mac, 3rd version of startup modified by Lee_Mac

(   (lambda ( / expr )
       (vl-load-com)
(setq x (getvar 'cmdactive))
       (setq expr '((if (zerop (logand 4 (getvar 'cmdactive))) (c:gochngplt)) (princ)))
       (if (= 'list (type s::startup))
         (setqs::startup (append s::startup expr))
         (eval (vl-list* 'defun-q 's::startup 'nil expr))
       )
       (princ x)
   )
)

;;----------------------------------------------------------------------;;
;;                           End of File                              ;;
;;----------------------------------------------------------------------;;

 
我添加了一个检查来查看cmdactive变量是什么,它始终是一个“0”。
 
任何帮助都将不胜感激!
 
感谢您的时间和关注!
页: [1]
查看完整版本: 绕过李需要帮助