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

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

按键精灵安卓版
立即下载

软件版本:3.8.0
软件大小:45M
更新时间:2025-05-20

按键精灵iOS版
立即下载

软件版本:2.2.1
软件大小:29.2M
更新时间:2025-05-27

按键手机助手
立即下载

软件版本:4.2.0
软件大小:242M
更新时间:2025-05-20

快捷导航

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

返回列表 «2930313233343536» / 111
发新话题 回复该主题

[按键精灵安卓/IOS脚本手机版2.5基础教程] 10.框架、逻辑、功能... [复制链接]

641#

看看是什么例子

642#

66666666666666666

643#

学习了,一起学习

644#

...............................

645#

广东分公司

646#

看看学习了

647#

什么鬼

648#

66666666666666

649#

感谢 谢谢分享

650#

好好学习

651#

vfd
i8756n

652#

aaaaaaaaaaaa

653#

么么哒学习啦

654#

顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶

655#

来拜读拜读

656#

wefniorn3g

657#

Dim 检测线程
Thread.SetShareVar "是否卡主", false
检测线程 = Thread.Start(test_thread)
Do
Delay 500
If Thread.GetShareVar("是否卡主") = true Then
TracePrint "卡着超过10秒,结束线程"
Thread.Stop(test_thread)
TracePrint "退出脚本"
EndScript
End If
Loop

Sub test_thread()
Dim 起始颜色 = GetPixelColor(109,298)
Dim 秒数 = 0
Do
Delay 1000
Dim 结束颜色 = GetPixelColor(109,298)
If 起始颜色 = 结束颜色 Then
秒数 = 秒数 + 1
If 秒数 > 10 Then
Thread.SetShareVar "是否卡主", true
Exit Do
End If
TracePrint "界面已经" & 秒数 & "秒没变了"
Else
TracePrint "界面变化了,说明脚本还在正常运行"
起始颜色 = GetPixelColor(109,298)
秒数 = 0
End If
Loop
End Sub

658#

666666

659#

很好很强大

660#

回复怎么看不了

发新话题 回复该主题