原理:先找到对应的图,得到坐标点击。或转发,向下翻页。自动巡屏。关于怎么判断是否已经赞或已经转发,是通过图片不一样,或者把屏从上到下分多个块实现的。
// 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
店铺:http://chenhao0568.taobao.com
QQ空间自动评论自动点赞 微博自动点赞自动转发神器带源码(超简单)
原文:http://blog.csdn.net/chenhao0568/article/details/43448675