運行目錄中的文件為123.txt。
。版本？2
。組裝？窗戶組件1
。匯編變量？文件編號？整數
。子程序？_ _開始窗口_已創建
編輯框9。允許多行？=?真實的
。子程序？_ write _ clicked
文件編號？=?打開文件？（取運行目錄？()?+?“\123.txt“，？#重寫，？)
編輯框9。內容？=?""
編輯框9。添加文本？（編輯框1。內容？+?#換行符）
編輯框9。添加文本？編輯框2。內容？+?#換行符）
編輯框9。添加文本？（編輯框3內容？+?#換行符）
編輯框9。添加文本？（編輯框4內容？+?#換行符）
編輯框9。添加文本？（編輯框5內容？+?#換行符）
編輯框9。添加文本？（編輯框6內容？+?#換行符）
編輯框9。添加文本？（編輯框7。內容？+?#換行符）
編輯框9。添加文本？（編輯框8內容？+?#換行符）
寫正文？（文件編號，？編輯框9。內容）
關閉文件嗎？（文件編號）
。子程序？_已讀_已點擊
。局部變量？短信？文本類型？,?"0"
文件編號？=?打開文件？（取運行目錄？()?+?“\123.txt“，？#讀寫？)
編輯框9。內容？=?在文本中閱讀？（文件編號，？)
。先數周期？(8,?)
編輯框9。添加文本？("?"？+?#換行符）
數周期結束？()
短信？=?拆分文本？（編輯框9內容呢？#換行，？)
關閉文件嗎？（文件編號）
編輯框1。內容？=?短信？[1]
編輯框2。內容？=?短信？[2]
編輯框3。內容？=?短信？[3]
編輯框4。內容？=?短信？[4]
編輯框5。內容？=?短信？[5]
編輯框6。內容？=?短信？[6]
編輯框7。內容？=?短信？[7]
編輯框8。內容？=?短信？[8]