按键精灵安卓版做一个定时启动功能

这两天好几个人问怎么给脚本加一个定时功能，也就是在固定时间执行指定的任务。

分析思路：

1. 获取系统的时分秒
2. 比对系统是否和设定的时间一样
3. 每隔一秒钟比对一次，循环比对，直到比对成功以后退出循环。

代码截图（简易版）：关注公共號：3分钟学堂 获取更多按键精灵安卓版进阶教程

代码：

Dim 定时小时=9

Dim 定时分钟=20

Dim h,m

do

    h =DateTime.Hour()

    m = DateTime.minute()

    TracePrint h,m

    If h = 定时小时 and m = 定时分钟 Then 

        Exit Do

    End If

    Delay 1000

Loop

TracePrint "到时间了！"

第二种带有倒计时功能的代码：

代码：

Dim ds=10

Dim df=53

Dim h,m,s,时,分,秒

do

    h =DateTime.Hour()

    m = DateTime.minute()

    s = DateTime.Second()

    If h = ds and m = df Then 

        Exit Do

    End If

    秒 = 60 - s

    If df - 1 < m Then 

        分 = 60 + df -1- m

        时=ds-1-h

    Else 

        分 = df-1 - m

        时=ds-h

    End If

    TracePrint 时,分,秒

    ShowMessage "距离开始还有"&时&"小时"&分&"分钟"&秒&"秒"

    Delay 1000

Loop

TracePrint "到时间了！"