hola compañeros del foro.
Estoy haciendo una pequeña aplicacion domestica y me he encontrado con el siguiente problema:
Trabajo con un pic16f887 y la placa easypic5.
quiero encender y apagar un Led en rb0 con un pulsador conectado a rd0,hasta ahi fue sencillo pero el problema llega cuando intento meter mas
pulsadores para las demas salidas, encender rb1 con rd1,rb2 con rd2.....no se como hacerlo,por mas que intento siempre sale mal...... :wallb:
adjunto el codigo que tengo hecho y a ver si alguien me saca de este lio...Gracias de antemano

program PROBADOR

dim cont as byte

USART_init(9600)

TRISA = 0xF0 ' set direction to be output
TRISB = 0x00 ' set direction to be output
TRISC = 0xF0 ' set direction to be output/input
TRISD = 0XF0 ' set direction to be output/input

PORTA=0x00
PORTB=0x00
PORTC=0x00
PORTD=0x00
ANSEL=0
ANSELH=0

USART_WRITE_TEXT(",")
delay_ms(100)
USART_WRITE_TEXT("1")
delay_ms(100)
USART_WRITE_TEXT("")

WHILE TRUE

if PORTD.0=1 then
delay_ms(100)
while PORTD.0=1
cont=cont+1
IF cont>1 THEN
cont=0
end if
wend
end if

select case cont
case 0
PORTB.0=0
case 1
PORTB.0=1
end select

wend
end.