Primero tienes que definir si un pin de entrada/salida se usará como entrada o como salida. Esto se hace cambiando los bits del registro TRISx (vale para cualquier tipo de PIC).
Por ejemplo:
o se pueden setear bits por separado:
Código Delphi
[-]SetBit(TRISA, 3);
ClearBit(TRISB, 5);
TRISA := $FF;
También se pueden setear múltiples bits usando la notación binaria. Ejemplo:
En la hoja de datos del PIC que vas a usar podés ver los registros que posee y el número de entradas/salidas disponibles.
Una vez definido un pin como salida, a través de SETBIT o CLEARBIT se puede cambiar el estado de ese pin. Por ejemplo:
Código Delphi
[-]Setbit(PORTA,0); Clearbit(PORTA,5);
Si el pin está configurado como entrada, puedes leer el valor con TestBit. Ejemplo:
Código Delphi
[-]Estado := Testbit(PORTA,3);
Saludos !