Android 台灣中文網

標題: 按鍵精靈句柄抓取 [打印本頁]

作者: dick69 時間: 2017-1-14 20:40
標題: 按鍵精靈句柄抓取
請教有沒有會寫後台的大大
我試著抓 Droid4X 跟猩猩助手的句柄, 但標題視窗都無法順利抓到
請問有什麼解決的方式或者是別種寫法嗎, 謝謝

: 登錄/註冊後可看大圖

: 登錄/註冊後可看大圖

作者: nestea1997 時間: 2017-1-14 23:03
不太理解你指的標題視窗無法抓取是指
程式碼沒問題但是執行沒反應還是句柄沒抓好
不然就是去Google把別人的範例抓下來慢慢測試

作者: you22078 時間: 2017-1-15 12:43
是你不會用吧？
網路上一堆教學照著做就可以了
後台並不難

作者: dick69 時間: 2017-1-15 14:25

you22078 發表於 2017-1-15 12:43
是你不會用吧？
網路上一堆教學照著做就可以了
後台並不難

就是有看了一些文章跟 youtube 還是抓不成功才來請教的 @@"
對已經會的人來說很簡單吧, 但對於初學來說還是需要花很多時間學

作者: dick69 時間: 2017-1-15 14:28

nestea1997 發表於 2017-1-14 23:03
不太理解你指的標題視窗無法抓取是指
程式碼沒問題但是執行沒反應還是句柄沒抓好
不然就是去Google把別人的 ...

您好, 以猩猩助手為例, 句柄抓取後標題有個?, 導致我在後台視窗一直沒辦法抓到
所以想請問是否有別的寫法可以克服這?的亂碼問題, 感謝

作者: you22078 時間: 2017-1-15 15:36
你是在寫腳本的時候抓不到標題視窗是嗎? 還是在執行腳本的時候找不到?

作者: you22078 時間: 2017-1-15 15:43
這是抓滑鼠指向窗口的句柄
我都是用這個最簡單也最方便
啟動熱鍵後到要後台的視窗就好
所以會有設定DELAY時間
Hwnd = Plugin.Window.MousePoint()
Delay 1000

這只是簡單執行按單一個鍵無限循環
配合模擬器按鍵設定很方便使用
Rem 開始
Delay 100
Call Plugin.Bkgnd.KeyPress(Hwnd, 81)
Goto 開始

如果你要找句柄視窗是為了要抓座標的話
再說囉

作者: nestea1997 時間: 2017-1-15 19:57
Dim Hwnd
Hwnd=69100 <----抓抓輔助工具-句柄-當前父窗(句柄數值)
Call a
Delay 0.0001
EndScript

Sub a
Call Plugin.Bkgnd.KeyPress(Hwnd,65 ) 連點鍵盤A
Delay 0.0001
End Sub

我是用夜神這是之前為了Tap titans用的連點程式碼你先用來測試看看吧

作者: dick69 時間: 2017-1-15 20:58

you22078 發表於 2017-1-15 15:43
這是抓滑鼠指向窗口的句柄
我都是用這個最簡單也最方便
啟動熱鍵後到要後台的視窗就好

您好, 我找句柄是為了要抓座標點擊
配合模擬器的鍵盤設定是挺方便但能夠寫的內容有限

作者: dick69 時間: 2017-1-15 21:00

nestea1997 發表於 2017-1-15 19:57
Dim Hwnd
Hwnd=69100

您好, 我試過了這方式可行, 那如果是要搭配抓猩猩助手模擬器的視窗座標與其他滑鼠按鍵跟文字輸入
我應該在哪邊再做修改呢
抱歉再麻煩您指導, 謝謝

作者: nestea1997 時間: 2017-1-15 21:54
程式碼也是打在副程式裡面
座標在抓抓裡放大鏡有個當前屏幕座標
指令在腳本-全部命令-插件命令-Bkgnd後台插件(裡面找看你想要用鍵盤還滑鼠)
文字部分我就不清楚了你在Google找教學吧

作者: you22078 時間: 2017-1-15 22:08
那我來補充文字輸入吧
座標那些沒問題就看你在要輸入文字的地方是中文還是英數字了
英數字簡單，就直接
Plugin.Bkgnd.KeyPress(Hwnd,65 )
Plugin.Bkgnd.KeyPress(Hwnd,66 )
Plugin.Bkgnd.KeyPress(Hwnd,67 )
就是abc了
中文輸入就我所知模擬器都沒辦法直接鍵盤輸入
只能靠模擬器輸入法了
用輸入法就是抓注音座標慢慢點囉
如果是要輸入固定的文字
可以用iqqi輸入法
他的功能裡面有可以自己保存的語句直接貼上
自己研究一下吧

