之前帮客户开发的一个直播间、橱窗商品口令采集脚本，时间有点久啦~

放出给大家研究玩玩，如果你也学按键的话，可以参考一下！

因为着急交付，写法有点子潦草，大佬别笑话我哈哈蛤

Import "zm.luae"
Import "jsdvip.luae"
Import "ShanHai.lua"
Import "Ym.mql"
If jsdvip.StartServer() Then
    TracePrint "恭喜你!!可以使用插件"
Else
    TracePrint "很遗憾!!!您的设备不支持jsd节点相关功能"

End If
/*----------------------------------------------*/
Dim Ret,Info(),记录值="",商品标题,商品口令,已完成,标题坐标(),顶部坐标(),底部坐标(),中心坐标(),分割,下标,是否变动,进入采集区,执行条件,h,获取同级,商品标题数组,顶部坐标Y,底部坐标Y
h=Thread.Start(弹窗处理线程)
Call 主程序()
Thread.Stop(h)
Function 主程序()
    Do
        If jsdvip.FindNode("By.res('com.ss.android.ugc.aweme:id/qig').desc('商品列表')") Then 
            Call 抖音直播数据采集()
        ElseIf jsdvip.FindNode("By.res('com.ss.android.ugc.aweme:id/fpa')") Then
            Call 抖音橱窗数据采集()
        ElseIf jsdvip.FindNode("By.text('销量')") and jsdvip.FindNode("By.text('价格')")  and jsdvip.FindNode("By.text('综合')") Then
            Call 快手商品页采集()
        ElseIf jsdvip.FindNode("By.res('com.smile.gifmaker:id/skin_container')") Then
            Call 快手直播页采集()
        Else
            ShowMessage "未检测到数据采集页面，请手动切换！"
        End If
        Delay 100
    Loop
End Function