Proyecto Para Controlar Encendido De Cualquier Artefacto Domestico: Puerto Paralelo (triac)

Proyecto para controlar encendido de cualquier artefacto domestico: Puerto Paralelo (triac)

Para empezar debemos saber que un puerto paralelo es el de la impresora, por ejemplo. Este consta de una ficha DB25 hembra. Otra cosa muy importante que hay que tener en cuenta es la dirección de este puerto, para saberla la podemos obtener de distintas maneras:

• una de ellas es en el arranque del equipo se puede ir pulsando la tecla "Pause" hasta observar en pantalla parallel port PUERTO_BASE donde PUERTO_BASE puede ser 3BC, 378 o 278.

• Si se dispone de W95 o Superior haga click en Inicio/ Configuración/ Panel de control. Y luego seleccione Sistema elija Administrador de dispositivos, luego cliquee en el "+" que aparece a la izquierda de Puertos (COM y LPT), seleccione Puerto de impresora (LPT1) y luego haga click en el botón Propiedades en la nueva ventana cliquee en recursos y observe que intervalo de entrada salida le corresponde.

Ejemplos de Intervalos de E/S:

Intervalo de Entrada/Salida 3BC - 3BF

Intervalo de Entrada/Salida 378 - 37B

Intervalo de Entrada/Salida 278 - 27B

• Estos intervalos están en el sistema de numeración Hexadecimal.

• El puerto paralelo consta de 3 bytes que se los denominan DataPort, StatusPort y el ControlPort y sus direcciones son las siguientes ( dependiendo de las direcciones bases que este tenga):

DataPort StatusPort ControlPort

3BC 3BD 3BE

378 379 37A

278 279 27A

Para nuestro propósito en este caso el que vamos a utilizar será el DataPort ya que es el puerto que envía datos a la impresora o sea es un puerto de salida.

Cada Bit que forma este Byte tiene un Pin relacionado en la ficha DB25, y esta es la relación:

PIN BIT

2 0

3 1

4 2

5 3

6 4

7 5

8 6

9 7

Con estos conocimientos estamos apto para la fase de programación, la cual será realizada en Visual Basic 6.0. La sentencia para dominar este puerto es:

Out PuertoDeDato, Dato

PuertoDeDato es una variable del tipo Byte que va a contener la dirección del DataPort.

Dato es una variable del tipo Byte que va a contener el Dato a escribir, Algunos ejemplos:

Dato = 0 El Byte DataPort que daría en formato binario 00000000 , con lo que si dispones de un tester o cualquier otro dispositivo para medir corriente continua, colocando una punta del tester a tierra (Chasis PC, etc) por lo general la punta negra y la otra ( roja) en cualquier pin del 2 al 9 deben darte 0 voltios.

Dato = 255 El Byte DataPort que daría en formato binario 11111111, con lo que si dispones de un tester o cualquier otro dispositivo para medir corriente continua, colocando una punta del tester a tierra (Chasis PC, etc) por lo general la punta negra y la otra ( roja) en cualquier pin del 2 al 9 deben darte 5 voltios.

Dato = 157 El Byte DataPort que daría en formato binario 10011101, con lo que si dispones de un tester o cualquier otro dispositivo para medir corriente continua, colocando una punta del tester a tierra (Chasis PC, etc) por lo general la punta negra y la otra ( roja) en los pines 2,5,6,7 y 9 tenes que tener 5 voltios y en los pines 3,4 y 8 tenes que tener 0 voltios.

También tenes que incluir una Librería "Inpout32.dll"

Programación

En un nuevo Proyecto de Visual Basic debemos incluir un Formulario y dos módulos. Aquí están los códigos:

Formulario: Form1

Dim ValorPuerto As Byte

Private Sub cmdAutor_Click()

MsgBox "Fernando Masino e-mail: fom22ar@yahoo.com.ar", vbOKOnly

End Sub

Private Sub cmdSalir_Click()

End

End Sub

Private Sub Form_Unload(Cancel As Integer)

Call EnviaPuerto(0)

End Sub

Private Sub PINES_Click(Index As Integer)

If ESTADOPIN(Index + 2)

...