Code : Tout sélectionner
Do
$color="0x5C99D2"
Sleep(5000)
$coord=PixelSearch(0,0,@DesktopWidth,@DesktopHeight,$color)
if @error=1 Then exit 1
Until ($color="0x5C99D2")
MouseClick("left", 1593, 9, 1)
Code : Tout sélectionner
Do
$color="0x5C99D2"
Sleep(5000)
$coord=PixelSearch(0,0,@DesktopWidth,@DesktopHeight,$color)
if @error=1 Then exit 1
Until ($color="0x5C99D2")
MouseClick("left", 1593, 9, 1)
Code : Tout sélectionner
While 1
WinActivate("Roulette Européenne - Europa Casino")
$color="0x001261"
WinWaitActive("Program Manager")
MouseClick("left", 1626, 15, 2)
sleep(400)
Send ( "1" )
While 2
sleep(200)
Send("{ENTER}")
WinWaitActive("World of Warcraft")
sleep(900)
MouseClick("left", 820, 551, 1)
sleep(200)
Send("yoyo86220")
sleep(300)
MouseClick("left", 844, 649, 1)
sleep(300)
Send("*******")
sleep(300)
MouseClick("left", 859, 736, 1)
sleep(100)
MouseClick("left", 812, 957, 1)
sleep(9000)
$coord=PixelSearch(0,0, 812, 957,$color)
If Not @error Then ExitLoop
WEnd
sleep(1000)
MouseClick("left", 812, 957, 1)
sleep(15000)
Run("D:\aide.bat")
MouseClick("left", 1392, 260, 1)
sleep(2000)
MouseClick("left", 332, 1032, 1)
sleep(6000)
MouseClick("left", 0, 0, 1)
sleep(1000)
MouseClick("left", 1450, 266, 1)
sleep(100)
exit
Wend
Code : Tout sélectionner
If Not @error Then ExitLoop
Code : Tout sélectionner
If PixelSearchExists Then Exitloop