你好,我是郭立元~
昨天,集团的朋友问我如何使用定时功能。
这段代码很简单。也许想法是先写时间记录,然后重复时间,看是否有时间。
举个例子,脚本每隔20秒执行一下A操作,其余时间执行B操作,想想这个操作该怎么写。
直接上代码:
启动定时()
Do
If 定时检测(20) Then //参数20代表20秒
TracePrint "执行a操作--------------"
启动定时()
Else
TracePrint "执行b操作"
End If
Delay 200
Loop
/*----以下代码直接放到脚本的最后面----*/
Function 启动定时()
("/sdcard/pictures/定时.txt",TickCount())
End Function
Function 定时检测(miao)
Dim t=("/sdcard/pictures/定时.txt")
Dim n=1000*miao
If Len(t) = 0 Then
TracePrint "还未启动定时"
EndScript
End If
If TickCount() - t > n Then
定时检测 = true
Else
定时检测=false
End If
End Function
我的代码中写了2个函数,函数1是启动定时,函数2是定时检测。
你在写脚本的时候,如果是我这种定时思路,可以直接用我上面的框架,如果你是想要在你脚本中插入这个定时功能,可以这么写:
第一步:把两个函数放到你的脚本最下面。
/*----以下代码直接放到脚本的最后面----*/
Function 启动定时()
("/sdcard/pictures/定时.txt",TickCount())
End Function
Function 定时检测(miao)
Dim t=("/sdcard/pictures/定时.txt")
Dim n=1000*miao
If Len(t) = 0 Then
TracePrint "还未启动定时"
EndScript
End If
If TickCount() - t > n Then
定时检测 = true
Else
定时检测=false
End If
End Function
第二步:在你需要定时的代码位置写上
启动定时()
第三步:检测到没到时间的代码位置写上
定时检测(20) //参数20代表20秒
这个函数有返回值,如果到时间了返回true,如果没有到时间返回false
你在使用的时候可以把返回值作为判断的条件,用来控制判断是否生效,把要执行的代码放入到判断里面。
平时我其实不用两个函数,这里为了方便大家使用,借助txt文本为媒介,并且把函数一分为二。
好了内容就这些,下期写一下指定时间的定时写法。
1.《关于手机版按键精灵脚本怎么写,你需要知道这些「按键精灵代码」脚本也能有定时功能》援引自互联网,旨在传递更多网络信息知识,仅代表作者本人观点,与本网站无关,侵删请联系页脚下方联系方式。
2.《关于手机版按键精灵脚本怎么写,你需要知道这些「按键精灵代码」脚本也能有定时功能》仅供读者参考,本网站未对该内容进行证实,对其原创性、真实性、完整性、及时性不作任何保证。
3.文章转载时请保留本站内容来源地址,https://www.lu-xu.com/gl/3045536.html