Procedimiento Para Convertir Programa Visual Basic 6.0 LPT A USB

Procedimiento para convertir programa Visual Basic 6.0 LPT a USB

www.arossini.com.ar

Introducción

1) Este documento está redactado para quienes tengan experiencia en trabajar con programas en Visual Basic 6.0 que manejen el Puerto Paralelo.

2) El programa en Visual Basic 6.0 que maneja el puerto USB es del tipo MSComm1.

3) Se toma como referencia de MSComm1: Serie.doc

4) Se toma como referencia de LPT: ElectroEstimulador.doc

5) Se muestra como convertir:

Programa Electroestimulador.vbp en ElectroestimuladorUSB.vbp

Firmware Com Virtual CDC.mcp en EEUSB.mcp

6) Por ahora, solo se muestran salidas. El procedimiento para entradas es similar, pero lo veré por falta de tiempo en una próxima revisión.

7) Todo el procedimiento, incluyendo el diseño, me llevó sólo unas dos horas. Por lo tanto, juzgo que es rápido.

8) Usado Visual Basic 6.0 para el programa.

9) Usado MPLab IDE y C18 para el Firmware.

Salidas del LPT

D1: Onda positiva

D2: Onda negativa

Para controlar la salida usamos el comando Out Puerto, 4 'Dato 2 Pin 4 Cable azul

Salidas del USB

Las del LPT ahora las convertiremos a:

“0”: Onda positiva valor 0 y Onda negativa valor 0.

“1”: Onda positiva valor 1

“2”: Onda positiva valor 0

“3”: Onda negativa valor 1

“4”: Onda negativa valor 0

Seguimos la filosofía usada en Serie.vbp para encender y apagar LEDs. Todo el resto se debe eliminar.

Para controlar la salida usamos MSComm1.Output = “0” a “4”. Esto reemplazará a Out Puerto, 4.

Procedimiento

En Electroestimulador.vbp

Cambiar el nombre a Electroestimulador.vbp

Cargar el componente Microsoft Comm Control 6.0. Mantener su nombre MSComm1.

Modificar Private Sub Generar() a como está presentado en Electroestimulador.vbp

Eliminar

...