#include <ImageSearch.au3>
#include <GDIPlus.au3>
While 1
$fileA = @ScriptDir & "\imagenes\link.bmp"
_GDIPlus_Startup()
$hImageA =_GDIPlus_ImageLoadFromFile($fileA)
$hBitmapA = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hImageA)
$x = 0
$y = 0
$result = _ImageSearch($hBitmapA, 1, $x, $y, 20, 0)
If $result > 0 Then
MouseMove($x, $y)
MouseClick("left")
Send ("{DELETE}")
Send("")
Send("{ENTER}")
ExitLoop
EndIf
sleep(300)
WEnd
Sleep(30000)
$fileA = @ScriptDir & "\imagenes\BotonPubli.bmp"
_GDIPlus_Startup()
$hImageA =_GDIPlus_ImageLoadFromFile($fileA)
$hBitmapA = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hImageA)
$x = 0
$y = 0
$result = _ImageSearch($hBitmapA, 1, $x, $y, 20, 0) ;
If $result > 0 Then
MouseMove($x, $y)
MouseClick("left")
EndIf
Sleep(15000)
$fileA = @ScriptDir & "\imagenes\BotonAbajo.bmp"
_GDIPlus_Startup()
$hImageA =_GDIPlus_ImageLoadFromFile($fileA)
$hBitmapA = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hImageA)
$x = 0
$y = 0
$result = _ImageSearch($hBitmapA, 1, $x, $y, 20, 0)
If $result > 0 Then
MouseMove($x, $y)
MouseClick("right")
EndIf
While 1
$fileA = @ScriptDir & "\imagenes\Cebolla.bmp"
_GDIPlus_Startup()
$hImageA =_GDIPlus_ImageLoadFromFile($fileA)
$hBitmapA = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hImageA)
$x = 0
$y = 0
$result = _ImageSearch($hBitmapA, 1, $x, $y, 20, 0)
If $result > 0 Then
MouseMove($x, $y)
Sleep(30000)
MouseClick("left")
Send("{DOWN}")
Send("{ENTER}")
ExitLoop
EndIf
sleep(300)
WEnd
_GDIPlus_ImageDispose($hImageA)
_GDIPlus_Shutdown()
#include <GDIPlus.au3>
While 1
$fileA = @ScriptDir & "\imagenes\link.bmp"
_GDIPlus_Startup()
$hImageA =_GDIPlus_ImageLoadFromFile($fileA)
$hBitmapA = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hImageA)
$x = 0
$y = 0
$result = _ImageSearch($hBitmapA, 1, $x, $y, 20, 0)
If $result > 0 Then
MouseMove($x, $y)
MouseClick("left")
Send ("{DELETE}")
Send("")
Send("{ENTER}")
ExitLoop
EndIf
sleep(300)
WEnd
Sleep(30000)
$fileA = @ScriptDir & "\imagenes\BotonPubli.bmp"
_GDIPlus_Startup()
$hImageA =_GDIPlus_ImageLoadFromFile($fileA)
$hBitmapA = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hImageA)
$x = 0
$y = 0
$result = _ImageSearch($hBitmapA, 1, $x, $y, 20, 0) ;
If $result > 0 Then
MouseMove($x, $y)
MouseClick("left")
EndIf
Sleep(15000)
$fileA = @ScriptDir & "\imagenes\BotonAbajo.bmp"
_GDIPlus_Startup()
$hImageA =_GDIPlus_ImageLoadFromFile($fileA)
$hBitmapA = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hImageA)
$x = 0
$y = 0
$result = _ImageSearch($hBitmapA, 1, $x, $y, 20, 0)
If $result > 0 Then
MouseMove($x, $y)
MouseClick("right")
EndIf
While 1
$fileA = @ScriptDir & "\imagenes\Cebolla.bmp"
_GDIPlus_Startup()
$hImageA =_GDIPlus_ImageLoadFromFile($fileA)
$hBitmapA = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hImageA)
$x = 0
$y = 0
$result = _ImageSearch($hBitmapA, 1, $x, $y, 20, 0)
If $result > 0 Then
MouseMove($x, $y)
Sleep(30000)
MouseClick("left")
Send("{DOWN}")
Send("{ENTER}")
ExitLoop
EndIf
sleep(300)
WEnd
_GDIPlus_ImageDispose($hImageA)
_GDIPlus_Shutdown()
Subscript used on non-accesible variable
Au revoir!