.版本 2
.支持库 iext
.支持库 EThread

.子程序 送花线程
.局部变量 i, 整数型
.局部变量 临时信息, 用户信息
.局部变量 xc, 整数型

置随机数种子 ()
.判断循环首 (真)
    .计次循环首 (取数组成员数 (全局_用户组), i)
        ' 临时信息 ＝ 全局_用户组 .返回信息 ()
        .如果真 (超级列表框1.取标题 (i － 1, 3) ＝ “登陆成功”)  ' 且 取时间间隔 (取现行时间 (), 全局_用户组 .取刷花时间 (), #秒) ＞ 200)

            全局_用户组 .刷花 (UID, 被刷花昵称)
            延时 (到整数 (编辑框喊话SD.内容))

        .如果真结束
        .如果真 (按钮_开始送花.标题 ＝ “开始送花”)
            跳出循环 ()
        .如果真结束

    .计次循环尾 ()
    .如果真 (按钮_开始送花.标题 ＝ “开始送花”)
        跳出循环 ()
    .如果真结束

.判断循环尾 ()
xc ＝ 线程_取自线程句柄 ()

.判断开始 (xc ＞ 0)
    关闭线程句柄 (xc)

下载:https://www.lanzouu.com/i78rfeb 密码:[此处包含隐藏内容，如果需要查看请回复]

进入原文参与下载互动