我用易语言学做了一个论坛登陆器 里边导入了四五个账号 我想让着四五个账号每隔25分钟登陆一次 yi应该怎么
2个回答
展开全部
'新建一个数据类型为,再定义一个全局变量或 集变量
.版本 2
.数据类型 账号型
.成员 账号, 文本型
.成员 密码, 文本型
.成员 时效, 整数型
.版本 2
.全局变量 登陆数据, 账号型, , "5"
.全局变量 线程标示, 整数型, ,
'将帐号写进数组
'--------------------------------------------------
.版本 2
.子程序 子程序_添加账号组
登陆数据 [1].账号 = “”
登陆数据 [1].密码 = “”
登陆数据 [1].时效 = 取启动时间 () \ 1000
'……按此方法将其它账号也写进数组写入你的游戏账号
‘添加线程子程序
.版本 2
.子程序 子程序_线程
.局部变量 i, 整数型
.局部变量 NowTim, 整数型
线程标示
= 取启动时间 ()
.判断循环首 ( 线程标示 ≠ 0)
.计次循环首 (取数组成员数 (登陆数据), i)
NowTim = 取启动时间 () \ 1000
.如果真 (NowTim ≥ 登陆数据 [i].时效)
' 您的登陆论坛代码
' ……
NowTim = 取启动时间 () \ 1000
登陆数据 [i].时效 = NowTim + 25 × 60
.如果真结束
处理事件 ()
.计次循环尾 ()
延时 (50)
处理事件 ()
.判断循环尾 ()
‘最后添加个按钮
.版本 2
.支持库 EThread
.子程序 _按钮1_被单击
启动线程 (&子程序_线程, , )
'停止线程
.版本 2
.子程序 _按钮2_被单击
线程标示 = 0
.版本 2
.数据类型 账号型
.成员 账号, 文本型
.成员 密码, 文本型
.成员 时效, 整数型
.版本 2
.全局变量 登陆数据, 账号型, , "5"
.全局变量 线程标示, 整数型, ,
'将帐号写进数组
'--------------------------------------------------
.版本 2
.子程序 子程序_添加账号组
登陆数据 [1].账号 = “”
登陆数据 [1].密码 = “”
登陆数据 [1].时效 = 取启动时间 () \ 1000
'……按此方法将其它账号也写进数组写入你的游戏账号
‘添加线程子程序
.版本 2
.子程序 子程序_线程
.局部变量 i, 整数型
.局部变量 NowTim, 整数型
线程标示
= 取启动时间 ()
.判断循环首 ( 线程标示 ≠ 0)
.计次循环首 (取数组成员数 (登陆数据), i)
NowTim = 取启动时间 () \ 1000
.如果真 (NowTim ≥ 登陆数据 [i].时效)
' 您的登陆论坛代码
' ……
NowTim = 取启动时间 () \ 1000
登陆数据 [i].时效 = NowTim + 25 × 60
.如果真结束
处理事件 ()
.计次循环尾 ()
延时 (50)
处理事件 ()
.判断循环尾 ()
‘最后添加个按钮
.版本 2
.支持库 EThread
.子程序 _按钮1_被单击
启动线程 (&子程序_线程, , )
'停止线程
.版本 2
.子程序 _按钮2_被单击
线程标示 = 0
2012-11-26
展开全部
计次循环
判断循环
或取时间间隔
或用时钟
都可以实现
计次循环首
取账号(i)
登陆()
延时(25*60*1000)
计次循环尾
判断循环
或取时间间隔
或用时钟
都可以实现
计次循环首
取账号(i)
登陆()
延时(25*60*1000)
计次循环尾
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询