按键精灵手机版定时点击脚本

Dim h,m,s,HH,MM,SS,t1
HH=ReadUIConfig("HH","13")
MM=ReadUIConfig("MM","00")
SS = ReadUIConfig("SS","00")
TracePrint HH
TracePrint MM
TracePrint SS

Do
t1=GetNetworkTime()
h=mid(t1,12,2)//获取网络小时
m=mid(t1,15,2)//获取网络分钟
s=mid(t1,18,2)//获取网络秒
If h=HH and m=MM and s=SS then
//TracePrint "到时间了！"
//TracePrint GetNetworkTime()//点击提交订单
Tap 530, 950//点击坐标
TracePrint "运行结束"
Exit do
End If
//TracePrint t1
Delay 100
loop

界面1:
{
文字框:
{
注释:"文字大小、高度、宽度是可选属性，如需使用默认值，可保持值为0或直接删除此属性",
名称:"文字框1",
显示内容:"定时点击A3000版",
文字大小:25,
高度:0,
宽度:0
},
水平布局:
{
文字框:
{
注释:"文字大小、高度、宽度是可选属性，如需使用默认值，可保持值为0或直接删除此属性",
名称:"文字框1",
显示内容:"时间（H）：",
文字大小:18,
高度:0,
宽度:0
},
输入框:
{
注释:"初始文本、文字大小、最大输入长度、高度、宽度是可选属性，如需使用默认值，可保持值为0或直接删除此属性",
名称:"HH",
提示内容:"--时",
仅输入数字:true,
文字大小:18,
最大输入长度:0,
高度:0,
宽度:50
},
},
水平布局:
{
文字框:
{
注释:"文字大小、高度、宽度是可选属性，如需使用默认值，可保持值为0或直接删除此属性",
名称:"文字框1",
显示内容:"时间（分）：",
文字大小:18,
高度:0,
宽度:0
},
输入框:
{
注释:"初始文本、文字大小、最大输入长度、高度、宽度是可选属性，如需使用默认值，可保持值为0或直接删除此属性",
名称:"MM",
提示内容:"--分",
仅输入数字:true,
文字大小:18,
最大输入长度:0,
高度:0,
宽度:50
},
},
水平布局:
{
文字框:
{
注释:"文字大小、高度、宽度是可选属性，如需使用默认值，可保持值为0或直接删除此属性",
名称:"文字框1",
显示内容:"时间（秒）：",
文字大小:18,
高度:0,
宽度:0
},
输入框:
{
注释:"初始文本、文字大小、最大输入长度、高度、宽度是可选属性，如需使用默认值，可保持值为0或直接删除此属性",
名称:"SS",
提示内容:"--秒",
仅输入数字:true,
文字大小:18,
最大输入长度:0,
高度:0,
宽度:50
},
},

}