• 按键公众号 :
按键精灵电脑版
立即下载

软件版本:2014.06
软件大小:22.9M
更新时间:2021-12-03

按键精灵安卓版
立即下载

软件版本:3.7.2
软件大小:46.2M
更新时间:2023-05-10

按键精灵iOS版
立即下载

软件版本:1.8.0
软件大小:29.2M
更新时间:2023-03-21

按键手机助手
立即下载

软件版本:3.8.0
软件大小:262M
更新时间:2023-05-30

快捷导航

登录 后使用快捷导航
没有帐号? 注册

发新话题 回复该主题

[江中游] 【按键精灵论坛教学】第2部分 第2课 薛定谔的汤姆猫1 [复制链接]

21#

学习学习大神

22#

学习学习大神

23#


24#


25#


26#

怎么才能看源码

27#


28#

前来学习

29#

膜拜大佬,过来学习

30#

完全按照老师视频教程敲的代码,但是调试一次成功后,无法再次调试启动,提示:脚本已经停止执行.请问老师是什么原因呢?

31#


32#

学习

33#

学习

34#

正在学习,

35#

不看视频看代码

36#

ePrint "开始运行"
Hwnd = Plugin.Window.Find("TianLongBaBuHJ WndClass", "《新天龙八部》 0.02.7805 (怀旧二区:天下第一)")
TracePrint Hwnd
Call Plugin.Window.Move(Hwnd, 1, 1)
Call Plugin.Window.Top(Hwnd, 0)
Plugin.Window.Active Hwnd
Randomize
Delay 500
for 10
Call 找怪()
KeyPress "F1", 1
Call 打怪()
Next
Sub 找怪()
Do
KeyPress "F11", 1
Delay Int((500 - 300 + 1) * Rnd + 300)
IfColor 301,63,"0007CD",0 Then
//颜色一样
TracePrint "颜色一样"
Exit Do
End If
Delay Int((1000 - 100 + 1) * Rnd + 100)
Loop
End Sub
Sub 打怪()
Do
Delay Int((200 - 50 + 1) * Rnd + 50)
IfColor 287,63,"0007CD",1 Then
TracePrint "怪死亡"
Exit Do
End If
TracePrint "怪还没死亡"
IfColor 126,68, "0007CD", 1 Then'加血
KeyPress "F10", 1
Else
TracePrint "不用加血"
End If
Delay Int((500 - 100 + 1) * Rnd + 100)
Loop
End Sub
Sub OnScriptExit()
Call Plugin.Window.Top(Hwnd, 1)
End Sub

37#

谢谢

38#

13232313

39#

学习学习

40#

66666666666

发新话题 回复该主题