Problema muy basico.

[artepad]

Hola,

Soy nuevo en esto y necesito hacer algo muy simple. es muy probable que este en el foro pero tengo muy poco tiempo para verlo.

Lo que necesito es que al momento de apretar un tecla ejemplo la "w" el cursos del maus se dirigía a un lugar especifico y haga un click, y su apretó otra se dirija a otro lugar.

me imagino que es solo un if que esta dentro de un ciclo infinito o un case que este diseñado con las teclas especificas.

cabe destacar que necesito 13 teclas que muevan el maus a 3 lugares diferentes.

Si alguien me puede ayudar

Muchas gracias.

[artepad]

Local $iLoop = 1, $sText = ""
While $iLoop = 1
$sText = InputBox("Ejemplo", "Donde se movera el puntero q o w")

If @error = 1 Then
MsgBox($MB_SYSTEMMODAL, "Error", "You pressed 'Cancel' - try again!")
Else

If $sText <> "q" Then
MouseMove(390, 270)
ElseIf $sText <> "w" Then
MouseMove(600, 600)

Else
$iLoop = 0
EndIf
EndIf
WEnd

Con eso mas o menos se me ocurre pero no quiero que salga el cuadro preguntándome para donde me quiero mover

Como puedo leer las teclas del teclado sin tener que usar InputBox

[Dany]

Hola mira este ejemplo que te escribi.

Presionado w s para moverlo y dar click y con ESC termina el programa.

Código: Seleccionar todo

Global $wX = 0, $wY = 0
Global $sX = @DesktopWidth, $sY = @DesktopHeight



HotKeySet("{ESC}", "Salir")
HotKeySet("w", "PresionW")
HotKeySet("s", "PresionS")

While 1
	Sleep(100)
WEnd

Func PresionW()
MouseClick("right",$wX,$wY)
EndFunc   ;==>PresionW

Func PresionS()
MouseClick("right",$sX,$sY)
EndFunc   ;==>PresionS

Func Salir()
	Exit
EndFunc   ;==>Salir

Saludos

[artepad]

Muchas gracias me sirvió :)