求按键精灵后台挂机打怪脚本和后台制作脚本方法!!

2024-11-01 12:49:58
推荐回答(1个)
回答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