.支持庫 spec.程序集 窗口程序集1.子程序 _按鈕1_被單擊
.局部變量 i, 整數型
.局部變量 個位
.局部變量 十位
.局部變量 百位
.局部變量 和
.局部變量 臨時數組, 整數型, , "0"清除數組 (臨時數組)
.計次循環首 (999, i)
個位 ＝ 到數值 (取文本右邊 (到文本 (i), 1))
.判斷開始 (i ≥ 10 且 i ＜ 100)
十位 ＝ 到數值 (取文本左邊 (到文本 (i), 1))
.判斷 (i ≥ 100)
十位 ＝ 到數值 (取文本中間 (到文本 (i), 2, 1))
百位 ＝ 到數值 (取文本左邊 (到文本 (i), 1))
.默認 .判斷結束 和 ＝ 個位 ＋ 十位 ＋ 百位
.如果真 (和 ＝ 11 或 和 ＝ 12 或 和 ＝ 13 或 和 ＝ 14 或 和 ＝ 15 或 和 ＝ 16)
調試輸出 (百位, 十位, 個位, “----”, i, 和)
加入成員 (臨時數組, i)
.如果真結束.計次循環尾 ()