控制端源碼:
.版本 2
.子程序 _開始按鈕_被單擊, , , 要把按鈕1命名為“開始按鈕”
寫到文件 (“d:\xxx.txt”, 到字節集 (“開始”))
.子程序 _停止按鈕_被單擊, , , 要把按鈕1命名為“停止按鈕”
寫到文件 (“d:\xxx.txt”, 到字節集 (“停止”))
被控端源碼:
.版本 2
.程序集 窗口程序集1
.子程序 __啟動窗口_創建完畢
時鐘1.時鐘周期 = 1
.子程序 _時鐘1_周期事件
.局部變量 a, 整數型
a = 讀入文件 (“d:\xxx.txt”)
.如果 (a = “開始”)
時鐘2.時鐘周期 = 100 '這個表示開始
.否則
時鐘2.時鐘周期 = 0 ’這個表示停止
.如果結束