.子程序 _按鈕1_被單擊
.局部變量 i, 整數型
時鐘1.時鐘周期 = 300
畫板1.清除 (, , , )
.計次循環首 (到數值 (編輯框1.內容), )
畫板1.畫筆顏色 = 取顏色值 (取隨機數 (1, 255), 取隨機數 (1, 255), 取隨機數 (1, 255))
畫板1.畫直線 (取隨機數 (1, 畫板1.寬度), 取隨機數 (1, 畫板1.高度), 取隨機數 (1, 畫板1.寬度), 取隨機數 (1, 畫板1.高度))
.計次循環尾 ()
.子程序 _時鐘1_周期事件
_按鈕1_被單擊 ()