本帖最后由 heavenm 于 2017-5-28 07:59 编辑 ;**** 参数创建于 ACNWrapper_GUI ****
#PRE_UseX64=n
#PRE_Res_requestedExecutionLevel=None
#EndRegion ;**** 参数创建于 ACNWrapper_GUI ****
RegDM()
Global $DM = ObjCreate("dm.dmsoft")
If IsObj($DM) Then
$ver = $DM.Ver()
ConsoleWrite('当前大漠插件版本:' & $ver & @CRLF)
Else
MsgBox(64, '提示:', '注册大漠插件失败!!!')
Exit
EndIf
$x=@DesktopWidth
$y=@DesktopHeight
Local $hTimer = TimerInit()
$array=$DM.FindPicEX (0,0,$x,$y,@ScriptDir & "\2.bmp","000000",0.9,0)
;~ $array=$DM.FindMultiColorE (0,850,1920,977,'5F5B5E','0|3|5F5B5E',1.0)
$array2=StringSplit ($array,",",2)
MouseMove(Number($array2[1]),Number($array2[2]))
ConsoleWrite(TimerDiff($hTimer)&@CRLF)
Func RegDM()
Local $dm_dll = @ScriptDir & '\dm.dll'
;以下的判断似乎对#RequireAdmin无效 ,
If @OSVersion = ('WIN_2008R2' Or 'WIN_7' Or 'WIN_2008' Or 'WIN_VISTA') Then
;#RequireAdmin ;这个脚本需要完全控制权限
EndIf
RunWait(@ComSpec & ' /c regsvr32 /s ' & $dm_dll, '', @SW_HIDE)
EndFunc
|