通过安卓精灵实现抖音搜索账号自动关注的一个效果,我们测试用的环境是OPPO r6 如果手机型号不同可能运行会无效奥,解决方法是重新调代码,把里面的识图元素和坐标都改成你当前设备的,这款脚本也是我花了一个晚上才写出来的,各个方面优化的已经很稳定了,比如UI界面的设计,还有功能化模块的制作,你只需要做的就是调整和调用就可以,下面我分享源码。
源码分享:
'创建布局名称
Dim 布局名称,点击坐标,话术,分割话术,随机值,文本,id,结果,毫秒
布局名称 = "星辰加强版抖音关注脚本v1.3"
'创建一个名称为布局名称的布局控件
TracePrint UI.Newlayout (布局名称)
'添加一个名称为"输入框1",初始内容为"请在此输入内容"的文本框控件
TracePrint UI.AddEditText(布局名称, "输入框1", "我对你的产品感兴趣#感兴趣奥#怎么联系啊")
TracePrint UI.NewRow(布局名称, "new_row")
TracePrint UI.AddEditText(布局名称, "输入框2", "读取的数据...")
TracePrint UI.NewRow(布局名称, "new_row")
TracePrint UI.AddTextView(布局名称, "文字框1", "设置毫秒:")
TracePrint UI.AddEditText(布局名称, "输入框3", "2000")
'显示名称为:布局名称 的布局控件
TracePrint UI.NewRow(布局名称, "new_row")
'创建一个名称为"按钮1",标题为:"点我初始化"的按钮控件
TracePrint UI.AddButton(布局名称, "按钮1", "点我初始化数据")
'创建一个名称为"按钮1",标题为:"全自动打招呼"的按钮控件
TracePrint UI.AddButton(布局名称, "按钮2", "点我自动关注")
'设置名称为"按钮1"的控件的控件点击事件
TracePrint UI.SetOnClick("按钮1", 点我初始化)
TracePrint UI.SetOnClick("按钮2", 点我私信)
TracePrint UI.Show (布局名称)
Function 点我私信()
UI.Close (布局名称)
End Function
'创建一个初始化处理函数
Function 点我初始化()
UI.SetText("输入框2",Sys.GetClipText())
TracePrint UI.GetText("输入框2")
分割话术 = Split(UI.GetText("输入框2"), "#")
TracePrint 分割话术(1)
毫秒=UI.GetText("输入框3")
TracePrint 毫秒
End Function
For i = 1 To 999
Tap 210, 90
InputText 分割话术(i)
Delay 500
Tap 659, 92
Delay 毫秒
Tap 570, 361
Delay 毫秒
KeyPress "Back"
Delay 毫秒
Next
|