|
发表于 2022-4-20 19:09:02
|
显示全部楼层
福建省福州市
本帖最后由 风行无忌 于 2022-4-20 19:35 编辑
变量名 | 类 型 | 静态 | 数组 | 备 注 | t2 | 整数型 | | | json | yyJSON解析 | | | 键数组 | 文本型 | | 0 | i | 整数型 | | | ii | 整数型 | | | status | 逻辑型 | | | json1 | yyJSON构造 | | | json2 | yyJSON构造 | | | json3 | yyJSON构造 | | | ptr | 整数型 | | | 键 | 文本型 | | | 句柄 | 整数型 | | | inventory | 整数型 | | | tierTypeHash | 长整数型 | | | bucketTypeHash | 长整数型 | | | name | 文本型 | | |
编辑框4. 加入文本 (“yyjson启动线程 | ”, 到文本 (t ), “ms”, #换行符 )json1. 创建_空对象 ()json2. 创建_空对象 ()json3. 创建_空对象 ()计次循环首 (取数组成员数 (路径 ), i )t2 = 取启动时间 ()status = json. 解析_文件 (路径 [i ], #YYJSON_READ_NOFLAG )编辑框4. 加入文本 (“yyjson打开文件 ”, 到文本 (i ), “ | ”, 到文本 (status ), “ | ”, 到文本 (取启动时间 () - t2 ), “ms”, #换行符 )t2 = 取启动时间 ()如果真 (json. 对象_枚举初始化 ()) 判断循环首 (json. 对象_枚举 (键, 句柄 )) name = json. 通配_取文本 (句柄, “/displayProperties/name”)如果真 (name = “”)到循环尾 ()inventory = json.取句柄 (句柄, “inventory”)bucketTypeHash = json. 取长整数 (inventory, “bucketTypeHash”)tierTypeHash = json. 取长整数 (inventory, “tierTypeHash”)判断 (bucketTypeHash = 953998645 且 tierTypeHash = 4008398120 )ptr = json1. 通配_取句柄 (, “/” + 键 + “/name”)如果真 (ptr = 0 )ptr = json1. 通配_置空数组 (, “/” + 键 + “/name”)json1.数组_置文本 (ptr, -1, UTF8文本到文本 (name))如果真 (i = 1 )json1. 通配_置文本 (, “/” + 键 + “/url”, “https://www.bungie.net” + json. 通配_取文本 (句柄, “/displayProperties/icon”)) 判断 (bucketTypeHash = 2465295065 且 tierTypeHash = 4008398120 )ptr = json2. 通配_取句柄 (, “/” + 键 + “/name”)如果真 (ptr = 0 )ptr = json2. 通配_置空数组 (, “/” + 键 + “/name”)json2.数组_置文本 (ptr, -1, UTF8文本到文本 (name))如果真 (i = 1 )json2. 通配_置文本 (, “/” + 键 + “/url”, “https://www.bungie.net” + json. 通配_取文本 (句柄, “/displayProperties/icon”)) 判断 (bucketTypeHash = 1498876634 且 tierTypeHash = 4008398120 )ptr = json3. 通配_取句柄 (, “/” + 键 + “/name”)如果真 (ptr = 0 )ptr = json3. 通配_置空数组 (, “/” + 键 + “/name”)json3.数组_置文本 (ptr, -1, UTF8文本到文本 (name))如果真 (i = 1 )json3. 通配_置文本 (, “/” + 键 + “/url”, “https://www.bungie.net” + json. 通配_取文本 (句柄, “/displayProperties/icon”)) 判断循环尾 ()编辑框4. 加入文本 (“yyjson数据处理 ”, 到文本 (i ), “ | ”, 到文本 (取启动时间 () - t2 ), “ms”, #换行符 )计次循环尾 ()t2 = 取启动时间 ()写到文件 (取运行目录 () + “\Saves\yydll953998645.json”, 文本到UTF8 (json1. 到JSON ( #YYJSON_READ_ANSI )) )写到文件 (取运行目录 () + “\Saves\yydll2465295065.json”, 文本到UTF8 (json2. 到JSON ( #YYJSON_READ_ANSI )) )写到文件 (取运行目录 () + “\Saves\yydll1498876634.json”, 文本到UTF8 (json3. 到JSON ( #YYJSON_READ_ANSI )) )编辑框4. 加入文本 (“yyjson保存文件 | ”, 到文本 (取启动时间 () - t2 ), “ms”, #换行符 )编辑框4. 加入文本 (“yyjson结束 | ”, 到文本 (取启动时间 () - t ), “ms”)
yyjson换群主这个写法试试
|
|