|
30精币
源码如下:
窗口程序集名 | 保 留 | 保 留 | 备 注 | 窗口程序集_窗口1 | | | | 变量名 | 类 型 | 数组 | 备 注 | g_连接状态 | 逻辑型 | | json | 类_json | | WSS_全局_初始化 ()g_连接状态 = 假 成功计数 = 0 挑战成功次数 = 0 变量名 | 类 型 | 静态 | 数组 | 备 注 | ip解析类型 | 整数型 | | | SSL加密套件列表 | 文本型 | | |
按钮_连接状态.禁止 = 真 判断 (g_连接状态 )WSS_连接_断开 (g_ws )g_ws = WSS_连接_启动 (编辑框_URL.内容, , , , , , , &ws_连接成功, &ws_连接断开, &ws_收到消息, , , , , , )如果真 (g_ws = 0 )按钮_连接状态.禁止 = 假 信息框 (“创建ws失败”, 0, , )输出 (“ws_连接成功”)g_连接状态 = 真 按钮_连接状态.标题 = “断开”按钮_连接状态.禁止 = 假 输出 (“ws_连接断开”)g_连接状态 = 假 按钮_连接状态.标题 = “连接”按钮_连接状态.禁止 = 假 变量名 | 类 型 | 静态 | 数组 | 备 注 | 消息 | 文本型 | | | 请求方法名称返回标识 | 文本型 | | | 订单id | 文本型 | | | 发送文本 | 文本型 | | | i | 整数型 | | | count | 整数型 | | | 通关卡 | 文本型 | | | 关卡数 | 整数型 | | | 屏障到期时间 | 文本型 | | | 彩虹体 | 文本型 | | | 玩家id | 文本型 | | | 到期时间 | 文本型 | | | 掠夺彩虹体 | 双精度小数型 | | | a | 整数型 | | | 玩家数 | 整数型 | | | 现行时间 | 整数型 | | | 屏障时间 | 整数型 | | | code | 整数型 | | |
消息 = 到文本 (WSS_取回数据_文本 (ws )) json. 解析 (消息 )请求方法名称返回标识 = json. 取通用属性 (“type”)json. 清除 ()调试输出 (请求方法名称返回标识, 消息 )如果真 (请求方法名称返回标识 = “ExchangesTradeRet”)调试输出 (“购买成功:” + 消息 )json. 解析 (消息 )count = 到整数 (json. 取属性 (“data['payment_things'].data[0].item.count”). 取数据文本 ()) json. 清除 ()成功计数 = 成功计数 + count _启动窗口.编辑框1.内容 = 到文本 (成功计数 )输出 (“购买成功返回:” + 消息 )如果真 (请求方法名称返回标识 = “ExchangesQueryViewRet”)商城_购买_处理事件 (消息 )输出 (“cha询商城返回:” + 消息 )如果真 (请求方法名称返回标识 = “UseRightsAdRet”)输出 (“每日任务请求成功返回:” + 消息 )如果真 (请求方法名称返回标识 = “BuyPvETimesRet”)json. 解析 (消息 )通关卡 = json. 取属性 (“data['pve_data'].progress”). 取数据文本 ()json. 清除 ()通关发送 (到整数 (通关卡 )) 如果真 (请求方法名称返回标识 = “PvERet”)输出 (“通关请求成功返回:” + 消息 )通关后处理 ()如果真 (请求方法名称返回标识 = “BattleProgressRet”)输出 (“通关后返回:” + 消息 )如果真 (请求方法名称返回标识 = “SettlePvEPush”)输出 (“获得奖励返回:” + 消息 )json. 解析 (消息 )关卡数 = 到整数 (json. 取属性 (“data['stage_id']”). 取数据文本 ()) json. 清除 ()延迟 (2000 )通关发送 (关卡数 )如果真 (请求方法名称返回标识 = “MatchmakingRet”)isflag = 假 json. 解析 (消息 )玩家数 = json. 成员数 (“data.matches”)json. 清除 ()计次循环首 (玩家数, i )i = i - 1 json. 解析 (消息 )屏障到期时间 = json. 取属性 (“data.matches[” + 到文本 (i ) + “]['shield_end_time']”). 取数据文本 ()彩虹体 = json. 取属性 (“data.matches[” + 到文本 (i ) + “].currency1”). 取数据文本 ()玩家id = json. 取通用属性 (“data.matches[” + 到文本 (i ) + “]['player_id']”)json. 清除 ()到期时间 = 时间_时间戳转文本 (屏障到期时间, 2 )输出 (“玩家信息:” + “玩家昵称:” + 玩家id + “玩家彩虹体为:” + 彩虹体 + “玩家屏障时间:” + 到期时间 )如果真 (到整数 (彩虹体 ) > 20 )输出 (“挑战- 开始:” + 玩家id )挑战_开始 (玩家id )输出 (“挑战- 开始:” + 玩家id + “发送挑战成功。。。”)计次循环尾 ()isflag = 真 如果真 (请求方法名称返回标识 = “PlunderRet”)isflag = 假 输出 (“挑战 - 开始:” + 玩家id + “:” + 消息 )json. 解析 (消息 )code = 到整数 (json. 取属性 (“code”). 取数据文本 ()) json. 清除 ()判断 (code = 11 )程序_延时 (1500 )isflag = 真 _启动窗口.编辑框2.内容 = “”挑战结束 (玩家id )如果真 (请求方法名称返回标识 = “SettlePvPPush”)掠夺完成处理 (消息 )如果真 (请求方法名称返回标识 = “UseItemRet”)输出 (消息 )如果真 (请求方法名称返回标识 = “VerifyTokenRet”)输出 (消息 )isflag = 真 商城_cha询 ()WSS_发送_文本 (g_ws, #心跳发送 )输出 (“开始完成每日任务。。。”)WSS_发送_文本 (g_ws, _启动窗口.编辑框_URL3.内容 )每日商城 ()商城_抽奖 ()福利 ()输出 (“完成每日任务成功。。。”)变量名 | 类 型 | 静态 | 数组 | 备 注 | 消息 | 文本型 | | | 请求方法名称返回标识 | 文本型 | | | i | 整数型 | | | 订单id | 文本型 | | | 发送文本 | 文本型 | | | a | 整数型 | | | unit_count | 文本型 | | | count | 文本型 | | | 成功计数 | 整数型 | | | 订单list | 文本型 | | 0 | b | 整数型 | | |
.
. . . 变量名 | 类 型 | 静态 | 数组 | 备 注 | 发送文本 | 文本型 | | | 订单id | 文本型 | | | count | 文本型 | | | unit_count | 文本型 | | | 请求方法名称返回标识 | 文本型 | | | 成功计数 | 整数型 | | | a | 整数型 | | | 消息 | 文本型 | | | b | 整数型 | | | 资源文本 | 文本型 | | | 停止 | 逻辑型 | | | WSS_发送_文本 (g_ws, _启动窗口.编辑框_URL3.内容 )成功计数 = 0 延迟 (1000 )停止 = 真 判断循环首 (停止 )WSS_发送_文本 (g_ws, #资源商城cha询 )计次循环首 (100, a )消息 = 到文本 (WSS_取回数据_文本 (g_ws )) json. 解析 (消息 )请求方法名称返回标识 = json. 取通用属性 (“type”)如果真 (请求方法名称返回标识 = “ExchangesQueryViewRet”)订单id = json. 取通用属性 (“data['order_list'][” + 到文本 (b - 1 ) + “]['order_id']”)unit_count = json. 取属性 (“data['order_list'][” + 到文本 (b - 1 ) + “]['unit_count']”). 取数据文本 ()count = json. 取属性 (“data['order_list'][” + 到文本 (b - 1 ) + “].things.data[0].item.count”). 取数据文本 ()json. 清除 ()跳出循环 ()json.清除 ()计次循环尾 ()调试输出 (“cha询成功的消息:” + 消息 )如果真 (订单id ≠ “”)计次循环首 (json. 成员数 (“data['order_list']”), b )资源文本 = json. 取属性 (“data['order_list'][0].things.data”). 取数据文本 ()发送文本 = 文本_替换 ( #资源购买, , , , “c8f17c99eeafaafb17d49d14450a19ae65ab1c7e60dd93fcb3ffe395c1e08393”, 订单id, “替换文本unit”, unit_count, “资源文本”, 资源文本 )调试输出 (“资源购买发送:” + 发送文本 )WSS_发送_文本 (g_ws, 发送文本 )延迟 (500 )计次循环尾 ()成功计数 = 成功计数 + 到整数 (count )编辑框1.内容 = 到文本 (成功计数 )如果真 (成功计数 ≥ 到整数 (编辑框_发送内容.内容 )) 停止 = 假 信息框 (“购买完成”, 0, , )延迟 (3000 )判断循环尾 ()判断 (选择框_定时发送.选中 )输出 (“开启商城定时扫描 购买资源”)WSS_发送_文本 (g_ws, _启动窗口.编辑框_URL3.内容 )延迟 (1000 )WSS_设置_心跳函数 (g_ws, 1000, &ws_定时发送 )WSS_移除_心跳函数 (g_ws )WSS_发送_文本 (g_ws, _启动窗口.编辑框_URL3.内容 )通关_前处理 ()变量名 | 类 型 | 静态 | 数组 | 备 注 | res | 文本型 | | | token | 文本型 | | | 登录发送文本 | 文本型 | | | 输出 (“开始登录”)res = 登录 (_启动窗口.编辑框_URL1.内容, _启动窗口.编辑框_URL2.内容 )json. 解析 (res )token = json. 取通用属性 (“data.token”)json. 清除 ()输出 (“登录业务返回:” + res )res = 登录换token (token )json. 解析 (res )token = json. 取通用属性 (“token”)json. 清除 ()输出 (“登录业务返回:” + res )登录发送文本 = 文本_替换 ( #登录账号, , , , “66fab828a59423bf2d057702”, token )_启动窗口.编辑框_URL3.内容 = 登录发送文本 输出 (“登录业务返回:” + “登录成功。。。。”)
|
|