。裝配窗裝配1
。匯編變量英語,文本類型,“0”
。匯編變量中文,文本類型,“0”
。子程序_ _開始窗口_已創建
English = {"aug "," gug"}
中文= {“蛋氨酸-”,“纈氨酸-”}
。subroutine _ button 1_被點擊。
。局部變量n,整數類型
。局部變量I,整型。
。局部變量臨時文本,文本類型
。局部變量j,整數類型
N =取文本長度(編輯框1。內容)
臨時文本= ' '
。計數循環頭(n ÷ 3,I)
。計數循環頭(取數組成員數(英文),J)
如果為真(取文本中間(編輯框1。內容,I× 3-2,3) =英文[j])
臨時文本=臨時文本+中文[j]
如果真的結束了。
。計數周期尾部()
。計數周期尾部()
編輯框2。內容=臨時文本