UNIVERSIDAD DE LAS FUERZAS

ARMADAS – ESPE.
Departamento de Eléctrica y Electrónica.

Microprocesadores

TEMA: Empalme del Puerto Paralelo y Visual Basic

NRC: 2666

Nombre:
Raham Castillo

Profesora:
Miroslava Zapata

Fecha:
03 de Agosto del 2018
Índice
1. Tema ................................................................................................................................... 1
2. Objetivos ............................................................................................................................. 1
2.1. Objetivo General ............................................................................................................. 1
2.2. Objetivos Específicos...................................................................................................... 1
3. Procedimiento ..................................................................................................................... 1
3.1. Instalación de Librerías en Proteus ................................................................................. 1
3.2. Solución e Instalación de la librería INPOUT32.DLL ................................................... 2
3.3. Software para verificar el funcionamiento del Puerto LPT ............................................ 2
4. Programación en Visual Basisc 6.0 .................................................................................... 4
4.1. Entorno Gráfico del Aplicativo ....................................................................................... 4
4.2. Desarrollo de la Programación........................................................................................ 5
5. Circuito en Proteus ............................................................................................................. 6
5.1. Ejecución del Aplicativo ................................................................................................. 7
6. Problemas ........................................................................................................................... 1
7. Conclusiones ....................................................................................................................... 1
8. Anexos ................................................................................................................................ 1
8.1. Anexo 1: Instalación puerto LPT en Proteus .................................................................. 1
8.2. Instalación de la librería INPOUT32.DLL ..................................................................... 2
9. Bibliografía ......................................................................................................................... 2
1. Tema
Empalme del Puerto Paralelo con Visual Basic 6.0 mediante el encendido de leds.

2. Objetivos

2.1. Objetivo General

 Realizar una aplicación de encendido de leds utilizando el puerto paralelo del ISIS
y un entorno visual como lo es Visual Basic 6.0.

2.2. Objetivos Específicos

 Familiarizarse con el uso del puerto paralelo para la realización del proyecto.
 Instalar las librerías necesarias para el correcto funcionamiento del puerto paralelo
con el Visual Basic 6.0.
 Descargar el archivo inpout32.dll para permitir al proteus ejecutarse de forma
correcta.

3. Procedimiento
Para poder realizar la aplicación en Proteus es necesario contar con el puerto paralelo
físico (Figura 1) , caso contrario no se puede realzar ninguna simulación.

Figura 1. Puerto Paralelo

Para poder realizar la conexión del puerto paralelo y Visual Basic es necesario contar con
las librerías del puerto el LPT en Proteus y de la librería Inpout32.dll, la cual permite
establecer la conexión con Visual Basic.

3.1. Instalación de Librerías en Proteus

Para realizar la instalación de las librerías del Puerto Paralelo, accedemos al ISIS y
verificamos si existe dicho elemento. Escribimos en la ventana de búsqueda LPT (Figura
2) y observamos que no se encuentra instalado.

Figura 2. Búsqueda del LPT en proteus

1
Al no contar con las librerías del puerto paralelo en Proteus 8 Professional, se adjuntará el
proceso de instalación en el Anexo 1, donde se detallará el del mismo.

3.2. Solución e Instalación de la librería INPOUT32.DLL

Uno de los problemas más comunes que se presenta al intentar ejecutar el puerto LPT en
Proteus se debe a que no se encuentra instalado inpout32.dll (Figura 3) o la versión
instalada no es la correcta.

Figura 3. Mensaje de Error (Falta Inpout32.dll)

Otros posibles errores de inpout32.dll:

 Falta inpout32.dll
 inpout32.dll se está cargando
 Bloqueo de inpout32.dll
 No se encontró inpout32.dll
 No se pudo localizar inpout32.dll
 Infracción de acceso a inpout32.dll
 No se puede encontrar inpout32.dll
Solucionar el problema de Inpout32.dll
Para corregir automáticamente los errores relacionados con el archivo inpout32.dll es
necesario realizar la descargada de este archivo y copiar su documento en la carpeta
System32. Para ello adjuntaremos en el Anexo 2 el proceso de la instalación.
La versión a instalar para mi ordenador cumple con las siguientes especificaciones:
 Nombre del archivo: inpout32.dll
 La versión del inpout32.dll es para (Windows XP, Windows Vista, Windows 7,8)
 Tamaño: 96 KB (Figura 4)

