资源介绍:
最右APP新帖全自动私聊脚本
自动过滤用户已发用户
自动翻页
资源作者:
杀死书生
资源界面:
资源源码:
Dim intX1, intY1,intX3, intY3,intX4, intY4,intX5,intY5,startx,starty, endx,endy,count,结果,已发,继续 Dim img="Attachment:三点.png" Import "zm.luae" //导入插件,只需执行一次 zm.Init //初始化插件,只需执行一次 276 Rem 继续 startx = 662 : starty = 90 : endx = 720 : endy = 1280 : count = 0 Do FindPic startx, starty, endx, endy, img,"000000",0, 0.8, intX1, intY1'一图多坐标写法 If intx1 = - 1 Then If startx=0 Then Exit do //查找结束 starty = starty + 1 : startx = 0 Else If inty1 = starty or startx = 0 Then startx = intx1 + 1:starty=inty1 count = count + 1 结果 = 结果 & intx1 - 639 & "," & inty1 & "|" Else startx = 0 : starty = starty + 1 End If End If Loop 结果 = Split(结果, "|") For i = 0 To UBOUND(结果) - 1 TracePrint 结果(i)'按顺序输出所有坐标 zm.Tap 结果(i),1000'点击 已发 = 0 While 已发 = 0 Delay 200 FindPic 651, 1237, 707, 1270, "Attachment:发送.png", "000000", 0, 0.9, intX4, intY4 If intX4 > -1 And intY4 > -1 Then TracePrint "私聊界面" InputText "关注微信公众号:**** 回复资源名字 就能观看影视、小说、网盘、等资源哦!" Delay 500 Tap 681, 1252 Delay 500 KeyPress "Back" Delay 500 KeyPress "Back" Delay 3000 已发 = 1 Else /* FindPic 555, 46, 582, 71, "Attachment:已关注.png", "000000", 0, 0.8, intX3, intY3 If intX3 > -1 And intY3 > -1 Then TracePrint "已关注" Else */ // TracePrint "点击私聊" // zm.Tap 589,59, 500 //点击关注 //zm.Tap 640,60, 200 //点击私聊 //End If FindPic 291,630,431,688,"Attachment:已封.png","000000",0,0.9,intX5,intY5 If intX5 > -1 And intY5 > -1 Then TracePrint "被私聊的用户被封了" Delay 500 KeyPress "Back" Delay 3000 已发 = 1 Else TracePrint "点击私聊" zm.Tap 640,60, 200 //点击私聊 End If End If Wend Next 结果 = "" zm.Swipe 312,1276,338,0, 300 '滑动 Delay 1000 Goto 继续
按键精灵自动私聊
自动发最右
最右主题
最右猜歌脚本
按键精灵自动回复聊天脚本