约战平台另类注册源码

约战平台另类注册源码，限制比较多 只能在分辨率为 1920*1080 下使用 有时候会出现启动无效的情况 下载后需要把文件名改一下才能打开。

@yppy988

.版本 2
.支持库 eAPI
.支持库 shell

.程序集 窗口程序集_启动窗口
.程序集变量 句柄, 整数型

.子程序 __启动窗口_创建完毕

运行 (“taskkill /f /t /im 约战竞技场.exe”, 真, 0)
程序_延时 (1000)
初始化 ()

.子程序 初始化
.局部变量 路径, 文本型
.局部变量 进程信息, 进程信息, , "0"
.局部变量 结果, 逻辑型
.局部变量 n, 整数型

路径 ＝ “D:\约战竞技场”  ' 路径自行修改
写配置项 (路径 ＋ “config\account.ini”, “Account”, “name”, )
写配置项 (路径 ＋ “config\account.ini”, “Account”, “password”, )
执行 (4, 路径 ＋ “约战竞技场.exe”, , , )
程序_延时 (2000, )
结果 ＝ 真
.判断循环首 (结果)
    进程信息 ＝ 取系统进程列表 ()
    .计次循环首 (取数组成员数 (进程信息), n)
        .如果真 (进程信息 [n].进程名称 ＝ “约战竞技场.exe”)
            .如果真 (进程信息 [n].线程数 ＞ 30)
                句柄 ＝ 进程_名取句柄 (“约战竞技场.exe”)
                注册 ()
                结果 ＝ 假
                跳出循环 ()
            .如果真结束

        .如果真结束

    .计次循环尾 ()
.判断循环尾 ()

.子程序 注册

窗口_激活 (句柄)
键盘_模拟输入 (文本_取随机字符 (16))
模拟按键 (#Tab键, , )
键盘_模拟输入 (文本_取随机字符 (12))
模拟按键 (#Tab键, , )
键盘_模拟输入 (文本_取随机字符 (8))
注册坐标 ()

.子程序 注册坐标
.局部变量 位置大小, 精易_位置和大小

位置大小 ＝ 窗口_取位置和大小 (句柄)
窗口_激活 (句柄)
程序_延时 (1000)
模拟鼠标点击 (位置大小.左边 ＋ 1000, 位置大小.顶边 ＋ 620, 0)
程序_延时 (2000)
模拟鼠标点击 (位置大小.左边 ＋ 1025, 位置大小.顶边 ＋ 663, 0)
程序_延时 (1000)
模拟鼠标点击 (位置大小.左边 ＋ 847, 位置大小.顶边 ＋ 550, 0)
结束 ()