文本问题，有点不理解，有大佬给个思路吗

chunyu

.版本 2

.子程序 功能_网页访问, 文本型, , 本命令由【精易网页调试助手】生成，请配合精易模块使用。
.局部变量  局_网址, 文本型
.局部变量  局_方式, 整数型
.局部变量  ADD_协议头, 类_POST数据类
.局部变量  局_提交协议头, 文本型
.局部变量  局_是否重定向, 逻辑型
.局部变量  局_结果, 字节集
.局部变量  局_返回, 文本型
' http://api.ibongfa.com/api/game/wgbjgw/get/list/100
局_网址 = "http://api.ibongfa.com/api/game/wgbjgw/get/list/100"
局_方式 = 1
ADD_协议头.添加 ("Accept","application/json, text/plain, */*"）
ADD_协议头.添加 ("Accept-Language","zh-CN,zh;q=0.9"）
ADD_协议头.添加 ("Content-Length","0"）
ADD_协议头.添加 ("Host","api.ibongfa.com"）
ADD_协议头.添加 ("Origin","http://ibongfa.com"）
ADD_协议头.添加 ("Proxy-Connection","keep-alive"）
ADD_协议头.添加 ("Referer","http://ibongfa.com/select/game/game_host"）
ADD_协议头.添加 ("User-Agent","Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/109.0.0.0 Safari/537.36"）
ADD_协议头.添加 ("usertoken","dXNlcjoxMjcuMC4wLjE6Y2h1bnl1OjBmOGYxYzc2NTMzZTQ5MjM4MjIxYzI1YmI4NDdhZThl"）

局_提交协议头 = ADD_协议头.获取协议头数据 ()
局_是否重定向 = 真

局_结果 = 网页_访问_对象 (局_网址, 局_方式, , , , 局_提交协议头, , , 局_是否重定向, , , , , , , , )
局_返回 = 到文本(编码_编码转换对象(局_结果))
返回(局_返回)


.版本 2

    .计次循环首 (20, i)
        测试记录 ＝ json.取属性 (“data[” ＋ 到文本 (i － 1) ＋ “]['room_id']”).取数据文本 ()
        ' 调试输出 (测试记录)
    .计次循环尾 ()



我应该在计次循环首怎么判断。2个连续的数字一样，然后跳出循环，怎么判断3个连续的和4个的不跳，只有2个跳出， 如果没有连续的一直循环，直到找到2连续一样的才跳出。

zainex

你这个json每次读取的时候是会发生改变的.
你把它单独拿出来, 再看, 是没有问题的:

  

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

变量名	类 型	静态	数组	备 注
json	类_json
数	整数型
当前	文本型
数组	文本型		0
数量	整数型
值	整数型

' json.解析 (功能_网页访问 ())
数组 ＝ { “1”, “2”, “2”, “2”, “1”, “1”, “1”, “1”, “1” }
数 ＝ 1
判断循环首 (数 ≤ 取数组成员数 (数组))
当前 ＝ 数组 [数]
数量 ＝ 1
值 ＝ 数 ＋ 1
判断循环首 (值 ≤ 取数组成员数 (数组))
调试输出 (“!”, 当前, 数组 [值])
如果 (数组 [值] ＝ 当前)
数量 ＝ 数量 ＋ 1
跳出循环 ()
值 ＝ 值 ＋ 1
判断循环尾 ()
调试输出 (数, 当前, 数量, 值)
如果真 (数量 ＝ 2)
调试输出 (“存在俩个”, 当前)
跳出循环 ()
数 ＝ 值
判断循环尾 ()

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 json, 类_json<br /> .局部变量 数, 整数型<br /> .局部变量 当前, 文本型<br /> .局部变量 数组, 文本型, , "0"<br /> .局部变量 数量, 整数型<br /> .局部变量 值, 整数型<br /> <br /> ' json.解析 (功能_网页访问 ())<br /> 数组 ＝ { “1”, “2”, “2”, “2”, “1”, “1”, “1”, “1”, “1” }<br /> 数 ＝ 1<br /> .判断循环首 (数 ≤ 取数组成员数 (数组))<br />     当前 ＝ 数组 [数]<br />     数量 ＝ 1<br />     值 ＝ 数 ＋ 1<br />     .判断循环首 (值 ≤ 取数组成员数 (数组))<br />         调试输出 (“!”, 当前, 数组 [值])<br />         .如果 (数组 [值] ＝ 当前)<br />             数量 ＝ 数量 ＋ 1<br />         .否则<br />             跳出循环 ()<br />         .如果结束<br />         值 ＝ 值 ＋ 1<br />     .判断循环尾 ()<br />     调试输出 (数, 当前, 数量, 值)<br />     .如果真 (数量 ＝ 2)<br />         调试输出 (“存在俩个”, 当前)<br />         跳出循环 ()<br />     .如果真结束<br />     数 ＝ 值<br /> .判断循环尾 ()

* “!” | “1” | “2”
* 1 | “1” | 1 | 2
* “!” | “2” | “2”
* “!” | “2” | “2”
* “!” | “2” | “1”
* 2 | “2” | 3 | 5
* “!” | “1” | “1”
* “!” | “1” | “1”
* “!” | “1” | “1”
* “!” | “1” | “1”
* 5 | “1” | 5 | 10
被调试易程序运行完毕

z573277679

  

子程序名	返回值类型	公开	备 注
分析连续数据

变量名	类 型	静态	数组	备 注
数组	文本型		0
i	整数型
j	整数型
总数	整数型
相同数量	整数型
当前数值	文本型

总数 ＝ 20
重定义数组 (数组, 假, 总数)
计次循环首 (总数, i)
数组 [i] ＝ json.取属性 (“data[” ＋ 到文本 (i － 1) ＋ “]['room_id']”).取数据文本 ()
计次循环尾 ()
i ＝ 1
判断循环首 (i ≤ 总数)
当前数值 ＝ 数组 [i]
相同数量 ＝ 1  ' 自己算1个
' 向后统计有多少个连续一样的
变量循环首 (i ＋ 1, 总数, 1, j)
如果 (数组 [j] ＝ 当前数值)
相同数量 ＝ 相同数量 ＋ 1
跳出循环 ()  ' 遇到不一样的，统计结束

变量循环尾 ()
' 判断结果
如果真 (相同数量 ＝ 2)
调试输出 (“找到啦！连续2个相同，数值是：” ＋ 当前数值)
' 这里写你需要的后续操作代码...
跳出循环 ()

i ＝ i ＋ 相同数量
判断循环尾 ()

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 分析连续数据<br /> .局部变量 数组, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 j, 整数型<br /> .局部变量 总数, 整数型<br /> .局部变量 相同数量, 整数型<br /> .局部变量 当前数值, 文本型<br /> <br /> 总数 ＝ 20<br /> 重定义数组 (数组, 假, 总数)<br /> .计次循环首 (总数, i)<br />     数组 <i> ＝ json.取属性 (“data[” ＋ 到文本 (i － 1) ＋ “]['room_id']”).取数据文本 ()<br /> .计次循环尾 ()<br /> <br /> i ＝ 1<br /> .判断循环首 (i ≤ 总数)<br /> <br />     当前数值 ＝ 数组 <i><br />     相同数量 ＝ 1  ' 自己算1个<br /> <br />     ' 向后统计有多少个连续一样的<br />     .变量循环首 (i ＋ 1, 总数, 1, j)<br />         .如果 (数组 [j] ＝ 当前数值)<br />             相同数量 ＝ 相同数量 ＋ 1<br />         .否则<br />             跳出循环 ()  ' 遇到不一样的，统计结束<br />         .如果结束<br /> <br />     .变量循环尾 ()<br /> <br /> <br />     ' 判断结果<br />     .如果真 (相同数量 ＝ 2)<br />         调试输出 (“找到啦！连续2个相同，数值是：” ＋ 当前数值)<br /> <br />         ' 这里写你需要的后续操作代码...<br /> <br />         跳出循环 ()<br />     .如果真结束<br /> <br />     i ＝ i ＋ 相同数量<br /> <br /> .判断循环尾 ()

chunyu

z573277679 发表于 2025-12-24 13:31
[e=4].版本 2
.支持库 spec

不能用啊老大啊

z573277679

演示代码：

  

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

变量名	类 型	静态	数组	备 注
模拟JSON数据	文本型

' 1. 构造一个测试用的 JSON 数据
' 为了演示效果，我故意设置了以下顺序：
' 100 -> 单个 (应跳过)
' 555 -> 3个连续 (应跳过)
' 666 -> 4个连续 (应跳过)
' 888 -> 2个连续 (这是我们要找的目标)
' 999 -> 单个
模拟JSON数据 ＝ “{” ＋ #引号 ＋ “data” ＋ #引号 ＋ “:[”
模拟JSON数据 ＝ 模拟JSON数据 ＋ “{'room_id':'100'},”
模拟JSON数据 ＝ 模拟JSON数据 ＋ “{'room_id':'555'},{'room_id':'555'},{'room_id':'555'},”
模拟JSON数据 ＝ 模拟JSON数据 ＋ “{'room_id':'666'},{'room_id':'666'},{'room_id':'666'},{'room_id':'666'},”
模拟JSON数据 ＝ 模拟JSON数据 ＋ “{'room_id':'888'},{'room_id':'888'},”
模拟JSON数据 ＝ 模拟JSON数据 ＋ “{'room_id':'999'}”
模拟JSON数据 ＝ 模拟JSON数据 ＋ “]}”
' 调用处理子程序
处理连续数据 (模拟JSON数据)

子程序名	返回值类型	公开	备 注
处理连续数据
参数名	类 型	参考	可空	数组	备 注
json文本	文本型

变量名	类 型	静态	数组	备 注
json	类_json
数组	文本型		0
总数	整数型
i	整数型
j	整数型
当前ID	文本型
相同数量	整数型

' 解析 JSON ---
json.解析 (json文本)
总数 ＝ json.成员数 (“data”)
' 先把数据读入数组，方便快速操作（避免频繁调用json对象，提高速度）
重定义数组 (数组, 假, 总数)
计次循环首 (总数, i)
数组 [i] ＝ json.取通用属性 (“data[” ＋ 到文本 (i － 1) ＋ “].room_id”)
计次循环尾 ()
调试输出 (“=== 开始分析数据，总数：” ＋ 到文本 (总数) ＋ “ ===”)
' 核心逻辑开始：使用判断循环以便手动控制 i 的跳跃 ---
i ＝ 1
判断循环首 (i ≤ 总数)
当前ID ＝ 数组 [i]
相同数量 ＝ 1  ' 自身算一个
' 向后看，统计有多少个跟自己一样的
变量循环首 (i ＋ 1, 总数, 1, j)
如果 (数组 [j] ＝ 当前ID)
相同数量 ＝ 相同数量 ＋ 1
跳出循环 ()  ' 遇到不一样的，统计结束

变量循环尾 ()
' 输出调试信息
调试输出 (“数字 [” ＋ 当前ID ＋ “] 连续出现了 ” ＋ 到文本 (相同数量) ＋ “ 次”)
' 判断条件 ---
如果 (相同数量 ＝ 2)
调试输出 (“★ 成功找到！连续2个相同的数字是：” ＋ 当前ID)
调试输出 (“>>> 跳出循环，不再往后找了”)
跳出循环 ()  ' 【关键】找到了就彻底结束整个任务

' 如果是 3个、4个 或 1个，都不符合，什么都不做

' 比如当前是3个555，如果不跳跃，下次循环会判断第2个555，那就乱了。
' 直接 i + 相同数量，下次循环就会从“这一堆相同数字”后面的那个新数字开始
i ＝ i ＋ 相同数量
判断循环尾 ()

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 模拟JSON数据, 文本型<br /> <br /> <br /> ' 1. 构造一个测试用的 JSON 数据<br /> ' 为了演示效果，我故意设置了以下顺序：<br /> ' 100 -> 单个 (应跳过)<br /> ' 555 -> 3个连续 (应跳过)<br /> ' 666 -> 4个连续 (应跳过)<br /> ' 888 -> 2个连续 (这是我们要找的目标)<br /> ' 999 -> 单个<br /> <br /> 模拟JSON数据 ＝ “{” ＋ #引号 ＋ “data” ＋ #引号 ＋ “:[”<br /> 模拟JSON数据 ＝ 模拟JSON数据 ＋ “{'room_id':'100'},”<br /> 模拟JSON数据 ＝ 模拟JSON数据 ＋ “{'room_id':'555'},{'room_id':'555'},{'room_id':'555'},”<br /> 模拟JSON数据 ＝ 模拟JSON数据 ＋ “{'room_id':'666'},{'room_id':'666'},{'room_id':'666'},{'room_id':'666'},”<br /> 模拟JSON数据 ＝ 模拟JSON数据 ＋ “{'room_id':'888'},{'room_id':'888'},”<br /> 模拟JSON数据 ＝ 模拟JSON数据 ＋ “{'room_id':'999'}”<br /> 模拟JSON数据 ＝ 模拟JSON数据 ＋ “]}”<br /> <br /> ' 调用处理子程序<br /> 处理连续数据 (模拟JSON数据)<br /> <br /> .子程序 处理连续数据<br /> .参数 json文本, 文本型<br /> .局部变量 json, 类_json<br /> .局部变量 数组, 文本型, , "0"<br /> .局部变量 总数, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 j, 整数型<br /> .局部变量 当前ID, 文本型<br /> .局部变量 相同数量, 整数型<br /> <br /> ' 解析 JSON ---<br /> json.解析 (json文本)<br /> 总数 ＝ json.成员数 (“data”)<br /> <br /> ' 先把数据读入数组，方便快速操作（避免频繁调用json对象，提高速度）<br /> 重定义数组 (数组, 假, 总数)<br /> .计次循环首 (总数, i)<br />     数组 <i> ＝ json.取通用属性 (“data[” ＋ 到文本 (i － 1) ＋ “].room_id”)<br /> .计次循环尾 ()<br /> <br /> 调试输出 (“=== 开始分析数据，总数：” ＋ 到文本 (总数) ＋ “ ===”)<br /> <br /> ' 核心逻辑开始：使用判断循环以便手动控制 i 的跳跃 ---<br /> i ＝ 1<br /> .判断循环首 (i ≤ 总数)<br /> <br />     当前ID ＝ 数组 <i><br />     相同数量 ＝ 1  ' 自身算一个<br /> <br />     ' 向后看，统计有多少个跟自己一样的<br />     .变量循环首 (i ＋ 1, 总数, 1, j)<br />         .如果 (数组 [j] ＝ 当前ID)<br />             相同数量 ＝ 相同数量 ＋ 1<br />         .否则<br />             跳出循环 ()  ' 遇到不一样的，统计结束<br />         .如果结束<br /> <br />     .变量循环尾 ()<br /> <br />     ' 输出调试信息<br />     调试输出 (“数字 [” ＋ 当前ID ＋ “] 连续出现了 ” ＋ 到文本 (相同数量) ＋ “ 次”)<br /> <br />     ' 判断条件 ---<br />     .如果 (相同数量 ＝ 2)<br /> <br />         调试输出 (“★ 成功找到！连续2个相同的数字是：” ＋ 当前ID)<br />         调试输出 (“>>> 跳出循环，不再往后找了”)<br /> <br />         跳出循环 ()  ' 【关键】找到了就彻底结束整个任务<br /> <br />     .否则<br />         ' 如果是 3个、4个 或 1个，都不符合，什么都不做<br />     .如果结束<br /> <br />     ' 比如当前是3个555，如果不跳跃，下次循环会判断第2个555，那就乱了。<br />     ' 直接 i + 相同数量，下次循环就会从“这一堆相同数字”后面的那个新数字开始<br />     i ＝ i ＋ 相同数量<br /> <br /> .判断循环尾 ()

zainex

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

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

变量名	类 型	静态	数组	备 注
局_网址	文本型
局_方式	整数型
ADD_协议头	类_POST数据类
局_提交协议头	文本型
局_是否重定向	逻辑型
局_结果	字节集
局_返回	文本型

' [url]http://api.ibongfa.com/api/game/wgbjgw/get/list/100[/url]
局_网址 ＝ “http:/” ＋ “/api.ibongfa.com/api/game/wgbjgw/get/list/100”
局_方式 ＝ 1
ADD_协议头.添加 (“usertoken”, “dXNlcjoxMjcuMC4wLjE6Y2h1bnl1OjBmOGYxYzc2NTMzZTQ5MjM4MjIxYzI1YmI4NDdhZThl”)
局_提交协议头 ＝ ADD_协议头.获取协议头数据 ()
局_是否重定向 ＝ 真
局_结果 ＝ 网页_访问_对象 (局_网址, 局_方式, , , , 局_提交协议头, , , 局_是否重定向, , , , , , , , )
局_返回 ＝ 到文本 (编码_编码转换对象 (局_结果))
返回 (局_返回)

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

变量名	类 型	静态	数组	备 注
json	类_json
数	整数型
当前	文本型
数组	文本型		0
数量	整数型
值	整数型

json.解析 (功能_网页访问 ())
数 ＝ 1
判断循环首 (数 ≤ json.成员数 (“data”))
当前 ＝ json.取通用属性 (“data[” ＋ 到文本 (数 － 1) ＋ “]['room_id']”)
数量 ＝ 1
值 ＝ 数 ＋ 1
判断循环首 (值 ≤ json.成员数 (“data”))
调试输出 (“!”, 当前, json.取通用属性 (“data[” ＋ 到文本 (值 － 1) ＋ “]['room_id']”))
如果 (json.取通用属性 (“data[” ＋ 到文本 (值 － 1) ＋ “]['room_id']”) ＝ 当前)
数量 ＝ 数量 ＋ 1
跳出循环 ()
值 ＝ 值 ＋ 1
判断循环尾 ()
调试输出 (数, 当前, 数量, 值)
如果真 (数量 ＝ 2)
调试输出 (“存在俩个”, 当前)
跳出循环 ()
数 ＝ 值
判断循环尾 ()

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 功能_网页访问, 文本型, , 本命令由【精易网页调试助手】生成，请配合精易模块使用。<br /> .局部变量 局_网址, 文本型<br /> .局部变量 局_方式, 整数型<br /> .局部变量 ADD_协议头, 类_POST数据类<br /> .局部变量 局_提交协议头, 文本型<br /> .局部变量 局_是否重定向, 逻辑型<br /> .局部变量 局_结果, 字节集<br /> .局部变量 局_返回, 文本型<br /> <br /> ' <a href="http://api.ibongfa.com/api/game/wgbjgw/get/list/100" rel="nofollow" target="_blank">http://api.ibongfa.com/api/game/wgbjgw/get/list/100</a><br /> 局_网址 ＝ “http:/” ＋ “/api.ibongfa.com/api/game/wgbjgw/get/list/100”<br /> 局_方式 ＝ 1<br /> ADD_协议头.添加 (“usertoken”, “dXNlcjoxMjcuMC4wLjE6Y2h1bnl1OjBmOGYxYzc2NTMzZTQ5MjM4MjIxYzI1YmI4NDdhZThl”)<br /> 局_提交协议头 ＝ ADD_协议头.获取协议头数据 ()<br /> 局_是否重定向 ＝ 真<br /> 局_结果 ＝ 网页_访问_对象 (局_网址, 局_方式, , , , 局_提交协议头, , , 局_是否重定向, , , , , , , , )<br /> 局_返回 ＝ 到文本 (编码_编码转换对象 (局_结果))<br /> 返回 (局_返回)<br /> <br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 json, 类_json<br /> .局部变量 数, 整数型<br /> .局部变量 当前, 文本型<br /> .局部变量 数组, 文本型, , "0"<br /> .局部变量 数量, 整数型<br /> .局部变量 值, 整数型<br /> <br /> json.解析 (功能_网页访问 ())<br /> 数 ＝ 1<br /> .判断循环首 (数 ≤ json.成员数 (“data”))<br />     当前 ＝ json.取通用属性 (“data[” ＋ 到文本 (数 － 1) ＋ “]['room_id']”)<br />     数量 ＝ 1<br />     值 ＝ 数 ＋ 1<br />     .判断循环首 (值 ≤ json.成员数 (“data”))<br />         调试输出 (“!”, 当前, json.取通用属性 (“data[” ＋ 到文本 (值 － 1) ＋ “]['room_id']”))<br />         .如果 (json.取通用属性 (“data[” ＋ 到文本 (值 － 1) ＋ “]['room_id']”) ＝ 当前)<br />             数量 ＝ 数量 ＋ 1<br />         .否则<br />             跳出循环 ()<br />         .如果结束<br />         值 ＝ 值 ＋ 1<br />     .判断循环尾 ()<br />     调试输出 (数, 当前, 数量, 值)<br />     .如果真 (数量 ＝ 2)<br />         调试输出 (“存在俩个”, 当前)<br />         跳出循环 ()<br />     .如果真结束<br />     数 ＝ 值<br /> .判断循环尾 ()

* “!” | “2” | “1”
* 1 | “2” | 1 | 2
* “!” | “1” | “2”
* 2 | “1” | 1 | 3
* “!” | “2” | “1”
* 3 | “2” | 1 | 4
* “!” | “1” | “2”
* 4 | “1” | 1 | 5
* “!” | “2” | “1”
* 5 | “2” | 1 | 6
* “!” | “1” | “1”
* “!” | “1” | “2”
* 6 | “1” | 2 | 8
* “存在俩个” | “1”
被调试易程序运行完毕

chunyu

zainex 发表于 2025-12-24 13:58
[e=1].版本 2
.支持库 spec

是的判断有问题的， 出现这样的还是判断为存在2个，不应该不存在的吗

“2”
* “1”
* “2”
* “2”
* “2”
* “1”
* “1”
* “1”
* “1”
* “1”

走一回

没有2，怎么有3、4

chunyu

走一回 发表于 2025-12-24 14:11
没有2，怎么有3、4

连续的2222这个为4 连续222为3，连续22跳出循环如果找不到一直循环