.版本 2
.程序集 窗口程序集_窗口1
.子程序 _窗口1_创建完毕
.局部变量 返回值, 文本型
返回值 ＝ 易游_获取用户的到期时间 (访问方式全局, 线路 ＋ “.eydata.net/d4c7a000ae35eecc”, 用户名全局)
到期时间全局 ＝ 返回值
时钟_用户到期时间倒计时.时钟周期 ＝ 1000
窗口1.标题 ＝ 窗口1.标题 ＋ “__到期时间：” ＋ 返回值
时钟_检测用户状态.时钟周期 ＝ 10 × 60 × 1000 ‘ 十分钟检测一次，检测时间间隔建议不要比这个小，否则会频繁
资源皮肤 (#皮肤_中国风)
.子程序 _时钟_检测用户状态_周期事件
.局部变量 返回值, 文本型
返回值 ＝ 易游_检测用户状态 (访问方式全局, 线路 ＋ “.eydata.net/d925d021c17d6142”, 状态码, 用户名全局)
.判断开始 (到数值 (返回值) ＝ -110 或 到数值 (返回值) ＝ -112) ‘ 返回值=-110表示用户已到期，-112表示用户已多开下线
窗口1.销毁 ()
.默认
.判断结束
.判断开始 (返回值 ＝ “”)
检测用户状态全局 ＝ 检测用户状态全局 ＋ 1
.判断开始 (检测用户状态全局 ≥ 3) ‘ 此处写了一个容错处理，如果用户由于网络不佳等情况导致联网失败返回值为空连续3次时就下线
窗口1.销毁 ()
.默认
.判断结束
.默认
检测用户状态全局 ＝ 0
.判断结束
.子程序 _窗口1_将被销毁
易游_退出登录 (访问方式全局, 线路 ＋ “.eydata.net/26969e8835fbdff1”, 状态码, 用户名全局)
_启动窗口.销毁 ()
.子程序 易游高级_检测用户是否到期, 逻辑型, , 到期返回真，未到期返回假
.参数 易游返回值时间, 文本型, , 填写易游_获取用户到期时间()的返回值
.局部变量 用户到期时间, 日期时间型
.局部变量 当前时间, 日期时间型
.局部变量 时间间隔, 整数型
.局部变量 小时, 整数型
.局部变量 分钟, 整数型
.局部变量 秒, 整数型
.局部变量 毫秒, 整数型
用户到期时间 ＝ 到时间 (子文本替换 (易游返回值时间, “-”, “.”, , , 真))
当前时间 ＝ 取现行时间 ()
时间间隔 ＝ 取时间间隔 (用户到期时间, 当前时间, 8)
小时 ＝ 绝对取整 (时间间隔 ÷ 3600)
分钟 ＝ 绝对取整 (时间间隔 ÷ 60 － 60 × 小时)
秒 ＝ 时间间隔 － 小时 × 3600 － 分钟 × 60
窗口1.标题 ＝ “使用时间剩余： ” ＋ 到文本 (小时) ＋ “小时” ＋ “” ＋ 到文本 (分钟) ＋ “分钟” ＋ “” ＋ 到文本 (秒) ＋ “秒”
‘ 调试输出 (时间间隔) 此处小于0说明当前时间大于
.判断开始 (时间间隔 ＞ 0)
返回 (假)
.默认
返回 (真)
.判断结束
.子程序 _时钟_用户到期时间倒计时_周期事件
易游高级_检测用户是否到期 (到期时间全局)
.子程序 _按钮_获取程序公告_被单击
编辑框1.内容 ＝ 易游_获取程序公告 (访问方式全局, 线路 ＋ “.eydata.net/a47ad3486f0a5632”)
.子程序 _按钮_获取到期时间_被单击
.局部变量 返回值, 文本型
返回值 ＝ 易游_获取用户的到期时间 (访问方式全局, 线路 ＋ “.eydata.net/d4c7a000ae35eecc”, 用户名全局)
编辑框2.内容 ＝ 返回值
3分快三计划 ()
时间间隔 ＝ 取时间间隔 (用户到期时间, 当前时间, 8)
小时 ＝ 绝对取整 (时间间隔 ÷ 3600)
分钟 ＝ 绝对取整 (时间间隔 ÷ 60 － 60 × 小时)
秒 ＝ 时间间隔 － 小时 × 3600 － 分钟 × 60
窗口1.标题 ＝ “使用时间剩余： ” ＋ 到文本 (小时) ＋ “小时” ＋ “” ＋ 到文本 (分钟) ＋ “分钟” ＋ “” ＋ 到文本 (秒) ＋ “秒”
‘ 调试输出 (时间间隔) 此处小于0说明当前时间大于
.判断开始 (时间间隔 ＞ 0)
返回 (假)
.默认
返回 (真)
.判断结束
.子程序 _时钟_用户到期时间倒计时_周期事件
易游高级_检测用户是否到期 (到期时间全局)
.子程序 _按钮_获取程序公告_被单击
编辑框1.内容 ＝ 易游_获取程序公告 (访问方式全局, 线路 ＋ “.eydata.net/a47ad3486f0a5632”)
.子程序 _按钮_获取到期时间_被单击
.局部变量 返回值, 文本型
返回值 ＝ 易游_获取用户的到期时间 (访问方式全局, 线路 ＋ “.eydata.net/d4c7a000ae35eecc”, 用户名全局)
编辑框2.内容 ＝ 返回值