窗口程序集名 | 保 留 | 保 留 | 备 注 |
窗口程序集_启动窗口 | | | |
变量名 | 类 型 | 数组 | 备 注 |
超时 | 整数型 | |
超时 = 120
间隔 =
时间_取时间间隔 (取现行时间 (),
到时间 (到文本 (读入文件 (取运行目录 () +
“\时间信息.TXT”))
))
判断 (是否重启 (间隔
))
时钟.时钟周期 = 2000
判断 (寻找文本 (时间间隔,
“天”, ,
假) ≠ -1
)
返回 (假)
判断 (寻找文本 (时间间隔,
“时”, ,
假) ≠ -1
)
返回 (假)
判断 (寻找文本 (时间间隔,
“分”, ,
假) ≠ -1
)
判断 (寻找文本 (时间间隔,
“秒”, ,
假) ≠ -1
)

时间间隔 =
子文本替换 (时间间隔,
“秒”, , , ,
真)

分割 =
分割文本 (时间间隔,
“分”,
)

几秒 =
到整数 (分割
[1
]) × 60 +
到整数 (分割
[2
])

时间间隔 =
子文本替换 (时间间隔,
“分”, , , ,
真)

几秒 =
到整数 (时间间隔
) × 60
返回 (选择 (几秒 > 超时, 假, 真))
时间间隔 =
子文本替换 (时间间隔,
“秒”, , , ,
真)
几秒 =
到整数 (时间间隔
)
返回 (选择 (几秒 > 超时, 假,
真))
写到文件 (取运行目录 () +
“\时间信息.TXT”,
到字节集 (到文本 (取现行时间 ())
))