.程序集 窗口程序集1
.程序集變量 英文, 文本型, , "0"
.程序集變量 中文, 文本型, , "0"
.子程序 __啟動窗口_創建完畢
英文 ＝ { “AUG”, “GUG” }
中文 ＝ { “甲硫氨酸-”, “纈氨酸-” }
.子程序 _按鈕1_被單擊
.局部變量 n, 整數型
.局部變量 i, 整數型
.局部變量 臨時文本, 文本型
.局部變量 j, 整數型
n ＝ 取文本長度 (編輯框1.內容)
臨時文本 ＝ “”
.計次循環首 (n ÷ 3, i)
.計次循環首 (取數組成員數 (英文), j)
.如果真 (取文本中間 (編輯框1.內容, i × 3 － 2, 3) ＝ 英文 [j])
臨時文本 ＝ 臨時文本 ＋ 中文 [j]
.如果真結束
.計次循環尾 ()
.計次循環尾 ()
編輯框2.內容 ＝ 臨時文本