【抖音直播间在线用户关注】按键精灵源码，可开发私信

这款脚本的功能主要就是针对直播间的在线用户自动发送私信消息，我们建议在ROOT过的且做了ROOT隐藏下载的安卓设备下操作，因为这样可以降低账号被风控的风险，脚本运行后会自动点开直播间在线用户列表，然后会逐个的对在线用户发送指定话术的私信内容，私信内容我们可以提前在脚本里面设定好用#号可以分割多条内容，不建议在模拟器操作，本身模拟器登录抖音会风控，基本发出去的都会被屏蔽，搞不好还会封号，在真机操作的话设备需要ROOT，建议用小米系列的机型，因为操作ROOT的环节比较简单，ROOT好后千万不要忘了隐藏ROOT权限奥。
源码分享：

'创建布局名称
Dim 布局名称,点击坐标,话术,分割话术,随机值,文本,id,时间,私信次数,关注数量,随机数

布局名称 = "DY直播间在线关注高级防风控版v1.1"
'创建一个名称为布局名称的布局控件
TracePrint UI.Newlayout (布局名称) 
'添加一个名称为"输入框1"，初始内容为"请在此输入内容"的文本框控件

   TracePrint UI.AddTextView(布局名称, "文字框1", "请设置次数：") 

  TracePrint UI.AddEditText(布局名称, "输入框4", "200") 

TracePrint UI.AddButton(布局名称, "按钮2", "进入对方关注列表后点击我，完全自动化") 
'设置名称为"按钮1"的控件的控件点击事件

TracePrint UI.SetOnClick("按钮2", 全自动点红包)
TracePrint UI.Show (布局名称)

Function 全自动点红包()

        关注数量=UI.GetText("输入框4")

        ShowMessage "准备自动化操作..."

UI.Close (布局名称)

End Function

For i = 1 To 关注数量
    //这里的脚本可以循环10次
  //这里的脚本可以循环10次
 Dim intX,intY
FindPic 0,0,0,0,"Attachment:关注用户.png","000000",0,0.9,intX,intY
If intX > -1 And intY > -1 Then
        TracePrint intX
        TracePrint intY
        Tap intX, intY

//要产生指定范围的随机整数，请使用以下公式： 
//Int((最大值 - 最小值 + 1) * Rnd() + 最小值)
//例如产生2到6之间的随机数: 
Dim MyValue
Randomize  
MyValue = Int(((5000-2+1) * Rnd()) + 1)   
Traceprint MyValue
        Delay MyValue
ShowMessage "随机延时" & MyValue & "秒"
Swipe intX, intY, intX, 389, 2000
Delay 1000

End If
  //这里的脚本可以循环10次 

Next