//V1.0   



// 主程序
// UserVar Var1=DropList{选项1:值1|选项2:值2}=0 设置内容

UserVar fwgz = DropList{"开户范围挂机":1|"禁用范围挂机":2}=2 "是否要范围挂机"
UserVar fwgzsl=22 "范围多少"

UserVar hxsx=0 "狐小商X坐标"
UserVar hxsy=0 "狐小商Y坐标"
UserVar cswb = DropList{"出售物品":1|"不出售物品":2}=2 "是否要出售物品"
UserVar cswbcdll=22 "从第几个开始"
UserVar cswbhdll=28 "到最后一个"
UserVar zzzzzz=60 "买完药回到挂机点的时间"


UserVar hongyezl = DropList{"活血丸":1|"通络丸":2|"强身丸":3|"健骨丸":4|"修筋丸":5|"大补丸":6}=1 "选择所需要的红药"
UserVar jkhydll=5 "买几捆红药"
UserVar lanyezl = DropList{"益气丸":1|"养气丸":2|"调气丸":3|"补气丸":4|"回气丸":5|"凝气丸":6}=1"选择所需要的蓝药"
UserVar jklydll=3 "买几捆蓝药"



UserVar gjzs = DropList{"开启挂机加血":1|"游戏自带加血":2}=1 "是否要开启挂机加血"
UserVar hong=40 "人血少于百分之多少加血"
UserVar jh=40 "加血间隔(秒)"
UserVar lan=20 "人蓝少于百分之多少加蓝"
UserVar jl=20 "加蓝间隔(秒)"

UserVar jnkg1 = DropList{"开启":1|"关闭":2}=2 "技能一"
UserVar jn1=2 "技能一间隔(秒)"
UserVar jnkg2 = DropList{"开启":1|"关闭":2}=2 "技能二"
UserVar jn2=6 "技能二间隔(秒)"
UserVar jnkg3 = DropList{"开启":1|"关闭":2}=2 "技能三"
UserVar jn3=2 "技能三间隔(秒)"
UserVar jnkg4 = DropList{"开启":1|"关闭":2}=2 "技能四"
UserVar jn4=10 "技能四间隔(秒)"
UserVar jnkg5 = DropList{"开启":1|"关闭":2}=1 "技能五"
UserVar jn5=60 "技能五间隔(秒)"
UserVar jnkg6 = DropList{"开启":1|"关闭":2}=1 "技能六"
UserVar jn6=60 "技能五间隔(秒)"
UserVar jnkg7 = DropList{"开启":1|"关闭":2}=1 "技能七"
UserVar jn7=60 "技能五间隔(秒)"
UserVar jnkg8 = DropList{"开启":1|"关闭":2}=1 "技能八"
UserVar jn8=60 "技能五间隔(秒)"


jna=Plugin.GetSysInfo.GetTime()
jh1=Plugin.GetSysInfo.GetTime()
jl1=Plugin.GetSysInfo.GetTime()
jn1a=Plugin.GetSysInfo.GetTime()
jn2a=Plugin.GetSysInfo.GetTime()
jn3a=Plugin.GetSysInfo.GetTime()
jn4a=Plugin.GetSysInfo.GetTime()
jn5a=Plugin.GetSysInfo.GetTime()
jn6a=Plugin.GetSysInfo.GetTime()
jn7a=Plugin.GetSysInfo.GetTime()
jn8a=Plugin.GetSysInfo.GetTime()
hangsj=Plugin.GetSysInfo.GetTime()
lansj=Plugin.GetSysInfo.GetTime()







Rem 开始
Delay 100

//得到当前最前面的窗口句柄
Hwnd = Plugin.Window.Foreground()


//下面这句是得到窗口句柄的边框大小(包括标题栏)
sRect = Plugin.Window.GetWindowRect(Hwnd)
//下面这句用于分割字符串,将横坐标和纵坐标分成两个字符串

DimEnv 环境变量名
dim MyArray
MyArray = Split(sRect, "|")
//下面这句将字符串转换成数值
W1 = Clng(MyArray(0)): H1 = Clng(MyArray(1))
W2 = Clng(MyArray(2)): H2 = Clng(MyArray(3))

zcw = (w1 + w2)/2
zch = (h1+ h2)/2
zz=0
z=0
Delay 30


Delay 200
Goto 测坐标
Delay 200
LeftClick 1
Goto 杀怪