哪位大佬帮忙优化下这个子程序，目前效率低下

冰冻生菜

如题，在启动窗口中设置一个载入窗口1的窗口，下面是创建完毕的子程序数据。（用了精易模块）

  

.版本 2.支持库 iext5

窗口程序集名	保 留	保 留	备 注
窗口程序集_窗口1
变量名	类 型	数组	备 注
地块信息	文本型	0
虚拟按钮组a	按钮	0	关于你的按键组
虚拟按钮组b	按钮	0	关于其他用户
植物	文本型	6	公用
JSON1	类_json		专用于时间计算
JSON2	类_json		专用于偷菜
临时数组	整数型	0	把文本型转换为整数型
植物原始名	文本型		有引号，需要根据情况去掉引号
种植时间
成熟时间	日期时间型

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

变量名	类 型	静态	数组	备 注
坐标x	整数型
坐标y	整数型
i	整数型

植物 ＝ { “水稻”, “小麦”, “高粱”, “白菜”, “胡萝卜”, “辣椒” } ' 固定数组
' 加按钮......
重定义数组 (虚拟按钮组a, 假, 16)
坐标x ＝ 按钮1.左边
坐标y ＝ 按钮1.顶边
计次循环首 (16, i)
复制窗口组件 (按钮1, 虚拟按钮组a [i])
虚拟按钮组a [i].标题 ＝ 到文本 (i)
虚拟按钮组a [i].可视 ＝ 真
虚拟按钮组a [i].移动 (坐标x, 坐标y, 按钮1.宽度, 按钮1.高度)
坐标x ＝ 虚拟按钮组a [i].左边 ＋ 虚拟按钮组a [i].宽度 ＋ 17
如果真 (i ％ 4 ＝ 0) ' 每4个按钮空一行
坐标x ＝ 按钮1.左边
坐标y ＝ 坐标y ＋ 虚拟按钮组a [i].高度 ＋ 30

计次循环尾 ()
i ＝ 0
重定义数组 (虚拟按钮组b, 假, 16) ' 这个有无其实都可以
坐标x ＝ 按钮2.左边
坐标y ＝ 按钮2.顶边
计次循环首 (16, i)
复制窗口组件 (按钮2, 虚拟按钮组b [i])
虚拟按钮组b [i].标题 ＝ 到文本 (i)
虚拟按钮组b [i].可视 ＝ 真
虚拟按钮组b [i].移动 (坐标x, 坐标y, 按钮2.宽度, 按钮2.高度)
坐标x ＝ 虚拟按钮组b [i].左边 ＋ 虚拟按钮组b [i].宽度 ＋ 17
如果真 (i ％ 4 ＝ 0) ' 每4个按钮空一行
坐标x ＝ 按钮2.左边
坐标y ＝ 坐标y ＋ 虚拟按钮组b [i].高度 ＋ 30

