彩虹岛按键精灵_彩虹岛战斗助手怎么设置爬楼梯

本文目录一览

• 1、彩虹岛怎么我用助手挂机，跑来跑去。不打怪的？？？
• 2、彩虹岛按键精灵

彩虹岛怎么我用助手挂机，跑来跑去。不打怪的？？？

你要重新开助手...助手他是不是右下角是天使形状？ 那是自动挖矿的设置 （要重启） 如果是恶魔 就是你没设置技能....助手的第一页是不是有许多白空（上面）？ 你点白空右边的三角形那是设置技能..你在游戏中安了哪些技能都把对应的字母打上就OK了 往楼主采纳

彩虹岛按键精灵

　　//彩虹岛自动打怪挖矿脚本
　　//空格键设为强攻击即可打怪，定点移动捡物就交给宠物做了。
　　//空格键设为挖矿键即可挖矿，定点挖矿时可以自动捡矿，设Z键。
　　VBS dim xx,zzT,pq,Akey,Bkey,Ckey,CK
　　dim i,j,k,p,q,L
　　dim key(2)
　　UserVar pq=1 设置左右转身打怪开关，0为定点打怪，1为移动打怪。
　　UserVar xx=1 设为定点时可调整技能攻击间隔，移动时调整转身时间。
　　UserVar zzT=200 设置普通攻击间隔时间（毫秒）
　　UserVar key(0)=V 设置第一技能键（Z，X，C，V中任选一）。
　　UserVar key(1)=C 设置第二技能键（Z，X，C，V中任选一）。
　　UserVar key(2)=Z 自定义按键（比如设为捡物品）。
　　ss=1
　　j=1
　　k=1
　　p=1
　　q=1
　　Gosub 判断按键
　　Akey=key(0):Bkey=key(1):Ckey=key(2)
　　Plugin CK=Window.Foreground()
　　Plugin Window.Move(CK,0,0)
　　Delay 64
　　While true
　　Delay 32
　　If pq=1
　　While true
　　Delay 32
　　Gosub 向右移动
　　Delay 32
　　Gosub 向左移动
　　EndWhile
　　EndIf
　　Gosub 定点打怪
　　EndWhile
　　Sub 定点打怪
　　For xx
　　KeyPress 32,1
　　Delay zzT
　　KeyPress 32,1
　　Delay zzT
　　KeyPress 32,1
　　Delay zzT
　　KeyPress 32,1
　　Delay zzT
　　KeyPress 32,1
　　Delay zzT
　　KeyDown Ckey 1
　　Delay 32
　　KeyPress 32,1
　　Delay zzT
　　KeyUp Ckey 1
　　EndFor
　　Delay 32
　　KeyPress Akey 1
　　Delay 32
　　For xx
　　KeyPress 32,1
　　Delay zzT
　　KeyPress 32,1
　　Delay zzT
　　KeyPress 32,1
　　Delay zzT
　　KeyPress 32,1
　　Delay zzT
　　KeyPress 32,1
　　Delay zzT
　　KeyDown Ckey 1
　　Delay 32
　　KeyPress 32,1
　　Delay zzT
　　KeyUp Ckey 1
　　EndFor
　　Delay 32
　　KeyPress Bkey 1
　　Delay 32
　　Return 定点打怪
　　Sub 向右移动
　　Delay 32
　　If k mod 2
　　KeyDownH 39 1
　　For xx
　　KeyPress 32 1
　　Delay zzT
　　KeyPress 32 1
　　Delay zzT
　　KeyPress 32,1
　　Delay zzT
　　KeyPress 32,1
　　Delay zzT
　　KeyPress 32,1
　　Delay zzT
　　KeyDown Ckey 1
　　Delay 32
　　KeyPress 32,1
　　Delay zzT
　　KeyUp Ckey 1
　　EndFor
　　If p mod 2
　　Delay 200
　　KeyPress Akey 1
　　Else
　　Delay 200
　　KeyPress Bkey 1
　　EndIf
　　p=p+1
　　Delay 32
　　KeyUpH 39 1
　　EndIf
　　//初始化得到当前时间
　　VBS strat_time1=now
　　a = 1
　　While a
　　KeyPress 32 1
　　Delay 32
　　v1=DateDiff("s", strat_time1, Now)
　　//判断动作时间并赋值
　　VBS if v1=ss then a=0
　　EndWhile
　　Return 向右移动
　　Sub 向左移动
　　Delay 32
　　If j mod 2
　　KeyDownH 37 1
　　For xx
　　KeyPress 32 1
　　Delay zzT
　　KeyPress 32 1
　　Delay zzT
　　KeyPress 32,1
　　Delay zzT
　　KeyPress 32,1
　　Delay zzT
　　KeyPress 32,1
　　Delay zzT
　　KeyDown Ckey 1
　　Delay 32
　　KeyPress 32,1
　　Delay zzT
　　KeyUp Ckey 1
　　EndFor
　　If q mod 2
　　Delay 200
　　KeyPress Akey 1
　　Else
　　Delay 200
　　KeyPress Bkey 1
　　EndIf
　　q=q+1
　　Delay 32
　　KeyUpH 37 1
　　EndIf
　　//初始化得到当前时间
　　VBS strat_time2=now
　　b = 1
　　While b
　　KeyPress 32 1
　　Delay 32
　　v2=DateDiff("s", strat_time2, Now)
　　//判断动作时间并赋值
　　VBS if v2=ss then b=0
　　EndWhile
　　Return 向左移动
　　Sub 判断按键
　　i=0
　　For 3
　　L=Len(trim(key(i)))
　　If L=1
　　key(i)=Asc(UCase(key(i)))
　　ElseIf L1 and L4
　　If UCase(Left(key(i),1))="F"
　　key(i)=Asc(UCase(Left(key(i),1)))+Ringhe(key(i),L-1)+41
　　EndIf
　　EndIf
　　i=i+1
　　EndFor
　　Return 判断按键