更多内容可以查看之前发布的文章教程。
QQ交流群:78237147
群内有【高清】视频教程
我的微信:xiaomu86119
本期课程中的脚本代码:
Dim i
i = Time()
TracePrint i
//Call File.Write("/sdcard/MobileAnjian/anjian.txt","我爱按键精灵")
//
//Dim 返回值
//返回值=File.Read("/sdcard/MobileAnjian/anjian.txt")
//TracePrint 返回值
Dim j
j = File.Read("/sdcard/MobileAnjian/13.txt")
TracePrint j
If j = null Then
Call File.Write("/sdcard/MobileAnjian/13.txt",i)
End If
j = File.Read("/sdcard/MobileAnjian/13.txt")
TracePrint j
TracePrint i-j
If i - j < 20 Then
TracePrint "您的脚本可以正常试用"
Call 子程序()
Else
TracePrint "您的脚本已经过期"
ShowMessage "您的脚本已经过期"
Delay 5000
End If
Sub 子程序()
//我们脚本具体内容
End Sub