Question

彩虹岛按键精灵

谁能帮我做个彩虹岛自动打怪按键精灵脚本。我是狂战士来的。弱攻击是Z强攻击是X，我要挂机挂在深渊5

Answer 1

　　//彩虹岛自动打怪挖矿脚本
　　//空格键设为强攻击即可打怪，定点移动捡物就交给宠物做了。
　　//空格键设为挖矿键即可挖矿，定点挖矿时可以自动捡矿，设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 L>1 and L<4
　　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 判断按键

追问

你QQ多少，我不太明白

Answer 2

按键精灵我也用，不过你能想到用在彩虹岛里面你真是天才啊，怪每次死出来的位置都不同，你按键精灵怎样设置啊，打空气啊？
建议用小草或者助手这类的挂

Answer 3

有一种东西叫小草

Answer 4

I是物品,K是技能,L是宠物,O是设置,P是组队人员,Q是任务,W和M是地图,T是保存的石碑显示,E是装备察看,G是家族,剩下的按键都是可以自己设置的,