我想你可能遇到和我当初一样的问题,需要在游戏的系统设置里的个人快捷键设置里把自动寻找目标快捷键设置成和你的角本里的相应的自动寻找目标快捷键一致。然后设置你的技能释放时间,完成后,按home启动。
[Script]
Plugin hwnd=Window.Foreground()
Import window.dll
VBSBegin
win=Window.Foreground()
client=Window.GetClientRect(win)
s=split(client,"|")
dx=s(0)
dy=s(1)
zx=s(2)
zy=s(3)
VBSEnd
Dim red,blue,bbred,redwait,bluewait,monwait,fqg,jb,a,b,c,k,q,s1,s2,s3,s4,s5,s6,s7,t1,t2,t3,t4,t5,t6,t7,t8,t9,t10
t1=now:t2=now:t3=now:t4=now:t5=now:t6=now:t7=now:a=0:b=0:c=0:q=0
UserVar fqg=DropList{防抢怪:0|不防抢怪:1}=0 防抢怪设置
UserVar jb=DropList{不捡包:0|自动捡包:1}=0 是否捡物
UserVar s1=2 门派普攻F1间隔(秒)
UserVar s2=20 单体攻击F2间隔(秒)
UserVar s3=20 单体攻击F3间隔(秒)
UserVar s4=25 怒气攻击F4间隔(秒)
UserVar s5=80 自定技能F5间隔(秒)
UserVar s6=60 BB技能F6间隔(秒)
UserVar s7=10 状态技能F7间隔(分)
UserVar red=DropList{30%:30|50%:50|70%:70}=1 血少于%加血F8
UserVar blue=DropList{30%:30|50%:50|70%:70}=0 蓝少于%加蓝F9
UserVar bbred=DropList{没有出战:0|20%:20|30%:30|50%:50}=2 宠少于%加血F10
UserVar redwait=1 红药冷却时间(秒)
UserVar bluewait=1 蓝药冷却时间(秒)
UserVar monwait=100 寻怪延时(毫秒)
PutAttachment .\plugin *.dll
Rem 开始
Delay monwait
Gosub 验证码
Gosub 找怪
If fqg=0
IfColor dx+369,dy+31,1E252A,2
Goto 开始
EndIf
EndIf
Rem 继续杀怪
Gosub 判断血蓝状态
Gosub BB血状态
Gosub 杀怪
Rem End
EndScript
Sub 验证码
Rem 再次报警
VBSCall FindPic(0,50,600,550,"Attachment:\yz1.bmp",0.9,x,y)
If x0 and y0
Plugin SimPlayer.ring(19)
//使用了声音插件,需要自己去官网下载
Delay 2000
EndIf
While x0
VBSCall FindPic(0,300,600,550,"Attachment:\20S.bmp",0.9,x,y)
If x=0 and y=0
IfColor x+17,y+9-k,FFFFFF,0
KeyPress 27 1
Delay 1000
MoveTo dx+446,dy+315
Delay 1000
LeftClick 1
Goto End
EndIf
Else
Goto 再次报警
EndIf
EndWhile
Return 验证码
Sub 判断血蓝状态
IfColor red/100*120+66+dx,dy+31,222222,2
a=a+1
Else
EndIf
IfColor blue/100*120+66+dx dy+37 222222 2
b=b+1
Else
EndIf
Return 判断血蓝状态
Sub BB血状态
If bbred0
IfColor bbred+91+dx dy+69 111111 2
c=c+1
EndIf
EndIf
Return BB血状态
Sub 找怪
KeyDown 1,1
Delay 10
KeyPress 9,1
Delay 10
KeyUp 1,1
Delay 10
Return 找怪
Sub 杀怪
IfColor dx+247,dy+31,0019FF,2
IfColor dx+261,dy+31,0011ff,2
Gosub 技能
Else
KeyPress 12 1
Delay 1000
EndIf
Goto 继续杀怪
Else
If jb=1
Gosub 捡包
Else
Goto 开始
EndIf
EndIf
Return 杀怪
Sub 怒气判断
IfColor qx+126,qy+43,00ffff,2
q=1
EndIf
IfColor qx+188,qy+43,00ffff,2
q=2
EndIf
Return 怒气判断
Sub 技能
Goto 开始
If DateDiff("s",t1,now)=s1
KeyPress 12 1
t1=now
Delay 100
EndIf
IfColor dx+261,dy+31,0011ff,2
If DateDiff("s",t2,now)=s2
Delay 500
KeyPress 113 1
t2=now
Delay 500
EndIf
Else
EndIf
IfColor dx+261,dy+31,0011ff,2
If DateDiff("s",t3,now)=s3
Delay 500
KeyPress 114 1
t3=now
Delay 500
EndIf
Else
EndIf
Gosub 怒气判断
IfColor dx+261,dy+31,0011ff,2
If DateDiff("s",t4,now)=s4 and q=1
Delay 500
KeyPress 115 1
t4=now:q=q-1
Delay 500
EndIf
Else
EndIf
IfColor dx+261,dy+31,0011ff,2
If DateDiff("s",t5,now)=s5
Delay 500
KeyPress 116 1
t5=now
Delay 500
EndIf
Else
EndIf
IfColor dx+261,dy+31,0011ff,2
If DateDiff("s",t6,now)=s6
KeyPress 117 1
t6=now
Delay 100
EndIf
EndIf
If DateDiff("n",t7,now)=s7
MoveTo dx+36,dy+35
LeftClick 1
Delay 100
KeyPress 118 1
t7=now
Delay 100
KeyDown 17,1
Delay 10
KeyPress 9,1
Delay 10
KeyUp 17,1
Delay 10
EndIf
If DateDiff("s",t8,now)=redwait and a=1
KeyPress 119 1
t8=now:a=0
Delay 500
EndIf
If DateDiff("s",t9,now)=bluewait and b=1
KeyPress 120 1
t9=now:b=0
Delay 500
EndIf
If DateDiff("s",t10,now)=1 and c=1
KeyPress 121 1
t10=now
c=0
Delay 500
EndIf
Return 技能
Sub 捡包
Dim v,i,n,d,l,m,a1,b1,a2,b2,shape,x0,y0,k1,k2,x1,y1
l=20:m=2:a1=dx+286:b1=dy+200:a2=dx+486:b2=dy+400:x0=dx+366:y0=dy+300:d=954439560
If x0-a1=a2-x0
n=a1
Else
n=x0-(a2-x0)
EndIf
Rem 开始搜索
v=l
i=m
x1=x0:y1=y0-v
While x1=n
k1=0:k2=v
For 2
For i
x1=x1+k1:y1=y1+k2
If x1=a1 and x1=a2 and y1=b1 and y1=b2
MoveTo x1,y1
Delay 2
VBSCall shape=GetCursorShape(0)
If shape=d
Delay 50
RightClick 1
Delay 400
Goto 开始
EndIf
EndIf
EndFor
k1=v:k2=0
EndFor
i=i+1:v=v*(-1)
EndWhile
Goto 开始
Return 捡包
打开按键精灵的新建选项,选择键盘命令,输入以下数值,按插入键。
选择其他命令键,选择时间“毫秒,1”。
选择循环次数时,点击循环热键,循环到按终止键为止。
按键精灵中右侧热键的启动和中止热键分别选择“滑轮向上浮动”和“滑轮向下浮动”。之后退出保存。
试试这个专用脚本编辑工具。
下载EditPlus_3.41.rar,下载后解压,然后双击\注册进行注册,就可以正常使用了。如果还需要输入注册码,那就点注册,下载keygen.exe并打开,随便输入用户名,然后点击生成注册码,将用户名和注册码分别复制到要注册的框里面就好了。
1、Goto a
2、Rem a
3、key = WaitKey()
4、If key = 87 Then
5、Delay 1500
6、KeyPress "Q", 1
7、End If
8、Goto a
逐鹿神途挂机自动挂机打怪。逐鹿神途挂机自动打怪辅助手游提供的挂机辅助功能都是免费的,玩家们可根据自己的需求上线开启对应的功能,超有趣的挂机功能轻松体验,挂机玩法才是这款神途手游的核心玩法,模式充足的一款神途游戏。
二创动漫哪里看maplestar二创在网页或者youku,都...
越战越勇鹅哥带领鹅家班是哪一期1、年1月23日这期。在《...
安徽公务员降薪20%是真的吗是真的。2022公务员降薪20%...
下载奥特曼传奇英雄免内购无限金币无限钻石版操作步骤:1、...
和平精英少羽筷子水泥原句复制?1、和平精英少羽筷子台词如...