Mi script funciona pero el .exe no
Publicado: 09 Dic 2013, 21:38
Acabo de terminar un pequeño script hoy, funcionaba perfectamente cuando lo corrí, pero cuando lo compilé en un ejecutable no funcionó. El ejecutable solo muestra el msgbox inicial pero el resto no funciona, ni el HotKeySet, ni los MouseClick ni el _Singleton. Aquí está mi script:
¿Podría alguien ayudarme por favor?
Código: Seleccionar todo
#Include <Misc.au3>
Func Close()
MsgBox(0, "Bot", "Bot closed successfully.");
Exit;
EndFunc
Func PixelCheck ($x, $y, $c)
While PixelGetColor($x, $y) <> $c
Sleep(100);
WEnd
EndFunc
Func Main()
While 1
;PixelCheck(612, 162, 3256607);
Sleep(500);
MouseClick("primary", 745, 545, 1, 0);
;PixelCheck(751, 538, 3817283);
Sleep(100);
MouseClick("primary", 775, 490, 1, 0);
;PixelCheck(305, 220, 0);
Sleep(500);
;MouseClick("primary", 475, 475, 1, 0);
MouseClick("primary", 510, 720, 2, 0);
Sleep(200);
MouseClick("primary", 560, 720, 2, 0);
Sleep(200);
MouseClick("primary", 640, 720, 2, 0);
Sleep(200);
MouseClick("primary", 570, 470, 1, 0);
;PixelCheck(490, 660, 4112132);
Sleep(200);
MouseClick("primary", 490, 660, 1, 0);
WEnd
EndFunc
If _Singleton("MyScriptName", 1) == 0 Then
MsgBox(64, "Bot", "The bot is already running.");
Else
HotKeySet("{F4}", "Close");
MsgBox(0, "Bot", "Press the F4 key to close the bot.");
Main();
EndIf