帮忙看下循环30次就出问题了。

从心

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
全局_返回	文本型
返回_cookie	文本型
结果	文本型	0
帖子id	整数型
取id_返回	文本型

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

子程序名	返回值类型	公开	备 注
_按钮1_被单击

登录 ()

子程序名	返回值类型	公开	备 注
登录			本命令由【精易网页调试助手】生成，请配合精易模块使用。

变量名	类 型	静态	数组	备 注
局_网址	文本型
局_方式	整数型
局_提交数据	文本型
ADD_协议头	类_POST数据类
局_提交协议头	文本型
局_结果	字节集

' https://bbs.tatans.cn/api/login
局_网址 ＝ “https://bbs.tatans.cn/api/login”
局_方式 ＝ 1
' {"phone":"18624371663","password":"4bd3295ef7e41757241808b35e7a8c33"}
局_提交数据 ＝ “{” ＋ #引号 ＋ “phone” ＋ #引号 ＋ “:” ＋ #引号 ＋ 编辑框1.内容 ＋ #引号 ＋ “,” ＋ #引号 ＋ “password” ＋ #引号 ＋ “:” ＋ #引号 ＋ 编辑框2.内容 ＋ #引号 ＋ “}”
ADD_协议头.添加 (“Accept”, “application/json, text/javascript, */*; q=0.01”)
ADD_协议头.添加 (“Content-Type”, “application/json”)
ADD_协议头.添加 (“User-Agent”, “Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/50.0.2661.87 Safari/537.36”)
局_提交协议头 ＝ ADD_协议头.获取协议头数据 ()
局_结果 ＝ 网页_访问_对象 (局_网址, 局_方式, 局_提交数据, , 返回_cookie, 局_提交协议头, , , , , , , , , , , )
全局_返回 ＝ 到文本 (编码_编码转换对象 (局_结果))
编辑框5.加入文本 (全局_返回 ＋ #换行符 )
' 调试输出 (返回_cookie)

子程序名	返回值类型	公开	备 注
取id			本命令由【精易网页调试助手】生成，请配合精易模块使用。

变量名	类 型	静态	数组	备 注
局_网址	文本型
局_方式	整数型
ADD_协议头	类_POST数据类
局_提交协议头	文本型
局_结果	字节集
位置_	整数型
开始位置	整数型
结束位置	整数型
判断帖子id	文本型
a	整数型
局_网址1	文本型
局_方式1	整数型
局_提交数据1	文本型
局_提交cookie1	文本型
ADD_协议头1	类_POST数据类
局_提交协议头1	文本型
局_结果1	字节集
局_返回1	文本型
n1	整数型
token	文本型
d	整数型
i	整数型
帖子id正确	逻辑型

' https://bbs.tatans.cn/topic/5900
帖子id ＝ 到数值 (编辑框3.内容)
计次循环首 (10000, i)
帖子id ＝ 帖子id ＋ 1
编辑框3.内容 ＝ “”
编辑框3.加入文本 (到文本 (帖子id))
局_网址 ＝ “https://bbs.tatans.cn/topic/” ＋ 到文本 (帖子id)
局_方式 ＝ 0
ADD_协议头.添加 (“Accept”, “application/json, text/javascript, */*; q=0.01”)
ADD_协议头.添加 (“Content-Type”, “application/json”)
ADD_协议头.添加 (“User-Agent”, “Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/50.0.2661.87 Safari/537.36”)
局_提交协议头 ＝ ADD_协议头.获取协议头数据 ()
局_结果 ＝ 网页_访问_对象 (局_网址, 局_方式, , , , 局_提交协议头, , , , , , , , , , , )
取id_返回 ＝ 到文本 (编码_编码转换对象 (局_结果, , , ))
' 判断帖子id ＝ 文本_取出中间文本 (取id_返回, “description” ＋ #引号 ＋ “:” ＋ #引号, “~” ＋ #引号 ＋ “,” ＋ #引号 ＋ “detail”, , )
' 调试输出 (帖子id)
' 调试输出 (取id_返回)
如果 (文本_寻找文本 (取id_返回, “服务器出错啦”, , ) ≠ -1)  ' 判断帖子id是否存在
调试输出 (“服务器出错啦”)
到循环尾 ()
' 跳出循环 ()
帖子id正确 ＝ 真  ' 若帖子id正确，则对该帖子进行回帖

如果真 (帖子id正确)
' 开始位置 ＝ 寻找文本 (取id_返回, “vote_count_”, 位置_, 假)
. ' 如果真 (开始位置 ＝ -1)
' 跳出循环 ()
' 位置_ ＝ 开始位置 ＋ 1
' 结束位置 ＝ 寻找文本 (取id_返回, #引号 ＋ “ onclick=”, 位置_, 假)
. ' 如果真 (结束位置 ＝ -1)
' 跳出循环 ()
' 位置_ ＝ 结束位置 ＋ 1
' 加入成员 (结果, 取文本中间 (取id_返回, 开始位置 ＋ 取文本长度 (“vote_count_”), 结束位置 － 开始位置 － 取文本长度 (#引号 ＋ #引号 ＋ “ onclick=”)))
文本_取中间_批量 (取id_返回, “id=” ＋ #引号 ＋ “comment”, #引号, 结果, , , , , , , )
' 调试输出 (结果)

如果真 (取数组成员数 (结果) ＞ 0)
计次循环首 (取数组成员数 (结果), n1)
d ＝ d ＋ 1
token ＝ 文本_取右边 (返回_cookie, “user_token=”, , )
局_网址1 ＝ “https://bbs.tatans.cn/api/comment”
局_方式1 ＝ 1
' 调试输出 (“结果” ＋ 结果 [n1])
' {"topicId":"74999","content":"没玩过呀，不知道呢.....
\n","commentId":""}
' {"topicId":"1001","content":"无障碍模式真难用，车站选择了以后不会输出到主界面。
\n","commentId":"4643"}
局_提交数据1 ＝ “{” ＋ #引号 ＋ “topicId” ＋ #引号 ＋ “:” ＋ #引号 ＋ 到文本 (帖子id) ＋ #引号 ＋ “,” ＋ #引号 ＋ “content” ＋ #引号 ＋ “:” ＋ #引号 ＋ “” ＋ 编辑框4.内容 ＋ “
\n” ＋ #引号 ＋ “,” ＋ #引号 ＋ “commentId” ＋ #引号 ＋ “:” ＋ #引号 ＋ 结果 [n1] ＋ #引号 ＋ “}”
' 调试输出 (局_提交数据1)
局_提交cookie1 ＝ 返回_cookie
ADD_协议头1.添加 (“User-Agent”, “Mozilla/5.0 (Linux; Android 6.0; Nexus 5 Build/MRA58N) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/122.0.6261.95 Mobile Safari/537.36”, )
ADD_协议头1.添加 (“Content-Type”, “application/json”, )
ADD_协议头1.添加 (“Accept”, “application/json, text/javascript, */*; q=0.01”, )
ADD_协议头1.添加 (“X-Requested-With”, “XMLHttpRequest”, )
ADD_协议头1.添加 (“token”, token, )
ADD_协议头1.添加 (“Origin”, “https://bbs.tatans.cn”, )
ADD_协议头1.添加 (“Sec-Fetch-Site”, “same-origin”, )
ADD_协议头1.添加 (“Sec-Fetch-Mode”, “cors”, )
ADD_协议头1.添加 (“Sec-Fetch-Dest”, “empty”, )
ADD_协议头1.添加 (“Referer”, “https://bbs.tatans.cn”, )
ADD_协议头1.添加 (“Accept-Language”, “zh-CN,zh;q=0.9,en;q=0.8”, )
局_提交协议头1 ＝ ADD_协议头1.获取协议头数据 ()
局_结果1 ＝ 网页_访问_对象 (局_网址1, 局_方式1, 局_提交数据1, 局_提交cookie1, , 局_提交协议头1, , , , , , , , , , , , , )
局_返回1 ＝ 到文本 (编码_编码转换对象 (局_结果1, , , ))
调试输出 (到文本 (d) ＋ “次” ＋ 局_返回1)
如果真 (文本_寻找文本 (局_返回1, “已被禁言, 不能进行相关操作”, , ) ≠ -1)
信息框 (“已被禁言, 请换账号”, 0, , )
返回 ()

局_返回1 ＝ 文本_取出中间文本 (局_返回1, “ription” ＋ #引号 ＋ “:” ＋ #引号, #引号 ＋ “,” ＋ #引号 ＋ “detail” ＋ #引号 ＋ “:{” ＋ #引号 ＋ “id”, , )
如果 (局_返回1 ＝ “SUCCESS”)
编辑框5.加入文本 (“第” ＋ 到文本 (d) ＋ “次成功” ＋ 局_返回1 ＋ #换行符 )
程序_延时 (1000, )  ' 延迟5秒后再回复，避免回复快被禁言
' 编辑框5.加入文本 (“延时5秒中” ＋ #换行符)
程序_延时 (100, )  ' 延迟5秒后再回复，避免回复快被禁言
编辑框5.加入文本 (“失败” ＋ #换行符 )
销毁 ()

计次循环尾 ()

计次循环尾 ()

子程序名	返回值类型	公开	备 注
_按钮2_被单击

启动线程 (&取id, , )

i支持库列表	支持库注释
spec	特殊功能支持库
EThread	多线程支持库

.版本 2<br /> .支持库 spec<br /> .支持库 EThread<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 全局_返回, 文本型<br /> .程序集变量 返回_cookie, 文本型<br /> .程序集变量 结果, 文本型, , "0"<br /> .程序集变量 帖子id, 整数型<br /> .程序集变量 取id_返回, 文本型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> <br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 登录 ()<br /> <br /> .子程序 登录, , , 本命令由【精易网页调试助手】生成，请配合精易模块使用。<br /> .局部变量 局_网址, 文本型<br /> .局部变量 局_方式, 整数型<br /> .局部变量 局_提交数据, 文本型<br /> .局部变量 ADD_协议头, 类_POST数据类<br /> .局部变量 局_提交协议头, 文本型<br /> .局部变量 局_结果, 字节集<br /> <br /> ' https://bbs.tatans.cn/api/login<br /> 局_网址 ＝ “https://bbs.tatans.cn/api/login”<br /> 局_方式 ＝ 1<br /> ' {"phone":"18624371663","password":"4bd3295ef7e41757241808b35e7a8c33"}<br /> 局_提交数据 ＝ “{” ＋ #引号 ＋ “phone” ＋ #引号 ＋ “:” ＋ #引号 ＋ 编辑框1.内容 ＋ #引号 ＋ “,” ＋ #引号 ＋ “password” ＋ #引号 ＋ “:” ＋ #引号 ＋ 编辑框2.内容 ＋ #引号 ＋ “}”<br /> ADD_协议头.添加 (“Accept”, “application/json, text/javascript, */*; q=0.01”)<br /> ADD_协议头.添加 (“Content-Type”, “application/json”)<br /> ADD_协议头.添加 (“User-Agent”, “Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/50.0.2661.87 Safari/537.36”)<br /> <br /> 局_提交协议头 ＝ ADD_协议头.获取协议头数据 ()<br /> <br /> 局_结果 ＝ 网页_访问_对象 (局_网址, 局_方式, 局_提交数据, , 返回_cookie, 局_提交协议头, , , , , , , , , , , )<br /> 全局_返回 ＝ 到文本 (编码_编码转换对象 (局_结果))<br /> 编辑框5.加入文本 (全局_返回 ＋ #换行符)<br /> <br /> ' 调试输出 (返回_cookie)<br /> <br /> <br /> .子程序 取id, , , 本命令由【精易网页调试助手】生成，请配合精易模块使用。<br /> .局部变量 局_网址, 文本型<br /> .局部变量 局_方式, 整数型<br /> .局部变量 ADD_协议头, 类_POST数据类<br /> .局部变量 局_提交协议头, 文本型<br /> .局部变量 局_结果, 字节集<br /> .局部变量 位置_, 整数型<br /> .局部变量 开始位置, 整数型<br /> .局部变量 结束位置, 整数型<br /> .局部变量 判断帖子id, 文本型<br /> .局部变量 a, 整数型<br /> .局部变量 局_网址1, 文本型<br /> .局部变量 局_方式1, 整数型<br /> .局部变量 局_提交数据1, 文本型<br /> .局部变量 局_提交cookie1, 文本型<br /> .局部变量 ADD_协议头1, 类_POST数据类<br /> .局部变量 局_提交协议头1, 文本型<br /> .局部变量 局_结果1, 字节集<br /> .局部变量 局_返回1, 文本型<br /> .局部变量 n1, 整数型<br /> .局部变量 token, 文本型<br /> .局部变量 d, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 帖子id正确, 逻辑型<br /> <br /> ' https://bbs.tatans.cn/topic/5900<br /> 帖子id ＝ 到数值 (编辑框3.内容)<br /> .计次循环首 (10000, i)<br />     帖子id ＝ 帖子id ＋ 1<br />     编辑框3.内容 ＝ “”<br />     编辑框3.加入文本 (到文本 (帖子id))<br />     局_网址 ＝ “https://bbs.tatans.cn/topic/” ＋ 到文本 (帖子id)<br />     局_方式 ＝ 0<br /> <br />     ADD_协议头.添加 (“Accept”, “application/json, text/javascript, */*; q=0.01”)<br />     ADD_协议头.添加 (“Content-Type”, “application/json”)<br />     ADD_协议头.添加 (“User-Agent”, “Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/50.0.2661.87 Safari/537.36”)<br /> <br />     局_提交协议头 ＝ ADD_协议头.获取协议头数据 ()<br /> <br />     局_结果 ＝ 网页_访问_对象 (局_网址, 局_方式, , , , 局_提交协议头, , , , , , , , , , , )<br /> <br />     取id_返回 ＝ 到文本 (编码_编码转换对象 (局_结果, , , ))<br /> <br />     ' 判断帖子id ＝ 文本_取出中间文本 (取id_返回, “description” ＋ #引号 ＋ “:” ＋ #引号, “~” ＋ #引号 ＋ “,” ＋ #引号 ＋ “detail”, , )<br /> <br />     ' 调试输出 (帖子id)<br />     ' 调试输出 (取id_返回)<br />     .如果 (文本_寻找文本 (取id_返回, “服务器出错啦”, , ) ≠ -1)  ' 判断帖子id是否存在<br />         调试输出 (“服务器出错啦”)<br />         到循环尾 ()<br />         ' 跳出循环 ()<br />     .否则<br />         帖子id正确 ＝ 真  ' 若帖子id正确，则对该帖子进行回帖<br /> <br />     .如果结束<br /> <br />     .如果真 (帖子id正确)<br />         ' 开始位置 ＝ 寻找文本 (取id_返回, “vote_count_”, 位置_, 假)<br /> <br />         .' 如果真 (开始位置 ＝ -1)<br />             ' 跳出循环 ()<br />         .如果真结束<br />         ' 位置_ ＝ 开始位置 ＋ 1<br />         ' 结束位置 ＝ 寻找文本 (取id_返回, #引号 ＋ “ onclick=”, 位置_, 假)<br />         .' 如果真 (结束位置 ＝ -1)<br />             ' 跳出循环 ()<br />         .如果真结束<br />         ' 位置_ ＝ 结束位置 ＋ 1<br /> <br />         ' 加入成员 (结果, 取文本中间 (取id_返回, 开始位置 ＋ 取文本长度 (“vote_count_”), 结束位置 － 开始位置 － 取文本长度 (#引号 ＋ #引号 ＋ “ onclick=”)))<br /> <br />         文本_取中间_批量 (取id_返回, “id=” ＋ #引号 ＋ “comment”, #引号, 结果, , , , , , , )<br />         ' 调试输出 (结果)<br /> <br />     .如果真结束<br /> <br />     .如果真 (取数组成员数 (结果) ＞ 0)<br />         .计次循环首 (取数组成员数 (结果), n1)<br />             d ＝ d ＋ 1<br />             token ＝ 文本_取右边 (返回_cookie, “user_token=”, , )<br />             局_网址1 ＝ “https://bbs.tatans.cn/api/comment”<br />             局_方式1 ＝ 1<br />             ' 调试输出 (“结果” ＋ 结果 [n1])<br />             ' {"topicId":"74999","content":"没玩过呀，不知道呢.....<br /> \n","commentId":""}<br />             ' {"topicId":"1001","content":"无障碍模式真难用，车站选择了以后不会输出到主界面。<br /> \n","commentId":"4643"}<br />             局_提交数据1 ＝ “{” ＋ #引号 ＋ “topicId” ＋ #引号 ＋ “:” ＋ #引号 ＋ 到文本 (帖子id) ＋ #引号 ＋ “,” ＋ #引号 ＋ “content” ＋ #引号 ＋ “:” ＋ #引号 ＋ “” ＋ 编辑框4.内容 ＋ “<br /> \n” ＋ #引号 ＋ “,” ＋ #引号 ＋ “commentId” ＋ #引号 ＋ “:” ＋ #引号 ＋ 结果 [n1] ＋ #引号 ＋ “}”<br />             ' 调试输出 (局_提交数据1)<br />             局_提交cookie1 ＝ 返回_cookie<br />             ADD_协议头1.添加 (“User-Agent”, “Mozilla/5.0 (Linux; Android 6.0; Nexus 5 Build/MRA58N) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/122.0.6261.95 Mobile Safari/537.36”, )<br />             ADD_协议头1.添加 (“Content-Type”, “application/json”, )<br />             ADD_协议头1.添加 (“Accept”, “application/json, text/javascript, */*; q=0.01”, )<br />             ADD_协议头1.添加 (“X-Requested-With”, “XMLHttpRequest”, )<br />             ADD_协议头1.添加 (“token”, token, )<br />             ADD_协议头1.添加 (“Origin”, “https://bbs.tatans.cn”, )<br />             ADD_协议头1.添加 (“Sec-Fetch-Site”, “same-origin”, )<br />             ADD_协议头1.添加 (“Sec-Fetch-Mode”, “cors”, )<br />             ADD_协议头1.添加 (“Sec-Fetch-Dest”, “empty”, )<br />             ADD_协议头1.添加 (“Referer”, “https://bbs.tatans.cn”, )<br />             ADD_协议头1.添加 (“Accept-Language”, “zh-CN,zh;q=0.9,en;q=0.8”, )<br /> <br />             局_提交协议头1 ＝ ADD_协议头1.获取协议头数据 ()<br />             局_结果1 ＝ 网页_访问_对象 (局_网址1, 局_方式1, 局_提交数据1, 局_提交cookie1, , 局_提交协议头1, , , , , , , , , , , , , )<br /> <br />             局_返回1 ＝ 到文本 (编码_编码转换对象 (局_结果1, , , ))<br />             调试输出 (到文本 (d) ＋ “次” ＋ 局_返回1)<br /> <br />             .如果真 (文本_寻找文本 (局_返回1, “已被禁言, 不能进行相关操作”, , ) ≠ -1)<br />                 信息框 (“已被禁言, 请换账号”, 0, , )<br />                 返回 ()<br />             .如果真结束<br /> <br />             局_返回1 ＝ 文本_取出中间文本 (局_返回1, “ription” ＋ #引号 ＋ “:” ＋ #引号, #引号 ＋ “,” ＋ #引号 ＋ “detail” ＋ #引号 ＋ “:{” ＋ #引号 ＋ “id”, , )<br /> <br />             .如果 (局_返回1 ＝ “SUCCESS”)<br />                 编辑框5.加入文本 (“第” ＋ 到文本 (d) ＋ “次成功” ＋ 局_返回1 ＋ #换行符)<br />                 程序_延时 (1000, )  ' 延迟5秒后再回复，避免回复快被禁言<br />                 ' 编辑框5.加入文本 (“延时5秒中” ＋ #换行符)<br />             .否则<br />                 程序_延时 (100, )  ' 延迟5秒后再回复，避免回复快被禁言<br />                 编辑框5.加入文本 (“失败” ＋ #换行符)<br />                 销毁 ()<br />             .如果结束<br /> <br />         .计次循环尾 ()<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> <br /> .子程序 _按钮2_被单击<br /> <br /> <br /> 启动线程 (&取id, , )

哪个老哥给看一下，不晓得为啥，运行到第30次，就出问题了，返回就是空了，加延时也不行，不晓得哪里问题，就是回帖30次就GG了。
账号是  19290107726   密码不用动  md5的 4bd3295ef7e41757241808b35e7a8c33

从心

或者可以用啥办法，比如说他出问题了，就停止子线程让他自动重新运行 这样不晓得行不行

憨憨问号

我猜是网站里有保护？如果每次都是恰好30次就出问题，大概率网站有保护吧，连续发多条消息就禁止发言一会？
你看看失败的返回是返回了什么，如果检测到失败了就跳出循环或者停止线程

从心

憨憨问号 发表于 2024-11-21 12:13
我猜是网站里有保护？如果每次都是恰好30次就出问题，大概率网站有保护吧，连续发多条消息就禁止发言一会？ ...

不是的，我重启软件立马就又可以发了

企鹅号525150138

局_提交cookie1 ＝ 返回_cookie
ADD_协议头1.清空（）
ADD_协议头1.添加 (“User-Agent”, “Mozilla/5.0 (Linux; Android 6.0; Nexus 5 Build/MRA58N) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/122.0.6261.95 Mobile Safari/537.36”, )

补充内容 (2024-11-21 12:49):
ADD_协议头.清空（）,这个也要清空，在循环里面会重复一直添加添加，每次循环之前清空一次

从心

企鹅号525150138 发表于 2024-11-21 12:42
局_提交cookie1 ＝ 返回_cookie
ADD_协议头1.清空（）
ADD_协议头1.添加 (“User-Agent”, “Mozilla/5.0 ( ...

我试试 我的哥