按键精灵吧 关注:500,022贴子:1,023,182

[教程贴]按键精灵调用大漠插件后台找图示例

只看楼主收藏回复



IP属地:浙江1楼2018-01-24 21:37回复
    大漠插件3.1233下载链接
    https://pan.baidu.com/s/1bqj8ZAR


    IP属地:浙江2楼2018-01-24 21:38
    收起回复

      将这两个插件放入脚本附件内,后面注册需要用到


      IP属地:浙江3楼2018-01-24 21:39
      收起回复

        将这两个插件放在按键精灵该目录下(不放的话脚本调试阶段无法调用大漠插件)


        IP属地:浙江4楼2018-01-24 21:41
        收起回复


          IP属地:浙江5楼2018-01-24 21:47
          收起回复
            //简易注册大漠
            PutAttachment ".\plugin", "RegDll.dll"
            PutAttachment ".\plugin\dm", "dm.dll"
            PutAttachment "c:\test_game", "*.*"
            Plugin.RegDll.Reg (Plugin.sys.GetDir(0) + "\plugin\dm\dm.dll")
            Set dm = createobject("dm.dmsoft")
            //获取鼠标指向句柄
            hwnd = dm.GetMousePointWindow()
            //绑定句柄
            dm_ret = dm.BindWindow(hwnd,"dx2","windows","windows",0)
            //设置大漠字库
            dm_ret = dm.SetDict(0, "C:\字库.txt")
            //识别区域文字
            s = dm.Ocr(17,262 ,58,280 ,"ffffff-000000",0.9)
            //区域找字
            dm_ret = dm.FindStr(0, 0, 2000, 2000, "回收", "ffffff-000000", 1.0, X, Y)
            //区域找图
            Plugin.dm.FindPic 228,670,309,696,"c:\test_game\摊主.bmp","000000",0.8,0,X,Y
            //区域找色
            Plugin.dm.FindColor 0,0,2000,2000,"123456-000000|aabbcc-030303|ddeeff-202020",1.0,4,X,Y


            IP属地:浙江6楼2018-01-24 21:48
            收起回复
              已经说的很清楚了,不懂就百度


              IP属地:浙江7楼2018-01-24 21:54
              收起回复
                好棒 ❤爱你


                IP属地:福建来自Android客户端8楼2018-01-25 09:05
                回复
                  用代码注册了一次,但是提示脚本注册大漠Q:第9行:ActiveX部件不能创建对像“dm.dmsoft”
                  这应该是没有注册成功吧,百度查了下好多方法都试了貌似都不成,是不是因为我是win10的原因?


                  IP属地:广西9楼2018-01-25 12:10
                  收起回复
                    模拟器找图,绑定窗口找不到图,不绑定就是假后台(就是挡住找不到),图色没有ogl。


                    IP属地:福建10楼2018-01-27 09:40
                    收起回复
                      那个字库怎么弄


                      IP属地:安徽11楼2018-01-29 06:41
                      回复
                        如果确定关闭了UAC,很可能是系统的防火墙拦截插件,请暂时关闭360等安全防火墙再尝试。
                        我杀毒软件全部关掉了啊


                        IP属地:安徽12楼2018-01-29 06:56
                        回复
                          //------大漠注册-------------------------------------------------------------
                          DMPath = "c:\test_game\"'注册大漠的文件夹
                          DMVer = "3.1233"'当前使用的大漠版本号
                          //
                          //Call 大漠注册标准版(DMPath, DMVer)
                          //------------------
                          //------大漠注册标准版-------------------------------------------------------
                          //--------------------------------------------------------------------------
                          Function 大漠注册标准版(sPath, sVer)
                          // 建立大漠插件的基本目录,即存放所有资源的文件夹
                          Plugin.File.CreateFolder (sPath)
                          // 向文件夹复制文件
                          PutAttachment sPath, "*.*"
                          // 要用到RegDll来注册插件,所以需要释放到Plugin文件夹
                          PutAttachment ".\plugin", "RegDll.dll"
                          // 用RegDll注册大漠
                          Call Plugin.RegDll.Reg(sPath & "dm.dll")
                          Delay 200
                          // 建立大漠实例对象
                          Set dm = CreateObject("dm.dmsoft")
                          // 判断注册是否成功,如果当前DM的版本号等于DMVer变量中预设的版本号,则注册成功
                          If dm.ver() <> sVer Then
                          // 先释放先前创建的dm
                          Set ws = nothing
                          //实例化一个Wscript.Shell的对象
                          Set ws = CreateObject("Wscript.Shell")
                          // 因为有人使用一些GHOST版的系统,会精简掉一些文件,所以这里提前注册一下有关文件
                          ws.run "regsvr32 atl.dll /s"
                          // 再尝试用regsvr32 来注册. 这里必须使用绝对路径。
                          ws.run "regsvr32 " & sPath & "dm.dll /s"
                          Delay 200
                          // 建立大漠实例对象
                          Set dm = CreateObject("dm.dmsoft")
                          // 判断注册是否成功,如果当前DM的版本号等于DMVer变量中预设的版本号,则注册成功
                          If dm.Ver() <> sVer Then
                          Mbox = "大漠没有注册成功,脚本要求安装版本号是:" & sVer & vbcrlf
                          Mbox = Mbox & "请检查是版本错误还是您的系统禁用了VBS脚本权限!" & vbcrlf & "现在点击 【确定】 按钮退出脚本!"
                          //Mbox="注册失败,脚本中止了,请联系作者解决,作者QQ:760071708"
                          MsgBox Mbox
                          //如果两种方式都不能注册成功,显示错误信息后,中止脚本
                          EndScript
                          End If
                          End If
                          TracePrint dm.ver()
                          End Function
                          Hwnd1 = Plugin.Window.Find("TXGuiFoundation", "腾讯手游助手【极速傲引擎】")
                          Hwnd = Plugin.Window.FindEx(Hwnd1, 0, "AEngineRenderWindowClass", "AEngineRenderWindow")
                          Call Lib.大漠命令.大漠绑定4(hwnd)
                          dm_ret = Lib.大漠命令.大漠简易找图("C:\Users\Administrator\Desktop\脚本测试\血条.bmp")
                          If dm_ret > - 1 Then
                          Call Plugin.Bkgnd.KeyDown(Hwnd, 87)
                          Delay 1000
                          Call Plugin.Bkgnd.KeyUp(Hwnd, 87)
                          End If
                          Delay 1000


                          IP属地:安徽14楼2018-01-29 07:09
                          回复
                            安卓版按键精灵可以用大漠吗


                            来自Android客户端15楼2018-02-09 14:11
                            回复
                              hwnd = dm.GetMousePointWindow()
                              dm_ret = dm.BindWindow(hwnd, "dx2", "windows", "windows", 1)
                              Delay 1500
                              我用这个指令绑定后台,貌似不是后台运行,我指令有错么?
                              求教下怎么绑定后台0 0.


                              IP属地:广西16楼2018-02-26 02:06
                              收起回复