求QQ演义三国后台免费刷卡脚本,更希望有好心人能教我制作这种脚本.

发布网友 发布时间：2024-10-23 22:12

我来回答

共1个回答

热心网友 时间：2024-11-13 17:44

我只会做前台脚本，我也很喜欢做，但是学的时间很短还不太会
到这里去下一个附件，解压后把位图添加到按键精灵的附件，在写入以下代码：
Delay 2000

FindPic 0,0,1024,768,"Attachment:\演义目标.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 1000
LeftClick 1
END if

Delay 500
FindPic 0,0,1024,768,"Attachment:\黄龙军.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 1000
LeftClick 1
End If
Delay 7000
FindPic 0,0,1024,768,"Attachment:\开始战斗.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 1000
LeftClick 1
End If
i=0
While i=0

FindPic 0,0,1024,768,"Attachment:\确定.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
i=1
MoveTo intX, intY
Delay 1000
LeftClick 1
End If
Wend
Delay 1000
FindPic 0,0,1024,768,"Attachment:\演义目标.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 1000
LeftClick 1
End If
Delay 1000
FindPic 0,0,1024,768,"Attachment:\黄龙军.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
End If
Delay 1000
MouseWheel -2
Delay 1000
FindPic 0,0,1024,768,"Attachment:\裴元绍军.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 1000
LeftClick 1
End If
Delay 7000
FindPic 0,0,1024,768,"Attachment:\开始战斗.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 1000
LeftClick 1
End If
i=0
While i=0

FindPic 0,0,1024,768,"Attachment:\确定.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
i=1
MoveTo intX, intY
Delay 1000
LeftClick 1
End If
Wend
Delay 1000
FindPic 0,0,1024,768,"Attachment:\演义目标.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 1000
LeftClick 1
End If
Delay 1000
FindPic 0,0,1024,768,"Attachment:\黄龙军.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
End If
Delay 1000
MouseWheel -2
Delay 1000
FindPic 0,0,1024,768,"Attachment:\程志远军.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 1000
LeftClick 1
End If
Delay 7000
FindPic 0,0,1024,768,"Attachment:\开始战斗.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 1000
LeftClick 1
End If
i=0
While i=0

FindPic 0,0,1024,768,"Attachment:\确定.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
i=1
MoveTo intX, intY
Delay 1000
LeftClick 1
End If
Wend
Delay 1000
FindPic 0,0,1024,768,"Attachment:\演义目标.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 1000
LeftClick 1
End If
Delay 1000
FindPic 0,0,1024,768,"Attachment:\黄龙军.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
End If
Delay 1000
MouseWheel -3
Delay 1000
FindPic 0,0,1024,768,"Attachment:\张梁军.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 1000
LeftClick 1
End If
Delay 7000
FindPic 0,0,1024,768,"Attachment:\开始战斗.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 1000
LeftClick 1
End If
i=0
While i=0

FindPic 0,0,1024,768,"Attachment:\确定.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
i=1
MoveTo intX, intY
Delay 1000
LeftClick 1
End If
Wend
Delay 1000
FindPic 0,0,1024,768,"Attachment:\演义目标.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 1000
LeftClick 1
End If
Delay 1000
FindPic 0,0,1024,768,"Attachment:\黄龙军.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
End If
Delay 1000
MouseWheel -3
Delay 1000
FindPic 0,0,1024,768,"Attachment:\何仪军.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 1000
LeftClick 1
End If
Delay 7000
FindPic 0,0,1024,768,"Attachment:\开始战斗.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 1000
LeftClick 1
End If
i=0
While i=0

FindPic 0,0,1024,768,"Attachment:\确定.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
i=1
MoveTo intX, intY
Delay 1000
LeftClick 1
End If
Wend
Delay 1000
FindPic 0,0,1024,768,"Attachment:\演义目标.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 1000
LeftClick 1
End If
Delay 1000
FindPic 0,0,1024,768,"Attachment:\黄龙军.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
End If
Delay 1000
MouseWheel -4
Delay 1000
FindPic 0,0,1024,768,"Attachment:\张角军.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 1000
LeftClick 1
End If
Delay 7000
FindPic 0,0,1024,768,"Attachment:\开始战斗.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 1000
LeftClick 1
End If
i=0
While i=0

FindPic 0,0,1024,768,"Attachment:\确定.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
i=1
MoveTo intX, intY
Delay 1000
LeftClick 1
End If
Wend
这样循环10次就可以挂汉室余晖的紫卡了