孙昕怡优秀作者
原创内容 来源:小居数码网 时间:2024-08-17 11:44:01 阅读() 收藏:26 分享:67 爆
导读:您正在阅读的是关于【数码知识】的问题,本文由科普作家协会,生活小能手,著名生活达人等整理监督编写。本文有615个文字,大小约为3KB,预计阅读时间2分钟。
昨天有群友问我怎么写个定时的功能?
这代码挺简单,大概思路就是先做个时间记录,然后循环比对时间,看看有没有到时间。
举个例子,脚本每隔20秒执行一下A操作,其余时间执行B操作,想想这个操作该怎么写。
直接上代码:
启动定时()Do If 定时检测(20) Then //参数20代表20秒 TracePrint "执行a操作--------------" 启动定时() Else TracePrint "执行b操作" End If Delay 200Loop/*----以下代码直接放到脚本的最后面----*/Function 启动定时() file.Write("/sdcard/pictures/定时.txt",TickCount())End FunctionFunction 定时检测(miao) Dim t=file.read("/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 启动定时() file.Write("/sdcard/pictures/定时.txt",TickCount())End FunctionFunction 定时检测(miao) Dim t=file.read("/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文本为媒介,并且把函数一分为二。
好了内容就这些,下期写一下指定时间的定时写法。
上面就是小居数码小编今天给大家介绍的关于(脚本也能有定时功能吗)的全部内容,希望可以帮助到你,想了解更多关于数码知识的问题,欢迎关注我们,并收藏,转发,分享。
94%的朋友还想知道的:
(297)个朋友认为回复得到帮助。
部分文章信息来源于以及网友投稿,转载请说明出处。
本文标题:按键精灵定时启动脚本的代码(脚本也能有定时功能吗):http://sjzlt.cn/shuma/156384.html