安卓按键精灵脚本命令-随机取名
发布于 2019-10-07
Function _Rnd(num) _Rnd = Int((num + 1) * Rnd()) End Function Function _Rnd_Name()'随机取姓名 Dim A = Array("贾", "赵", "萧","梁","胡","谢...
阅读(1072)赞 (0)
发布于 2019-10-07
Function _Rnd(num) _Rnd = Int((num + 1) * Rnd()) End Function Function _Rnd_Name()'随机取姓名 Dim A = Array("贾", "赵", "萧","梁","胡","谢...
阅读(1072)赞 (0)
发布于 2019-10-07
安卓按键精灵脚本命令-判断应用是否在屏幕前台 再判断应用是否在运行。一个简单的函数而已,相信很多人都应该会的。 //app_packeg--应用包名 Function FindAppIsRunning(app_packeg) Dim app_packeg_list ...
阅读(1352)赞 (0)
发布于 2019-10-07
//第一种格式(只有一个参数的倒计时函数) Function 倒计时(TM) For i = TM To 1 Step -1 MS "倒计时:" & i Delay 1000 Next End Function //第二种格式(有两个参数的倒计时函数) Function ...
阅读(1767)赞 (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
阅读(990)赞 (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 "我找到了主页...
阅读(946)赞 (0)
发布于 2019-10-07
//—————随机读取文本函数封装— Function 随机输出文本(path) Dim C,内容,行数 Randomize 行数 = file.linesnumber(path) C...
阅读(1080)赞 (0)
发布于 2019-10-07
////////////////////////////////随机秒(随机分)函数封装///////////////////////////////////////////////////// Function 随机秒() Dim 随机 Randomize ...
阅读(1037)赞 (0)
发布于 2019-10-07
//--------精确快速滑动 Function JSwipe(x,y,hy,speed)//参数分别为:x坐标,y坐标,y结束时的坐标(即滑动到的第二点时y点坐标),移动速度(单位像素,越大越快) touchDown x,y while y > hy y=y-speed...
阅读(1029)赞 (0)
发布于 2019-10-07
‘删除/sdcard/pictures/目录下所有的.图片 Function 加载相册() ShanHai.UpdatePicture ("/sdcard/pictures/") TracePrint "加载图库" Delay 3000 End...
阅读(887)赞 (0)
发布于 2019-10-07
//////////////////////////////循环次数找图////////////////////////////////////////// Function 找图点击(图片) Dim count=0 Do Delay 1000 ...
阅读(1318)赞 (0)