.版本2
.支援庫eAPI
.支援庫internet
.支援庫shell
.程式集視窗程式集2
.程式集變數記錄時間,日期時間型
.子程式__啟動視窗_建立完畢
記錄時間=取現行時間()
時鐘1.時鐘週期=1000
.子程式_時鐘1_週期事件
.區域性變數程序表,程序資訊,,"0"
.區域性變數y,整數型
程序表=取系統程序列表()
.計次迴圈首(取陣列成員數(程序表),y)
.如果真(程序表[y].程序名稱=“你想要結束程序的名”)"如:123.exe
終止程序(程序表[y].程序識別符號)
結束通話()"結束通話當前撥號網路連線
.如果真結束
.計次迴圈尾()
"以上是結束程序下面是系統關機
.如果真(取時間間隔(取現行時間(),記錄時間,8)>60)"這裡為當程式運行了1分鐘後自己關機
時鐘1.時鐘週期=0"先停止時鐘,以免程式重複執行
關閉系統(#關機,真)
.版本2
.支援庫eAPI
.支援庫internet
.支援庫shell
.程式集視窗程式集2
.程式集變數記錄時間,日期時間型
.子程式__啟動視窗_建立完畢
記錄時間=取現行時間()
時鐘1.時鐘週期=1000
.子程式_時鐘1_週期事件
.區域性變數程序表,程序資訊,,"0"
.區域性變數y,整數型
程序表=取系統程序列表()
.計次迴圈首(取陣列成員數(程序表),y)
.如果真(程序表[y].程序名稱=“你想要結束程序的名”)"如:123.exe
終止程序(程序表[y].程序識別符號)
結束通話()"結束通話當前撥號網路連線
.如果真結束
.計次迴圈尾()
"以上是結束程序下面是系統關機
.如果真(取時間間隔(取現行時間(),記錄時間,8)>60)"這裡為當程式運行了1分鐘後自己關機
時鐘1.時鐘週期=0"先停止時鐘,以免程式重複執行
關閉系統(#關機,真)
.如果真結束