Utilizar el Joystick desde Visual Basic con el API

[Sponsored links]

[DrakerDG]

=) Encontré información interesante sobre el uso de funciones del API para el control del Joystick utilizando Visual Basic. Sé que para la gran mayoría esto no es nada nuevo, pero para los que no o los que de todos modos les llame la atención desarrolle un ejemplo.

Para el desarrollo del mismo utilicé varias funciones:

joyGetPosEx (http://msdn.microsoft.com/library/default.asp?url=/library/en-us/multimed/htm/_win32_joygetposex.asp)

joyGetDevCaps (http://msdn.microsoft.com/library/default.asp?url=/library/en-us/multimed/htm/_win32_joygetdevcaps.asp)

joyGetNumDevs (http://msdn.microsoft.com/library/default.asp?url=/library/en-us/multimed/htm/_win32_joygetdevcaps.asp)

Con sus respectivas estructuras de registros:

JOYINFOEX (http://msdn.microsoft.com/library/default.asp?url=/library/en-us/multimed/htm/_win32_joyinfoex_str.asp)

JOYCAPS (http://msdn.microsoft.com/library/default.asp?url=/library/en-us/multimed/htm/_win32_joycaps_str.asp)

Adicionalmente utilicé otra función del API para reproducir archivos WAV, por ejemplo: Al pulsar un botón del joystick.

sndPlaySound (http://msdn.microsoft.com/library/default.asp?url=/library/en-us/multimed/htm/_win32_sndplaysound.asp)

Este ejemplo puede detectar los joystick instalados en el sistema y si están conectados. También saber cuantos botones y ejes tiene. Con el apoyo de graficas y sonido muestra el estado del joystick seleccionado. Produce diferentes sonidos cuando se presionan los botones o se mueven las palancas del joystick y/o pad. Muestra los valores que detecta por medio del registro de consulta, en este caso el JOYINFOEX de la función joyGetPosEx. Se puede cambiar ID del joystick en tiempo de ejecución si hay más de uno conectados al sistema.

Pueden bajar este ejemplo del siguiente link:

JoystickEX.zip (http://www.solocodigo.com/index.php?opt=attachment&id=332)

[ISAexpress]

ya lo habia pillado