該樓層疑似違規(guī)已被系統(tǒng)折疊?隱藏此樓查看此樓

//------大漠注冊-------------------------------------------------------------

DMPath = "c:\test_game\"'注冊大漠的文件夾

DMVer = "3.1233"'當(dāng)前使用的大漠版本號

//

//Call 大漠注冊標(biāo)準(zhǔn)版(DMPath, DMVer)

//------------------

//------大漠注冊標(biāo)準(zhǔn)版-------------------------------------------------------

//--------------------------------------------------------------------------

Function 大漠注冊標(biāo)準(zhǔn)版(sPath, sVer)

// 建立大漠插件的基本目錄，即存放所有資源的文件夾

Plugin.File.CreateFolder (sPath)

// 向文件夾復(fù)制文件

PutAttachment sPath, "*.*"

// 要用到RegDll來注冊插件，所以需要釋放到Plugin文件夾

PutAttachment ".\plugin", "RegDll.dll"

// 用RegDll注冊大漠

Call Plugin.RegDll.Reg(sPath & "dm.dll")

Delay 200

// 建立大漠實(shí)例對象

Set dm = CreateObject("dm.dmsoft")

// 判斷注冊是否成功，如果當(dāng)前DM的版本號等于DMVer變量中預(yù)設(shè)的版本號，則注冊成功

If dm.ver() <> sVer Then

// 先釋放先前創(chuàng)建的dm

Set ws = nothing

//實(shí)例化一個(gè)Wscript.Shell的對象

Set ws = CreateObject("Wscript.Shell")

// 因?yàn)橛腥耸褂靡恍〨HOST版的系統(tǒng)，會(huì)精簡掉一些文件，所以這里提前注冊一下有關(guān)文件

ws.run "regsvr32 atl.dll /s"

// 再嘗試用regsvr32 來注冊. 這里必須使用絕對路徑。

ws.run "regsvr32 " & sPath & "dm.dll /s"

Delay 200

// 建立大漠實(shí)例對象

Set dm = CreateObject("dm.dmsoft")

// 判斷注冊是否成功，如果當(dāng)前DM的版本號等于DMVer變量中預(yù)設(shè)的版本號，則注冊成功

If dm.Ver() <> sVer Then

Mbox = "大漠沒有注冊成功，腳本要求安裝版本號是：" & sVer & vbcrlf

Mbox = Mbox & "請檢查是版本錯(cuò)誤還是您的系統(tǒng)禁用了VBS腳本權(quán)限！" & vbcrlf & "現(xiàn)在點(diǎn)擊 【確定】 按鈕退出腳本！"

//Mbox="注冊失敗，腳本中止了，請聯(lián)系作者解決，作者QQ：760071708"

MsgBox Mbox

//如果兩種方式都不能注冊成功，顯示錯(cuò)誤信息后，中止腳本

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

總結(jié)

以上是生活随笔為你收集整理的python调用大漠找图_[教程贴]按键精灵调用大漠插件后台找图示例的全部內(nèi)容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網(wǎng)站內(nèi)容還不錯(cuò)，歡迎將生活随笔推薦給好友。