大漠插件如何实现枚举X,Y,X2,Y2的颜色集？图灵插件可以

独特舞步

zzoo1314 发表于 2025-10-28 16:12
你的用途是啥 我建议用大漠  color = dm.GetAveHSV(30,30,100,100)  获取范围(x1,y1,x2,y2)颜色的均值,返回 ...

我需要取坐标点最多颜色的颜色。排列组合。哈哈

独特舞步

zzoo1314 发表于 2025-10-28 16:14
你都保存颜色集了    跟保存一个范围图片有什么区别!!!!!!! 所以还是说你要实现的功能大家帮你 ...

哈哈 我需要的是大漠插件，不是图灵插件。两者不能用在一起！

独特舞步

zzoo1314 发表于 2025-10-28 16:12
你的用途是啥 我建议用大漠  color = dm.GetAveHSV(30,30,100,100)  获取范围(x1,y1,x2,y2)颜色的均值,返回 ...

我用的是RGB，我需要提取颜色集，我的用途是方便自己枚举图片颜色集！不为别的！哈哈

独特舞步

zzoo1314 发表于 2025-10-29 10:30
获取范围(x1,y1,x2,y2)颜色的均值,返回格式"RRGGBB"  color = dm.GetAveRGB(30,30,100,100)
这是找平均 ...

你还是不懂我的意思！批量获取坐标里的颜色集！

zzoo1314

  

子程序名	返回值类型	公开	备 注
大漠枚举区域颜色	文本型
参数名	类 型	参考	可空	数组	备 注
x1	整数型
y1	整数型
x2	整数型
y2	整数型
返回数组	文本型
排序默认多到少	逻辑型
newcol参考返回	文本型

变量名	类 型	静态	数组	备 注
宽	整数型
高	整数型
i	整数型
y	整数型
x	整数型
坐标x集	整数型		0	坐标x集
坐标y集	整数型		0	坐标y集
rgb	文本型			temp
col	文本型		1	颜色集
cols	整数型		1	颜色数量
ii	整数型
tp数据	整数型
zjj	字节集
B	整数型
G	整数型
R	整数型
colsx	整数型		0
cols2	整数型		0
temp	文本型
返回文本	文本型

