马上加入TC
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
我第一个教程 大漠找字 不知道做的怎么样
大家有空下载看看吗?给我些意见
http://pan.baidu.com/share/link?shareid=358935&uk=1963433458
http://pan.baidu.com/share/link?shareid=358935&uk=1963433458
空间 大漠找字
dm=com("dm.dmsoft")//调用插件
功能 开始_点击()
句柄
系统.设置路径(辅助.获取资源路径("rc:"))//设置全局路径
dm.SetDict(0,"字库.txt")//设置字库路径
辅助.等待(100)
//句柄=窗口.找到窗口(窗口.鼠标所在窗口句柄())//绑定窗口
句柄=dm.GetPointWindow(0,0)
//辅助.消息框(句柄)
//窗口设置状态
窗口=dm.BindWindow(句柄,"normal","windows","windows",1)//前后台绑定模式
intX,intY//坐标变量
dm.FindStr(0,0,2000,2000,"我的电脑","ffffff-000000",1.0,intX,intY)//大漠找字
如果(intX)//判断
辅助.消息框("找到")
dm.MoveTo(intX+3,intY+3)//移动鼠标+偏移,这里根据需要来修改
help.sleep(20)//延时
dm.LeftClick()//左键点击
如果结束
intX,intY//坐标变量
我=dm.FindStr(0,0,2000,2000,"回收站","ffffff-000000",1.0,intX,intY)//大漠找字
辅助.消息框("找到"&我)
如果(intX)//判断
辅助.消息框("找到")
dm.MoveTo(intX+3,intY+3)//移动鼠标+偏移,这里根据需要来修改
help.sleep(20)//延时
dm.LeftClick()//左键点击
否则
辅助.消息框("没找到")
如果结束
功能结束
功能 退出_点击()
dm.UnBindWindow()//解除绑定窗口
辅助.退出()
功能结束
功能 初始化()
辅助.注册插件("rc:\\dm.dll",真)//注册插件
功能结束
空间结束
- 空间 大漠找字
- dm=com("dm.dmsoft")//调用插件
- 功能 开始_点击()
- 句柄
- 系统.设置路径(辅助.获取资源路径("rc:"))//设置全局路径
- dm.SetDict(0,"字库.txt")//设置字库路径
- 辅助.等待(100)
- //句柄=窗口.找到窗口(窗口.鼠标所在窗口句柄())//绑定窗口
- 句柄=dm.GetPointWindow(0,0)
- //辅助.消息框(句柄)
- //窗口设置状态
- 窗口=dm.BindWindow(句柄,"normal","windows","windows",1)//前后台绑定模式
- intX,intY//坐标变量
- dm.FindStr(0,0,2000,2000,"我的电脑","ffffff-000000",1.0,intX,intY)//大漠找字
-
- 如果(intX)//判断
- 辅助.消息框("找到")
- dm.MoveTo(intX+3,intY+3)//移动鼠标+偏移,这里根据需要来修改
- help.sleep(20)//延时
- dm.LeftClick()//左键点击
- 如果结束
- intX,intY//坐标变量
- 我=dm.FindStr(0,0,2000,2000,"回收站","ffffff-000000",1.0,intX,intY)//大漠找字
- 辅助.消息框("找到"&我)
- 如果(intX)//判断
- 辅助.消息框("找到")
- dm.MoveTo(intX+3,intY+3)//移动鼠标+偏移,这里根据需要来修改
- help.sleep(20)//延时
- dm.LeftClick()//左键点击
- 否则
- 辅助.消息框("没找到")
- 如果结束
- 功能结束
- 功能 退出_点击()
- dm.UnBindWindow()//解除绑定窗口
- 辅助.退出()
- 功能结束
- 功能 初始化()
- 辅助.注册插件("rc:\\dm.dll",真)//注册插件
- 功能结束
- 空间结束
复制代码
|