Bascom liest über "pin" und schreibt nach "port"
z.B.
if Pind.5 = 1 then ' Input
portb.0 = 1 ' output
end if