|
楼主 |
发表于 2012-5-11 13:02:54
|
显示全部楼层
谢谢你们了,才回来
[code][/code]
#import "dm.dmsoft" dm
空间 测试找字
//定义默认空间
整型 线程句柄
功能 逻辑型 找字()
//这里添加你要执行的代码
整型 窗口句柄,是否成功1
整型 是否成功
//字符型 dm_ret
整型 intX,intY
窗口句柄= dm.GetMousePointWindow()
窗口.设置位置(窗口句柄,0,0)
辅助.等待(500)
是否成功1=dm.BindWindow(窗口句柄,"dx2","dx2","windows",0)
辅助.等待(500)
如果(是否成功1!=1)
辅助.消息框("绑定失败")
如果结束
// 逻辑型 是否=辅助.注册插件("rc:dm.dll",真)
//如果(是否)
//辅助.消息框("插件注册成功")
//如果结束
dm.SetPath(辅助.获取资源路径("rc:"))
是否成功=dm.SetDict(0,"测试字库.txt")
如果(是否成功==0)
辅助.消息框("设置字库失败")
返回 假
如果结束
// dm.FindPic(0,0,800,600,"计算机图.bmp","ffffff-000000",0.9,0,intX,intY)
dm.FindStr(0,0,800,600,"计算机","000000-000000",0.8,intX,intY)
辅助.等待(2000)
如果(intX>=0&&intY>=0)
辅助.消息框("字已经找到")
否则
辅助.消息框("没有找到")
如果结束
//// dm.FindPic(376,228,672,525,"平西王密使图.bmp","f60000-e10000",0.9,0,intX,intY)
//图像.找图(0,0,900,600,"平西王密使图.bmp",#0000ff,0.9,0,intX,intY)
// 辅助.等待(2000)
//如果(intX>0&&intY>0)
// 鼠标.移动(intX+30,intY+40)
// 辅助.等待(1000)
// 鼠标.左键单击(1)
//否则
// 辅助.消息框("没有找到")
//如果结束
返回 真
//函数返回语句
功能结束
功能 逻辑型 退出_点击()
//这里添加你要执行的代码
dm.UnBindWindow()
辅助.等待(1000)
辅助.退出()
返回 真
//函数返回语句
功能结束
功能 逻辑型 热键0_热键()
//这里添加你要执行的代码
线程句柄=线程.开启("测试找字.找字","我是参数")
返回 真
功能结束 |
|