精易论坛

标题: json文本分辨问题， [打印本页]
作者: chunyu    时间: 7 小时前
标题: json文本分辨问题，
.版本 2
.支持库 spec

.子程序 _按钮3_被单击
.局部变量 测试记录, 文本型
.局部变量 i, 整数型



code ＝ 功能_网页访问 ()

json.解析 (code, , )

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

    .如果真 (测试记录 ＝ “1” 或 测试记录 ＝ “3” 或 测试记录 ＝ “5” 或 测试记录 ＝ “7” ＝ 真)
        调试输出 (测试记录, “单”)
    .如果真结束
    .如果真 (测试记录 ＝ “2” 或 测试记录 ＝ “4” 或 测试记录 ＝ “6” 或 测试记录 ＝ “8” ＝ 真)
        调试输出 (测试记录, “双”)
    .如果真结束

.计次循环尾 ()





.子程序 功能_网页访问, 文本型, , 本命令由【精易网页调试助手】生成，请配合精易模块使用。
.局部变量 局_网址, 文本型
.局部变量 局_方式, 整数型
.局部变量 ADD_协议头, 类_POST数据类
.局部变量 局_提交协议头, 文本型
.局部变量 局_是否重定向, 逻辑型
.局部变量 局_结果, 字节集
.局部变量 局_返回, 文本型

' http://api.ibongfa.com/api/game/wgbjgw/get/list/100
局_网址 ＝ “http://api.ibongfa.com/api/game/dtw/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”, “dXNlcjoxMjcuMC4wLjE6Y2h1bnl1MjphODk0OWIyZWZkZWM0MzYwYjEyMWU3NDBmMjMyN2RkYQ==”, )

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

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


调试出来的是  这个实时变化的。可以吧json数据固定
*“1” | “单”
* “3” | “单”
* “7” | “单”
* “4” | “双”
* “3” | “单”
* “2” | “双”
* “1” | “单”
* “1” | “单”
* “5” | “单”
* “7” | “单”
有大佬解答一下吗？比如1-3-5-7是单   2-4-6-8为双
我应该怎么计次循环判断连续出来3次单呢，或者4次单呢 如果满足跳出


作者: cow    时间: 7 小时前
  
窗口程序集名保 留  保 留备 注
窗口程序集_窗口1   
变量名类 型数组备 注
json类_json  

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

子程序名返回值类型公开备 注
_按钮1_被单击  
变量名类 型静态数组备 注
测试记录文本型 
i整数型 
连续单次数整数型 
连续双次数整数型 
目标次数整数型 
code文本型 
目标次数 ＝ 3
连续单次数 ＝ 0
连续双次数 ＝ 0
code ＝ 功能_网页访问 ()
json.解析 (code, , )
计次循环首 (30, i)
测试记录 ＝ json.取属性 (“data[” ＋ 到文本 (i － 1) ＋ “]['room_id']”).取数据文本 ()
如果真 (测试记录 ＝ “1” 或 测试记录 ＝ “3” 或 测试记录 ＝ “5” 或 测试记录 ＝ “7”)
连续单次数 ＝ 连续单次数 ＋ 1
连续双次数 ＝ 0
调试输出 (测试记录, “单”, “连续单：” ＋ 到文本 (连续单次数))
如果真 (连续单次数 ≥ 目标次数)
调试输出 (“检测到连续” ＋ 到文本 (目标次数) ＋ “次单！”)
跳出循环 ()


如果真 (测试记录 ＝ “2” 或 测试记录 ＝ “4” 或 测试记录 ＝ “6” 或 测试记录 ＝ “8”)
连续双次数 ＝ 连续双次数 ＋ 1
连续单次数 ＝ 0
调试输出 (测试记录, “双”, “连续双：” ＋ 到文本 (连续双次数))
如果真 (连续双次数 ≥ 目标次数)
调试输出 (“检测到连续” ＋ 到文本 (目标次数) ＋ “次双！”)
跳出循环 ()


