.局部變量 隨機數, 整數型
.局部變量 i
.局部變量 紅球, 整數型, , "0"
.局部變量 a, 整數型編輯框1.內容 = “”
編輯框2.內容 = “”
清除數組 (紅球)
.計次循環首 (33, a)
加入成員 (紅球, a)
.計次循環尾 ()置隨機數種子 ().計次循環首 (6, i) 隨機數 = 取隨機數 (1, 取數組成員數 (紅球))
編輯框1.加入文本 (到文本 (紅球 [隨機數]) + “,”)
刪除成員 (紅球, 隨機數, )
.計次循環尾 ()
編輯框2.內容 = 到文本 (取隨機數 (1, 16))
.子程序 __啟動窗口_創建完畢