按键的烂告命令里面,直接有后台运行的各种命令,不过涉及到坐标的,需要用的是窗口坐标,而不是屏幕坐标,关于这个,要么自己计算,那么可以用一个叫‘小烦窗口查看器’的程序得到窗口坐标。
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