当前位置:首页 » 编程软件 » 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

热点内容
洗眼睛解压 发布:2025-05-13 21:58:28 浏览:272
c存储指针 发布:2025-05-13 21:49:04 浏览:921
结绳编程软件 发布:2025-05-13 21:49:03 浏览:850
解压体育馆 发布:2025-05-13 21:27:48 浏览:263
哪家编程课 发布:2025-05-13 21:27:04 浏览:895
为什么文件要压缩 发布:2025-05-13 21:16:07 浏览:50
局域网怎么搭建校时服务器 发布:2025-05-13 21:11:32 浏览:677
存储器读写实验心得 发布:2025-05-13 21:09:23 浏览:15
派派手机如何设置密码 发布:2025-05-13 21:08:02 浏览:774
狱辱实验栋第2集在线ftp 发布:2025-05-13 21:02:06 浏览:11