Ejecutar boton Pequeño macro
Publicado: 06 Sep 2012, 19:37
Bueno gente tengo un problema que el primero es que hace poco empese a usar autoit y se me ocurrio hacer un programita cosa que lo ize con el koda las guils quedo re lindo xD con botones y una imagen de mi sobrina el tema a lo primero era que cuando apretara un boton puciera en cierta ventana un nombre de usuario y contraseña luego de buscar y buscar encontre un theard que me ayudo mucho y logre hacer que aga lo que yo queria poner user y pass en un juego bien ya solucionado eso me quise tirar un poco mas y hacer tipo un macro que trabaje tirando skills pero los skill tienen sierto tiempo de limite para tirarlos osea cada 20sec se habilita el tema es que encontre otro thear y me dio una idea pero no anda el codigo es este
lo que esta con negrita no funciona lo demas funciona a la perfecion lo que quiero hacer es que cuando le aga click al boton5 o sea F1 mande la Key F1 repetitivo pero cada 20seg tiempo puesto en $imput y se podria hacer que poner 10 lo interprete como 10seg y no milisegundos o.O
gracias y aver si me pueden ayudar porque ya me rompi la cabesa tratando de hacer esto :( lo que pasa que soy nuevito y creo que me lanse con algo grande para mi xD es como manejar una ferrari sin saber manejar xd
Código: Seleccionar todo
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("J.M.S - 2/9/2012", 421, 171, 192, 114)
GUISetBkColor(0x800000)
$Button1 = GUICtrlCreateButton("Mamerto", 8, 16, 81, 25)
$Button2 = GUICtrlCreateButton("Negra", 8, 56, 81, 25)
$Button3 = GUICtrlCreateButton("Tonto", 8, 96, 81, 25)
$Button4 = GUICtrlCreateButton("Asssss", 8, 136, 81, 25)
$Input1 = GUICtrlCreateInput("Delay", 160, 16, 49, 21)
$Input2 = GUICtrlCreateInput("Delay", 160, 56, 49, 21)
$Input3 = GUICtrlCreateInput("Delay", 160, 96, 49, 21)
$Input4 = GUICtrlCreateInput("Delay", 160, 136, 49, 21)
$Button5 = GUICtrlCreateButton("F1 Time", 104, 16, 49, 25)
$Button6 = GUICtrlCreateButton("F2 Time", 104, 56, 49, 25)
$Button7 = GUICtrlCreateButton("F3 Time", 104, 96, 49, 25)
$Button8 = GUICtrlCreateButton("F4 Time", 104, 136, 49, 25)
$Pic1 = GUICtrlCreatePic("C:\Documents and Settings\Administrador\Escritorio\Nueva carpeta (4)\Foto-0006.jpg", 232, 8, 169, 153)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
Switch GUIGetMsg()
Case $Button1
WinActivate ("Xgame)
Send("333333")
Sleep (1000)
Send ("{TAB}")
Send ("44444")
Send ("{Enter}")
Send ("{Enter}")
Case $Button2
WinActivate ("xgame")
Send("***********")
Sleep (1000)
Send ("{TAB}")
Send ("*********")
Send ("{Enter}")
Send ("{Enter}")
Case $Button3
WinActivate ("xgame")
Send("*******")
Sleep (1000)
Send ("{TAB}")
Send ("**********")
Send ("{Enter}")
Send ("{Enter}")
Case $Button4
WinActivate ("***********-")
Send("***********")
Sleep (1000)
Send ("{TAB}")
Send ("asdasd")
Send ("{Enter}")
Send ("{Enter}")
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd
[b]While 1
Switch GUIGetMsg()
case $Button5
ControlSend("************","","","F1")
$In1 = ConsoleRead ($Input1)
Sleep( $In1)
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd[/b]
lo que esta con negrita no funciona lo demas funciona a la perfecion lo que quiero hacer es que cuando le aga click al boton5 o sea F1 mande la Key F1 repetitivo pero cada 20seg tiempo puesto en $imput y se podria hacer que poner 10 lo interprete como 10seg y no milisegundos o.O
gracias y aver si me pueden ayudar porque ya me rompi la cabesa tratando de hacer esto :( lo que pasa que soy nuevito y creo que me lanse con algo grande para mi xD es como manejar una ferrari sin saber manejar xd