计次循环尾 ()
子程序名返回值类型公开备 注
功能_网页访问文本型 本命令由【精易网页调试助手】生成，请配合精易模块使用。
变量名类 型静态数组备 注
局_网址文本型 
局_方式整数型 
ADD_协议头类_POST数据类 
局_提交协议头文本型 
局_是否重定向逻辑型 
局_结果字节集 
局_返回文本型 
' http://api.ibongfa.com/api/game/wgbjgw/get/list/100
局_网址 ＝ “http://api.ibongfa.com/api/game/dtw/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”, “dXNlcjoxMjcuMC4wLjE6Y2h1bnl1MjphODk0OWIyZWZkZWM0MzYwYjEyMWU3NDBmMjMyN2RkYQ==”, )
局_提交协议头 ＝ ADD_协议头.获取协议头数据 ()
局_是否重定向 ＝ 真
局_结果 ＝ 网页_访问_对象 (局_网址, 局_方式, , , , 局_提交协议头, , , 局_是否重定向, , , , , , , , , , )
局_返回 ＝ 到文本 (编码_编码转换对象 (局_结果, , , ))
返回 (局_返回)


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

目标次数就是连续次数
作者: zainex    时间: 7 小时前
在之前的代码的基础上改一下就可以了:
  
窗口程序集名保 留  保 留备 注
窗口程序集_启动窗口   
子程序名返回值类型公开备 注
功能_网页访问文本型 本命令由【精易网页调试助手】生成，请配合精易模块使用。
变量名类 型静态数组备 注
局_网址文本型 
局_方式整数型 
ADD_协议头类_POST数据类 
局_提交协议头文本型 
局_是否重定向逻辑型 
局_结果字节集 
局_返回文本型 
' [url]http://api.ibongfa.com/api/game/wgbjgw/get/list/100[/url]
局_网址 ＝ “http:/” ＋ “/api.ibongfa.com/api/game/dtw/get/list/100”
局_方式 ＝ 1
ADD_协议头.添加 (“usertoken”, “dXNlcjoxMjcuMC4wLjE6Y2h1bnl1MjphODk0OWIyZWZkZWM0MzYwYjEyMWU3NDBmMjMyN2RkYQ==”, )
局_提交协议头 ＝ ADD_协议头.获取协议头数据 ()
局_是否重定向 ＝ 真
局_结果 ＝ 网页_访问_对象 (局_网址, 局_方式, , , , 局_提交协议头, , , 局_是否重定向, , , , , , , , , , )
局_返回 ＝ 到文本 (编码_编码转换对象 (局_结果, , , ))
返回 (局_返回)
子程序名返回值类型公开备 注
_按钮3_被单击  
变量名类 型静态数组备 注
json类_json 
数整数型 
当前文本型 
数组文本型0
数量整数型 
值整数型 
类型文本型 
临时文本型 
成员文本型 
json.解析 (功能_网页访问 ())
数 ＝ 1
判断循环首 (数 ≤ json.成员数 (“data”))
当前 ＝ json.取通用属性 (“data[” ＋ 到文本 (数 － 1) ＋ “]['room_id']”)
类型 ＝ 选择 (到整数 (当前) ％ 2 ＝ 0, “单”, “双”)
数量 ＝ 1
值 ＝ 数 ＋ 1
判断循环首 (值 ≤ json.成员数 (“data”))
成员 ＝ json.取通用属性 (“data[” ＋ 到文本 (值 － 1) ＋ “]['room_id']”)
临时 ＝ 选择 (到整数 (成员) ％ 2 ＝ 0, “单”, “双”)
调试输出 (“!”, 类型, 临时)
如果 (临时 ＝ 类型)
数量 ＝ 数量 ＋ 1
跳出循环 ()
值 ＝ 值 ＋ 1
判断循环尾 ()
调试输出 (数, 数量, 值, 类型)
如果真 (数量 ＝ 3 或 数量 ＝ 4)
调试输出 (“存在”, 数量, 类型)
跳出循环 ()
数 ＝ 值
判断循环尾 ()


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

* “!” | “单” | “双”

* 1 | 1 | 2 | “单”

* “!” | “双” | “单”

* 2 | 1 | 3 | “双”

* “!” | “单” | “单”

* “!” | “单” | “单”

* “!” | “单” | “双”

* 3 | 3 | 6 | “单”

* “存在” | 3 | “单”

被调试易程序运行完毕

