.版本 2
.支持库 eAPI
.支持库 internet
.支持库 shell
.程序集 窗口程序集2
.程序集变量 记录时间, 日期时间型
.子程序 __启动窗口_创建完毕
记录时间 ＝ 取现行时间 ()
时钟1.时钟周期 ＝ 1000
.子程序 _时钟1_周期事件
.局部变量 进程表, 进程信息, , "0"
.局部变量 y, 整数型
进程表 ＝ 取系统进程列表 ()
.计次循环首 (取数组成员数 (进程表), y)
.如果真 (进程表 [y].进程名称 ＝ “你想要结束进程的名”) ' 如：123.exe
终止进程 (进程表 [y].进程标识符)
挂断 () ' 挂断当前拨号网络连接
.如果真结束
.计次循环尾 ()
' 以上是结束进程 下面是 系统关机
.如果真 (取时间间隔 (取现行时间 (), 记录时间, 8) ＞ 60) ' 这里为当程序运行了1分钟后自己关机
时钟1.时钟周期 ＝ 0 ' 先停止时钟，以免程序重复运行
关闭系统 (#关机, 真)
.如果真结束
参考资料：http://www.jdw8.com