【一只鱼】图灵v1.1插件(屏幕、后台和图片的找图、色与字)

鱼头之王

图灵v1.1版插件发布，永久免费。

能够根据屏幕、后台窗口和图片进行“像素获取、取色、找色、找图、找字和截图保存”等功能。


使用VB开发的com插件，适合所有语言调用。
主要开发方向：图像处理方面，不涉及鼠标与键盘操作。

注意：首先，添加插件到资源中，再使用！！！

例子演示：

1. 
   
2. 
   
3. //开始按钮_点击操作
   
4. 功能 开始_点击()
   
5.    
   
6.    
   
7.     //---------------[注册插件]
   
8.     是否成功=辅助.是否注册("OneFish.Soul")
   
9.     如果(是否成功)
   
10.         辅助.消息框("插件已注册")
    
11.     否则
    
12.         是否成功=辅助.注册插件("rc:FISH.dll", 真)
    
13.         如果(是否成功)
    
14.             辅助.消息框("插件注册成功")
    
15.         如果结束
    
16.     如果结束   
    
17.    
    
18.    
    
19.     //---------------[创建插件对象]
    
20.     FISH = 插件("OneFish.Soul")
    
21.    
    
22.    
    
23.     //---------------[获取指定点颜色]
    
24.     颜色 = FISH.GetPixelColor(0, 0, "BGR")
    
25.     辅助.消息框(颜色)
    
26.    
    
27.    
    
28.     //---------------[区域找(单)色]
    
29.     坐标 = FISH.FindColor("0000FF", 0, 1, "FULL", 1)         //坐标=array[][]
    
30.     //坐标 = FISH.FindColor("0000FF|FF0000", 0, 1, "FULL", 1)
    
31.     x = 坐标[0][0]
    
32.     y = 坐标[0][1]
    
33.     辅助.消息框(x & ", " & y)
    
34.     鼠标.移动(x, y)  
    
35.    
    
36.    
    
37.     //---------------[获取屏幕区域像素]
    
38.     范围 = 数组[4]
    
39.     范围[0] = 100
    
40.     范围[1] = 100
    
41.     范围[2] = 110
    
42.     范围[3] = 110
    
43.     像素二维数组 = FISH.GetPixels(范围)
    
44.     //变量 xx, yy
    
45.     //数组空间.大小(像素二维数组, xx, yy)  
    
46.     //遍历(y=0;y<yy;y++)
    
47.     //    遍历(x=0;x<xx;x++)
    
48.     //        调试输出(像素二维数组[x][y])
    
49.     //    遍历结束
    
50.     //遍历结束
    
51.    
    
52.    
    
53.     //---------------[保存区域像素为图片]
    
54.     FISH.PixelsToBmp(像素二维数组, "C:\\YL1.bmp")
    
55.    
    
56.    
    
57.     //---------------[区域找(单)图]
    
58.     坐标 = FISH.FindPicture("C:\\YL1.bmp", 0, 1.0, "FULL", 0)
    
59.     //坐标 = FISH.FindPicture("C:\\YL1.bmp|C:\\YL2.bmp", 0, 1.0, "FULL", 0)
    
60.     变量 下标
    
61.     数组空间.大小(坐标, 下标)  
    
62.     遍历(i=0;i<下标;i++)
    
63.         x = 坐标[0][0]
    
64.         y = 坐标[0][1]
    
65.         辅助.消息框(x & ", " & y)
    
66.         鼠标.移动(x, y)  
    
67.     遍历结束
    
68.    
    
69.    
    
70.     //---------------[区域找(单)字]
    
71.     坐标 = FISH.FindWordShape("一只鱼", "宋体,9", 0, 1.0, "FULL", 0)
    
72.     //坐标 = FISH.FindWordShape("一只鱼|我的电脑", "宋体,9", 0, 1.0, "FULL", 0)
    
73.     变量 下标
    
74.     数组空间.大小(坐标, 下标)  
    
75.     遍历(i=0;i<下标;i++)
    
76.         x = 坐标[0][0]
    
77.         y = 坐标[0][1]
    
78.         辅助.消息框(x & ", " & y)
    
79.         鼠标.移动(x, y)  
    
80.     遍历结束
    
81.    
    
82.    
    
83. 功能结束
    

复制代码

鱼头之王

下载 帮助  里面有命令参数的介绍。

crackiss

下载来学习下 谢谢楼主分享

dreamaker

楼主图标好熟悉啊 貌似用过你的工具 按键那边？

鱼头之王

没错，我就是一只鱼，因为论坛这个名字被注册，所以 换名字。
你用的是 我的 鱼鱼抓色 吗？

鱼头之王

dreamaker 发表于 2014-3-28 22:57
楼主图标好熟悉啊 貌似用过你的工具 按键那边？

没错，我就是一只鱼，因为论坛这个名字被注册，所以 换名字。

你用的是 我的 鱼鱼抓色 吗？

dreamaker

鱼头之王 发表于 2014-3-29 21:47
没错，我就是一只鱼，因为论坛这个名字被注册，所以 换名字。

你用的是 我的 鱼鱼抓色 吗？ ...

对的  就是那个！嘿嘿

鱼头之王

dreamaker 发表于 2014-3-30 19:18
对的  就是那个！嘿嘿

有需要修改功能或者新增功能 ，可以跟帖。

itcfan

能不能实现免注册？

鱼头之王

itcfan 发表于 2014-3-31 23:13
能不能实现免注册？

VB开发的dll 做不到 免注册。。