微信自動加附近人腳本

A. 微信自動加好友腳本

Dim intX, intY
Dim intX1, intY1
Dim intX2, intY2
Dim intX3, intY3
KeepScreen True
屏幕寬度 = GetScreenX()
屏幕高度 = GetScreenY()
If Not (屏幕寬度 = 600 And 屏幕高度 = 1024) Then
ShowMessage "屏幕解析度必須是600*1024，即將退出"
Delay 500
EndScript
End If
KeyPress "Home", 1
Delay 500
RunApp "com.tencent.mm", ".plugin.nearby.ui.NearbyFriendsUI"
Delay 8000
Call 附近的人()
Delay 1000
Call 附近是否有人()
Delay 1000
Sub 附近是否有人()
FindPic 0, 0, 600, 1024, "Attachment:2.png",0.9, intX, intY
If intX1 > 0 And intY1 > 0 Then
ShowMessage "附近有人"
Call 點擊打招呼()
Else
ShowMessage "附近沒人"
EndScript
End If
End Sub
Sub 寫字並發送()
InputText"你好,交個朋友吧"
End Sub
Sub 發送按鈕找圖()
FindColorEx 0, 0, 600, 200, "1AC045", 0, 0.9, intX3, intY3
If intX3 > 0 And intY3 > 0 Then
ShowMessage "准備發送"
Else
ShowMessage "發送失敗"
EndScript
End If
End Sub
Sub 附近的人()
FindPic 0, 0, 540, 968, "Attachment:1.png", 0.9, intX, intY
//如果沒有找到，intX和intY的值都會被置為-1
If intX > 0 And intY > 0 Then
ShowMessage "成功查找到附近的人"
Else
ShowMessage "查找到附近的人失敗"
EndScript
End If
End Sub
Sub 打招呼找圖()
FindColorEx 0, 0, 600, 1024, "1AC045", 0, 0.9, intX2, intY2
If intX2 > 0 And intY2 > 0 Then
ShowMessage"即將打招呼"
Else
ShowMessage "打招呼失敗"
EndScript
End If
End Sub
//你試下

B. 幫忙做個，手機版的按鍵精靈腳本，微信自動加附近人好友，謝謝了，三星i9500手機

數據精靈是嗎

C. 微信怎麼能自動加附近人

• 打開微信進入主界面

  

D. 微信怎麼自動加附近人

在微信找附近的人，然後選擇添加。

步驟：

一、打開微信。

(4)微信自動加附近人腳本擴展閱讀：

用附近的人一般情況下很難加上身邊的人。方圓幾百米的范圍，距離已經不算是很近，而且能顯示在你微信上的人也是隨機的。剛開始的時候，微信的附近的人的距離是非常准確的，有的時候你坐公交車都可以加到同車的人。

但是這也為一些居心不良的人提供了方便，所以後來微信就改變了設置，附近的人不再那麼精準，只能顯示個大致范圍。

其實大家不再用「附近的人」的功能也很容易理解，微信已經成為熟人社交工具，而且微信已成為在網路上的實名標識，已經無法裝作一個陌生人隨便加一個人聊天。每個人在加好友的時候已經非常謹慎，加個陌生人（微商除外）有多難。