计次循环尾 ()
窗口1.总在最前 ＝ _启动窗口.总在最前
分组框2.标题 ＝ _启动窗口.分组框3.标题
' 用户自己的地块处理
JSON.解析 (编码_utf8到gb2312 (网页_访问S (“https://ak.hypergryph.com/activity/experimental-plot/api/game/sync”, 1, , COOKIE, , 协议头))) ' 你自己部分的处理
JSON.取所有属性名 (地块信息, “data.doc.lands”)
标签1.标题 ＝ 文本_替换 (标签1.标题, , , , “XX”, 到文本 (取数组成员数 (地块信息)))
计次循环首 (16, i) ' 把文本型数组转换为整数型数组
加入成员 (临时数组, 到数值 (地块信息 [i]))
如果真 (i ＝ 取数组成员数 (地块信息)) ' 防止超过数组成员数导致崩溃
跳出循环 ()

计次循环尾 ()
计次循环首 (16, i) ' 屏蔽所有按钮
虚拟按钮组a [i].禁止 ＝ 真
计次循环尾 ()
计次循环首 (取数组成员数 (地块信息), i) ' 根据地块信息的地块解禁按钮和初步获取时间
虚拟按钮组a [临时数组 [i]].禁止 ＝ 假
计次循环首 (取数组成员数 (地块信息), i)
判断 (JSON.取属性对象 (“data.doc.lands['” ＋ 到文本 (临时数组 [i]) ＋ “'].crop”) ＝ “null”) ' 什么都没取到的情况，请注意，这个气泡提示框应该在后面加。可以把此处的i或此处的数组成员数保存下来，以留备用。请新建一个新的计次循环
气球提示框1.关联组件 (虚拟按钮组a [临时数组 [i]], “这块地什么都没种！”, -1, , , 虚拟按钮组a [临时数组 [i]].宽度, 虚拟按钮组a [临时数组 [i]].高度)
植物原始名 ＝ JSON.取属性对象 (“data.doc.lands['” ＋ 到文本 (临时数组 [i]) ＋ “'].crop.id”)
种植时间 ＝ JSON.取属性数值 (“data.doc.lands['” ＋ 到文本 (临时数组 [i]) ＋ “'].crop.plantAt”) ' 10位时间戳
JSON1.解析 (编码_utf8到gb2312 (网页_访问S (“https://ak.hypergryph.com/activity/experimental-plot/api/game/shop”, , , COOKIE, , 协议头))) ' 取商店中成熟时间然后与种植时间相加。
成熟时间 ＝ 增减时间 (到时间 (时间_时间戳转文本 (到文本 (种植时间))), 6, 到整数 (JSON1.取属性对象 (“data['” ＋ 文本_替换 (植物原始名, , , , #引号, “”) ＋ “'].duration”)))
气球提示框1.关联组件 (虚拟按钮组a [临时数组 [i]], “这块地种了” ＋ 文本_替换 (文本_替换 (植物原始名, , , , “crop_1”, 植物 [1], “crop_2”, 植物 [2], “crop_3”, 植物 [3], “crop_4”, 植物 [4], “crop_5”, 植物 [5]), , , , “crop_6”, 植物 [6], #引号, “”) ＋ “。” ＋ #换行符 ＋ 到文本 (成熟时间) ＋ “成熟，还剩：” ＋ 时间_取时间间隔 (成熟时间, 取现行时间 ()) ＋ #换行符, -1, , , 虚拟按钮组a [临时数组 [i]].宽度, 虚拟按钮组a [临时数组 [i]].高度)

计次循环尾 ()
计次循环尾 ()
重定义数组 (临时数组, 假, 0) ' 清理数组
i ＝ 0
' 其他人的地块处理
判断 (分组框2.标题 ＝ “其他用户的地块数据”)
信息框 (“对不起，你没有获取其他人的地块数据，其功能将不可用！只可以用来摘自己的菜！” ＋ #换行符 ＋ “如果想激活此功能，请获取他人数据后再点击偷菜按钮！”, 48, “温馨提示”, )
窗口1.宽度 ＝ 415
JSON.解析 (编码_utf8到gb2312 (网页_访问S (“https://ak.hypergryph.com/activity/experimental-plot/api/game/player”, 1, “uid=” ＋ _启动窗口.标签49.标题, COOKIE, , 协议头)))
JSON.取所有属性名 (地块信息, “data.friendDoc.lands”)
标签2.标题 ＝ 文本_替换 (标签2.标题, , , , “XX”, 到文本 (取数组成员数 (地块信息)))
调试输出 (地块信息)
计次循环首 (16, i)
加入成员 (临时数组, 到数值 (地块信息 [i]))
如果真 (i ＝ 取数组成员数 (地块信息))
跳出循环 ()

计次循环尾 ()
计次循环首 (16, i)
虚拟按钮组b [i].禁止 ＝ 真
计次循环尾 ()
计次循环首 (取数组成员数 (地块信息), i)
虚拟按钮组b [临时数组 [i]].禁止 ＝ 假
计次循环首 (取数组成员数 (地块信息), i)
判断 (JSON.取属性对象 (“data.friendDoc.lands['” ＋ 到文本 (临时数组 [i]) ＋ “'].crop”) ＝ “null”) ' 什么都没取到的情况，请注意，这个气泡提示框应该在后面加。可以把此处的i或此处的数组成员数保存下来，以留备用。请新建一个新的计次循环
气球提示框2.关联组件 (虚拟按钮组b [临时数组 [i]], “这块地什么都没种！”, -1, , , 虚拟按钮组b [临时数组 [i]].宽度, 虚拟按钮组b [临时数组 [i]].高度)
植物原始名 ＝ JSON.取属性对象 (“data.friendDoc.lands['” ＋ 到文本 (临时数组 [i]) ＋ “'].crop.id”)
种植时间 ＝ JSON.取属性数值 (“data.friendDoc.lands['” ＋ 到文本 (临时数组 [i]) ＋ “'].crop.plantAt”) ' 10位时间戳
JSON1.解析 (编码_utf8到gb2312 (网页_访问S (“https://ak.hypergryph.com/activity/experimental-plot/api/game/shop”, , , COOKIE, , 协议头))) ' 取商店中成熟时间然后与种植时间相加。
成熟时间 ＝ 增减时间 (到时间 (时间_时间戳转文本 (到文本 (种植时间))), 6, 到整数 (JSON1.取属性对象 (“data['” ＋ 文本_替换 (植物原始名, , , , #引号, “”) ＋ “'].duration”)))
气球提示框2.关联组件 (虚拟按钮组b [临时数组 [i]], “这块地种了” ＋ 文本_替换 (文本_替换 (植物原始名, , , , “crop_1”, 植物 [1], “crop_2”, 植物 [2], “crop_3”, 植物 [3], “crop_4”, 植物 [4], “crop_5”, 植物 [5]), , , , “crop_6”, 植物 [6], #引号, “”) ＋ “。” ＋ #换行符 ＋ 到文本 (成熟时间) ＋ “成熟，还剩：” ＋ 时间_取时间间隔 (成熟时间, 取现行时间 ()) ＋ #换行符, -1, , , 虚拟按钮组b [临时数组 [i]].宽度, 虚拟按钮组b [临时数组 [i]].高度)

计次循环尾 ()
计次循环尾 ()
按钮1.移动 (-999, -999, -999, -999) ' 两个按键仅为复制之用，原始按钮需要移走到用户看不到的地方，否则无法给复制出来的虚拟按钮绑定子程序。
按钮2.移动 (-999, -999, -999, -999)
延迟 (1500)
时钟1.时钟周期 ＝ 0
时钟2.时钟周期 ＝ 0

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

.版本 2.支持库 iext5<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_窗口1<br /> .程序集变量 地块信息, 文本型, , "0"<br /> .程序集变量 虚拟按钮组a, 按钮, , "0", 关于你的按键组<br /> .程序集变量 虚拟按钮组b, 按钮, , "0", 关于其他用户<br /> .程序集变量 植物, 文本型, , "6", 公用<br /> .程序集变量 JSON1, 类_json, , , 专用于时间计算<br /> .程序集变量 JSON2, 类_json, , , 专用于偷菜<br /> .程序集变量 临时数组, 整数型, , "0", 把文本型转换为整数型<br /> .程序集变量 植物原始名, 文本型, , , 有引号，需要根据情况去掉引号<br /> .程序集变量 种植时间<br /> .程序集变量 成熟时间, 日期时间型<br /> <br /> .子程序 _窗口1_创建完毕<br /> .局部变量 坐标x, 整数型<br /> .局部变量 坐标y, 整数型<br /> .局部变量 i, 整数型<br /> <br /> 植物 ＝ { “水稻”, “小麦”, “高粱”, “白菜”, “胡萝卜”, “辣椒” } ' 固定数组<br /> ' 加按钮......<br /> 重定义数组 (虚拟按钮组a, 假, 16)<br /> 坐标x ＝ 按钮1.左边<br /> 坐标y ＝ 按钮1.顶边<br /> .计次循环首 (16, i)<br /> 复制窗口组件 (按钮1, 虚拟按钮组a <i>)<br /> 虚拟按钮组a <i>.标题 ＝ 到文本 (i)<br /> 虚拟按钮组a <i>.可视 ＝ 真<br /> 虚拟按钮组a <i>.移动 (坐标x, 坐标y, 按钮1.宽度, 按钮1.高度)<br /> 坐标x ＝ 虚拟按钮组a <i>.左边 ＋ 虚拟按钮组a <i>.宽度 ＋ 17<br /> .如果真 (i ％ 4 ＝ 0) ' 每4个按钮空一行<br /> 坐标x ＝ 按钮1.左边<br /> 坐标y ＝ 坐标y ＋ 虚拟按钮组a <i>.高度 ＋ 30<br /> .如果真结束<br /> <br /> .计次循环尾 ()<br /> i ＝ 0<br /> 重定义数组 (虚拟按钮组b, 假, 16) ' 这个有无其实都可以<br /> 坐标x ＝ 按钮2.左边<br /> 坐标y ＝ 按钮2.顶边<br /> .计次循环首 (16, i)<br /> 复制窗口组件 (按钮2, 虚拟按钮组b <i>)<br /> 虚拟按钮组b <i>.标题 ＝ 到文本 (i)<br /> 虚拟按钮组b <i>.可视 ＝ 真<br /> 虚拟按钮组b <i>.移动 (坐标x, 坐标y, 按钮2.宽度, 按钮2.高度)<br /> 坐标x ＝ 虚拟按钮组b <i>.左边 ＋ 虚拟按钮组b <i>.宽度 ＋ 17<br /> .如果真 (i ％ 4 ＝ 0) ' 每4个按钮空一行<br /> 坐标x ＝ 按钮2.左边<br /> 坐标y ＝ 坐标y ＋ 虚拟按钮组b <i>.高度 ＋ 30<br /> .如果真结束<br /> <br /> .计次循环尾 ()<br /> 窗口1.总在最前 ＝ _启动窗口.总在最前<br /> 分组框2.标题 ＝ _启动窗口.分组框3.标题<br /> ' 用户自己的地块处理<br /> JSON.解析 (编码_utf8到gb2312 (网页_访问S (“https://ak.hypergryph.com/activity/experimental-plot/api/game/sync”, 1, , COOKIE, , 协议头))) ' 你自己部分的处理<br /> JSON.取所有属性名 (地块信息, “data.doc.lands”)<br /> 标签1.标题 ＝ 文本_替换 (标签1.标题, , , , “XX”, 到文本 (取数组成员数 (地块信息)))<br /> <br /> .计次循环首 (16, i) ' 把文本型数组转换为整数型数组<br /> 加入成员 (临时数组, 到数值 (地块信息 <i>))<br /> .如果真 (i ＝ 取数组成员数 (地块信息)) ' 防止超过数组成员数导致崩溃<br /> 跳出循环 ()<br /> .如果真结束<br /> <br /> .计次循环尾 ()<br /> .计次循环首 (16, i) ' 屏蔽所有按钮<br /> 虚拟按钮组a <i>.禁止 ＝ 真<br /> .计次循环尾 ()<br /> .计次循环首 (取数组成员数 (地块信息), i) ' 根据地块信息的地块解禁按钮和初步获取时间<br /> 虚拟按钮组a [临时数组 <i>].禁止 ＝ 假<br /> .计次循环首 (取数组成员数 (地块信息), i)<br /> .判断开始 (JSON.取属性对象 (“data.doc.lands['” ＋ 到文本 (临时数组 <i>) ＋ “'].crop”) ＝ “null”) ' 什么都没取到的情况，请注意，这个气泡提示框应该在后面加。可以把此处的i或此处的数组成员数保存下来，以留备用。请新建一个新的计次循环<br /> 气球提示框1.关联组件 (虚拟按钮组a [临时数组 <i>], “这块地什么都没种！”, -1, , , 虚拟按钮组a [临时数组 <i>].宽度, 虚拟按钮组a [临时数组 <i>].高度)<br /> .默认<br /> 植物原始名 ＝ JSON.取属性对象 (“data.doc.lands['” ＋ 到文本 (临时数组 <i>) ＋ “'].crop.id”)<br /> 种植时间 ＝ JSON.取属性数值 (“data.doc.lands['” ＋ 到文本 (临时数组 <i>) ＋ “'].crop.plantAt”) ' 10位时间戳<br /> JSON1.解析 (编码_utf8到gb2312 (网页_访问S (“https://ak.hypergryph.com/activity/experimental-plot/api/game/shop”, , , COOKIE, , 协议头))) ' 取商店中成熟时间然后与种植时间相加。<br /> 成熟时间 ＝ 增减时间 (到时间 (时间_时间戳转文本 (到文本 (种植时间))), 6, 到整数 (JSON1.取属性对象 (“data['” ＋ 文本_替换 (植物原始名, , , , #引号, “”) ＋ “'].duration”)))<br /> 气球提示框1.关联组件 (虚拟按钮组a [临时数组 <i>], “这块地种了” ＋ 文本_替换 (文本_替换 (植物原始名, , , , “crop_1”, 植物 [1], “crop_2”, 植物 [2], “crop_3”, 植物 [3], “crop_4”, 植物 [4], “crop_5”, 植物 [5]), , , , “crop_6”, 植物 [6], #引号, “”) ＋ “。” ＋ #换行符 ＋ 到文本 (成熟时间) ＋ “成熟，还剩：” ＋ 时间_取时间间隔 (成熟时间, 取现行时间 ()) ＋ #换行符, -1, , , 虚拟按钮组a [临时数组 <i>].宽度, 虚拟按钮组a [临时数组 <i>].高度)<br /> .判断结束<br /> <br /> .计次循环尾 ()<br /> <br /> .计次循环尾 ()<br /> 重定义数组 (临时数组, 假, 0) ' 清理数组<br /> i ＝ 0<br /> ' 其他人的地块处理<br /> .判断开始 (分组框2.标题 ＝ “其他用户的地块数据”)<br /> 信息框 (“对不起，你没有获取其他人的地块数据，其功能将不可用！只可以用来摘自己的菜！” ＋ #换行符 ＋ “如果想激活此功能，请获取他人数据后再点击偷菜按钮！”, 48, “温馨提示”, )<br /> 窗口1.宽度 ＝ 415<br /> .默认<br /> JSON.解析 (编码_utf8到gb2312 (网页_访问S (“https://ak.hypergryph.com/activity/experimental-plot/api/game/player”, 1, “uid=” ＋ _启动窗口.标签49.标题, COOKIE, , 协议头)))<br /> JSON.取所有属性名 (地块信息, “data.friendDoc.lands”)<br /> 标签2.标题 ＝ 文本_替换 (标签2.标题, , , , “XX”, 到文本 (取数组成员数 (地块信息)))<br /> 调试输出 (地块信息)<br /> .计次循环首 (16, i)<br /> 加入成员 (临时数组, 到数值 (地块信息 <i>))<br /> .如果真 (i ＝ 取数组成员数 (地块信息))<br /> 跳出循环 ()<br /> .如果真结束<br /> <br /> .计次循环尾 ()<br /> .计次循环首 (16, i)<br /> 虚拟按钮组b <i>.禁止 ＝ 真<br /> .计次循环尾 ()<br /> <br /> .计次循环首 (取数组成员数 (地块信息), i)<br /> 虚拟按钮组b [临时数组 <i>].禁止 ＝ 假<br /> .计次循环首 (取数组成员数 (地块信息), i)<br /> .判断开始 (JSON.取属性对象 (“data.friendDoc.lands['” ＋ 到文本 (临时数组 <i>) ＋ “'].crop”) ＝ “null”) ' 什么都没取到的情况，请注意，这个气泡提示框应该在后面加。可以把此处的i或此处的数组成员数保存下来，以留备用。请新建一个新的计次循环<br /> 气球提示框2.关联组件 (虚拟按钮组b [临时数组 <i>], “这块地什么都没种！”, -1, , , 虚拟按钮组b [临时数组 <i>].宽度, 虚拟按钮组b [临时数组 <i>].高度)<br /> .默认<br /> 植物原始名 ＝ JSON.取属性对象 (“data.friendDoc.lands['” ＋ 到文本 (临时数组 <i>) ＋ “'].crop.id”)<br /> 种植时间 ＝ JSON.取属性数值 (“data.friendDoc.lands['” ＋ 到文本 (临时数组 <i>) ＋ “'].crop.plantAt”) ' 10位时间戳<br /> JSON1.解析 (编码_utf8到gb2312 (网页_访问S (“https://ak.hypergryph.com/activity/experimental-plot/api/game/shop”, , , COOKIE, , 协议头))) ' 取商店中成熟时间然后与种植时间相加。<br /> 成熟时间 ＝ 增减时间 (到时间 (时间_时间戳转文本 (到文本 (种植时间))), 6, 到整数 (JSON1.取属性对象 (“data['” ＋ 文本_替换 (植物原始名, , , , #引号, “”) ＋ “'].duration”)))<br /> 气球提示框2.关联组件 (虚拟按钮组b [临时数组 <i>], “这块地种了” ＋ 文本_替换 (文本_替换 (植物原始名, , , , “crop_1”, 植物 [1], “crop_2”, 植物 [2], “crop_3”, 植物 [3], “crop_4”, 植物 [4], “crop_5”, 植物 [5]), , , , “crop_6”, 植物 [6], #引号, “”) ＋ “。” ＋ #换行符 ＋ 到文本 (成熟时间) ＋ “成熟，还剩：” ＋ 时间_取时间间隔 (成熟时间, 取现行时间 ()) ＋ #换行符, -1, , , 虚拟按钮组b [临时数组 <i>].宽度, 虚拟按钮组b [临时数组 <i>].高度)<br /> .判断结束<br /> <br /> .计次循环尾 ()<br /> <br /> .计次循环尾 ()<br /> .判断结束<br /> 按钮1.移动 (-999, -999, -999, -999) ' 两个按键仅为复制之用，原始按钮需要移走到用户看不到的地方，否则无法给复制出来的虚拟按钮绑定子程序。<br /> 按钮2.移动 (-999, -999, -999, -999)<br /> 延迟 (1500)<br /> 时钟1.时钟周期 ＝ 0<br /> 时钟2.时钟周期 ＝ 0

感觉加了某个循环后程序执行效率特别低，做不到秒开窗口1了，但就是找不到问题是什么。

你华总i

别把精币当人民币使

chaoup

               

only3880

类_json,换成zyjson，精易的类_json效率很低

月下美孤

问题是你没开多线程

憨憨问号

答：不可能有人解答，因为要求过于复杂，这是定制区的任务，精币不是人民币，结贴吧

Ahdbh

换个JSON解析，网页访问测一下访问速度