写出文件代码错误，写出来的空文件，新手求帮助

IT菜鸟 · 发表于 2015-6-13 16:10:55

代码

.版本 2
.支持库 spec

         .判断开始 (寻找文本 (返回文本, #成功返回, , 假) ≥ 0)
            调试输出 (“注册成功” ＋帐号＋ “----” ＋密码)
            行文本1 ＝到字节集 (帐号＋ “----” ＋密码＋ #换行符)
            .如果真 (文件是否存在 (取运行目录 () ＋ “\注册成功.txt”) ＝假)
                  写到文件 (取运行目录 () ＋ “\注册成功.txt”, {  })
            .如果真结束
            文件号＝打开文件 (取运行目录 () ＋ “\注册成功.txt”, , )
            移到文件尾 (文件号)
            写文本行 (文件号, 行文本1)
            关闭文件 (文件号)
            注册 ()

这段代码，调试输出结果是正确的，结果写出来只有一个空文件。注册成功.txt里面没有内容，是哪里错了，求指点。