下载地址:https://www.pan38.com/share.php?code=pvvmX 提取码:8888
在快手私信一般是没限制的,所以引流的效果非常好,如果你操作的是一个账号还好,但是如果是操作多个号的情况下就麻烦了,因为你一个人真的没办法同时操作多个账号,毕竟精力有限,你操作的多了就会发现太麻烦了,而且有时候点着点着就点错位置了发了那么多又不知道从哪里开始发起,这就是手动发私信最大的弊端,那么通过脚本和插件就不一样了,他会迅速的群发私信,并且能达到你实际想要的私信效果,并且还不会错点。
源码部分:
'创建布局名称
Dim 布局名称,点击坐标,话术,分割话术,随机值,循环数量,商品ID,循环
布局名称 = "星辰抖音制定商品秒拍v1.2"
'创建一个名称为布局名称的布局控件
TracePrint UI.Newlayout (布局名称)
'添加一个名称为"输入框1",初始内容为"请在此输入内容"的文本框控件
TracePrint UI.AddEditText(布局名称, "输入框1", "填写服务器IP","700","300")
'添加一个名称为"输入框1",初始内容为"请在此输入内容"的文本框控件
TracePrint UI.AddEditText(布局名称, "输入框2", "1","200","300")
'显示名称为:布局名称 的布局控件
TracePrint UI.NewRow(布局名称, "newrow" )
'创建一个名称为"按钮1",标题为:"点我初始化"的按钮控件
TracePrint UI.AddButton(布局名称, "按钮1", "初始化数据")
'创建一个名称为"按钮1",标题为:"全自动打招呼"的按钮控件
TracePrint UI.AddButton(布局名称, "按钮2", "启动功能")
'设置名称为"按钮1"的控件的控件点击事件
TracePrint UI.SetOnClick("按钮1", 点我初始化)
TracePrint UI.SetOnClick("按钮2", 启用功能)
TracePrint UI.Show (布局名称)
//如果主线程停止,所有的子线程都会停止
//启动线程可能有短暂延迟
Dim h
Dim 主控返回
Sub test_thread()
Import "socket.lua"
socket.CliendConnect UI.GetText("输入框1"), "12345"
Call socket.ClientSend("SendMessage")
Dim i
i = socket.ClientReceive()
ShowMessage "准备好了老铁,开始批量抢购了..."
TracePrint i
Call 点击步骤 ()
End Sub
Function 点我初始化()
分割话术 =Split(ReadUIConfig("输入框1", 10000),"#")
TracePrint 分割话术(1)
End Function
Function 启用功能()
ShowMessage "脚本准备开始运作"
//要产生指定范围的随机整数,请使用以下公式:
//Int((最大值 - 最小值 + 1) * Rnd() + 最小值)
//例如产生2到6之间的随机数:
Dim a
a=UBound(分割话术)
Traceprint a
Randomize
随机值 = Int(((a-2+1) * Rnd()) + 1)
Traceprint 随机值
//开始自动打招呼
商品ID=UI.GetText("输入框2")
ShowMessage "请确保您当前处于抖音直播间的商品界面,否则软件会出错!"
TracePrint UI.Close(布局名称)
//循环打招呼开始
h = Thread.Start(test_thread)
End Function
Function 点击步骤
//我是一个函数
ShowMessage "脚本准备开始运作"
Tap 122, 434
Delay 1500
ShowMessage "准备点击商品"
Tap 585,1131
Delay 1500
ShowMessage "准备点击购买"
Tap 87,621
Delay 1000
ShowMessage "准备选择属性"
Tap 362,1099
Delay 2000
ShowMessage "准备下单"
Tap 592,1122
Delay 1000
Tap 592,1122
ShowMessage "准备拍下"
For i = 1 To 99999999
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
KeyPress "Back"
EndScript
i = 99999999
End If
//这里的脚本可以循环10次
Next
End Function
For i = 1 To 99999999
//这里的脚本可以循环10次
ShowMessage "正在监听服务器命令:"&i&"淡定,其他设备也在同时进行!"
Next