关于数组的相关问题！！！

小竺 · 发表于 2024-12-22 18:58:57

本来小白菜一颗，该问题已经搞了两个夜晚！

求大佬帮忙！想学习！眼睛都熬钟了

https://share.weiyun.com/HZpb4kPZ 文件有点大上传不了
下面附上代码

窗口程序集名	保留	保留	备注
窗口程序集_启动窗口
变量名	类型	数组	备注
句柄	整数型
绘制句柄	整数型
返回信息	结果信息	0	0
总数	整数型
i	整数型
截图	字节集
待找图片	字节集
行文本组	文本型	0
开关	整数型

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

' 句柄＝ _启动窗口.取窗口句柄 ()
开关＝ 2
' 待找图片＝图片_屏幕区域截图 (1247, 1351, 70, 70)
' 图片框1.图片＝待找图片
待找图片＝图片框1.图片
延迟 (500)
图片框1.图片＝待找图片
截图＝图片_屏幕截图 (取屏幕宽度 (), 取屏幕高度 (), )
延迟 (500)
输出调试文本 (模板匹配libmatch (截图, 待找图片, 组合框1.取项目数值 (组合框1.现行选中项), 到小数 (编辑框1.内容), 0.25, 返回信息))
总数＝取数组成员数 (返回信息)
' 调试输出 (总数, 组合框1.取项目数值 (组合框1.现行选中项))
创建绘制 (“启动测试”, , , 取屏幕宽度 (), 取屏幕高度 (), &绘制测试, 2)
输出调试文本 (总数)
' 编辑框2.内容＝到文本 (返回信息)
' 消息循环 ()

子程序名	返回值类型	公开	备注
绘制测试			DX11绘制

' 刷新窗口 (句柄, 绘制句柄)

计次循环首 (总数, i)

判断 (开关＝ 1)

' 跳出循环 ()

销毁绘制 ()

