Paralelo Agresivo!!!

[diegofhernando]

Que tal foro...

En esta ocasion necesito desarrollar una aplicación que interactue con el puero paralelo del PC... pero no es simplemente enviar y recibir cytes, debe leer un byte y ubicarse en una posicion especifica del mismo, ese es uno de los problemas como hago eso, es decir como se que valor tiene el byte en la posicion 4 por ejemplo. El otro problema es que debo escribir por un pin especifico del puerto y pues eso mucho menos... De verdad que agradeceria la orientacion de alguien que lo haya hecho o al menos si conocen un sitio donde pueda encontrarla.

Salu2 y gracias.

[delphi.com.ar]

En los enlaces del club, tienes un link a una página muy interesante con información sobre el puerto paralelo (http://www.angelfire.com/pa2/jcgr/tecnica/PP/pp.htm)

Saludos!

[aarmalo]

Para saber el estado de un pin:

x:=lectura del puerto;
x:=x and #del pin;

Para escribir sobre un solo pin

para prender
x:=lectura del puerto;
x:=x or #del bit
madas al puerto el nuevo valor

para apagar

x:=lectura del puerto;
x:=x and #del bit (En este caso #del bit = b'11111110' para el pin 1 , b'11111101' para el pin 2, etc.)
madas al puerto el nuevo valor

[b3nshi]

Cuando escribas en el puerto paralelo, mandas la señal por los Pines del 2 al 9.
Cuando quieras mandar señal por el PIN 2, deberás convertir 00000001 en decimal. Para mandar por el 3 deberas convertir 00000010 en decimal y asi sucesivamente.
Para entenderlo mejor seria algo así:
9 8 7 6 5 4 3 2
0 0 0 0 0 0 0 1 --> Mandas señal por el 2 ---> En decimal: 1
0 0 0 0 0 0 1 0 --> Mandas señal por el 3 ---> En decimal: 2
0 0 0 0 0 1 0 0 --> Mandas señal por el 4 ---> En decimal: 4
1 0 0 1 0 0 0 1 --> Mandas señal por el 9, el 6 y el uno.

Para ello debes convertir esos valores a decimal.
Y para leer el puerto es muy parecido. Solo que deberias tomar el dato de entrada y analizarlo.