Code : Tout sélectionner
Dim $posX[4]=[702,761,958,951]
Dim $posY[4]=[467,653,653,467]
ClickOuJeVeux($posX,$posY)
_RecherchePixelEtClick(2,0xB0D88B)
Func ClickOuJeVeux($arrayX,$arrayY)
For $i=0 To UBound($arrayX)-1
MouseClick("left",$arrayX[$i],$arrayY[$i],2,0)
Next
EndFunc
Func _RecherchePixelEtClick($nbClick=2,$color=0xB0D88B)
Local $posColor
Do
$posColor=PixelSearch(0,0,@DesktopWidth,@DesktopHeight,$color)
Until Not @error
MouseClick('left',$posColor[0],$posColor[1],$nbClick,0)
EndFunc