按键精灵自动挂机脚本

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

恳请会玩的大侠们不吝指教,在线等待,多谢!!!

设置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了,不过不知你几下能打死怪,这可是循环一次找一只怪,要想做高级点的脚本还要去判断怪血格和怪是否打死了,再打下一个怪。

温馨提示:答案为网友推荐,仅供参考
第1个回答  2019-06-11
其实这个设置也比较简单,每个游戏里面都有一个选择周围怪物的按键,设置好间隔时间后然后设置好打怪动作,自动就会去找怪打了
第2个回答  2012-05-06
怎么弄呢 能教下么?
相似回答