La núcleo básico a modificar del codigo creado sería este, ya que el resto se puede dejar igual:
1.- Se define el titulo de la ventana a manejar y se coloca a la vista (en foco activo). (con la herramienta generador de macros o con el Au3Info se puede saber la denominación.
2.- Se envia una tecla al interface activo en este momento Control f
3.- Se envia una click izquierdo de ratón a las coordenadas 400,400
Código: Seleccionar todo
;Aqui 1.- 1111111111111111111111111111111111111
$Ventana="Process";"El titulo de la ventana del programa"
MsgBox(0,"Activando ventana","En seguida",1)
WinActivate($Ventana) ; se pueden crear el envio de teclas y ratón con el grabador de Macros
WinWaitActive($Ventana,"",5) ;espera 5 segundos por la ventana a que esté activa
;Aqui 2.- 222222222222222222222222222222222
Sleep(2000) ; espera de 2 segundos
Send("^f") ;envio la tecla alt + a al interface del programa activo
;Aquí 3.- 333333333333333333333333333333333
Sleep(1000) ; espera de 1 segundo
MouseClick("left",400,400) ; hacer click en las coordenadas 400 400
![:smt024](./images/smilies/024.gif)
![:smt024](./images/smilies/024.gif)
![:smt024](./images/smilies/024.gif)
Código: Seleccionar todo
;Creditos BasicOs - Autoit.es
; Hello World - O programa muy básico para controlar un interface
;Crea un formulario con un botón para iniciar las acciones necesarias para el bot
; Envia una tecla a la interface y un click de ratón a unas coordenadas (atención a las coordenadas relativas o absolutas en OPT)
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <ButtonConstants.au3>
HotKeySet("{ESC}", "Salir")
GUICreate("Mi primer Robot", 264, 175)
GUICtrlCreateLabel("Poner una información adicional aqui mismo. ESC para salir", 30, 40, 200, 50)
$Button1 = GUICtrlCreateButton("Arrancar el Robot", 120, 120, 120, 25)
GUISetState(@SW_SHOW)
Opt("SendKeyDelay", 50)
Opt("SendKeyDownDelay", 100)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
$Ventana="Process";"El titulo de la ventana del programa"
MsgBox(0,"Activando ventana","En seguida",1)
WinActivate($Ventana) ; se pueden crear el envio de teclas y ratón con el grabador de Macros
WinWaitActive($Ventana,"",5) ;espera 5 segundos por la ventana a que esté activa
Sleep(2000)
Send("^f") ;envio la tecla alt + a al interface del programa activo
Sleep(1000)
MouseClick("left",400,400) ; hacer click en las coordenadas 400 400
EndSwitch
WEnd
Func Salir()
Exit
EndFunc
Información adicional:
Edit de un post anterior:
Aquí tienes un ejemplo de "Esclavizar" alguna aplicación, otro que se hace algo así:
Un ejemplo para ganar al solitario de Xpyro: http://www.emesn.com/autoitforum/viewtopic.php?t=68
Enlace al Grabador de Macros con un ejemplo para arrancar el programa
y tambien http://www.emesn.com/autoitforum/viewtopic.php?t=81
Lo que necesitas lo puedes hacer con el ratón y teclado, mientras tengas activo el grabador de macros, el te va guardando, y te genera el código automáticamente.
En el Scite Menu tools, Au3Recorder, entonces puedes usar o retocar el código que te genera.
Puedes hacer algo como esto con más práctica: http://www.youtube.com/watch?v=BYV9WLP4OgM
o algo sencillo como esto..
http://www.youtube.com/watch?v=Gl3brW22XNs
la técnica leer los pixels de la pantalla identificando objetos y enviando coordenadas y clicks con MouseClick ...
Aquí unas cuantas demostraciones esclavizando entornos gráficos, con las funciones Pixel:
http://www.youtube.com/results?search_q ... rch=Search
Enlace de bot guildwars
Video tutoriales http://www.emesn.com/autoitforum/viewto ... 36&start=0
Un ejemplo: http://www.autoitscript.com/forum/index ... opic=99693
Salu22:)