用文本限制软件使用运行次数

易语言 2020-07-05 18:32:52

总次数 = 3 ' 你想要软件使用多少次就输入多少次
.判断开始 (文件是否存在 (“G:\1.TXT”) = 假)
剩余次数 = 总次数
剩余次数 = 剩余次数 - 1
信息框 (“还剩” + 到文本 (剩余次数) + “次”, 0, )
写到文件 (“G:\1.TXT”, 到字节集 (到文本 (剩余次数)))
.判断 (文件是否存在 (“G:\1.TXT”) = 真)
剩余次数 = 到整数 (到文本 (读入文件 (“G:\1.TXT”)))
剩余次数 = 剩余次数 - 1
.如果真 (剩余次数 ≤ -1)
信息框 (“已经没有使用次数了”, 0, )
结束 ()
.如果真结束
信息框 (“还剩” + 到文本 (剩余次数) + “次”, 0, )
写到文件 (“G:\1.TXT”, 到字节集 (到文本 (剩余次数)))