我曾經自己弄個神魔後台首抽+備份無限循環
那可是非常耗神阿

作者: dick69 時間: 2017-1-19 23:49
抱歉想請問大大有遇過使用鍵盤指令都可以, 但滑鼠指令都沒法執行的問題嗎?
我有試著KeyPree 都沒問題, 只要設好模擬器鍵盤
但我試著抓色跟點擊滑鼠都失敗, 想請問一下我下面的寫法有什麼問題嗎?

Dim Hwnd
Hwnd=918516
Call a
Delay 0.0001
EndScript

Sub a

GetColor = Plugin.Bkgnd.GetPixelColor(Hwnd, 2179, 1290)
If GetColor = "5AD9FF" Then
Call Plugin.Bkgnd.LeftClick(Hwnd, 2179, 1290)
End If

Delay 0.0001

End Sub

: 登錄/註冊後可看大圖

作者: dick69 時間: 2017-1-22 18:23

nestea1997 發表於 2017-1-15 21:54
程式碼也是打在副程式裡面
座標在抓抓裡放大鏡有個當前屏幕座標
指令在腳本-全部命令-插件命令-Bkgnd後台 ...

抱歉想請問大大有遇過使用鍵盤指令都可以, 但滑鼠指令都沒法執行的問題嗎?
我有試著KeyPree 都沒問題, 只要設好模擬器鍵盤
但我試著抓色跟點擊滑鼠都失敗, 想請問一下我下面的寫法有什麼問題嗎?

Dim Hwnd
Hwnd=918516
Call a
Delay 0.0001
EndScript

Sub a

GetColor = Plugin.Bkgnd.GetPixelColor(Hwnd, 2179, 1290)
If GetColor = "5AD9FF" Then
Call Plugin.Bkgnd.LeftClick(Hwnd, 2179, 1290)
End If

Delay 0.0001

End Sub

: 登錄/註冊後可看大圖

作者: doaflower1 時間: 2017-3-4 22:38
delay 1000
//1000等於 1秒，你後面0.0001 倒不如就不要了，沒意義

以後我用模擬器寫的，自己看應該看得懂，至於你標題寫的。
應該跟我碰到的困難是一樣的，我也抓不到標題，原因可能是簡體字，所以上網找找才看到你打的

以下自己看吧，不過在模擬器執行感覺會lag，原因我寫好幾千行..就沒再用了

不要去看座標，原因我這個人懶得再重寫，
所以把原來的座標換成後台相對的座標可以使用就不用再重新用
我的顯示是用1024x768

X=-112
Y = - 118

Hwnd = 655932

if Plugin.Bkgnd.GetPixelColor(Hwnd,503+X,Y+535)="72B4DF" Then
Call BL_MoveTo(503+X,Y+535)
Delay 200
End if

sub BL_MoveTo(XX,YY)

call Plugin.Bkgnd.MoveTo(Hwnd,XX,YY)
Call Plugin.Bkgnd.LeftDown(Hwnd,XX,YY)
Delay 200
call Plugin.Bkgnd.LeftUp(Hwnd,XX,YY)

End SUB

作者: doaflower1 時間: 2017-3-4 22:49
忘了跟你說

只要重新開機，巨炳一定會變，模擬器有時候顏色會變很奇怪，你要放大在縮小就可以了.

作者: doaflower1 時間: 2017-3-4 23:02
另外小弟去找網路，有各方法，就是你要讓程式執行的時候，
滑鼠先指著要後台的視窗，先讓執行自行抓取巨炳
程式放在最前面，意思就是只執行一次

If zz = 0 Then
zz = z + 1

Hwnd1 = Plugin.Window.MousePoint()
sClass = Plugin.Window.GetClass(Hwnd1)
sText = Plugin.Window.GetTextEx(Hwnd1, 0)

End If

Hwnd = Hwnd1

作者: qqq4729889 時間: 2018-4-4 20:48
本帖最後由 qqq4729889 於 2018-4-4 20:49 編輯

可是我的案件精靈世傑圖失敗具餅抓圖抓其他視窗都正常但是抓夜神時有圖但是圖像式有夜神的視窗框框裡面是全白的
set dm = createobject("dm.dmsoft")
dm.SetPath "c:"
hwnd = Plugin.Window.Find(0, "夜神模擬器")
dm_ret = dm.BindWindow(hwnd,"gdi","normal","normal",0)
dm_ret = dm.Capture(0,0,2000,2000,"screen.bmp")
dm_ret = dm.UnBindWindow()
EndScript

歡迎光臨 Android 台灣中文網 (https://apk.tw/)