2345答题助手一键获取答案工具

把左边的图标拖到答题页面，即可获得本轮所有答案！

在网上下载了一个2345答题器，我看着挺好的，就自己做了一个，吐血开源这源码我想了很久才知道怎么实现。

.如果真 (捕获鼠标)
ReleaseCapture ()
捕获鼠标 ＝ 假
图片框1.鼠标指针 ＝ 到字节集 (14)
图片框1.图片 ＝ #光标_十字
编辑框1.内容 ＝ “”
浏览器句柄 ＝ 窗口_取鼠标处窗口句柄 ()
普通填表.初始化 (浏览器句柄)
全部题目 ＝ 分割文本 (子文本替换 (文本_取出中间文本 (普通填表.网页_取源码 (), “json_data = '[{”, “}]';”), #引号 ＋ “option” ＋ #引号 ＋ “:{” ＋ #引号, “”, , , 真), “},{”, )
.计次循环首 (取数组成员数 (全部题目), i)
题目 ＝ 文本_取出中间文本 (全部题目 [i], “id” ＋ #引号 ＋ “:” ＋ #引号, #引号)
到首记录 ()
查找 (读 (1) ＝ 题目)
答案 ＝ 读 (“答案”)
.判断开始 (寻找文本 (答案, “,”, , 假) ＝ -1)
答案 ＝ “第” ＋ 到文本 (i) ＋ “题：” ＋ 文本_取出中间文本 (取文本右边 (全部题目 [i], 取文本长度 (全部题目 [i]) － 寻找文本 (全部题目 [i], 答案, , 假)), #引号 ＋ “:” ＋ #引号, “.”)
.默认
多选 ＝ 分割文本 (答案, “,”, )
答案 ＝ “”
.计次循环首 (取数组成员数 (多选), o)
.判断开始 (答案 ＝ “”)
答案 ＝ “第” ＋ 到文本 (i) ＋ “题：” ＋ 答案 ＋ 文本_取出中间文本 (取文本右边 (全部题目 [i], 取文本长度 (全部题目 [i]) － 寻找文本 (全部题目 [i], 多选 [o], , 假)), #引号 ＋ “:” ＋ #引号, “.”)
.默认
答案 ＝ 答案 ＋ “ ” ＋ 文本_取出中间文本 (取文本右边 (全部题目 [i], 取文本长度 (全部题目 [i]) － 寻找文本 (全部题目 [i], 多选 [o], , 假)), #引号 ＋ “:” ＋ #引号, “.”)
.判断结束

.计次循环尾 ()
.判断结束
.判断开始 (取数组成员数 (全部题目) ＝ i)
编辑框1.加入文本 (答案)
.默认
编辑框1.加入文本 (答案 ＋ #换行符)
.判断结束

.计次循环尾 ()