江中游按键精灵论坛教学
零基础教你快速做一个打怪辅助
第三部分 第2课 除恶天劫楼之多技能冷却
江中游老师论坛教学目录地址：http://bbs.vrbrothers.com/showtopic-697741-1.aspx
本课教学视频
除恶天劫楼
u在刷怪时都不可能避免要释放技能，但技能的释放后是要有冷却时间的，所以我们就从这个技能问题来入手，学习一下时间计算及数组的应用
u主要遇到的问题是：
u时间命令：now()
u时间间隔命令：datediff()
u因为技能不可能是一个，而是多个，所以通常我们要使用判断来解决时间间隔的问题
u本游戏技能时间是：
uF2：20秒
uF3：20秒
uF4：25秒
uF5：120秒
uF6：5秒
uF7：30秒
uF8：80秒
Dim t1
t1 = now()
t2 = now()
t3 = now()
t4 = now()
t5 = now()
t6 = now()
t7 = now()
t8 = now()
TracePrint t1
do
Delay 100
差1 = dateDiff("s", t1, now())
// TracePrint t1
// TracePrint now()
If 差1 >= 5 Then
TracePrint "F6"
t1 = now()
// Exit Do
End If
Delay 100
差2 = dateDiff("s", t2, now())
// TracePrint t1
// TracePrint now()
If 差2 >= 7 Then
TracePrint "F7"
t2 = now()
// Exit Do
End If
Delay 100
差3 = dateDiff("s", t3, now())
// TracePrint t1
// TracePrint now()
If 差3 >= 11 Then
TracePrint "F5"
t3 = now()
Exit Do
End If
Loop
TracePrint t1
闽公网安备 35010002000112号