原理：先找到對應的圖，得到座標點選。或轉發，向下翻頁。自動巡屏。關於怎麼判斷是否已經贊或已經轉發，是通過圖片不一樣，或者把屏從上到下分多個塊實現的。 

// QQ空間自動點贊機 小黃人為您點贊。
//12行程式碼實現。原始碼：Rem head
FindPic 0,0,1024,768,"Attachment:\zan.bmp",1,intX,intY
If intX > 0 And intY > 0 Then
 MoveTo intX+5, intY+5
 Delay 100
 LeftClick 1
 Delay 100
 Goto head
End If
 KeyPress "PageDown", 1
 Delay 1000
 Goto head
 

QQ空間自動評論原始碼：

Dim iy
Rem head
  MoveTo 0, 0
 FindPic 0,0,1366,768,"Attachment:\close.bmp",1,intX,intY
If intX > 0 And intY > 0 Then
	KeyPress "Esc", 1
	 Delay 100
 Goto head
End If 
  
iy = 0
Rem nextfind
FindPic 0,iy,920,768,"Attachment:\wys.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then 
//MessageBox "1"

    MoveTo intX , intY 
    Delay 1
    LeftClick 1
    Delay 3000
      MoveTo 0,0 
    SayString "天靈靈，地靈靈，再來一個冰淇淋。"
    Delay 100

    
    
    KeyDown 17, 1
    KeyPress 13, 1
    KeyUp 17, 1
     Delay 50
    
    Delay 5000
    iy = intY + 100
    If iy > 768 Then 
        KeyPress "PageDown", 1
        Delay 100
        Goto head
    End If
    Goto nextfind
End If
   MoveTo 0,0 
Delay 5000
KeyPress "PageDown", 1
Delay 100
Goto head
 

微博自動點贊原始碼：

Rem head
FindPic 0,0,1366,768,"Attachment:\zan.bmp",1,intX,intY
If intX > 0 And intY > 0 Then
 MoveTo intX + 5, intY + 10
 
 Delay 1
 LeftClick 1
  MoveTo 0,0
 Delay 100
 Goto head
End If
 KeyPress "PageDown", 1
 Delay 5000
 Goto head

微博自動轉發原始碼：

Dim iy

Rem head
iy = 0
Rem nextfind
FindPic 0,iy,1366,768,"Attachment:\zf2.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then 
MessageBox "aa"


    MoveTo intX , intY
      Delay 5000
    LeftClick 1

    MoveTo 0,0
    Delay 5000
    //
    KeyDown 17, 1
    KeyPress 13, 1
    KeyUp 17, 1
    Delay 5000
    iy = intY + 20
    If iy > 768 Then 
		KeyPress "PageDown", 1
		Delay 100
    	Goto head
    End If
    
     Goto nextfind
End If

Delay 5000
KeyPress "PageDown", 1
Delay 100
Goto head
 

程式原始碼,定製專家手機:18910620895 旺旺:chenhao0568  QQ:345139427