第壹種方案 用2個時鐘
.版本?2.程序集?窗口程序集1
.程序集變量?i,?整數型
.子程序?__啟動窗口_創建完畢
時鐘1.時鐘周期?＝?10000
時鐘2.時鐘周期?＝?360000
i?＝?0
.子程序?_時鐘1_周期事件
.如果?(i?＜?10)
i?＝?i?＋?1
輸出調試文本?(取秒?(取現行時間?()))
輸出調試文本?(i)
.否則
i?＝?0
時鐘1.時鐘周期?＝?0
.如果結束
.子程序?_時鐘2_周期事件
時鐘1.時鐘周期?＝?1000
第二個方案 用循環
.版本?2.支持庫?spec
.判斷循環首?(x?＜?10)
輸出調試文本?(x)
延時?(10000)
x?＝?x?＋?1
.如果?(x?＝?10)
延遲?(360000)
x?＝?0
.否則
.如果結束
.判斷循環尾?() 第二種方案 需要使用線程? 不然程序看起來像卡住了