按键精灵手机版 代码收藏

 导入包：

Import "GK.luae"
Import "ShanHai.lua"

打开APP并点击几个按钮

Traceprint (sys.GetFront())   // 输出前台的包名
if Sys.GetFront() <> "com.tencent.mm" Then // 如果打开不的是微信
    RunApp "com.tencent.mm"   // 启动微信
End If
Delay 2000 // 延时2秒
GK.RPA "text", "通讯录", true  // 查找界面中text为通讯录的元素 并点击
GK.RPA "text", "***大学", true
GK.RPA "text", "疫情防控", true
Delay 3000

输入满足某条件的所有项的键值对

Dim table = gk.RPA()           // 查找所有元素，并保存到table中
Dim show = false
If table Then
    TracePrint "果壳式Find查找指定元素属性(类名+标题)，共"&Len(table)&"个"
    For i = 1 To Len(table)
        TracePrint "i=" & i    // 输出i=几
        show = false
        For Each k , v In table[i]    // 遍历每个table的所有键值对
            If ShanHai.type(v) = "string" Then  // 如果值的类型是字符串
                If UTF8.InStr(1, v, "中国") > 0 Then  // 如果值中包含中国
                    show = True  // 则显示这条记录
                End If
            End If
        Next
        If show = True Then 
            For Each k , v In table[i]  // 输出某一项记录的所有键值对
                TracePrint k, v
            Next
        End If
    Next
End If

查找满足两个要求的按钮

Dim Table,RetTable,ET1={"text","A疫情防控"}, ET2={"class","android.widget.TextView"}
Table=GK.RPA()    // 查找所有元素
RetTable = gk.RPA_Lookup(Table, ET1, ET2)  // 从表中查找满足上述两个条件的项
If RetTable Then    // 输出找到的元素的属性
    For Each k , v In RetTable
        TracePrint k, v
    Next
End If
If RetTable Then // 点击找到的元素
    gk.RPA_Click(RetTable["left"],RetTable["top"],RetTable["right"],RetTable["bottom"])
End If

教程：http://bbs.anjian.com/showtopic-605527-1.aspx

 

Import "shanhai.lua"

Dim UI_XML

// 获取当前界面的XML信息
UI_XML = shanhai.GetUIXml()
// 查找“社区”按钮的位置信息
Call File.Write("/sdcard/ui.xml", UI_XML)