.程序集?窗口程序集1
.子程序?__啟動窗口_創建完畢
.子程序?_按鈕1_被單擊
.局部變量?最大值,?整數型
.局部變量?當前值,?整數型
.局部變量?起始值,?整數型
起始值?＝?0
當前值?＝?起始值
最大值?＝?二十六到十?(編輯框2.內容)
.判斷循環首?(當前值?≤?最大值)
編輯框1.加入文本?(十到二十六?(當前值)?＋?#換行符)
當前值?＝?當前值?＋?1
.判斷循環尾?()
.子程序?二十六到十,?整數型
.參數?文本,?文本型
.局部變量?x,?整數型
.局部變量?y,?整數型
.局部變量?z,?整數型
.計次循環首?(取文本長度?(文本),?x)
y?＝?尋找文本?(“abcdefghijklmnopqrstuvwxyz”,?取文本中間?(文本,?x,?1),?,?真)
z?＝?z?＋?(y?－?1)?×?求次方?(26,?取文本長度?(文本)?－?x)
.計次循環尾?()
返回?(z)
.子程序?十到二十六,?文本型
.參數?十進制,?長整數型
.局部變量?臨時,?整數型
.局部變量?數組,?文本型,?,?"26"
.局部變量?二十六進制,?文本型
數組?＝?{?“a”,?“b”,?“c”,?“d”,?“e”,?“f”,?“g”,?“h”,?“i”,?“j”,?“k”,?“l”,?“m”,?“n”,?“o”,?“p”,?“q”,?“r”,?“s”,?“t”,?“u”,?“v”,?“w”,?“x”,?“y”,?“z”?}
二十六進制?＝?“”
.判斷循環首?(十進制?＞?0)
臨時?＝?十進制?％?26?＋?1
二十六進制?＝?數組?[臨時]?＋?二十六進制
十進制?＝?十進制?÷?26
.判斷循環尾?()
.如果真?(取文本長度?(二十六進制)?＜?6)
二十六進制?＝?取文本左邊?(“aaaaaa”,?6?－?取文本長度?(二十六進制))?＋?二十六進制
.如果真結束
返回?(二十六進制)