作者: chunyu    时间: 6 小时前
cow 发表于 2025-12-25 12:17
[e=0].版本 2
.支持库 spec

不对的我的意思是
就cha询前面的，后面的连续不用管，只要判断前面连续3次单或者双才会跳出循环
比如下面就是为3个单才跳出，后面不用理会  
*“1” | “单”
* “3” | “单”
* “7” | “单”
* “4” | “双”
* “3” | “单”
* “2” | “双”
* “1” | “单”
* “1” | “单”
* “5” | “单”
* “7” | “单”
作者: zainex    时间: 6 小时前
如果只判断单, 把:
  
判断循环首 (值 ≤ json.成员数 (“data”))

改成
  
判断循环首 (类型 ＝ “单” 且 值 ≤ json.成员数 (“data”))

如果数量是 3 4 5 ... N 把:
  
如果真 (数量 ＝ 3 或 数量 ＝ 4)

改成
  
如果真 (数量 ≥ 3)

作者: chunyu    时间: 6 小时前
zainex 发表于 2025-12-25 12:24
在之前的代码的基础上改一下就可以了:
[e=1].版本 2
.支持库 spec

不对的我的意思是
就cha询前面的，后面的连续不用管，只要判断前面连续3次单或者双才会跳出循环
比如下面就是为3个单才跳出，后面不用理会  
*“1” | “单”
* “3” | “单”
* “7” | “单”
* “4” | “双”
* “3” | “单”
* “2” | “双”
* “1” | “单”
* “1” | “单”
* “5” | “单”
* “7” | “单”
作者: chunyu    时间: 6 小时前
zainex 发表于 2025-12-25 12:30
如果只判断单, 把:
判断循环首 (值 ≤ json.成员数 (“data”))
改成

还是分辨不出来的
作者: cow    时间: 6 小时前
chunyu 发表于 2025-12-25 12:30
不对的我的意思是
就cha询前面的，后面的连续不用管，只要判断前面连续3次单或者双才会跳出循环
比如下面 ...
  
子程序名返回值类型公开备 注
_按钮1_被单击  
变量名类 型静态数组备 注
测试记录文本型 
i整数型 
首个类型文本型 
连续次数整数型 
当前类型文本型 
目标次数整数型 
code文本型 
目标次数 ＝ 3
连续次数 ＝ 0
首个类型 ＝ “”
code ＝ 功能_网页访问 ()
json.解析 (code, , )
计次循环首 (30, i)
测试记录 ＝ json.取属性 (“data[” ＋ 到文本 (i － 1) ＋ “]['room_id']”).取数据文本 ()
' 判断当前是单还是双
如果 (测试记录 ＝ “1” 或 测试记录 ＝ “3” 或 测试记录 ＝ “5” 或 测试记录 ＝ “7”)
当前类型 ＝ “单”
当前类型 ＝ “双”

调试输出 (测试记录, 当前类型)
' 第一条，记录类型
如果真 (首个类型 ＝ “”)
首个类型 ＝ 当前类型

' 判断是否和第一条类型相同
如果 (当前类型 ＝ 首个类型)
连续次数 ＝ 连续次数 ＋ 1
如果真 (连续次数 ≥ 目标次数)
调试输出 (“开头连续” ＋ 到文本 (目标次数) ＋ “次” ＋ 首个类型 ＋ “！满足条件！”)
跳出循环 ()

' 类型变了，说明开头没有连续N次，直接退出
调试输出 (“开头只有连续” ＋ 到文本 (连续次数) ＋ “次” ＋ 首个类型 ＋ “，不满足条件”)
跳出循环 ()

计次循环尾 ()


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



补充内容 (2025-12-25 12:37):
[12:36:44] * “7” | “单”
[12:36:44] * “8” | “双”
[12:36:44] * “开头只有连续1次单，不满足条件”
作者: zainex    时间: 6 小时前
  
