[讨论]怎么做个CAD定时闹钟

zctao1966

高手，支持你！

357785513

如果我要它每10分钟提醒我一次呢.应该在怎么改呀

不死猫

原理就是根据自动保存的时间间隔

修改即可

oyxx1023

我的也是没反应.要同时触发保存和时间相等时才ALERT.

nonsmall

请楼上各位注意自动保存的概念

就是当用户有操作的时候（图面发生改变）才会触发真正的自动保存

如果用户放置不动 自动保存是不会真正触发的

所以要想程序正常运行

需要对CAD操作操作才行 O(∩_∩)O

oyxx1023

做个DLL用LISP调用得了.

那样才可以做出真的到点就闹钟.

AMTONNY

老猫就是强，偶顶顶顶

AMTONNY

(vlax-put-property (vlax-get (vlax-get (vlax-get-acad-object) 'Preferences) 'OpenSave) 'AutoSaveInterval 1);每隔1分钟 可自定义
(if (not (equal (type dwg_reactor_Gohome) 'VLR-DWG-Reactor))
        (setq dwg_reactor_Gohome(vlr-dwg-reactor nil '((:vlr-beginsave . GotoHome))))
)
(defun GotoHome(ii jj / time)
 (setq time (read (substr (rtos (getvar "cdate") 2 12) 10 4)))
 (if (> time 1728);下午5点28分 下班前
  (alert "准备下班!")

(command  "LINE" ...)
 )
)

本人把程序改动有有以下问题,有高手能解决吗?

执行一条 AutoCAD 命令 (command  "LINE" ...) 时不能调用原CAD命令,不知此处该如何写法?