找回密码  加入

AUTOIT CN

搜索
查看: 1067|回复: 5

[图形处理] 漠插件Magic LCG专版,怎么用的到底?是不是假破解版

 关闭 [复制链接]
发表于 2018-4-19 01:37:49 | 显示全部楼层 |阅读模式
  1. #Region ;**** 参数创建于 ACNWrapper_GUI ****
  2. #PRE_UseX64=n
  3. #PRE_Res_requestedExecutionLevel=None
  4. #EndRegion ;**** 参数创建于 ACNWrapper_GUI ****
  5. ;**** 参数创建于 ACNWrapper_GUI ****
  6. RegDM()
  7. Global $DM = ObjCreate("dm.dmsoft")
  8. If IsObj($DM) Then
  9.         $ver = $DM.Ver()
  10.         ConsoleWrite('当前大漠插件版本:' & $ver & @CRLF)
  11. Else
  12.         MsgBox(64, '提示:', '注册大漠插件失败!!!'&$DM.GetLastError())
  13.         Exit
  14. EndIf
  15. $Hwnd = $DM.FindWindow("", "记事本")

  16. $Bind = $DM.BindWindow(WinGetHandle('记事本'), 'gdi', 'normal', 'normal', 0)
  17. MsgBox(0, $Hwnd,$Bind )
  18. $array=$DM.GetColor (111,23)
  19. MsgBox(0, '',$array )
  20. Func RegDM()
  21.         Local $dm_dll = @ScriptDir & '\dm.dll'
  22.         DllCall('E:\PortableSync\Au3Project\Source\大漠\LCG\Plugin\RegDll.dll','int','SetDllPathA','int','E:\PortableSync\Au3Project\Source\大漠\LCG\dm.dll')
  23. ;~         RunWait(@ComSpec & ' /c regsvr32 /s "' & $dm_dll & '"', '', @SW_HIDE)
  24. EndFunc   ;==>RegDM
复制代码
绑定窗口用不了,其他的有些是能用的,是假装破解版么,还是使用方法错误?
 楼主| 发表于 2018-4-19 01:39:20 | 显示全部楼层
该版本本身就是vip版本,想要调用大漠全部的功能请自行搜索其插件即可,多数功能主要在于第三方dll方面,不在于这个主程序,说没用,你知道现在大部分按键精灵作者都使用这个不?说主界面和原来没差距的,那你用原来的好了!说收费的是免费版的,2.1以后全部都是vip版本,本软件可以完全使用,但是若是需要调用本地的dm.dll进行编写外挂则需要手动注册本软件,具体请查看帮助文件自行写一个reg.dll注册(
1.     首先打包dm.dll和RegDll.dll到附件,并且把RegDll.dll拷贝到按键的Plugin目录

2.     然后加入一下代码 (这里我是用绝对路径来说明,相对的也可以自己尝试下)

PutAttachment "c:\test" ,"*.*"

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

Call Plugin.RegDll.Reg("c:\test\dm.dll")

3.     然后就可以创建对象了

set dm = createobject("dm.dmsoft"),)即可使用dll调用高级功能,帮助里面都写了
http://pan.baidu.com/s/1c0jQAsS 密码:afn0
 楼主| 发表于 2018-4-19 23:42:01 | 显示全部楼层
送大家正版注册,下载大漠原版就OK了
  1. #Region ;**** 参数创建于 ACNWrapper_GUI ****
  2. #PRE_UseX64=n
  3. #PRE_Res_requestedExecutionLevel=None
  4. #EndRegion ;**** 参数创建于 ACNWrapper_GUI ****
  5. ;**** 参数创建于 ACNWrapper_GUI ****
  6. Global $DM
  7. RegDM($DM)

  8. $Hwnd = $DM.FindWindow("", "记事本")
  9. MsgBox(0, $Hwnd, $Hwnd)

  10. Func RegDM(ByRef $object)
  11.         Local $__dll = @ScriptDir & '\dm.dll'
  12.         RunWait(@ComSpec & ' /c regsvr32 /s "' & $__dll & '"', '', @SW_HIDE)
  13.         $object = ObjCreate("dm.dmsoft")
  14.         If IsObj($object) Then
  15.                 $ver = $object.Ver()
  16.                 ConsoleWrite('当前大漠插件版本:' & $ver & @CRLF)
  17.         Else
  18.                 MsgBox(64, '提示:', '注册大漠插件失败!!!')
  19.                 Exit
  20.         EndIf
  21.         $reg = $object.Reg("sunyunuo1001d5364db9316cd7d48de9cffc3b134c19", "")
  22.         If $reg <> 1 Then MsgBox(0, '注册失败!', $reg)
  23. EndFunc   ;==>RegDM
复制代码
 楼主| 发表于 2018-4-19 23:44:14 | 显示全部楼层
  1. #Region ;**** 参数创建于 ACNWrapper_GUI ****
  2. #PRE_UseX64=n
  3. #PRE_Res_requestedExecutionLevel=None
  4. #EndRegion ;**** 参数创建于 ACNWrapper_GUI ****
  5. ;**** 参数创建于 ACNWrapper_GUI ****
  6. $DM=RegDM()

  7. $Hwnd = $DM.FindWindow("", "记事本")
  8. MsgBox(0, $Hwnd, $Hwnd)

  9. Func RegDM()
  10.         Local $__dll = @ScriptDir & '\dm.dll'
  11.         RunWait(@ComSpec & ' /c regsvr32 /s "' & $__dll & '"', '', @SW_HIDE)
  12.         $object = ObjCreate("dm.dmsoft")
  13.         If IsObj($object) Then
  14.                 $ver = $object.Ver()
  15.                 ConsoleWrite('当前大漠插件版本:' & $ver & @CRLF)
  16.         Else
  17.                 MsgBox(64, '提示:', '注册大漠插件失败!!!')
  18.                 Exit
  19.         EndIf
  20.         $reg = $object.Reg("sunyunuo1001d5364db9316cd7d48de9cffc3b134c19", "")
  21.         If $reg <> 1 Then MsgBox(0, '注册失败!', $reg)
  22.         Return $object
  23. EndFunc   ;==>RegDM
复制代码
感觉还是这样子比较方便
发表于 2018-4-20 08:22:05 | 显示全部楼层
谢谢分享~~~~
 楼主| 发表于 2018-4-22 10:26:06 | 显示全部楼层
大漠的找图速度还可以!做了个卡牌切牌器 正确率90%以上,优化下的话,可以到99%
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|小黑屋|手机版|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2021-1-28 07:30 , Processed in 0.203125 second(s), 19 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表