漠插件Magic LCG专版,怎么用的到底?是不是假破解版

heavenm

#Region ;**** 参数创建于 ACNWrapper_GUI ****
#PRE_UseX64=n
#PRE_Res_requestedExecutionLevel=None
#EndRegion ;**** 参数创建于 ACNWrapper_GUI ****
;**** 参数创建于 ACNWrapper_GUI ****
RegDM()
Global $DM = ObjCreate("dm.dmsoft")
If IsObj($DM) Then
        $ver = $DM.Ver()
        ConsoleWrite('当前大漠插件版本：' & $ver & @CRLF)
Else
        MsgBox(64, '提示：', '注册大漠插件失败！！！'&$DM.GetLastError())
        Exit
EndIf
$Hwnd = $DM.FindWindow("", "记事本")

$Bind = $DM.BindWindow(WinGetHandle('记事本'), 'gdi', 'normal', 'normal', 0)
MsgBox(0, $Hwnd,$Bind )
$array=$DM.GetColor (111,23)
MsgBox(0, '',$array )
Func RegDM()
        Local $dm_dll = @ScriptDir & '\dm.dll'
        DllCall('E:\PortableSync\Au3Project\Source\大漠\LCG\Plugin\RegDll.dll','int','SetDllPathA','int','E:\PortableSync\Au3Project\Source\大漠\LCG\dm.dll')
;~         RunWait(@ComSpec & ' /c regsvr32 /s "' & $dm_dll & '"', '', @SW_HIDE) 
EndFunc   ;==>RegDM

绑定窗口用不了,其他的有些是能用的,是假装破解版么,还是使用方法错误?

heavenm

该版本本身就是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

heavenm

送大家正版注册,下载大漠原版就OK了

#Region ;**** 参数创建于 ACNWrapper_GUI ****
#PRE_UseX64=n
#PRE_Res_requestedExecutionLevel=None
#EndRegion ;**** 参数创建于 ACNWrapper_GUI ****
;**** 参数创建于 ACNWrapper_GUI ****
Global $DM
RegDM($DM)

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

Func RegDM(ByRef $object)
        Local $__dll = @ScriptDir & '\dm.dll'
        RunWait(@ComSpec & ' /c regsvr32 /s "' & $__dll & '"', '', @SW_HIDE)
        $object = ObjCreate("dm.dmsoft")
        If IsObj($object) Then
                $ver = $object.Ver()
                ConsoleWrite('当前大漠插件版本：' & $ver & @CRLF)
        Else
                MsgBox(64, '提示：', '注册大漠插件失败！！！')
                Exit
        EndIf
        $reg = $object.Reg("sunyunuo1001d5364db9316cd7d48de9cffc3b134c19", "")
        If $reg <> 1 Then MsgBox(0, '注册失败!', $reg)
EndFunc   ;==>RegDM

heavenm

#Region ;**** 参数创建于 ACNWrapper_GUI ****
#PRE_UseX64=n
#PRE_Res_requestedExecutionLevel=None
#EndRegion ;**** 参数创建于 ACNWrapper_GUI ****
;**** 参数创建于 ACNWrapper_GUI ****
$DM=RegDM()

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

Func RegDM()
        Local $__dll = @ScriptDir & '\dm.dll'
        RunWait(@ComSpec & ' /c regsvr32 /s "' & $__dll & '"', '', @SW_HIDE)
        $object = ObjCreate("dm.dmsoft")
        If IsObj($object) Then
                $ver = $object.Ver()
                ConsoleWrite('当前大漠插件版本：' & $ver & @CRLF)
        Else
                MsgBox(64, '提示：', '注册大漠插件失败！！！')
                Exit
        EndIf
        $reg = $object.Reg("sunyunuo1001d5364db9316cd7d48de9cffc3b134c19", "")
        If $reg <> 1 Then MsgBox(0, '注册失败!', $reg)
        Return $object
EndFunc   ;==>RegDM

感觉还是这样子比较方便

xyhqqaa

谢谢分享~~~~

heavenm

大漠的找图速度还可以!做了个卡牌切牌器 正确率90%以上,优化下的话,可以到99%