Mi script funciona pero el .exe no

[djta94]

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:

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

¿Podría alguien ayudarme por favor?

[Dany]

Proba asi a ver.

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(@ScriptName, 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

saludos

[djta94]

Nada, ya lo probé y tampoco funcionó :S

[Dany]

Yo lo compile y funciona bien el tuyo. prueba de nuevo.

[djta94]

Ya encontré el problema, mi antivirus estaba bloqueando los clicks del compilado. Solo tuve que hacer una exepción y listo! ¡Muchas gracias!