fbpx

Expresate

Si además quieres enviarnos un Artículo para el Blog y redes sociales, pulsa el siguiente botón:

Manejar un servo po...
 
Avisos
Vaciar todo

Manejar un servo por serie con VB

15 Respuestas
8 Usuarios
0 Reactions
14.4 K Visitas
mif
Respuestas: 1095
 Mif
Topic starter
(@mif)
Noble Member
Registrado: hace 19 años

Hola Roboticadictos... estoy desarrollando un programa muy sencillo, que lo unico que debe hacer es generar una senal valida para mover un servo a traves del puerto serie de un pc... Lo quiero basar en VB, pero es muy dificil encontrar ayuda util de que diga como empezar.
Creo que la idea es sencilla, os resumo, conectamos el hilo de control del servo al pin TX del Com1, se conecta el servo a la alimentacion correcta... y con unos botoncillos o un slider... lo tenemos girando a placer.
El programa quedara algo como esto:

TestServo

Una vez que este empezada podra ir mejorandose y complicandose, pero ando periddisimo con el comienzo...
En cuanto tenga algo que funcione un poco os subo las fuentes del proyecto para que podamos investigar todos a una...

Gracias por vuestra ayuda.
Angel.

PD: Perdonad que no ponga ñ, o ninguna tilde... es que estoy trabajando en londres, y estos british no usan esas cosas, claro, de modo que cada vez que quiero poner la ñ tengo que hacer alt+164, y es un coñazo... si eso es asi con una letra, imaginaos lo que es con las vocales acentuadas

Responder
14 respuestas
mif
Respuestas: 1095
 Mif
Topic starter
(@mif)
Noble Member
Registrado: hace 19 años

Que chulo... al final esto lo resolvi con una placa de control comunicada por serie... mucho mas comodo y logico, pero el tema que comentas es muy interesante, como accedes a ese contador?

Responder
roboticsbcn
Respuestas: 244
(@roboticsbcn)
Estimable Member
Registrado: hace 19 años

Hola JoseLuis,
¿pq no nos cuentas un poco como funciona ese timer tan rapido de Windows? ¿Se puede usar desde VB6?

Salu2!

Responder
bactering
Respuestas: 15
(@bactering)
Active Member
Registrado: hace 18 años

Hola:
No se si esto os servira. Es en Delphi y es una temporizacion de 5 useg. A ver si puede servir. Lo uso para comunicar el puerto paralelo con I2C:
//-----------------------------------------------------------------------------

Procedure Dly5;
(* Temporización de 5 uSec *)

Var F : Int64;
T_Start, T_Stop, T_Now : Int64;

Begin
QueryPerformanceCounter (T_Start);
QueryPerformanceFrequency (F);
T_Stop := T_Start + F * 5 Div 1000000;
Repeat
Application.ProcessMessages;
QueryPerformanceCounter (T_Now)
Until T_Now >= T_Stop
End;

Saludos

Responder
mif
Respuestas: 1095
 Mif
Topic starter
(@mif)
Noble Member
Registrado: hace 19 años

Muy bueno bactering, dede luego parece interesante... Qué SO utilizas?

Responder
bactering
Respuestas: 15
(@bactering)
Active Member
Registrado: hace 18 años

El S0? El que comentan que es complicado acceder al puerto paralelo, XP. Voy a abrir un nuevo tema para ello.

Responder
Página 3 / 3
Compartir: