【按键脚本】抖音作品解析及视频下载

Import "jsdvip.luae"Import "shanhai.lua"jsdvip.StartServer Dim x=GetScreenX()Dim y=GetScreenY()If jsdvip.click("By.res(com.ss.android.ugc.aweme:id/dbv)", 2000) Then     Delay 1000    dim Tab =  jsdvip.FindNodeInfo("By.res(com.ss.android.ugc.aweme:id/ekg)","rect",2000)//返回数组或null    If Tab Then        Dim k=tab[2]    End If    If cint(k) > 0 Then         For 3            If jsdvip.Click("By.text(复制链接)", 500) Then                 Delay 1000                TracePrint "链接已经复制"                Exit For            Else                 Swipe 0.9*x,k,0.1*x,k,1000            End If        Next    Else       End IfEnd IfShowMessage "开始解析。。。"dim uri = Sys.GetClipText()dim arr=shanhai.RegexFind(uri,"https://v.douyin.com/.-/")TracePrint arr(0)Dim html=url.get("https://erma0.vercel.app/api/douyin?type=video&url="&arr(0))TracePrint htmlDim table=encode.JsonToTable(html)TracePrint "作者：",table["author"]TracePrint "评论：",table["comment"]TracePrint "点赞：", table["digg"]TracePrint "标题：",table["desc"]TracePrint "视频地址：",table["video"]ShowMessage "开始下载。。。"Dim t=time()ShanHai.GetHttpFile (table["video"], "/sdcard/pictures/video/"&t&".mp4")Delay 5000