QQ游戏对对碰外挂教程

QQ游戏对对碰外挂教程(6) For i = 3 To 7 
For j = 0 To 7 
If boxs(i, j).type = boxs(i - 2, j).type And boxs(i, j).type = boxs(i - 3, j).type Then 
mouseClick boxs(i, j).x, boxs(i, j).y 
mouseClick boxs(i - 1, j).x, boxs(i - 1, j).y 
Exit Function 
End If 
Next j 
Next i 

'_ 　 情况 
For i = 2 To 7 
For j = 0 To 6 
If boxs(i, j).type = boxs(i - 1, j + 1).type And boxs(i, j).type = boxs(i - 2, j + 1).type Then 
mouseClick boxs(i, j).x, boxs(i, j).y 
mouseClick boxs(i, j + 1).x, boxs(i, j + 1).y 
Exit Function 
End If 
Next j 
Next i 

'　 _ 情况 
For i = 2 To 7 
For j = 1 To 7 
If boxs(i, j).type = boxs(i - 1, j - 1).type And boxs(i, j).type = boxs(i - 2, j - 1).type Then 
mouseClick boxs(i, j).x, boxs(i, j).y 
mouseClick boxs(i, j - 1).x, boxs(i, j - 1).y 
Exit Function 
End If 
Next j 
Next i 

'_-- 情况 
For i = 1 To 7 
For j = 0 To 5 

If boxs(i, j).type = boxs(i - 1, j + 2).type And boxs(i, j).type = boxs(i - 1, j + 1).type Then