子程序名返回值类型公开备 注
__启动窗口_创建完毕  
变量名类 型静态数组备 注
json类_json 
第一个文本型 
第二个文本型 
第三个文本型 
json.解析 (功能_网页访问 ())
第一个 ＝ 选择 (到整数 (json.取通用属性 (“data[0]['room_id']”)) ％ 2 ＝ 0, “双”, “单”)
第二个 ＝ 选择 (到整数 (json.取通用属性 (“data[1]['room_id']”)) ％ 2 ＝ 0, “双”, “单”)
第三个 ＝ 选择 (到整数 (json.取通用属性 (“data[2]['room_id']”)) ％ 2 ＝ 0, “双”, “单”)
如果真 (第一个 ＝ 第二个 且 第二个 ＝ 第一个)
调试输出 (“存在3个”, 第一个)


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

* “!” | “单” | “单”

* “!” | “单” | “单”

* “!” | “单” | “双”

* 1 | 3 | 4 | “单”

* “存在” | 3 | “单”

被调试易程序运行完毕

作者: zainex    时间: 6 小时前
  
子程序名返回值类型公开备 注
_按钮3_被单击  
变量名类 型静态数组备 注
json类_json 
数整数型 
当前文本型 
数组文本型0
数量整数型 
值整数型 
类型文本型 
临时文本型 
成员文本型 
' json.解析 (功能_网页访问 ())
数组 ＝ { “1”, “3”, “7”, “4”, “3”, “2”, “1”, “1”, “5”, “7” }
数 ＝ 1
判断循环首 (数 ≤ 取数组成员数 (数组))
当前 ＝ 数组 [数]
类型 ＝ 选择 (到整数 (当前) ％ 2 ＝ 0, “双”, “单”)
数量 ＝ 1
值 ＝ 数 ＋ 1
判断循环首 (值 ≤ 取数组成员数 (数组))
成员 ＝ 数组 [值]
临时 ＝ 选择 (到整数 (成员) ％ 2 ＝ 0, “双”, “单”)
调试输出 (“!”, 类型, 临时)
如果 (临时 ＝ 类型)
数量 ＝ 数量 ＋ 1
跳出循环 ()
值 ＝ 值 ＋ 1
判断循环尾 ()
调试输出 (数, 数量, 值, 类型)
如果真 (数量 ＝ 3)
调试输出 (“存在”, 数量, 类型)
跳出循环 ()
数 ＝ 值
判断循环尾 ()


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

作者: z573277679    时间: 6 小时前
  
子程序名返回值类型公开备 注
_按钮3_被单击  
变量名类 型静态数组备 注
code文本型 
json类_json 
i整数型 
当前数值文本型 
首个类型文本型 
当前类型文本型 
连续次数整数型 
code ＝ 功能_网页访问 ()
json.解析 (code, , )
' 初始化计数
连续次数 ＝ 0
首个类型 ＝ “”
' 循环检查前30个数据（或者用 json.成员数("data")）
计次循环首 (30, i)
' 取出数值
当前数值 ＝ json.取通用属性 (“data[” ＋ 到文本 (i － 1) ＋ “]['room_id']”)
' 判断当前是单还是双 (奇数为单，偶数为双)
如果 (到整数 (当前数值) ％ 2 ≠ 0)
当前类型 ＝ “单”
当前类型 ＝ “双”

' 如果是第1个数据，我们先记录下它的类型作为“基准”
如果真 (i ＝ 1)
首个类型 ＝ 当前类型

' 对比当前类型和首个类型
如果 (当前类型 ＝ 首个类型)
' 如果一样，计数+1
连续次数 ＝ 连续次数 ＋ 1
调试输出 (当前数值 ＋ “ | ” ＋ 当前类型 ＋ “ (连续中...)”)
' 一旦发现不一样，说明开头的连续已经断了，直接跳出循环！
调试输出 (当前数值 ＋ “ | ” ＋ 当前类型 ＋ “ (连续中断，停止扫描)”)
跳出循环 ()

计次循环尾 ()
' 循环结束后，判断是否满足你的条件 (比如 ≥ 3次)
如果真 (连续次数 ≥ 3)
调试输出 (“-----------------------------”)
调试输出 (“结果：满足条件！开头连续出现了 ” ＋ 到文本 (连续次数) ＋ “ 次 ” ＋ 首个类型)
信息框 (“检测到开头连续 ” ＋ 到文本 (连续次数) ＋ “ 个” ＋ 首个类型, 0, , )


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





欢迎光临 精易论坛 (https://bbs.ijingyi.com/) Powered by Discuz! X3.4