Paralelo Agresivo!!!

[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.