Figura 4. Ícono Inpout32.dll

3.3. Software para verificar el funcionamiento del Puerto LPT

2
Parmon (Monitor de Puerto Paralelo)
Es un programa que permite visualizar el estado de los pines del puerto paralelo en el
monitor sin necesidad de tener un circuito electrónico preparado o conectado al puerto
paralelo.
Este programa puede ser descargado de internet. Con este programa podemos simular el
funcionamiento de cualquier aplicaión.

Figura 5. Software para comprobar el puerto paralelo

Para poder comprobar la activación del puerto paralelo empleando Parmon realizaremos
algunos ingresos utilizando el puerto LPT y el monitor de Parmon (Figura 5).
Se procede a iniciar la simulación en Proteus utilzando Parmon para comprobar la
activación de los mismos.
Decimal Hexadecimal Binario
0 0 00000000

Figura 6. Visualización del binario (00000000)

Observamos que nos muestra el valor de 0 en decimal, binario y hexadecimal.

Procedemos a representar al número 3 en decimal para ello activamos el segundo y tercer
botón del Software Parmon.
Decimal Hexadecimal Binario
3 3 00000011

3
 Figura 7. Visualización del binario (00000011)

Procedemos a representar al número 48 en decimal para ello activamos el sexto y séptimo

botón del Software Parmon.
Decimal Hexadecimal Binario
48 30 00110000

Figura 8. Visualización del binario (00110000)

4. Programación en Visual Basisc 6.0

4.1. Entorno Gráfico del Aplicativo

Primeramente creamos un nuevo formulario en Visual Basic y procedemos a pegar varios
botones, los cuales corresponderán a una matriz de LEDS.

Figura 9. Formulario

4
 Colocamos 8 botones los cuales representarán un valor en binario, mientras que en el
recuadro de resultado se podrá observar el valor en decimal de la combinación ingresada
mediante un label al cual se lo denominó lblValor.

Figura 10. Creación de botones y label

Cada uno de los botones se encuentra ubicado del bit menos significativo (el botón del
lado derecho) al más significativo (el botón del lado izquierdo). Todos los botones tendrán
el nombre de leds debido que es una matriz y se les asignará el valor de cero “0”.

Figura 11. Matriz de leds

Colocamos una imagen de fondo para realzar la presentación del aplicado. En este caso es
el control de Leds con puerto paralelo.

Figura 12. Entorno Visual del aplicativo en Visual Basic 6.0

4.2. Desarrollo de la Programación

Para desarrollar la programación, es necesario copiar la librería inpout32.dll (Figura 10),
la cual nos permitirá establecer la conexión entre el Visual Basic y el puerto paralelo.
Private Declare Function Inp Lib "E:\paralelo\INPOUT32.DLL" Alias "Inp32" (ByVal

5
PortAddress As Integer) As Integer
Private Declare Sub Out Lib "INPOUT32.DLL" Alias "Out32" (ByVal PortAddress As
Integer, ByVal Value As Integer)
Figura 13. Libería Inpout32.dll para Visual Basic

Procedemos a realizar la programación del botón, para ello se crea un IF el cual captura el
valor del botón, en que su estado inicial es cero “0”. Al momento de pulsar los botones
pasan a tener el valor de “1” y los demás se mantienen en “0”.
Finalmente capturamos el valor, para mostrarlo en decimal y lo mostramos a través de un
label (lblValor.Caption), dicho valor será mostrado por medio del puerto paralelo.
Private Sub LED_Click(Index As Integer)
If LED(Index).Caption = "0" Then
LED(Index).Caption = "1"
Else
LED(Index).Caption = "0"
End If
lblValor.Caption = (LED(0).Caption) * (2 ^ 0) + (LED(1).Caption) * (2 ^ 1) +
(LED(2).Caption) * (2 ^ 2) + (LED(3).Caption) * (2 ^ 3) + (LED(4).Caption) * (2 ^ 4) +
(LED(5).Caption) * (2 ^ 5) + (LED(6).Caption) * (2 ^ 6) + (LED(7).Caption) * (2 ^ 7)
Out "&H378", Val(lblValor.Caption)
End Sub
Figura 14. Código fuente del botón cmdLED

