无聊之作,开机自启--开机3秒关机

QQ复制者 · 发表于 2013-8-5 12:57:12

无聊时写的。。  回复可直接看见源码，不需要下载。。

[e]
.版本 2
.支持库 spec
.支持库 shell
.程序集窗口程序集1
.子程序 _按钮1_被单击
置外形图片 (_启动窗口.底图, #黑色)
.判断开始 (文件是否存在 (取运行目录 () ＋ “\startup.ini”) ＝真)
选择框1.标题＝读配置项 (取运行目录 () ＋ “\startup.ini”, “设置”, “选择项”, )
.默认
.判断结束
.判断开始 (选择框1.选中＝真)
.判断开始 (写配置项 (取运行目录 () ＋ “\startup.ini”, “设置”, “选择项”, 选择框1.标题) ＝真)
      写注册项 (#本地机器, “Software\Microsoft\Windows\CurrentVersion\Run\test”, 取运行目录 () ＋ “\test.exe”)
.默认
.判断结束
.默认
.判断结束
.判断开始 (选择框1.选中＝假)
.判断开始 (写配置项 (取运行目录 () ＋ “\startup.ini”, “设置”, “选择项”, 选择框1.标题) ＝真)
      删除注册项 (#本地机器, “Software\Microsoft\Windows\CurrentVersion\Run\test”)
.默认
.判断结束
.默认
.判断结束
延迟 (3000)
关闭系统 (#关机, 假)
[/e]