.版本 2
.支持库 spec
.子程序 __启动窗口_创建完毕
.计次循环首 (30, )
调试输出 (取随机时间 ([2016年5月6日], [2017年1月24日]))
.计次循环尾 ()
.子程序 取随机时间, 日期时间型
.参数 开始时间, 日期时间型
.参数 结束时间, 日期时间型, ,
.局部变量 间隔, 整数型
.局部变量 v, 双精度小数型
置随机数种子 ()
间隔 = 取时间间隔 (开始时间, 结束时间, #分钟)
v = 取随机数 (0, 255) + 左移 (取随机数 (0, 255), 8) + 左移 (取随机数 (0, 255), 16) + 左移 (取随机数 (0, 127), 24)
v = v ÷ 2147483647
间隔 = -间隔 × v
返回 (增减时间 (开始时间, #分钟, 间隔))
刚刚写的