Question

机战按键精灵近战挂机脚本，在教教我怎么用。我不懂按键精灵

机战按键精灵近战挂机脚本，在教教我怎么用。我不懂按键精灵。
我从网上下了脚本用了都不会动啊，怎么回事？
大家给个好用的机战挂机脚本，但是要近战的。
或者从网上抄的也行，但是要好用还要教我怎么用，懂的人教一下吧~
这个脚本复制到哪里去？说清楚点，是不是直接全部复制进去？我不懂按键精灵教教我~

Answer 1

　　我刚玩没几天 复制一个给你 希望有用~~~~~~~~~
　　1.首先要选择职业 0近战 1远战
　　2.要把显示人物名字的选项关闭
　　3.可以使用带加PW的4号核心
　　4.脚本支持两个技能 放的时候最好一个用PW的 一个用EN的
　　5.XP技能从右到左1,2,3 根据喜好自己修改用哪种XP 默认1
　　6.F1红 F2 F3技能 F8回城卷
　　7.最好关闭与按键无关的其他软件 避免出现游戏变卡 影响脚本正常运行

　　//F1红 F2 F3技能 F8回城卷
　　VBS dim hp,m,n,a,b,c,d,e,f,g,h,i,j,k,l,q,r
　　VBS dim zhiye,zidongzhaoguai,zidongjianwu,xp
　　VBS m=85:n=10
　　VBS a="":b="":e="":f="":g="":h="":i="":j="":k="":l="":q="":r=""
　　VBS c=0:d=0
　　VBS dim jn1,jn2
　　VBS jn1=0:jn2=0
　　UserVar zhiye=1 选择职业 0近战 1远战
　　UserVar hp=50 红量<%多少时,补红
　　UserVar zidongzhaoguai=1 0定点刷怪 1自动刷怪
　　UserVar zidongjianwu=1 0不自动捡物 1自动捡物
　　UserVar xp=1 选择使用哪种XP技能,从右到左1,2,3
　　Rem 机战
　　Gosub 找怪
　　Gosub 攻击怪
　　Gosub 补红
　　Gosub 捡钱
　　Gosub 捡熟练度
　　Gosub 捡流星
　　Gosub 捡粉红水晶
　　Gosub 捡蓝水晶x
　　Gosub 捡聚态水晶
　　Gosub 检测xp
　　Gosub 无弹回城
　　Gosub 拒绝交易
　　Gosub 同意组队
　　Gosub 关闭推荐任务
　　Gosub 关闭导师界面
　　Delay 32
　　Goto 机战
　　Sub 找怪
　　If zidongzhaoguai=1
　　VBSCall FindColorEx(85,140,855,480,"303b8",1,0.8,x,y)
　　If x<0 and y<0
　　Delay 32
　　VBS c=c+1
　　If c>4
　　Delay 225
　　MoveTo 510 500
　　LeftClick 1
　　Gosub 快速找怪
　　VBSCall FindColorEx(85,140,855,480,"303b8",1,0.8,x,y)
　　If x<0 and y<0
　　Delay 520
　　MoveTo 100 330
　　LeftClick 1
　　Gosub 快速找怪
　　VBSCall FindColorEx(85,140,855,480,"303b8",1,0.8,x,y)
　　If x<0 and y<0
　　Delay 520
　　MoveTo 510 200
　　LeftClick 1
　　Gosub 快速找怪
　　VBSCall FindColorEx(85,140,855,480,"303b8",1,0.8,x,y)
　　If x<0 and y<0
　　Delay 520
　　MoveTo 920 330
　　LeftClick 1
　　Gosub 快速找怪
　　EndIf
　　EndIf
　　EndIf
　　EndIf
　　EndIf
　　EndIf
　　Return
　　Sub 攻击怪
　　VBSCall FindColorEx(479,49,922,399,"303b8",1,0.8,x,y)
　　If x>=0 and y>=0
　　VBS c=0
　　MoveTo x-20 y+20
　　LeftClick 1
　　Delay 32
　　Gosub 攻击
　　VBSCall FindColorEx(479,339,922,650,"303b8",1,0.8,x,y)
　　If x>=0 and y>=0
　　VBS c=0
　　MoveTo x-20 y-20
　　LeftClick 1
　　Delay 32
　　Gosub 攻击
　　VBSCall FindColorEx(99,339,479,658,"303b8",1,0.8,x,y)
　　If x>=0 and y>=0
　　VBS c=0
　　MoveTo x+20 y-20
　　LeftClick 1
　　Delay 32
　　Gosub 攻击
　　VBSCall FindColorEx(83,85,479,399,"303b8",1,0.8,x,y)
　　If x>=0 and y>=0
　　VBS c=0
　　MoveTo x+20 y+20
　　LeftClick 1
　　Delay 32
　　Gosub 攻击
　　EndIf
　　EndIf
　　EndIf
　　EndIf
　　Return
　　Sub 攻击
　　VBSCall FindColorEx(35,100,920,510,"303b8",1,0.8,x,y)
　　If x>=0 and y>=0
　　MoveTo x+n y+m
　　RightClick 1
　　Gosub 技能1
　　Gosub 技能2
　　Else
　　VBSCall FindColorEx(35,100,920,510,"303b8",1,0.8,x,y)
　　If x>=0 and y>=0
　　MoveTo x+n y+m-n
　　RightClick 1
　　EndIf
　　EndIf
　　Return
　　Sub 快速找怪
　　VBSCall FindColorEx(313,10,315,12,"0",1,0.8,x,y)
　　If x<0 and y<0
　　KeyDown 17 1
　　LeftClick 1
　　KeyUp 17 1
　　EndIf
　　Return
　　Sub 技能1
　　IfColor 139 45 ae21 2
　　Delay 32
　　VBS jn1=jn1+1
　　If jn1>=4
　　KeyPress 113 1
　　VBS jn1=0
　　EndIf
　　EndIf
　　Return
　　Sub 技能2
　　IfColor 139 45 ae21 2
　　Delay 32
　　VBS jn2=jn2+1
　　If jn2>=8
　　KeyPress 114 1
　　VBS jn2=0
　　EndIf
　　EndIf
　　Return
　　Sub 补红
　　IfColor hp*1.13+121 31 313033 2
　　KeyPress 112 1
　　EndIf
　　Return
　　Sub 捡钱
　　If zidongjianwu=1
　　VBSCall FindColorEx(35,100,920,520,"45b0c9",1,0.8,x1,y1)
　　If x1>=0 and y1>=0
　　VBS a=x1:b=y1
　　VBSCall FindColorEx(a+5,b-50,a+45,b-30,"ffff",1,0.8,x2,y2)
　　If x2>=0 and y2>=0
　　MoveTo a b
　　Delay 32
　　LeftClick 1
　　VBS a="":b=""
　　EndIf
　　EndIf
　　EndIf
　　Return
　　Sub 捡熟练度
　　If zidongjianwu=1
　　VBSCall FindColorEx(35,100,920,520,"ad497f",1,0.8,x1,y1)
　　If x1>=0 and y1>=0
　　VBS e=x1:f=y1
　　VBSCall FindColorEx(e+5,f-50,e+45,f-30,"ffff",1,0.8,x2,y2)
　　If x2>=0 and y2>=0
　　MoveTo e f
　　Delay 32
　　LeftClick 1
　　VBS e="":f=""
　　EndIf
　　EndIf
　　EndIf
　　Return
　　Sub 捡流星
　　If zidongjianwu=1
　　VBSCall FindColorEx(35,100,920,520,"106d21",1,0.8,x1,y1)
　　If x1>=0 and y1>=0
　　VBS g=x1:h=y1
　　VBSCall FindColorEx(g-5,h-25,g+45,h-5,"ffff",1,0.8,x2,y2)
　　If x2>=0 and y2>=0
　　MoveTo g h
　　Delay 32
　　LeftClick 1
　　VBS g="":h=""
　　EndIf
　　EndIf
　　EndIf
　　Return
　　Sub 捡粉红水晶
　　If zidongjianwu=1
　　VBSCall FindColorEx(35,100,920,520,"8b16ab",1,0.8,x1,y1)
　　If x1>=0 and y1>=0
　　VBS i=x1:j=y1
　　VBSCall FindColorEx(i-5,j-30,i+45,j-10,"ffff",1,0.8,x2,y2)
　　If x2>=0 and y2>=0
　　MoveTo i j
　　Delay 32
　　LeftClick 1
　　VBS i="":j=""
　　EndIf
　　EndIf
　　EndIf
　　Return
　　Sub 捡蓝水晶
　　If zidongjianwu=1
　　VBSCall FindColorEx(35,100,920,520,"ffb783",1,0.8,x1,y1)
　　If x1>=0 and y1>=0
　　VBS k=x1:l=y1
　　VBSCall FindColorEx(k-5,l-45,k+45,l-8,"ffff",1,0.8,x2,y2)
　　If x2>=0 and y2>=0
　　MoveTo k l
　　Delay 32
　　LeftClick 1
　　VBS k="":l=""
　　EndIf
　　EndIf
　　EndIf
　　Return
　　Sub 捡聚态水晶
　　If zidongjianwu=1
　　VBSCall FindColorEx(35,100,920,520,"94f729",1,0.8,x1,y1)
　　If x1>=0 and y1>=0
　　VBS q=x1:r=y1
　　VBSCall FindColorEx(q-5,r-30,q+5,r-20,"ffff",1,0.8,x2,y2)
　　If x2>=0 and y2>=0
　　MoveTo g h
　　Delay 32
　　LeftClick 1
　　VBS q="":r=""
　　EndIf
　　EndIf
　　EndIf
　　Return
　　Sub 检测xp
　　VBSCall FindColorEx(800,500,900,550,"cdb886",1,0.8,x,y)
　　If x>=0 and y>=0
　　Gosub xp1
　　Gosub xp2
　　Gosub xp3
　　EndIf
　　Return
　　Sub xp1
　　If xp=1
　　MoveTo 935 540
　　Delay 32
　　LeftClick 1
　　EndIf
　　Return
　　Sub xp2
　　If xp=2
　　MoveTo 881 547
　　Delay 32
　　LeftClick 1
　　EndIf
　　Return
　　Sub xp3
　　If xp=3
　　MoveTo 812 551
　　Delay 32
　　LeftClick 1
　　EndIf
　　Return
　　Sub 无弹回城
　　If zhiye=1
　　VBSCall FindColorEx(575,6,580,10,"101010",1,0.8,x,y)
　　If x<0 and y<0
　　Delay 32
　　VBS d=d+1
　　If d=6
　　KeyPress 119 1
　　EndIf
　　EndIf
　　EndIf
　　Return
　　Sub 拒绝交易
　　VBSCall FindColorEx(133,312,135,314,"ffffff",1,0.8,x1,y1)
　　VBSCall FindColorEx(311,389,313,391,"916e23",1,0.8,x2,y2)
　　VBSCall FindColorEx(326,233,328,235,"8b6ff",1,0.8,x3,y3)
　　If x1>=0 and y1>=0 and x2>=0 and y2>=0 and x3>=0 and y3>=0
　　MoveTo 312 390
　　Delay 32
　　LeftClick 1
　　EndIf
　　Return
　　Sub 同意组队
　　VBSCall FindColorEx(270,232,275,238,"c7ff",1,0.8,x1,y1)
　　VBSCall FindColorEx(220,393,225,396,"aeff",1,0.8,x2,y2)
　　If x1>=0 and y1>=0 and x2>=0 and y2>=0
　　MoveTo 223 394
　　Delay 32
　　LeftClick 1
　　EndIf
　　Return
　　Sub 关闭推荐任务
　　VBSCall FindColorEx(905,236,907,238,"c7ff",1,0.8,x1,y1)
　　VBSCall FindColorEx(605,234,607,236,"c3ff",1,0.8,x2,y2)
　　If x1>=0 and y1>=0 and x2>=0 and y2>=0
　　MoveTo 906 237
　　Delay 32
　　LeftClick 1
　　EndIf
　　Return
　　Sub 关闭导师界面
　　VBSCall FindColorEx(269,180,271,182,"c3f7",1,0.8,x1,y1)
　　VBSCall FindColorEx(276,175,278,177,"dec7b5",1,0.8,x2,y2)
　　If x1>=0 and y1>=0 and x2>=0 and y2>=0
　　MoveTo 270 181
　　Delay 32
　　LeftClick 1
　　EndIf
　　Return

Answer 2

点新建在基本命令栏里插入以下内容

Rem ==========以下是按键精灵录制的内容==========
Delay 250
MoveTo 526,360
RightDown 1
RightClick 1
Delay 252
MoveTo 520,505
RightDown 1
RightClick 1
Rem ==========以上是按键精灵录制的内容=========
Delay=延时
MoveTo =鼠标移到
RightDown =右键按下
RightClick=右键单击
注：调整脚本循环为（循环到案终止键为止）
把终止键从默认调整为 * 号或其他按键
只适合在训练室.和虫洞空间地图的最右下角
只能挂技能（天翔断空斩）没楼上的功能强大.但简单实用
《本人在40大区8区 罗技G25 有时间一起玩撒..》HOHO