按键精灵大漠插件下载、注册与绑定窗口教程

大漠综合插件(dm.dll)采用vc6.0编写,是一款集前后台,文字识别,图色,键鼠,窗口,内存,DX,Call等功能于一身的综合插件。主要用于按键精灵、简单游、易语言等辅助制作工具,具有识别速度超级快的特点! 采用COM接口编写,适用于所有语言调用。

首先,在使用大漠插件前需要先添加附件,在按键精灵的附件中添加大漠插件文件夹中的dm.dll和RegDll.dll文件,这两个文件都在大漠插件的安装目录中,可点击此处下载大漠插件。

复制以下代码到按键精灵里,Sub主程序放入要执行的脚本即可。

注意:D:/path是大漠插件文件夹,可以修改自定义其他目录。

Call 注册大漠()

Call 窗口绑定()

Call 主程序()

Sub 主程序()

//这里放你要执行的代码

End Sub

Sub 窗口绑定()

hwnd = dm.GetMousePointWindow()

TracePrint hwnd

dm_ret = dm.BindWindow(hwnd, "normal", "normal", "normal", 0)

Delay 1000

End Sub

Sub 注册大漠()

need_ver = "3.1233"

set ws=createobject("Wscript.Shell")

ws.run "regsvr32 atl.dll /s"

set ws=nothing

PutAttachment "D:\path","*.*"

PutAttachment ".\Plugin" ,"RegDll.dll"

Call Plugin.RegDll.Reg("D:\path\dm.dll")

set dm = createobject("dm.dmsoft")

ver = dm.Ver()

if ver <> need_ver then

set dm = nothing

set ws=createobject("Wscript.Shell")

ws.run "regsvr32 D:\path\dm.dll /s"

set ws=nothing

Delay 1500

set dm = createobject("dm.dmsoft")

ver = dm.Ver()

if ver <> need_ver then

messagebox "插件版本错误,当前使用的版本是:"&ver&",插件所在目录是:"&dm.GetBasePath()

messagebox "请关闭程序,重新打开本程序再尝试"

endscript

end if

End If

If ver = need_ver Then

TracePrint "恭喜你注册成功!插件所在目录是:"&dm.GetBasePath()

End If

dm.SetPath "D:\path"

Delay 500

End Sub

Sub OnScriptExit()

dm_ret = dm.UnBindWindow()

If dm_ret = 1 Then

TracePrint "解除绑定成功"

End If

End Sub