清除数组 (返回数组)
宽 ＝ x2 － x1
高 ＝ y2 － y1
tp数据 ＝ dm.GetScreenData (x1, y1, x2, y2)
zjj ＝ 指针到字节集 (tp数据, 宽 × 高 × 4)
B ＝ 取字节集数据 (取字节集中间 (zjj, 1, 1), #整数型, )
G ＝ 取字节集数据 (取字节集中间 (zjj, 2, 1), #整数型, )
R ＝ 取字节集数据 (取字节集中间 (zjj, 3, 1), #整数型, )
col [1] ＝ ZxcJz10进制到16 (R, 2) ＋ ZxcJz10进制到16 (G, 2) ＋ ZxcJz10进制到16 (B, 2)
cols [1] ＝ 1
计次循环首 (宽 × 高 － 1, i)
B ＝ 取字节集数据 (取字节集中间 (zjj, i × 4 ＋ 1, 1), #整数型, )
G ＝ 取字节集数据 (取字节集中间 (zjj, i × 4 ＋ 2, 1), #整数型, )
R ＝ 取字节集数据 (取字节集中间 (zjj, i × 4 ＋ 3, 1), #整数型, )
' 调试输出 (“第” ＋ 到文本 (i ＋ 1) ＋ “个 ” ＋ ZxcJz10进制到16 (R, 2) ＋ ZxcJz10进制到16 (G, 2) ＋ ZxcJz10进制到16 (B, 2))
rgb ＝ ZxcJz10进制到16 (R, 2) ＋ ZxcJz10进制到16 (G, 2) ＋ ZxcJz10进制到16 (B, 2)
计次循环首 (取数组成员数 (col), ii)
如果真 (rgb ＝ col [ii])
cols [ii] ＝ cols [ii] ＋ 1
跳出循环 ()
如果真 (ii ＝ 取数组成员数 (col))
加入成员 (col, rgb)
加入成员 (cols, 1)

计次循环尾 ()
计次循环尾 ()
计次循环首 (取数组成员数 (col), i)  ' 结果
' 调试输出 (col [i] ＋ “,” ＋ 到文本 (cols [i]))
计次循环尾 ()
ZxcArray排序z (cols, , cols2, colsx, 排序默认多到少)
计次循环首 (取数组成员数 (colsx), i)
加入成员 (newcol参考返回, col [colsx [i]] ＋ “,” ＋ 到文本 (cols [colsx [i]]))
返回文本 ＝ 返回文本 ＋ col [colsx [i]] ＋ “,” ＋ 到文本 (cols [colsx [i]]) ＋ “|”
计次循环尾 ()
返回文本 ＝ 取文本左边 (返回文本, 取文本长度 (返回文本) － 1)  ' 去最后一个 |
调试输出 (返回文本)
调试输出 (newcol参考返回)
返回 (返回文本)

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 大漠枚举区域颜色, 文本型<br /> .参数 x1, 整数型<br /> .参数 y1, 整数型<br /> .参数 x2, 整数型<br /> .参数 y2, 整数型<br /> .参数 返回数组, 文本型, 参考 可空 数组<br /> .参数 排序默认多到少, 逻辑型, 可空<br /> .参数 newcol参考返回, 文本型, 参考 可空 数组<br /> .局部变量 宽, 整数型<br /> .局部变量 高, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 y, 整数型<br /> .局部变量 x, 整数型<br /> .局部变量 坐标x集, 整数型, , "0", 坐标x集<br /> .局部变量 坐标y集, 整数型, , "0", 坐标y集<br /> .局部变量 rgb, 文本型, , , temp<br /> .局部变量 col, 文本型, , "1", 颜色集<br /> .局部变量 cols, 整数型, , "1", 颜色数量<br /> .局部变量 ii, 整数型<br /> .局部变量 tp数据, 整数型<br /> .局部变量 zjj, 字节集<br /> .局部变量 B, 整数型<br /> .局部变量 G, 整数型<br /> .局部变量 R, 整数型<br /> .局部变量 colsx, 整数型, , "0"<br /> .局部变量 cols2, 整数型, , "0"<br /> .局部变量 temp, 文本型<br /> .局部变量 返回文本, 文本型<br /> <br /> 清除数组 (返回数组)<br /> 宽 ＝ x2 － x1<br /> 高 ＝ y2 － y1<br /> tp数据 ＝ dm.GetScreenData (x1, y1, x2, y2)<br /> zjj ＝ 指针到字节集 (tp数据, 宽 × 高 × 4)<br /> B ＝ 取字节集数据 (取字节集中间 (zjj, 1, 1), #整数型, )<br /> G ＝ 取字节集数据 (取字节集中间 (zjj, 2, 1), #整数型, )<br /> R ＝ 取字节集数据 (取字节集中间 (zjj, 3, 1), #整数型, )<br /> col [1] ＝ ZxcJz10进制到16 (R, 2) ＋ ZxcJz10进制到16 (G, 2) ＋ ZxcJz10进制到16 (B, 2)<br /> cols [1] ＝ 1<br /> .计次循环首 (宽 × 高 － 1, i)<br />     B ＝ 取字节集数据 (取字节集中间 (zjj, i × 4 ＋ 1, 1), #整数型, )<br />     G ＝ 取字节集数据 (取字节集中间 (zjj, i × 4 ＋ 2, 1), #整数型, )<br />     R ＝ 取字节集数据 (取字节集中间 (zjj, i × 4 ＋ 3, 1), #整数型, )<br />     ' 调试输出 (“第” ＋ 到文本 (i ＋ 1) ＋ “个 ” ＋ ZxcJz10进制到16 (R, 2) ＋ ZxcJz10进制到16 (G, 2) ＋ ZxcJz10进制到16 (B, 2))<br />     rgb ＝ ZxcJz10进制到16 (R, 2) ＋ ZxcJz10进制到16 (G, 2) ＋ ZxcJz10进制到16 (B, 2)<br />     .计次循环首 (取数组成员数 (col), ii)<br />         .如果真 (rgb ＝ col [ii])<br />             cols [ii] ＝ cols [ii] ＋ 1<br />             跳出循环 ()<br />         .如果真结束<br />         .如果真 (ii ＝ 取数组成员数 (col))<br />             加入成员 (col, rgb)<br />             加入成员 (cols, 1)<br />         .如果真结束<br /> <br />     .计次循环尾 ()<br /> .计次循环尾 ()<br /> <br /> .计次循环首 (取数组成员数 (col), i)  ' 结果<br />     ' 调试输出 (col <i> ＋ “,” ＋ 到文本 (cols <i>))<br /> .计次循环尾 ()<br /> <br /> ZxcArray排序z (cols, , cols2, colsx, 排序默认多到少)<br /> <br /> .计次循环首 (取数组成员数 (colsx), i)<br />     加入成员 (newcol参考返回, col [colsx <i>] ＋ “,” ＋ 到文本 (cols [colsx <i>]))<br />     返回文本 ＝ 返回文本 ＋ col [colsx <i>] ＋ “,” ＋ 到文本 (cols [colsx <i>]) ＋ “|”<br /> .计次循环尾 ()<br /> <br /> 返回文本 ＝ 取文本左边 (返回文本, 取文本长度 (返回文本) － 1)  ' 去最后一个 |<br /> 调试输出 (返回文本)<br /> 调试输出 (newcol参考返回)<br /> 返回 (返回文本)