Finalmente utilizamos la instrucción Out "&H378", Val(lblValor.Caption) para tomar el

valor capturado por cada uno de los botones y sacamos el valor por el puerto (Figura 11).

5. Circuito en Proteus
Iniciamos pegando el puerto paralelo en nuestro documento de Proteus.

Figura 15. LPT en Proteus

Procedemos a realizar las respectivas conexiones a los 8 leds, considerando el bit menos
significado al más significativo. Siendo el bit menos significativo el led de la derecha y el
más significativo el led de la derecha.

6
 Figura 16. Diseño del Circuito

5.1. Ejecución del Aplicativo

Corremos el aplicativo en Proteus y damos OK al mensaje que se mostrará al momento de
ejecutar el programa en Proteus..

Figura 17. Mensaje de conexión con el puerto paralelo

Ingresamos una combinación en el Visual Basic y podemos visualizar su resultado a través

del proteus. La combinación máxima que puede mostrar es (11111111) en binario
correspondiente al número 255 en decimal.
Ejecución 1:
Decimal Binario
130 1 0 0 0 0 0 1 0

7
 Figura 18. Ejecución 1

Ejecución 2:
Decimal Binario
135 1 0 0 0 0 1 1 1

Figura 19. Ejecución 2

Ejecución 3:
Decimal Binario
255 1 1 1 1 1 1 1 1

8
CIRCUITO TOTAL (VISUAL BASIC Y PROTEUS)

Figura 20. Ejecución 3

1
6. Problemas
 Al descargar la librería INPOUT32.DLL no la reconocía, por tal motivo fue necesario
descargar y probar varias librerías para que el Proteus pueda reconocerla.
 No se puede adquirir con facilidad un equipo que posea puerto paralelo.

7. Conclusiones
 Establecimos la comunicación paralela entre el Visual Basic y el Proteus, a pesar de
los inconvenientes que se presentaron para su desarrollo.
 El puerto paralelo nos ofrece 8 salidas de dirección, las cuales se pueden empalmar de
forma eficiente a otros elementos para mejorar los aplicativos.

8. Anexos

8.1. Anexo 1: Instalación puerto LPT en Proteus

Ingresamos a nuestro navegador de internet y descargamos las librerías de Proteus.
Una vez descargadas las librerías, pertenecientes al puerto paralelo, procedemos a guardar
en la carpeta de LabcenterElectronics y copiamos dichos archivos en Librerías y Modelos.

Figura 21. Librería y Modelo

Pasos para instalar las librerías del puerto paralelo:

 Accedemos al disco local C y damos clic en archivos de programa
 Buscamos LabcenterElectronics y damos clic.
 Ingresamos a la carpeta de Proteus 8 Professional.
 Buscamos Librerías y modelos y copiamos los archivos.

Figura 22. ´Pasos para instalar la librería para el LPT

1
Ahora si observamos que las librerías del puerto paralelo ya se encuentran instaladas y se
pueden emplear siempre y cuando se tenga el puerto paralelo físico en la pc.

Figura 23. LPT en proteus una vez finalizada la instalación

Se adjunta en link de descarga del archivo que se encuentra en el bloc Topodic:

http://www.todopic.com.ar/foros/index.php?topic=873.0

8.2. Instalación de la librería INPOUT32.DLL

Para poder instalar esta librería, se accede de forma análoga que con las librerías de
Proteus. Para ello se descomprimen los archivos y su archivo inpout.dll se lo deberá copiar
en la carpeta system32.

Figura 24. Carpeta INPOUT32.DLL

Procedemos a realizar los siguientes pasos:

 Ingresamos a Disco local C y buscamos la carpeta Windows.
 Una vez dentro de la carpeta Windows, se busca la carpeta System32 y se copia el
archivo inpout32.dll.

Figura 25. Pasos para instalar Inpout32.dll

Se adjunta en link de descarga del archivo que se encuentra en la página DLLS_ES:

https://es.dll-download-system.com/dlls-i-/inpout32.dll.html

9. Bibliografía
 Condori, H. Control de Puerto Paralelo utilizando Visual Basic. Perú, (2009).
 https://www.youtube.com/watch?v=kXevziY73Bo