按键精灵自动挂机脚本

一个小网页游戏,有挂机功能但是非常慢,因此下载了案件精灵,但是由于本人是个菜鸟,不能编写脚本,而精灵原本带的教本里只有3个技能,所以我想麻烦大虾们帮忙。要求:设置6个按键... 一个小网页游戏,有挂机功能但是非常慢,因此下载了案件精灵,但是由于本人是个菜鸟,不能编写脚本,而精灵原本带的教本里只有3个技能,所以我想麻烦大虾们帮忙。
要求:设置6个按键分别为3、5、4、8、1、2;分别相隔20秒、40秒、30秒、60秒、2.5秒、10秒。
另外简单的间隔1小时10分钟点一次鼠标的那个脚本也帮忙给一个。

恳请会玩的大侠们不吝指教,在线等待,多谢!!!
展开
 我来答
BG1VWR
推荐于2017-09-20 · TA获得超过6064个赞
知道大有可为答主
回答量:3846
采纳率:60%
帮助的人:1353万
展开全部
设置6个按键分别为3、5、4、8、1、2;分别相隔20秒、40秒、30秒、60秒、2.5秒、10秒:

Dim tim1,tim2,tim3,tim4,tim5,tim6
tim1=now
tim2=now
tim3=now
tim4=now
tim5=now
tim6=now
Rem 开始
Delay 100
If DateDiff("s",tim5,now) >= 2 Then
Delay 500
tim5=now
KeyPress "1", 1
End if
If DateDiff("s",tim1,now) >= 20 Then
tim1=now
KeyPress "3", 1
End if
If DateDiff("s",tim2,now) >= 40 Then
tim2=now
KeyPress "5", 1
End if
If DateDiff("s",tim3,now) >= 30 Then
tim3=now
KeyPress "4", 1
End if
If DateDiff("s",tim4,now) >= 60 Then
tim4=now
KeyPress "8", 1
End if
If DateDiff("s",tim6,now) >= 10 Then
tim6=now
KeyPress "2", 1
End if
Goto 开始

简单的间隔1小时10分钟点一次鼠标的:
Dim tim1
tim1=now
Rem 开始
Delay 1000
If DateDiff("s",tim1,now) >= 4200 Then
tim1=now
LeftClick 1
End if
Goto 开始
追问
多谢这个大虾帮忙,这个按键是循环的吧? 忘记要设置自动找怪了,站在那老是按键却没有目标,呵呵。。
追答
是循环的,要找怪你可以在开始那加个找怪快捷键就OK了,不过不知你几下能打死怪,这可是循环一次找一只怪,要想做高级点的脚本还要去判断怪血格和怪是否打死了,再打下一个怪。
告岳苏冷松
2019-06-11 · TA获得超过3460个赞
知道小有建树答主
回答量:3086
采纳率:33%
帮助的人:173万
展开全部
其实这个设置也比较简单,每个游戏里面都有一个选择周围怪物的按键,设置好间隔时间后然后设置好打怪动作,自动就会去找怪打了
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
匿名用户
2012-05-06
展开全部
怎么弄呢 能教下么?
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 1条折叠回答
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式