TC官方合作论坛

标题: 我第一个教程 大漠找字不知道做的怎么样 [打印本页]

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



作者: hanxiaojsw    时间: 2013-2-25 11:58
必须回帖
作者: jianqiumy    时间: 2013-2-28 18:48
谢谢分享!!!辛苦了
作者: czczcz    时间: 2013-3-2 10:47
一直找不到图真失败
作者: chi98002    时间: 2013-3-2 17:57
010251
作者: TC兔子    时间: 2013-3-2 21:23
回复 1楼ma3yu的帖子

把系统.设置全局路径,换成 dm.SetPath(....)试一试
作者: 快樂灬小笨    时间: 2013-3-8 21:56
必须学习
作者: river860301    时间: 2013-3-9 11:20
看看、、、、、、、、
作者: goodbest87    时间: 2013-3-10 20:14
dm.SetDict(0,"字库.txt")//设置字库路径
作者: as128214121    时间: 2013-3-14 22:06
啥啥啥啥啥啥啥啥
作者: tanyongj1986    时间: 2013-3-30 05:02
必须回
作者: 349559545    时间: 2013-4-27 01:13
学习。
作者: qxiaobao    时间: 2013-7-8 08:57
支持楼主.
作者: alrino    时间: 2013-7-30 11:59
好东东,学习一下.
作者: 840924057    时间: 2013-8-20 11:19
看、、、、、、、、




欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/) Powered by Discuz! X3.1