易语言吧

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 1847|回复: 8

[经验分享] 大漠越学越蒙了

[复制链接]

1

主题

3

帖子

31

积分

初识易语言

Rank: 1

积分
31
威望
0
易币
28
贡献
0
积分
31
UID
32851
在线时间
0 小时
注册时间
2022-12-17
发表于 2022-12-17 20:47:14 | 显示全部楼层 |阅读模式
抓图怎么不显示色彩描述了,二值化区也不显示字了,以前取前二个的色就会显示字了,还有提取点阵有些4个字,是一个一个字,怎么有些是直接提取就4个字,那个定义文字是取个名吗?还是要和图里的文字一样的
截图202212172043596692..png

1

主题

3

帖子

31

积分

初识易语言

Rank: 1

积分
31
威望
0
易币
28
贡献
0
积分
31
UID
32851
在线时间
0 小时
注册时间
2022-12-17
 楼主| 发表于 2022-12-17 20:49:42 | 显示全部楼层
Sub 调用测试命令
        dm_ret = dm.FindStr(0,0,1024,768,"随身回收","eecc00-312821",0.89,intX,intY)
If intX >= 0 and intY >= 0 Then
     dm.MoveTo intX, intY
     Delay 350
   Call 鼠标左键单击(intX, intY)
End If   





End Sub  




Function 鼠标左键单击(x,y)
    dm.MoveTo x, y
     Delay 350
    dm.LeftClick
End Function
Call 测试1
Sub 测试1
dm_ret = dm.FindPic(0, 0, 1024, 768, "神武.bmp", "050505", 0.79, 0, intX, intY)
TracePrint dm_ret
If intX >= 0 and intY >= 0 Then
    MessageBox "找到"
  
     dm.MoveTo intX, intY
     Delay 350
   Call 鼠标左键单击1(intX, intY)
   
   
End If
End Sub
Function 鼠标左键单击1(x,y)
    dm.MoveTo x, y
     Delay 350
    dm.LeftClick
End Function
Call 测试2

Sub 测试2
  dm_ret = dm.FindStr(0, 0, 1024, 768, "战神", "60.100.100-44.37.12", 0.6, intX, intY)
  TracePrint dm_ret
If intX >= 0 and intY >= 0 Then
     dm.MoveTo intX, intY
     Delay 350
   Call 鼠标左键单击2(intX, intY)
   
   
End If
End Sub
Function 鼠标左键单击2(x,y)
    dm.MoveTo x, y
     Delay 350
    dm.LeftClick
End Function

Call 测试3

Sub 测试3
  dm_ret = dm.FindStr(0, 0, 1024, 768, "圣天", "ffff00-211c10", 0.6, intX, intY)
  TracePrint dm_ret
If intX >= 0 and intY >= 0 Then
     dm.MoveTo intX, intY
     Delay 350
   Call 鼠标左键单击3(intX, intY)
   
   
End If
End Sub
Function 鼠标左键单击3(x,y)
    dm.MoveTo x, y
     Delay 350
    dm.LeftClick
End Function
Call 测试4

Sub 测试4
  dm_ret = dm.FindStr(0, 0, 1024, 768, "北冥", "ffff00-181410", 0.6, intX, intY)
  TracePrint dm_ret
If intX >= 0 and intY >= 0 Then
     dm.MoveTo intX, intY
     Delay 350
   Call 鼠标左键单击4(intX, intY)
   
   
End If
End Sub
Function 鼠标左键单击4(x,y)
    dm.MoveTo x, y
     Delay 350
    dm.LeftClick
End Function
Call 测试5

Sub 测试5
  dm_ret = dm.FindStr(0, 0, 1024, 768, "合件", "ffff00-1b1910", 0.6, intX, intY)
  TracePrint dm_ret
If intX >= 0 and intY >= 0 Then
     dm.MoveTo intX, intY
     Delay 350
   Call 鼠标左键单击5(intX, intY)
   
   
End If
End Sub
Function 鼠标左键单击5(x,y)
    dm.MoveTo x, y
     Delay 350
    dm.LeftClick
End Function


老是找字找图,牛头不对马嘴,我都这样写了,用了最笨的方法
回复

使用道具 举报

1

主题

3

帖子

31

积分

初识易语言

Rank: 1

积分
31
威望
0
易币
28
贡献
0
积分
31
UID
32851
在线时间
0 小时
注册时间
2022-12-17
 楼主| 发表于 2022-12-17 20:50:17 | 显示全部楼层
前面的绑定没写出来,绑定是成功的
回复

使用道具 举报

0

主题

22

帖子

286

积分

易语言学徒

Rank: 3Rank: 3

积分
286
威望
0
易币
264
贡献
0
积分
286
UID
32396
在线时间
29 小时
注册时间
2022-12-1
发表于 2022-12-18 13:27:30 | 显示全部楼层
绿
回复

使用道具 举报

0

主题

41

帖子

131

积分

易语言菜鸟

Rank: 2

积分
131
威望
0
易币
90
贡献
0
积分
131
UID
33158
在线时间
1 小时
注册时间
2022-12-31
发表于 2023-1-6 18:36:57 | 显示全部楼层
西
回复

使用道具 举报

0

主题

41

帖子

131

积分

易语言菜鸟

Rank: 2

积分
131
威望
0
易币
90
贡献
0
积分
131
UID
33158
在线时间
1 小时
注册时间
2022-12-31
发表于 2023-1-6 18:37:42 | 显示全部楼层

回复

使用道具 举报

1

主题

11

帖子

65

积分

易语言菜鸟

Rank: 2

积分
65
威望
0
易币
54
贡献
0
积分
65
UID
32244
在线时间
2 小时
注册时间
2022-11-26
发表于 2023-2-9 20:37:14 | 显示全部楼层
回复

使用道具 举报

0

主题

18

帖子

35

积分

初识易语言

Rank: 1

积分
35
威望
0
易币
16
贡献
0
积分
35
UID
34833
在线时间
1 小时
注册时间
2023-3-14
发表于 2023-3-14 22:52:22 | 显示全部楼层

哈哈哈哈,易语言好多东西都是越学越懵,我学那个画板和注册机也都懵了
回复

使用道具 举报

0

主题

19

帖子

19

积分

初识易语言

Rank: 1

积分
19
威望
0
易币
0
贡献
0
积分
19
UID
36692
在线时间
0 小时
注册时间
2023-5-28
发表于 2023-5-28 14:17:56 | 显示全部楼层
广泛大锅饭大锅饭大概
回复

使用道具 举报

懒得打字嘛,点击右侧快捷回复 【选择右侧内容,快速回复】
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

大漠插件注册码无须等1-3号

QQ|一:站内所有资源均来自互联网收集或用户上传分享,本站不拥有此类资源的版权。 作为网络服务提供者,对转载行为的发生不具备充分的监控能力。但是当版权拥有者提出侵权并出示充分的版权证明材料时,易语言吧负有移除转载作品以及停止继续传播的义务。在满足前款条件下采取移除等相应措施后不为此向原发布人承担违约责任,包括不承担因侵权不成立而给原发布人带来损害的赔偿责任。 用户免费分享产生,如果侵犯了你的权益,联系QQ:3066137757|Archiver|手机版|小黑屋|易语言吧

GMT+8, 2024-5-6 20:31 , Processed in 0.234871 second(s), 41 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表