本帖最后由 chenbo1991 于 2020-4-16 11:03 编辑
这个是很早之前玩逆水寒为了科举弄出来的!!~~自己修改几处api就行!~~自己抓包修改就可以了.!
.版本 2
.支持库 iext
.判断开始 (组合框1.现行选中项 = 0)
网页返回数据 = 网页_访问S (“https://n.youxidudu.com/ajax_keju_shici_c.php”, 1, “words=” + 文本_替换 (编码_URL编码 (文本, 假, 真), 1, 1, 假, “%0D%0A”, “”), 游戏嘟嘟cookie, , , , , , , , , , , , , , , , , )
网页返回数据 = 文本_替换 (网页返回数据, 文本_取出现次数 (网页返回数据, “<span class=\” + #引号 + “cred\” + #引号 + “>”, 假), 0, 假, “<span class=\” + #引号 + “cred\” + #引号 + “>”, “”)
网页返回数据 = 文本_替换 (网页返回数据, 文本_取出现次数 (网页返回数据, “<\/span>”, 假), 0, 假, “<\/span>”, “”)
.如果真 (局_正则.创建 (“title#引号:#引号(.*?)#引号,[\s|\S]*?daan#引号:#引号(.*?)#引号,”, 网页返回数据, 假, 假, 真, 真) = 假)
信息框 (“数据可能更新了,请联系:346895658更新!!!”, #错误图标, , )
.如果真结束
局_匹配数 = 局_正则.取匹配数量 ()
.如果真 (局_匹配数 = 0)
' 信息框 (“游戏嘟嘟-科举答题没有找到答案,重新获取坐标吧!!!”, #错误图标, , )
透明标签1.标题 = “游戏嘟嘟-诗词答题没有找到答案!!!”
透明标签1.可视 = 真
.如果真结束
.计次循环首 (局_匹配数, 局_计次)
索引 = 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (索引, 0, “游戏嘟嘟-诗词”)
超级列表框1.置标题 (索引, 1, 编码_usc2到ansi (局_正则.取子匹配文本 (局_计次, 1)))
超级列表框1.置标题 (索引, 2, 编码_usc2到ansi (局_正则.取子匹配文本 (局_计次, 2)))
.计次循环尾 ()
网页返回数据 = 网页_访问S (“http://tapi.gfun.me/nsh/kj/api.php?callback=jQuery172” + 文本_取随机数字 (17) + “_” + 到文本 (时间_取北京时间戳 ()) + “&text=” + 文本_替换 (编码_URL编码 (文本, 假, 真), 1, 1, 假, “%0D%0A”, “”) + “&perpage=999&_=” + 到文本 (时间_取北京时间戳 ()), , , , , , , , , , , , , , , , , , , , )
.如果真 (局_正则.创建 (“question#引号:#引号(.*?)#引号,[\s|\S]*?answer#引号:#引号(.*?)#引号}”, 网页返回数据, 假, 假, 真, 真) = 假)
信息框 (“数据可能更新了,请联系:346895658更新!!!”, #错误图标, , )
.如果真结束
局_匹配数 = 局_正则.取匹配数量 ()
.如果真 (局_匹配数 = 0)
' 信息框 (“叶子猪-科举答题没有找到答案,重新获取坐标吧!!!”, #错误图标, , )
透明标签3.标题 = “叶子猪-科举答题没有找到答案!!!”
透明标签3.可视 = 真
.如果真结束
.计次循环首 (局_匹配数, 局_计次)
索引 = 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (索引, 0, “叶子猪-科举”)
超级列表框1.置标题 (索引, 1, 编码_usc2到ansi (局_正则.取子匹配文本 (局_计次, 1)))
超级列表框1.置标题 (索引, 2, 编码_usc2到ansi (局_正则.取子匹配文本 (局_计次, 2)))
.计次循环尾 ()
网页返回数据 = 网页_访问S (“http://tapi.gfun.me/nsh/hc/api.php?callback=jQuery172” + 文本_取随机数字 (17) + “_” + 到文本 (时间_取北京时间戳 ()) + “&text=” + 文本_替换 (编码_URL编码 (文本, 假, 真), 1, 1, 假, “%0D%0A”, “”) + “&perpage=999&_=” + 到文本 (时间_取北京时间戳 ()), , , , , , , , , , , , , , , , , , , , )
.如果真 (局_正则.创建 (“question#引号:#引号(.*?)#引号,[\s|\S]*?answer#引号:#引号(.*?)#引号}”, 网页返回数据, 假, 假, 真, 真) = 假)
信息框 (“数据可能更新了,请联系:346895658更新!!!”, #错误图标, , )
.如果真结束
局_匹配数 = 局_正则.取匹配数量 ()
.如果真 (局_匹配数 = 0)
' 信息框 (“叶子猪-红尘答题没有找到答案,重新获取坐标吧!!!”, #错误图标, , )
透明标签4.标题 = “叶子猪-红尘答题没有找到答案!!!”
透明标签4.可视 = 真
.如果真结束
.计次循环首 (局_匹配数, 局_计次)
索引 = 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (索引, 0, “叶子猪-红尘”)
超级列表框1.置标题 (索引, 1, 编码_usc2到ansi (局_正则.取子匹配文本 (局_计次, 1)))
超级列表框1.置标题 (索引, 2, 编码_usc2到ansi (局_正则.取子匹配文本 (局_计次, 2)))
.计次循环尾 ()
网页返回数据 = 网页_访问S (“https://n.youxidudu.com/ajax_keju_ali_c.php”, 1, “words=” + 文本_替换 (编码_URL编码 (文本, 假, 真), 1, 1, 假, “%0D%0A”, “”), 游戏嘟嘟cookie, , , , , , , , , , , , , , , , , )
网页返回数据 = 文本_替换 (网页返回数据, 文本_取出现次数 (网页返回数据, “<span class=\” + #引号 + “cred\” + #引号 + “>”, 假), 0, 假, “<span class=\” + #引号 + “cred\” + #引号 + “>”, “”)
网页返回数据 = 文本_替换 (网页返回数据, 文本_取出现次数 (网页返回数据, “<\/span>”, 假), 0, 假, “<\/span>”, “”)
.如果真 (局_正则.创建 (“title#引号:#引号(.*?)#引号,[\s|\S]*?daan#引号:#引号(.*?)#引号,”, 网页返回数据, 假, 假, 真, 真) = 假)
信息框 (“数据可能更新了,请联系:346895658更新!!!”, #错误图标, , )
.如果真结束
局_匹配数 = 局_正则.取匹配数量 ()
.如果真 (局_匹配数 = 0)
' 信息框 (“游戏嘟嘟-科举答题没有找到答案,重新获取坐标吧!!!”, #错误图标, , )
透明标签5.标题 = “游戏嘟嘟-科举答题没有找到答案!!!”
透明标签5.可视 = 真
.如果真结束
.计次循环首 (局_匹配数, 局_计次)
索引 = 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (索引, 0, “游戏嘟嘟-科举”)
超级列表框1.置标题 (索引, 1, 编码_usc2到ansi (局_正则.取子匹配文本 (局_计次, 1)))
超级列表框1.置标题 (索引, 2, 编码_usc2到ansi (局_正则.取子匹配文本 (局_计次, 2)))
.计次循环尾 ()
下载地址:https://lanzouj.com/ibgyiji
|