當前位置:首頁 » 編程軟體 » 188腳本

188腳本

發布時間: 2025-01-24 19:25:19

『壹』 下面是用按鍵精靈錄制的指令,誰能幫忙轉成後台執行的嗎非常感謝!361插件我也裝了

Hwnd = Plugin.Window.MousePoint()
Delay 5000
Rem a
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 188
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 828
Call Plugin.Bkgnd.KeyPress(Hwnd, 40)
Delay 156
Call Plugin.Bkgnd.KeyPress(Hwnd, 40)
Delay 110
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 156
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 234
Call Plugin.Bkgnd.KeyPress(Hwnd, 40)
Delay 141
Call Plugin.Bkgnd.KeyPress(Hwnd, 40)
Delay 141
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 156
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 312
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 188
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 5000
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 250
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Goto a

以上為腳本
步驟:
1.運行前將滑鼠放在需要的窗口上
2.運行後就可以後台了(前提是游戲支持後台)
3.自動無限循環,停止後重新運行需要回到步驟1

『貳』 求按鍵精靈後台掛機打怪腳本和後台製作腳本方法!!

按鍵的命令裡面,直接有後台運行的各種命令,不過涉及到坐標的,需要用的是窗口坐標,而不是屏幕坐標,關於這個,要麼自己計算,那麼可以用一個叫『小煩窗口查看器』的程序得到窗口坐標。

General]
Description=簡單後台
BeginHotkey=121
BeginHotkeyMod=2
PauseHotkey=0
PauseHotkeyMod=0
StopHotkey=123
StopHotkeyMod=0
RunOnce=1
EnableWindow=
Enable=0
AutoRun=0
[Repeat]
Type=1
Number=1
[Relative]
SetupOCXFile=
[Comment]
Content=

[Script]
Dim HH
Plugin HH = Window.GetKeyFocusWnd()
//實際X坐標-212=窗口x坐標,實際Y坐標-188=窗口Y坐標
a=1
h=1
m=1
x=1
y=1
Rem 1
Rem 開始
Plugin Bkgnd.LeftClick(HH, 902, 243)
Delay 1000
Plugin Bkgnd.LeftClick(HH, 471, 397)
Delay 10000
Plugin Bkgnd.LeftClick(HH, 534, 436)
Delay 2000
If h>10
Goto 補HM
EndIf
If m>4
Goto 補HM
EndIf
Goto HM
Rem 補HM
Plugin Bkgnd.LeftClick(HH, 583, 407)
Delay 2000
If h>10
If x>1
Plugin Bkgnd.LeftClick(HH, 390, 123)
Delay 1000
Plugin Bkgnd.LeftClick(HH, 409, 137)
x=x-1
Delay 1000
Else
Plugin Bkgnd.LeftClick(HH, 441, 119)
Delay 1000
Plugin Bkgnd.LeftClick(HH, 465, 132)
x=x+1
Delay 1000
EndIf
h=1
EndIf
If m>4
If y>1
Plugin Bkgnd.LeftClick(HH, 440, 169)
Delay 1000
Plugin Bkgnd.LeftClick(HH, 461, 183)
y=y-1
Delay 1000
Else
Plugin Bkgnd.LeftClick(HH, 492, 174)
Delay 1000
Plugin Bkgnd.LeftClick(HH, 516, 186)
y=y+1
Delay 1000
EndIf
m=1
EndIf
Plugin Bkgnd.LeftClick(HH, 940, 40)
Delay 1000
Rem HM
h=h+1
m=m+1
a=a+1
If a>60
Plugin Bkgnd.LeftClick(HH, 583, 407)
Delay 2000
Plugin Bkgnd.LeftClick(HH, 904, 374)
Delay 2000
Plugin Bkgnd.LeftClick(HH, 447, 396)
Delay 2000
Plugin Bkgnd.LeftClick(HH, 506, 396)
Delay 2000
Plugin Bkgnd.LeftClick(HH, 940, 40)
Delay 2000
a=1
EndIf
Goto 1

熱點內容
c語言stu 發布:2025-01-25 02:26:56 瀏覽:317
打疫苗的地方wifi密碼是多少 發布:2025-01-25 02:22:35 瀏覽:467
小學不編程 發布:2025-01-25 02:21:07 瀏覽:150
編程班的名稱 發布:2025-01-25 02:15:57 瀏覽:148
root鎖機序列號演算法 發布:2025-01-25 02:14:26 瀏覽:153
廣州萬科海上傳奇 發布:2025-01-25 02:13:48 瀏覽:563
空調壓縮機結霜了 發布:2025-01-25 02:01:20 瀏覽:130
怎麼給路由器設置代理伺服器 發布:2025-01-25 01:54:49 瀏覽:210
sqlserver的不等於 發布:2025-01-25 01:51:47 瀏覽:275
ftpup上傳三個文件 發布:2025-01-25 01:38:15 瀏覽:762