.版本 2
.支持庫 shellEx
.支持庫 EThread
.支持庫 eAPI
.程序集 窗口程序集_啟動窗口
.程序集變量 熱鍵F10, 整數(shù)型
.程序集變量 熱鍵Home, 整數(shù)型
.程序集變量 集_線程句柄, 整數(shù)型
.子程序 __啟動窗口_創(chuàng)建完畢
熱鍵F10 ＝ 注冊熱鍵 (取窗口句柄 (), 標簽1.取窗口句柄 (), 0, #F10鍵)
熱鍵Home ＝ 注冊熱鍵 (取窗口句柄 (), 標簽1.取窗口句柄 (), 0, #Home鍵)
.子程序 _標簽1_反饋事件, 整數(shù)型
.參數(shù) 參數(shù)一, 整數(shù)型
.參數(shù) 參數(shù)二, 整數(shù)型
.判斷開始 (參數(shù)一 ＝ 熱鍵F10)
  .判斷開始 (時鐘1.時鐘周期 ＝ 0)
    時鐘1.時鐘周期 ＝ 200
    標簽1.文本顏色 ＝ #紅色
  .默認
    時鐘1.時鐘周期 ＝ 0
    標簽1.文本顏色 ＝ #黑色
  .判斷結束
.判斷 (參數(shù)一 ＝ 熱鍵Home)
  .判斷開始 (集_線程句柄 ＝ 0)
    狀態(tài)標簽.文本顏色 ＝ #紅色
    啟動線程 (&開始刷金幣, , 集_線程句柄)
  .默認
    強制結束線程 (集_線程句柄)
    集_線程句柄 ＝ 0
    狀態(tài)標簽.文本顏色 ＝ #黑色
    狀態(tài)標簽.標題 ＝ “狀態(tài)：已停止”
  .判斷結束
.默認
.判斷結束
.子程序 _時鐘1_周期事件
句柄編輯框.內容 ＝ 到文本 (取鼠標所在窗口句柄 ())
.子程序 開始刷金幣
.局部變量 窗口句柄, 整數(shù)型
窗口句柄 ＝ 到整數(shù) (句柄編輯框.內容)
狀態(tài)標簽.標題 ＝ “狀態(tài)：工作中”
.判斷循環(huán)首 (集_線程句柄 ≠ 0)
  處理事件 ()
  程序_延時 (500)
  鼠標_消息 (窗口句柄, 1064, 622, 1, 1)
  鼠標_消息 (窗口句柄, 1169, 622, 1, 1)
.判斷循環(huán)尾 ()
.子程序 _模擬按鈕_被單擊
.局部變量 窗口句柄, 整數(shù)型
窗口句柄 ＝ 到整數(shù) (句柄編輯框.內容)
鼠標_消息 (窗口句柄, 1064, 622, 1, 1)
鼠標_消息 (窗口句柄, 1169, 622, 1, 1)