安卓按键精灵脚本-判断应用是否在屏幕前台
发布于 2019-10-07
安卓按键精灵脚本命令-判断应用是否在屏幕前台 再判断应用是否在运行。一个简单的函数而已,相信很多人都应该会的。 //app_packeg--应用包名 Function FindAppIsRunning(app_packeg) Dim app_packeg_list ...
阅读(1343)赞 (0)
发布于 2019-10-07
安卓按键精灵脚本命令-判断应用是否在屏幕前台 再判断应用是否在运行。一个简单的函数而已,相信很多人都应该会的。 //app_packeg--应用包名 Function FindAppIsRunning(app_packeg) Dim app_packeg_list ...
阅读(1343)赞 (0)
发布于 2019-10-07
//第一种格式(只有一个参数的倒计时函数) Function 倒计时(TM) For i = TM To 1 Step -1 MS "倒计时:" & i Delay 1000 Next End Function //第二种格式(有两个参数的倒计时函数) Function ...
阅读(1746)赞 (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
阅读(976)赞 (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 "我找到了主页...
阅读(932)赞 (0)
发布于 2019-09-24
Function 复制图片(n) dim 总行 = file.linesnumber(总数目) '总数目 dim 行 = File.Read(记录)'发布记录 For n If CInt(行) < CInt(总行) Then ...
阅读(1171)赞 (0)
发布于 2019-08-17
这个案例来自于VIP群友的问题,问我能不能把数字自动换成谐音字?看到这个问题我猜测是为了发联系方式,又怕平台检测到,所以用谐音字代替。 比方说,QQ:1131121634 可以写成企鹅:壹壹叄壹壹弍伊溜叁泗 通过这种谐音字的转换,平台检测不到多位纯数字,减少QQ被检测出来的可能性...
阅读(1220)赞 (0)
发布于 2018-12-22
有三个多选框 和三个脚本, 要单独对应该 如何做呢? 多选框 和脚本都有了 Function a UIP.SetAttribute "多选框2", {"选中":false} UIP.SetAttribute "多选框3", {"选中":false} End Function Fu...
阅读(1243)赞 (0)
发布于 2018-12-19
--------------------------------------- 制作说明 --------------------------------------- --[[ 插件作者 : 真标鞋匠优化 制作时间 ...
阅读(1766)赞 (1)
发布于 2018-12-05
‘–方法一把数据存在数组里 Dim val,Arr = Array(Array(90, 924) ,Array(266, 925), Array(455, 930),Array(96, 1022), Array(261, 1021) ,Array(442,...
阅读(1270)赞 (0)
发布于 2018-12-01
Import "shanhai.lua" Call 记录日志(0, "错误异常")'错误异常 Call 记录日志(1, "签到成功")'信息输出 Call 记录日志(2, "签到成功")'收益统计 Function 记录日志(id, msg) Select Case id Cas...
阅读(1481)赞 (0)