Hwnd = Plugin.Window.Foreground()
Call Plugin.Window.Move(Hwnd, 0, 0)
//上述命令是对游戏窗口进行绑定
Delay 1000
Rem 主程序
//这里可以写肥独需要先操作的主程序,再到下面找图
Delay 500
MoveTo 383, 419
LeftClick 1
Delay 1000
MoveTo 219, 320
LeftClick 1
Delay 500
LeftClick 1
Do
//一般图片显示需要时间所以这个延时可以根据自己做的东西调整
FindPic 693,186,847,224,"Attachment:\1.bmp",0.5,intX,intY
If intX > 0 And intY > 0 Then
Call a
Exit Do
End If
Delay 500
FindPic 693,186,847,224,"Attachment:\2.bmp",0.5,intX,intY
If intX > 0 And intY > 0 Then
Call b
Exit Do
End If
Delay 500
FindPic 693,186,847,224,"Attachment:\3.bmp",0.5,intX,intY
If intX > 0 And intY > 0 Then
Call c
Exit Do
End If
FindPic 693,186,847,224,"Attachment:\4.bmp",0.5,intX,intY
If intX > 0 And intY > 0 Then
Call d
Exit Do
End If
Delay 500
FindPic 693,186,847,224,"Attachment:\5.bmp",0.5,intX,intY
If intX > 0 And intY > 0 Then
Call e
Exit Do
End If
Delay 500
FindPic 693,186,847,224,"Attachment:\6.bmp",0.5,intX,intY
If intX > 0 And intY > 0 Then
Call f
Exit Do
End If
Delay 500
FindPic 693,186,847,224,"Attachment:\7.bmp",0.5,intX,intY
If intX > 0 And intY > 0 Then
Call g
Exit Do
End If
Delay 500
FindPic 693,186,847,224,"Attachment:\8.bmp",0.5,intX,intY
If intX > 0 And intY > 0 Then
Call h
Exit Do
End If
Delay 500
FindPic 693,186,847,224,"Attachment:\9.bmp",0.5,intX,intY
If intX > 0 And intY > 0 Then
Call i
Exit Do
End If
Delay 500
FindPic 693,186,847,224,"Attachment:\10.bmp",0.5,intX,intY
If intX > 0 And intY > 0 Then
Call j
Exit Do
End If
Delay 500
Loop
Sub a
MoveTo 383, 419
LeftClick 1
Delay 1000
MoveTo 215, 413
LeftClick 1
Delay 1000
MoveTo 446, 320
LeftClick 1
Delay 1000
MoveTo 451, 543
LeftClick 1
Delay 1000
//需要操作的子程序
Goto 主程序
End Sub
Sub b
MoveTo 383, 422
LeftClick 1
Delay 1000
MoveTo 214, 410
LeftClick 1
Delay 1000
MoveTo 403, 270
LeftClick 1
Delay 1000
MoveTo 453, 538
LeftClick 1
Delay 1000
//需要操作的子程序
Goto 主程序
End Sub
Sub c
MoveTo 383, 422
LeftClick 1
Delay 1000
MoveTo 214, 410
LeftClick 1
Delay 1000
MoveTo 456, 267
LeftClick 1
Delay 1000
MoveTo 453, 538
LeftClick 1
Delay 1000
Delay 1000
//需要操作的子程序
Goto 主程序
End Sub
Sub d
MoveTo 383, 422
LeftClick 1
Delay 1000
MoveTo 214, 410
LeftClick 1
Delay 1000
MoveTo 403, 270
LeftClick 1
Delay 1000
MoveTo 608, 270
LeftClick 1
Delay 1000
//需要操作的子程序
Goto 主程序
End Sub
Sub e
MoveTo 383, 422
LeftClick 1
Delay 1000
MoveTo 214, 410
LeftClick 1
Delay 1000
MoveTo 403, 270
LeftClick 1
Delay 1000
MoveTo 500, 322
LeftClick 1
Delay 1000
//需要操作的子程序
Goto 主程序
End Sub
Sub f
MoveTo 383, 422
LeftClick 1
Delay 1000
MoveTo 214, 410
LeftClick 1
Delay 1000
MoveTo 403, 270
LeftClick 1
Delay 1000
MoveTo 557, 266
LeftClick 1
Delay 1000
//需要操作的子程序
Goto 主程序
End Sub
Sub g
MoveTo 383, 422
LeftClick 1
Delay 1000
MoveTo 214, 410
LeftClick 1
Delay 1000
MoveTo 403, 270
LeftClick 1
Delay 1000
MoveTo 556, 315
LeftClick 1
Delay 1000
//需要操作的子程序
Goto 主程序
End Sub
Sub h
MoveTo 383, 422
LeftClick 1
Delay 1000
MoveTo 214, 410
LeftClick 1
Delay 1000
MoveTo 403, 270
LeftClick 1
Delay 1000
MoveTo 600, 321
LeftClick 1
Delay 1000
//需要操作的子程序
Goto 主程序
End Sub
Sub i
MoveTo 383, 422
LeftClick 1
Delay 1000
MoveTo 214, 410
LeftClick 1
Delay 1000
MoveTo 403, 270
LeftClick 1
Delay 1000
MoveTo 400, 315
LeftClick 1
Delay 1000
//需要操作的子程序
Goto 主程序
End Sub
Sub j
MoveTo 383, 422
LeftClick 1
Delay 1000
MoveTo 214, 410
LeftClick 1
Delay 1000
MoveTo 403, 270
LeftClick 1
Delay 1000
MoveTo 499, 270
LeftClick 1
Delay 1000
//需要操作的子程序
Goto 主程序
End Sub
Call Plugin.Window.Move(Hwnd, 0, 0)
//上述命令是对游戏窗口进行绑定
Delay 1000
Rem 主程序
//这里可以写肥独需要先操作的主程序,再到下面找图
Delay 500
MoveTo 383, 419
LeftClick 1
Delay 1000
MoveTo 219, 320
LeftClick 1
Delay 500
LeftClick 1
Do
//一般图片显示需要时间所以这个延时可以根据自己做的东西调整
FindPic 693,186,847,224,"Attachment:\1.bmp",0.5,intX,intY
If intX > 0 And intY > 0 Then
Call a
Exit Do
End If
Delay 500
FindPic 693,186,847,224,"Attachment:\2.bmp",0.5,intX,intY
If intX > 0 And intY > 0 Then
Call b
Exit Do
End If
Delay 500
FindPic 693,186,847,224,"Attachment:\3.bmp",0.5,intX,intY
If intX > 0 And intY > 0 Then
Call c
Exit Do
End If
FindPic 693,186,847,224,"Attachment:\4.bmp",0.5,intX,intY
If intX > 0 And intY > 0 Then
Call d
Exit Do
End If
Delay 500
FindPic 693,186,847,224,"Attachment:\5.bmp",0.5,intX,intY
If intX > 0 And intY > 0 Then
Call e
Exit Do
End If
Delay 500
FindPic 693,186,847,224,"Attachment:\6.bmp",0.5,intX,intY
If intX > 0 And intY > 0 Then
Call f
Exit Do
End If
Delay 500
FindPic 693,186,847,224,"Attachment:\7.bmp",0.5,intX,intY
If intX > 0 And intY > 0 Then
Call g
Exit Do
End If
Delay 500
FindPic 693,186,847,224,"Attachment:\8.bmp",0.5,intX,intY
If intX > 0 And intY > 0 Then
Call h
Exit Do
End If
Delay 500
FindPic 693,186,847,224,"Attachment:\9.bmp",0.5,intX,intY
If intX > 0 And intY > 0 Then
Call i
Exit Do
End If
Delay 500
FindPic 693,186,847,224,"Attachment:\10.bmp",0.5,intX,intY
If intX > 0 And intY > 0 Then
Call j
Exit Do
End If
Delay 500
Loop
Sub a
MoveTo 383, 419
LeftClick 1
Delay 1000
MoveTo 215, 413
LeftClick 1
Delay 1000
MoveTo 446, 320
LeftClick 1
Delay 1000
MoveTo 451, 543
LeftClick 1
Delay 1000
//需要操作的子程序
Goto 主程序
End Sub
Sub b
MoveTo 383, 422
LeftClick 1
Delay 1000
MoveTo 214, 410
LeftClick 1
Delay 1000
MoveTo 403, 270
LeftClick 1
Delay 1000
MoveTo 453, 538
LeftClick 1
Delay 1000
//需要操作的子程序
Goto 主程序
End Sub
Sub c
MoveTo 383, 422
LeftClick 1
Delay 1000
MoveTo 214, 410
LeftClick 1
Delay 1000
MoveTo 456, 267
LeftClick 1
Delay 1000
MoveTo 453, 538
LeftClick 1
Delay 1000
Delay 1000
//需要操作的子程序
Goto 主程序
End Sub
Sub d
MoveTo 383, 422
LeftClick 1
Delay 1000
MoveTo 214, 410
LeftClick 1
Delay 1000
MoveTo 403, 270
LeftClick 1
Delay 1000
MoveTo 608, 270
LeftClick 1
Delay 1000
//需要操作的子程序
Goto 主程序
End Sub
Sub e
MoveTo 383, 422
LeftClick 1
Delay 1000
MoveTo 214, 410
LeftClick 1
Delay 1000
MoveTo 403, 270
LeftClick 1
Delay 1000
MoveTo 500, 322
LeftClick 1
Delay 1000
//需要操作的子程序
Goto 主程序
End Sub
Sub f
MoveTo 383, 422
LeftClick 1
Delay 1000
MoveTo 214, 410
LeftClick 1
Delay 1000
MoveTo 403, 270
LeftClick 1
Delay 1000
MoveTo 557, 266
LeftClick 1
Delay 1000
//需要操作的子程序
Goto 主程序
End Sub
Sub g
MoveTo 383, 422
LeftClick 1
Delay 1000
MoveTo 214, 410
LeftClick 1
Delay 1000
MoveTo 403, 270
LeftClick 1
Delay 1000
MoveTo 556, 315
LeftClick 1
Delay 1000
//需要操作的子程序
Goto 主程序
End Sub
Sub h
MoveTo 383, 422
LeftClick 1
Delay 1000
MoveTo 214, 410
LeftClick 1
Delay 1000
MoveTo 403, 270
LeftClick 1
Delay 1000
MoveTo 600, 321
LeftClick 1
Delay 1000
//需要操作的子程序
Goto 主程序
End Sub
Sub i
MoveTo 383, 422
LeftClick 1
Delay 1000
MoveTo 214, 410
LeftClick 1
Delay 1000
MoveTo 403, 270
LeftClick 1
Delay 1000
MoveTo 400, 315
LeftClick 1
Delay 1000
//需要操作的子程序
Goto 主程序
End Sub
Sub j
MoveTo 383, 422
LeftClick 1
Delay 1000
MoveTo 214, 410
LeftClick 1
Delay 1000
MoveTo 403, 270
LeftClick 1
Delay 1000
MoveTo 499, 270
LeftClick 1
Delay 1000
//需要操作的子程序
Goto 主程序
End Sub









