看安于好老师的教程实地编写的【跳出循环】直接关闭了

admin6年前 (2020-07-16)易语言交流4208
看安于好老师的教程实地编写的【跳出循环】直接关闭了模拟器,求解
下面是写法
.版本 2
.支持库 spec

.程序集 窗口程序集_启动窗口
.程序集变量 集_运行目录, 文本型
.程序集变量 集_大漠, 类_大漠操作
.程序集变量 集_当前任务, 文本型
.程序集变量 集_线程ID, 整数型
.程序集变量 集_绑定句柄, 整数型

.子程序 __启动窗口_创建完毕
.局部变量 局_注册到系统, 逻辑型
.局部变量 局_创建对象, 逻辑型
.局部变量 局_注册VIP, 整数型
.局部变量 局_插件版本, 文本型

' 运行 (“D:\ChangZhi\dnplayer2\dnplayer.exe”, 假, )
集_运行目录 = 取运行目录 ()
局_注册到系统 = dm注册到系统 (集_运行目录 + “\data\dm.dll”)
局_创建对象 = 集_大漠.创建对象 ()
局_注册VIP = 集_大漠.注册VIP (#大漠注册码, “”)
局_插件版本 = 集_大漠.取插件版本 ()
.判断开始 (局_注册到系统 = 真 且 局_创建对象 = 真 且 局_注册VIP = 1 且 局_插件版本 = “7.2027”)
    调试输出 (“注册插件成功”)

.默认

    调试输出 (“注册插件失败”)
    返回 ()

.判断结束


.子程序 __按钮_启动_被单击

集_当前任务 = “绑定窗口”
线程_启动 (&任务检索, , 集_线程ID)

.子程序 任务检索, , 公开

.判断循环首 (集_当前任务 ≠ “”)
    .判断开始 (集_当前任务 = “绑定窗口”)
        绑定窗口 ()
    .判断 (集_当前任务 = “启动游戏”)
        启动游戏 ()
    .' 判断 (集_当前任务 = “登录账号”)
        ' 登录账号 ()
    .默认

    .判断结束

    程序_延时 (2000, )
.判断循环尾 ()
调试输出 (“任务全部完成”)

.子程序 绑定窗口
.局部变量 局_雷电操作, 类_雷电操作
.局部变量 局_置全局路径, 整数型
.局部变量 局_绑定窗口, 整数型

集_绑定句柄 = 局_雷电操作.取模拟器绑定句柄 (0)
局_置全局路径 = 集_大漠.置全局路径 (集_运行目录 + “\img”)
局_绑定窗口 = 集_大漠.后台_绑定Ex (集_绑定句柄, “dx.graphic.opengl”, “windows”, “windows”, “”, 0)
调试输出 (“绑定句柄”, 集_绑定句柄, “局_置全局路径”, 局_置全局路径, “绑定窗口”, 局_绑定窗口)
' dm_ret = dm.BindWindowEx(hwnd,"dx.graphic.opengl","windows","windows","",0)
.判断开始 (局_置全局路径 = 1 且 局_绑定窗口 = 1)
    集_当前任务 = “启动游戏”

.默认

    集_当前任务 = “”
.判断结束


.子程序 启动游戏
.局部变量 局_图片名, 文本型
.局部变量 局_图片返回值, 类型_四坐标

.判断循环首 (集_当前任务 = “启动游戏”)
    局_图片名 = 集_大漠.图色_找图D (0, 0, 960, 540, “启动游戏_游戏图标.bmp|登录账号_接受.bmp|启动游戏_QQ登录.bmp|登录QQ_版本号.bmp”, “505050”, 0.8, 0, 局_图片返回值)
    调试输出 (局_图片名, 局_图片返回值.x1, 局_图片返回值.y1)
    .判断开始 (局_图片名 = “启动游戏_游戏图标.bmp” 或 局_图片名 = “登录账号_接受.bmp” 或 局_图片名 = “启动游戏_QQ登录.bmp”)
        集_大漠.鼠标_移动点击 (局_图片返回值.x1, 局_图片返回值.y1)


    .判断 (局_图片名 = “登录QQ_版本号.bmp”)

        跳出循环 ()
    .默认

    .判断结束

    程序_延时 (1000, )

.判断循环尾 ()

集_当前任务 = “”


.子程序 登录账号
.局部变量 局_当前任务, 文本型
.局部变量 局_图片名, 文本型
.局部变量 局_图片位置, 类型_四坐标


局_当前任务 = “输入账号”
.判断循环首 (集_当前任务 = “登录账号”)

    .判断开始 (局_当前任务 = “输入账号”)
        局_图片名 = 集_大漠.图色_找图D (29, 126, 300, 154, “登录账号_账号.bmp|登录账号_账号1.bmp”, “505050”, 0.8, 0, 局_图片位置)
        .判断开始 (局_图片名 ≠ “”)
            集_大漠.鼠标_移动点击 (局_图片位置.x1, 局_图片位置.y1)
            程序_延时 (1000, )
            集_大漠.窗口_发送文本 (集_绑定句柄, 编辑框1.内容)
            局_当前任务 = “输入密码”

        .默认

        .判断结束




    .判断 (局_当前任务 = “输入密码”)
        局_图片名 = 集_大漠.图色_找图D (19, 176, 140, 218, “登录账号_密码.bmp|登录账号_密码1.bmp”, “505050”, 0.8, 0, 局_图片位置)
        .判断开始 (局_图片名 ≠ “”)
            集_大漠.鼠标_移动点击 (局_图片位置.x1, 局_图片位置.y1)
            程序_延时 (1000, )
            集_大漠.窗口_发送文本 (集_绑定句柄, 编辑框2.内容)
            局_当前任务 = “点击登录”


        .默认

        .判断结束

    .判断 (局_当前任务 = “点击登录”)
        局_图片名 = 集_大漠.图色_找图D (440, 258, 524, 287, “登录QQ_登录.bmp”, “505050”, 0.8, 0, 局_图片位置)
        .判断开始 (局_图片名 ≠ “”)
            集_大漠.鼠标_移动点击 (局_图片位置.x1, 局_图片位置.y1)

        .默认

        .判断结束


    .默认





    .判断结束
    程序_延时 (1000, )
.判断循环尾 ()
集_当前任务 = “”