Datehoer的博客
我本将心向明月,奈何明月照沟渠
Datehoer的博客

当前位置:主页 > 技术分享 > 按键精灵 引流脚本如何写?引流脚本思路

按键精灵 引流脚本如何写?引流脚本思路

浏览: 作者:Datehoer 发布日期:2021-02-04 23:20:24 来源: 原创
其实说到引流还是非常容易操作的,比起游戏脚本来说更容易通过按键精灵来实现。
我写的哪个软件就不说了,只是简单的提供一下思路而已.

首先最重要的就是要熟悉这个软件是如何操作的,比如说是左滑还是右滑,点击几次才会出现聊天以及发送消息是怎么发送的,这些都需要进行了解。
当然其实最重要的就是软件是否会出现弹窗之类的提示信息,我们将这些信息储存起来放到函数里,然后哦进行循环检测即可,当然如果有什么规律之类的我们也可以加上延迟然后进行检测。

不过其实引流的话,一般就是找人聊天->发送信息->返回下一个这样的重复操作,所以其实可以直接写一个if判断比色然后如果是true的话就点击确定之类的按钮上即可。

一般来说我们下滑换人的时候都是需要进行精密的计算,争取一次只滑一个人,然后如果有那种上限之类的,或者什么上拉获取更多的话,还是需要增加判断的,比如说出现了这个字然后加上比色判断,就能知道是要多拉一下了。

按键精灵 引流脚本如何写?引流脚本思路

最后简单上一下一个代码,抖音的引流脚本,不过是好早以前的了,现在肯定不能用了,只是提供一个思路给大家,让大家有一个借鉴的方向,另外如果有什么问题可以直接在评论区留言或者点击主页下方的联系我来寻求帮助。

话语这个东西要不就百度查,要不就自己编。。没有什么好的方法,然后颜色之类的一定要找好分辨率,因为好多问题都出现在了分辨率上,比如说你做的是400*800的然后你在1080*1920上用是肯定不行的。

dim cz_intx,cz_inty,startx,starty, endx,endy,count,结果,首次,话术1,话术2,话术3,临时路径,延迟时间Dim 关注,发消息,话术私聊,随机字符前缀,随机字符后缀,话术,话术发送完毕,完成操作,点击之后,intX,intY,错误信息
临时路径 = GetTempDir()
PutAttachment 临时路径 & "Misaki_douyin1.0/", "*.luae"
PutAttachment 临时路径 & "Misaki_douyin1.0/", "*.png"
首次 = 0
话术1 = ReadUIConfig("话术1", "text1.text2.text3")
话术2 = ReadUIConfig("话术2", "text1.text2.text3")
话术3 = ReadUIConfig("话术3", "text1.text2.text3")
Dim a = {话术1, 话术2, 话术3}
Dim img="Attachment:aixin.png"
If ReadUIConfig("延迟时间") = 0 Then 
    延迟时间 = 800
ElseIf ReadUIConfig("延迟时间") = 1 Then
    延迟时间 = 2500
ElseIf ReadUIConfig("延迟时间") = 2 Then
    延迟时间 = 9500
End If
//ShowMessage "延时时间:"&延迟时间
TracePrint "延时时间:"&延迟时间
Import "zm.luae" //导入插件,只需执行一次
zm.Init  //初始化插件,只需执行一次
zm.Swipe 358,1222, 312, -10, 300 //滑动
Do
    Call 重置起点()
    TracePrint "按顺序输出所有坐标"
    结果 = Split(结果, "|") 
    For i = 首次 To UBOUND(结果) - 1
        TracePrint 结果(i)'按顺序输出所有坐标
        zm.Tap 结果(i),1000'点击 
        关注 = 0
        发消息 = 0
        完成操作 = 0
        点击之后 = 0
        错误信息 = 0
        Do While 完成操作 = 0
            //查找关注坐标
            If 关注 = 0 Then
                If CmpColorEx("552|119|341E6F,652|119|331D6E,552|160|4827C8,651|160|552CFE,589|138|552CFE,589|137|D5CBFF,621|150|6C48FE,621|149|F8F6FF,621|148|B8A7FF", 0.9) = 1 Then
                    TracePrint "关注"
                    Tap 605, 145
                    关注 = 1
                End If
            Else
                错误信息 = 错误信息 + 1
                If 错误信息 > 6 Then
                    Tap 24,58
                    完成操作 = 1
                End If
                TracePrint "错误信息次数:"&错误信息
            End If
            //查找发送消息
            If 关注 = 1 or 话术发送完毕 = 1 Then
                If CmpColorEx("502|118|211715,602|119|2E2423,602|161|2E2423,524|133|4D4644,525|133|8E8988,526|133|6B6564,581|149|948F8E,582|149|7B7574",0.9) = 1 Then
                    If 关注 = 1 Then
                        TracePrint "发消息"
                        Tap 552,141
                        关注 = 0
                        发消息 = 1
                    ElseIf 话术发送完毕 = 1 Then
                        Tap 24,58
                        完成操作 = 1
                    End If
                End If
            End If
            //发送消息界面
            If 发消息 = 1 or 点击之后 = 0 Then
                If CmpColorEx("650|1245|655E5C,640|1256|372D2B,650|1266|655E5C,661|1255|655D5B,646|1251|605857,646|1250|231816,652|1251|362C2A,651|1251|231816,646|1258|645C5B,653|1258|655E5C",0.9) = 1 Then
                    TracePrint "发送消息界面"
                    Tap 52, 1259
                    发消息 = 0
                    话术私聊 = 1
                End If
            End If
            If 话术私聊 = 1 Then
                随机字符前缀 = zm.RndStr(3, 4 + 8, true)
                随机字符后缀 = zm.RndStr(3, 1 + 4 + 8, true)
                话术 = zm.RndArrElement(a)
                //                话术 = " 你好,我非常喜欢你的作品,我的 V 123456 交个朋友吧!"
                InputText 随机字符前缀 & " " & 话术 & " " & 随机字符后缀
                话术私聊 = 0
                话术发送完毕 = 1
                Delay 延迟时间
                Tap 700, 1260
                Delay 200
                Tap 24,58
            End If
            Delay 2000
        Loop
    Next
    zm.Swipe 358,1222, 312, -10, 300 //滑动
Loop
Sub 重置起点()
    Do
        startx = 1 : starty = 1 : endx = 720 : endy = 1280  : count = 0
        结果 = ""
        Do
            FindPic startx, starty, endx, endy, img,"000000",0,0.9, cz_intx, cz_inty'一图多坐标写法
            If cz_intx = -1 Then
                Exit do
            Else
                //startx = cz_intx + 60
                starty = cz_inty + 5
                count = count + 1 
                结果 = 结果 & cz_intx - 258 & "," & cz_inty + 12 & "|"
                TracePrint cz_intx, cz_inty
                TracePrint "x:"&cz_intx&"y:"&cz_inty&"几张:"&count&" "&结果
                //                Tap cz_intx - 258, cz_inty + 12
            End If
            If 结果 = "" Then '说明没有找到 
            End If
            //            Delay 5000
        Loop
        Exit Do
    loop
End Sub

//

版权:本文由Datehoer原创,著作权归作者所有。商业转载请联系作者获得授权,非商业转载请保留以上作者信息和原文链接本文链接:https://zjzdmc.top/jsfx/144.html。

文章推荐

热门标签

返回顶部
下面为相关推荐
说点什么吧
  • 全部评论(0
    还没有评论,快来抢沙发吧!