安卓按键精灵脚本命令-顺序UID登录
发布于 2019-10-07
Function 顺序UID() Dim lines,content,Row Row = file.linesnumber(用户路径) '计算用户路径总数 lines=File.Readline(用户关注记录, 1) '找到记录 If Row &...
阅读(777)赞 (0)
发布于 2019-10-07
Function 顺序UID() Dim lines,content,Row Row = file.linesnumber(用户路径) '计算用户路径总数 lines=File.Readline(用户关注记录, 1) '找到记录 If Row &...
阅读(777)赞 (0)
发布于 2019-10-07
//si为组合数组,成员数量不定 Dim si="|张三|小明|小明|小明|小明|小明|小明|张三|小黄|小黄|小黄|小红|小黄|张三|小红|小红|小红|小红" Dim 成员1="张三" Dim 成员2="小红" Dim 成员3="小黄" Dim 成员4="小明" //多成员要用...
阅读(1132)赞 (0)
发布于 2019-10-07
Function 获取总素材() Dim FileArr = ShanHai.ScanPathEx(总素材)'获取总素材的文件名 Dim Filenumber =UBound(FileArr)+1'获取总素材的总行数 For Each v In FileA...
阅读(801)赞 (4)
发布于 2019-10-07
Import "shanhai.lua" Dim aa aa = ShanHai.GetUIXml() TracePrint aa Dim i i = UTF8.InStr(1, aa, "小姐姐") TracePrint i If i > 0 Then Trac...
阅读(732)赞 (0)
发布于 2019-10-07
安卓按键精灵脚本命令-随机秒 //======随机秒============ Function 随机秒(100, 1500) Randomize 随机= Int((1500- 100 + 1) * Rnd + 100) Delay 随机 End...
阅读(896)赞 (0)
发布于 2019-10-07
Function _Rnd(num) _Rnd = Int((num + 1) * Rnd()) End Function Function _Rnd_Name()'随机取姓名 Dim A = Array("贾", "赵", "萧","梁","胡","谢...
阅读(979)赞 (0)
发布于 2019-10-07
安卓按键精灵脚本命令-判断应用是否在屏幕前台 再判断应用是否在运行。一个简单的函数而已,相信很多人都应该会的。 //app_packeg--应用包名 Function FindAppIsRunning(app_packeg) Dim app_packeg_list ...
阅读(1264)赞 (0)
发布于 2019-10-07
//第一种格式(只有一个参数的倒计时函数) Function 倒计时(TM) For i = TM To 1 Step -1 MS "倒计时:" & i Delay 1000 Next End Function //第二种格式(有两个参数的倒计时函数) Function ...
阅读(1624)赞 (0)
发布于 2019-10-07
for 10 群发私信() Delay 800 next for 3 Delay 1000 next loop // dim i=0 do 群发私信() i=i+1 if i>=10 then for 3 Delay 1000 next i=0 end if loop
阅读(910)赞 (4)
发布于 2019-10-07
Import "shanhai.lua" Dim aa aa = ShanHai.GetUIXml() TracePrint aa Dim i i = UTF8.InStr(1, aa, "主页") If i > 0 Then TracePrint "我找到了主页...
阅读(863)赞 (0)