苏宁网络时间戳

通过网络时间对比程序是否到期。

.版本 2
.支持库 internet
.支持库 spec

.子程序 _按钮1_被单击
.局部变量 北京时间戳, 文本型
.局部变量 北京时间请求, 文本型
.局部变量 json, 类_json
.局部变量 程序禁止运行时间戳, 文本型

北京时间请求 ＝ 到文本 (HTTP读文件 (“https://f.m.suning.com/api/ct.do”))
json.解析 (北京时间请求, , )
北京时间戳 ＝ 取文本左边 (json.取通用属性 (“currentTime”, ), 10)
调试输出 (取文本左边 (北京时间戳, 10))

程序禁止运行时间戳 ＝ 时间_到时间戳 (到时间 (“2025-09-01”), 真, )
调试输出 (程序禁止运行时间戳)
.判断开始 (北京时间戳 ＞ 程序禁止运行时间戳)
    调试输出 (“到期”)
.默认
    调试输出 (“正常”)