按键精灵_获取设备所有信息
1发布于 2020-04-24
Function 获取设备所有信息() Dim 设备型号 = Device.GetModel() Dim 设备IMEI=GetDeviceID() Dim 设备imsi号 = Device.GetImsi() Dim SIM卡ID = Device.GetIccid() Dim ...
阅读(1697)赞 (0)
发布于 2020-04-24
Function 获取设备所有信息() Dim 设备型号 = Device.GetModel() Dim 设备IMEI=GetDeviceID() Dim 设备imsi号 = Device.GetImsi() Dim SIM卡ID = Device.GetIccid() Dim ...
阅读(1697)赞 (0)
发布于 2020-04-22
Function 画面卡屏(ms) Rem begin KeepCapture//只截图一次,优化运行效率,下同 Dim a = GetPixelColor(172,361) Dim b = GetPixelColor(173,695) Dim c = GetPixelColor...
阅读(1131)赞 (0)
发布于 2020-04-18
xml判断 Import "ShanHai.lua" Dim 过去xml,现在xml do 过去xml = ShanHai.GetUIXml() //获得当前界面ui xml信息 Swipe 719, 600, 719, 500 现在xml = ShanHai.GetUIXml(...
阅读(1013)赞 (0)
发布于 2020-04-17
dim token,GetPhone, Function GetPhoneKn() //登录 Do result = URL.Get("http://www.98lm.com/api.php?action=Login&user="&账号&"&pwd...
阅读(1240)赞 (0)
发布于 2020-04-17
Function 顺序坐标(SeZb) Dim xb=UBOUND(SeZb) //获取到数组的总数 For i = 0 To xb TracePrint SeZb(i)//获取坐标 Dim SeZb2=Split (SeZb(i),",") //分割坐标 Delay 50 Tr...
阅读(1366)赞 (0)
发布于 2020-04-17
本文档仅适用于xx6.3.x以上版本 如果遇到调用命令存在的情况,请更新到xx最新版 准备工作 将下列代码复制到脚本中,这个代码是公用代码,调用任何命令都会需要 Import "File.lua" Import "Cjson.lua" Function xx(cmd) File....
阅读(1655)赞 (0)
发布于 2020-04-17
按键精灵版中获取当前应用包名与组件名函数 TracePrint shanhai.GetTopActivity() 获取的格式: 这样不好使用于是修改了 使用这个函数: Function RunApk(arr) dim MyString = Split(...
阅读(1185)赞 (0)
发布于 2020-04-17
多点找色 Function 多点比色(arr) Delay 50 dim t=TickCount() KeepCapture If CmpColorEx(arr(0), arr(1)) = 1 Then 多点比色 = True End If ReleaseCapture Trac...
阅读(2085)赞 (0)
发布于 2020-04-17
Function KillAppZX dim a,b,xt,x a=GetRunningApp()//获取全部正在运行包名 For Each x In a//For Each 每行内容 In 读取结果 TracePrint x //打印正在运行的包名 If x = "com.te...
阅读(1311)赞 (1)
发布于 2020-03-28
Dim str=ReadUIConfig("输入框1") Dim path="/sdcard/pictures/code.txt" Dim time_key=300 '默认单位是秒,5分钟是300秒 If str = "abc123" Then ShowMessage ("激活码...
阅读(1224)赞 (0)