Fácil de configurar, y utilizando también el DTR - RTS por si necesitáis alimentar algo con los 5V que salen del puerto COM (teniendo cuidado de no meter mucha carga) como ya explique en otro post llamado Activar DTR RTS Visual Basic
Se puede cambiar el puerto al COM que queramos y cambiar el modo de transmisión.
La configuración del joystick es tambien sencilla, podemos buscar el joystick y definir la velocidad del mismo.
Es un programa sencillo y fácil de entender para quien quiera aprender un poco de programación y electrónica
Descargar Coche RC VB by Infotronikblog
Ver software PBP para Pic 16f628a
By PeYuTrOn
Los niños siempre han estado fascinados con control remoto (RC) los juguetes. ¿Alguna vez has conocido a un niño que no estaba fascinado con un juguete de control remoto? Desde luego, no tienen. Todos los chicos que conozco está fascinado con los juguetes de control remoto. Por otra parte, no se limita sólo a los niños. Incluso los adultos aman mando a distancia.
ResponderEliminarRecuerdos.
Andy.
hola amigo
ResponderEliminarsobre su vb6 proyecto.
control de joystick
como puedo añadir más botones de condigo
¡gracias
Buenas Cesar, en el modulo modinput hay un apartado que se refiere a los botones del joystick en concreto esta:
ResponderEliminart = MYJOYEX.dwButtons
For i = 15 To 0 Step -1
JoyButtons(i) = False
If (2 ^ i) <= t Then
t = t - (2 ^ i)
JoyButtons(i) = True
End If
Next i
---------------------------------------
Y esto seria un ejemplo de lo que tendrias que poner en el Form donde este "PollJoystick" que en este caso es el Timer1:
If JoyButtons(0) = True Then
BUTT(5).BackColor = R01
End If
If JoyButtons(0) = False Then
BUTT(5).BackColor = R02
End If
If JoyButtons(1) = True Then
BUTT(6).BackColor = R01
End If
If JoyButtons(1) = False Then
BUTT(6).BackColor = R02
End If
para cada boton solo tienes que sustituir el joyButton(X) por el botón que quieres presionar. Creo que el máximo de botones es 15. Lo que no se es a cual corresponde cada botón.
Espero haberte ayudado!!!
Hello, Peyutron. A good lesson.
ResponderEliminarI am a novice programmer. Programming in Visual Basic 6.0.
Since you Peyutron professional. I have a question for you. I want to build a robot car. And to create a program on VB 6.0 to control the car via Bluetooth. Can you help me?
Thank you.
Hola, Peyutron. Una buena lección.
ResponderEliminarSoy un programador novato. Programación en Visual Basic 6.0.
Puesto que usted Peyutron profesional. Tengo una pregunta para usted. Quiero construir un coche robot. Y para crear un programa en VB 6.0 para controlar el coche a través de Bluetooth. ¿Me pueden ayudar?
Gracias.
Buenas!!! lamento decirte que por desgracia solo soy aficionado en el tema de programación en VB6. Nunca he programado nada para bluetooth. Pero puede que en esta dirección tengas algo de información:
Eliminarhttp://www.planet-source-code.com/vb/scripts/BrowseCategoryOrSearchResults.asp?lngWId=1&txtCriteria=bluetooth
Siento no poder ayudarte más
Saludos!!!
Hola, Peyutron. Gracias!
ResponderEliminar