我第一个教程 大漠找字不知道做的怎么样

ma3yu

我第一个教程    大漠找字 不知道做的怎么样
大家有空下载看看吗?给我些意见
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",真)//注册插件
功能结束
空间结束

1. 
   
2. 空间 大漠找字
   
3. dm=com("dm.dmsoft")//调用插件
   
4. 功能 开始_点击()
   
5.     句柄
   
6. 系统.设置路径(辅助.获取资源路径("rc:"))//设置全局路径
   
7.     dm.SetDict(0,"字库.txt")//设置字库路径
   
8.     辅助.等待(100)
   
9.     //句柄=窗口.找到窗口(窗口.鼠标所在窗口句柄())//绑定窗口
   
10.     句柄=dm.GetPointWindow(0,0)
    
11.     //辅助.消息框(句柄)
    
12. //窗口设置状态
    
13.     窗口=dm.BindWindow(句柄,"normal","windows","windows",1)//前后台绑定模式
    
14.     intX,intY//坐标变量
    
15.     dm.FindStr(0,0,2000,2000,"我的电脑","ffffff-000000",1.0,intX,intY)//大漠找字
    
16.    
    
17.     如果(intX)//判断
    
18.         辅助.消息框("找到")
    
19.         dm.MoveTo(intX+3,intY+3)//移动鼠标+偏移,这里根据需要来修改
    
20.         help.sleep(20)//延时
    
21.         dm.LeftClick()//左键点击
    
22.     如果结束
    
23.     intX,intY//坐标变量
    
24.     我=dm.FindStr(0,0,2000,2000,"回收站","ffffff-000000",1.0,intX,intY)//大漠找字
    
25.     辅助.消息框("找到"&我)
    
26.     如果(intX)//判断
    
27.         辅助.消息框("找到")
    
28.         dm.MoveTo(intX+3,intY+3)//移动鼠标+偏移,这里根据需要来修改
    
29.         help.sleep(20)//延时
    
30.         dm.LeftClick()//左键点击
    
31.         否则
    
32.         辅助.消息框("没找到")
    
33.     如果结束
    
34. 功能结束
    
35. 功能 退出_点击()
    
36. dm.UnBindWindow()//解除绑定窗口
    
37. 辅助.退出()
    
38. 功能结束
    
39. 功能 初始化()
    
40. 辅助.注册插件("rc:\\dm.dll",真)//注册插件
    
41. 功能结束
    
42. 空间结束

复制代码

hanxiaojsw

必须回帖

jianqiumy

谢谢分享!!!辛苦了

czczcz

一直找不到图真失败

chi98002

010251

TC兔子

回复 1楼ma3yu的帖子

把系统.设置全局路径,换成 dm.SetPath(....)试一试

快樂灬小笨

必须学习

river860301

看看、、、、、、、、

goodbest87

dm.SetDict(0,"字库.txt")//设置字库路径

as128214121

啥啥啥啥啥啥啥啥