简单写文本内容加密工具

.如果 (编辑框1.内容 ＝ “”)
信息框 (“请输入内容再保存！”, 0, )
.否则
.如果真 (写到文件 (取运行目录 () ＋ 到文本 (取现行时间 ()) ＋ “.txt”, 到字节集 (编辑框1.内容)) ＝ 真)
信息框 (“内容已保存到程序目录！”, 0, )
编辑框1.内容 ＝ “”