线条绘制 (返回信息 [i].x, 返回信息 [i].y, 返回信息 [i].x ＋返回信息 [i].宽度, 返回信息 [i].y, #绿色, 3, 255) ' 上面左到右一条横线

线条绘制 (返回信息 [i].x ＋返回信息 [i].宽度, 返回信息 [i].y, 返回信息 [i].x ＋返回信息 [i].宽度, 返回信息 [i].y ＋返回信息 [i].高度, #绿色, 3, 255) ' 宽度右边的一条竖线

线条绘制 (返回信息 [i].x, 返回信息 [i].y ＋返回信息 [i].高度, 返回信息 [i].x ＋返回信息 [i].宽度, 返回信息 [i].y ＋返回信息 [i].高度, #绿色, 3, 255) ' 下边左边往右边画直线

线条绘制 (返回信息 [i].x, 返回信息 [i].y, 返回信息 [i].x, 返回信息 [i].y ＋返回信息 [i].高度, #绿色, 3, 255) ' 下边左边往右边画直线

' 矩形绘制 (返回信息 [i].x － 12, 返回信息 [i].y － 17, 80, 80, #绿色, 255)

文本绘制 (返回信息 [i].x, 返回信息 [i].y － 50, “相似率：” ＋到文本 (返回信息 [i].相似率) ＋ #换行符＋ “X,Y 坐标=” ＋到文本 (返回信息 [i].x) ＋ “，” ＋到文本 (返回信息 [i].y), 15, #红色, #绿色, 1)

调试输出 (返回信息 [i].x, 返回信息 [i].x, 返回信息 [i].相似率)

' 编辑框2.内容＝编辑框2.内容＋ #换行符＋ “相似率：” ＋到文本 (返回信息 [i].相似率) ＋ #换行符＋ #换行符＋ “X,Y 坐标=” ＋到文本 (返回信息 [i].x) ＋ “，” ＋到文本 (返回信息 [i].y)

判断开始断 (返回信息 [i].相似率 ≠ 0)

' 开关＝ 1

' 鼠标_移动 (, 返回信息 [i].x ＋ 10, 返回信息 [i].y ＋ 10)

' 延迟 (500)

' 鼠标_按键 (1, 2)

' 行文本组＝分割文本 (返回信息, #换行符, )

' 行文本组

计次循环尾 ()

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

变量名	类型	静态	数组	备注
返回信息	结果信息		0	0
总数	整数型
i	整数型

模板匹配定位libmatch (画板1.底图, 图片框1.图片, 组合框1.取项目数值 (组合框1.现行选中项), 到小数 (编辑框1.内容), 0.25, 返回信息)
总数＝取数组成员数 (返回信息)
调试输出 (总数, 组合框1.取项目数值 (组合框1.现行选中项))
画板1.清除 (, , , )

计次循环首 (总数, i)

画板1.画直线 (返回信息 [i].x, 返回信息 [i].y, 返回信息 [i].x ＋返回信息 [i].宽度, 返回信息 [i].y) ' 上面左到右一条横线

画板1.画直线 (返回信息 [i].x ＋返回信息 [i].宽度, 返回信息 [i].y, 返回信息 [i].x ＋返回信息 [i].宽度, 返回信息 [i].y ＋返回信息 [i].高度) ' 宽度右边的一条竖线

画板1.画直线 (返回信息 [i].x, 返回信息 [i].y ＋返回信息 [i].高度, 返回信息 [i].x ＋返回信息 [i].宽度, 返回信息 [i].y ＋返回信息 [i].高度) ' 下边左边往右边画直线

画板1.画直线 (返回信息 [i].x, 返回信息 [i].y, 返回信息 [i].x, 返回信息 [i].y ＋返回信息 [i].高度) ' 下边左边往右边画直线

画板1.定位写出 (返回信息 [i].x, 返回信息 [i].y, 返回信息 [i].相似率)

计次循环尾 ()

子程序名	返回值类型	公开	备注
_画板1_鼠标左键被按下	逻辑型
参数名	类型	参考	可空	数组	备注
横向位置	整数型
纵向位置	整数型
功能键状态	整数型

画板1.底图＝快照 (, 2559, 1438)

子程序名	返回值类型	公开	备注
_图片框1_鼠标左键被按下	逻辑型
参数名	类型	参考	可空	数组	备注
横向位置	整数型
纵向位置	整数型
功能键状态	整数型

变量名	类型	静态	数组	备注
strz	文本型		0

strz ＝多文件对话框 (“”, , , 取特定目录 (3), , )

如果真 (取数组成员数 (strz) ≥ 1)

图片框1.图片＝读入文件 (strz [1])

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

组合框1.现行选中项＝ 2
' 画板1.底图＝快照 (, 取屏幕宽度 (), 取屏幕高度 ())
' 1249,1355
' 大小 60*60

子程序名	返回值类型	公开	备注
__启动窗口_将被销毁

销毁绘制 ()
结束 ()

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

开关＝ 1
销毁绘制 ()

i支持库列表	支持库注释
spec	特殊功能支持库
shell	操作系统界面功能支持库

.版本 2<br />
.支持库 spec<br />
.支持库 shell<br />
<br />
.程序集 窗口程序集_启动窗口<br />
.程序集变量 句柄, 整数型<br />
.程序集变量 绘制句柄, 整数型<br />
.程序集变量 返回信息, 结果信息, , "0", 0<br />
.程序集变量 总数, 整数型<br />
.程序集变量 i, 整数型<br />
.程序集变量 截图, 字节集<br />
.程序集变量 待找图片, 字节集<br />
.程序集变量 行文本组, 文本型, , "0"<br />
.程序集变量 开关, 整数型<br />
<br />
.子程序 _按钮1_被单击<br />
<br />
' 句柄 ＝ _启动窗口.取窗口句柄 ()<br />
开关 ＝ 2<br />
<br />
<br />
<br />
' 待找图片 ＝ 图片_屏幕区域截图 (1247, 1351, 70, 70)<br />
' 图片框1.图片 ＝ 待找图片<br />
待找图片 ＝ 图片框1.图片<br />
延迟 (500)<br />
图片框1.图片 ＝ 待找图片<br />
<br />
<br />
截图 ＝ 图片_屏幕截图 (取屏幕宽度 (), 取屏幕高度 (), )<br />
延迟 (500)<br />
输出调试文本 (模板匹配libmatch (截图, 待找图片, 组合框1.取项目数值 (组合框1.现行选中项), 到小数 (编辑框1.内容), 0.25, 返回信息))<br />
<br />
总数 ＝ 取数组成员数 (返回信息)<br />
' 调试输出 (总数, 组合框1.取项目数值 (组合框1.现行选中项))<br />
创建绘制 (“启动测试”, , , 取屏幕宽度 (), 取屏幕高度 (), &绘制测试, 2)<br />
<br />
<br />
<br />
<br />
输出调试文本 (总数)<br />
' 编辑框2.内容 ＝ 到文本 (返回信息)<br />
' 消息循环 ()<br />
<br />
.子程序 绘制测试, , , DX11绘制<br />
<br />
' 刷新窗口 (句柄, 绘制句柄)<br />
<br />
.计次循环首 (总数, i)<br />
    .判断开始 (开关 ＝ 1)<br />
        ' 跳出循环 ()<br />
        销毁绘制 ()<br />
    .默认<br />
        线条绘制 (返回信息 <i>.x, 返回信息 <i>.y, 返回信息 <i>.x ＋ 返回信息 <i>.宽度, 返回信息 <i>.y, #绿色, 3, 255)  ' 上面左到右一条横线<br />
        线条绘制 (返回信息 <i>.x ＋ 返回信息 <i>.宽度, 返回信息 <i>.y, 返回信息 <i>.x ＋ 返回信息 <i>.宽度, 返回信息 <i>.y ＋ 返回信息 <i>.高度, #绿色, 3, 255)  ' 宽度右边的一条竖线<br />
        线条绘制 (返回信息 <i>.x, 返回信息 <i>.y ＋ 返回信息 <i>.高度, 返回信息 <i>.x ＋ 返回信息 <i>.宽度, 返回信息 <i>.y ＋ 返回信息 <i>.高度, #绿色, 3, 255)  ' 下边 左边往右边画直线<br />
        线条绘制 (返回信息 <i>.x, 返回信息 <i>.y, 返回信息 <i>.x, 返回信息 <i>.y ＋ 返回信息 <i>.高度, #绿色, 3, 255)  ' 下边 左边往右边画直线<br />
        ' 矩形绘制 (返回信息 <i>.x － 12, 返回信息 <i>.y － 17, 80, 80, #绿色, 255)<br />
<br />
        文本绘制 (返回信息 <i>.x, 返回信息 <i>.y － 50, “相似率：” ＋ 到文本 (返回信息 <i>.相似率) ＋ #换行符 ＋ “X,Y 坐标=” ＋ 到文本 (返回信息 <i>.x) ＋ “，” ＋ 到文本 (返回信息 <i>.y), 15, #红色, #绿色, 1)<br />
<br />
<br />
        调试输出 (返回信息 <i>.x, 返回信息 <i>.x, 返回信息 <i>.相似率)<br />
        ' 编辑框2.内容 ＝ 编辑框2.内容 ＋ #换行符 ＋ “相似率：” ＋ 到文本 (返回信息 <i>.相似率) ＋ #换行符 ＋ #换行符 ＋ “X,Y 坐标=” ＋ 到文本 (返回信息 <i>.x) ＋ “，” ＋ 到文本 (返回信息 <i>.y)<br />
<br />
<br />
<br />
        .判断开始断 (返回信息 <i>.相似率 ≠ 0)<br />
            ' 开关 ＝ 1<br />
            ' 鼠标_移动 (, 返回信息 <i>.x ＋ 10, 返回信息 <i>.y ＋ 10)<br />
            ' 延迟 (500)<br />
            ' 鼠标_按键 (1, 2)<br />
<br />
        .默认<br />
<br />
        .判断结束<br />
<br />
    .判断结束<br />
    ' 行文本组 ＝ 分割文本 (返回信息, #换行符, )<br />
<br />
    ' 行文本组<br />
.计次循环尾 ()<br />
<br />
<br />
<br />
.子程序 _按钮2_被单击<br />
.局部变量 返回信息, 结果信息, , "0", 0<br />
.局部变量 总数, 整数型<br />
.局部变量 i, 整数型<br />
<br />
<br />
模板匹配定位libmatch (画板1.底图, 图片框1.图片, 组合框1.取项目数值 (组合框1.现行选中项), 到小数 (编辑框1.内容), 0.25, 返回信息)<br />
总数 ＝ 取数组成员数 (返回信息)<br />
调试输出 (总数, 组合框1.取项目数值 (组合框1.现行选中项))<br />
画板1.清除 (, , , )<br />
.计次循环首 (总数, i)<br />
    画板1.画直线 (返回信息 <i>.x, 返回信息 <i>.y, 返回信息 <i>.x ＋ 返回信息 <i>.宽度, 返回信息 <i>.y)  ' 上面左到右一条横线<br />
    画板1.画直线 (返回信息 <i>.x ＋ 返回信息 <i>.宽度, 返回信息 <i>.y, 返回信息 <i>.x ＋ 返回信息 <i>.宽度, 返回信息 <i>.y ＋ 返回信息 <i>.高度)  ' 宽度右边的一条竖线<br />
    画板1.画直线 (返回信息 <i>.x, 返回信息 <i>.y ＋ 返回信息 <i>.高度, 返回信息 <i>.x ＋ 返回信息 <i>.宽度, 返回信息 <i>.y ＋ 返回信息 <i>.高度)  ' 下边 左边往右边画直线<br />
    画板1.画直线 (返回信息 <i>.x, 返回信息 <i>.y, 返回信息 <i>.x, 返回信息 <i>.y ＋ 返回信息 <i>.高度)  ' 下边 左边往右边画直线<br />
    画板1.定位写出 (返回信息 <i>.x, 返回信息 <i>.y, 返回信息 <i>.相似率)<br />
.计次循环尾 ()<br />
<br />
<br />
.子程序 _画板1_鼠标左键被按下, 逻辑型<br />
.参数 横向位置, 整数型<br />
.参数 纵向位置, 整数型<br />
.参数 功能键状态, 整数型<br />
<br />
画板1.底图 ＝ 快照 (, 2559, 1438)<br />
<br />
<br />
.子程序 _图片框1_鼠标左键被按下, 逻辑型<br />
.参数 横向位置, 整数型<br />
.参数 纵向位置, 整数型<br />
.参数 功能键状态, 整数型<br />
.局部变量 strz, 文本型, , "0"<br />
<br />
strz ＝ 多文件对话框 (“”, , , 取特定目录 (3), , )<br />
.如果真 (取数组成员数 (strz) ≥ 1)<br />
    图片框1.图片 ＝ 读入文件 (strz [1])<br />
.如果真结束<br />
<br />
<br />
.子程序 __启动窗口_创建完毕<br />
<br />
组合框1.现行选中项 ＝ 2<br />
' 画板1.底图 ＝ 快照 (, 取屏幕宽度 (), 取屏幕高度 ())<br />
' 1249,1355<br />
' 大小 60*60<br />
<br />
.子程序 __启动窗口_将被销毁<br />
<br />
销毁绘制 ()<br />
结束 ()<br />
<br />
<br />
<br />
.子程序 _按钮3_被单击<br />
<br />
开关 ＝ 1<br />
销毁绘制 ()