.版本 2.程序集 窗口程序集1.子程序 文本到字節集, 文本型, 公開.參數 要轉換的文本, 文本型.局部變量 字節集變量, 字節集.局部變量 循環次數, 整數型.局部變量 字節型變量, 字節集.局部變量 要輸出的文本, 文本型.局部變量 文本數據, 文本型文本數據 ＝ 要轉換的文本字節集變量 ＝ 到字節集 (文本數據).計次循環首 (取字節集長度 (字節集變量), 循環次數)  字節型變量 ＝ 取字節集中間 (字節集變量, 循環次數, 1)  .如果 (循環次數 ＜ 取字節集長度 (字節集變量))    要輸出的文本 ＝ 要輸出的文本 ＋ 到文本 (取字節集數據 (字節型變量, #字節型, )) ＋ “,”  .否則    要輸出的文本 ＝ 要輸出的文本 ＋ 到文本 (取字節集數據 (字節型變量, #字節型, ))  .如果結束.計次循環尾 ()返回 (要輸出的文本).子程序 字節集到文本, 文本型, 公開, 數據必須以“,”分割，且無｛｝.參數 要轉換的文本型數據, 文本型, , 數據必須以“,”分割，且無｛｝.局部變量 循環次數, 整數型.局部變量 整數數組, 整數型, , "0".局部變量 文本數組, 文本型, , "0".局部變量 文本數據, 文本型文本數據 ＝ 要轉換的文本型數據文本數組 ＝ 分割文本 (文本數據, “,”, ).計次循環首 (取數組成員數 (文本數組), 循環次數)  加入成員 (整數數組, 到整數 (文本數組 [循環次數])).計次循環尾 ()返回 (到文本 (子字節集替換 (到字節集 (整數數組), { 0 }, { }, , ))).子程序 字節集型文本到字節集, 字節集, 公開, 數據必須以“,”分割，且無｛｝.參數 要轉換的文本型數據, 文本型, , 數據必須以“,”分割，且無｛｝.局部變量 循環次數, 整數型.局部變量 整數數組, 整數型, , "0".局部變量 文本數組, 文本型, , "0".局部變量 文本數據, 文本型文本數據 ＝ 要轉換的文本型數據文本數組 ＝ 分割文本 (文本數據, “,”, ).計次循環首 (取數組成員數 (文本數組), 循環次數)  加入成員 (整數數組, 到整數 (文本數組 [循環次數])).計次循環尾 ()返回 (子字節集替換 (到字節集 (整數數組), { 0 }, { }, , )).子程序 _文本到字節集按鈕_被單擊字節集編輯框.內容 ＝ 文本到字節集 (文本編輯框.內容).子程序 _字節集轉換文本按鈕_被單擊文本編輯框.內容 ＝ 字節集到文本 (字節集編輯框.內容)