Hola a todos, estaba haciendo un programa para un 16f84 y no acaba de funcionarme del ttodo bien.Lo estaba haciendo con microbasic y me he quedao un poco atascao, no es muy dificil pero todavia no lo domino muy bien.Explico lo que deberia hacer el micro.

Tenemos un dipswitch de 3 lineas de 2 posiciones cada una conectados a RA0, RA1 y RA2 y un pulsador en el RA4.Solo uno de los 3 puede estar a masa en el momento de alimentar, puede ser cualquiera de los 3 pero solo uno y el micro actua diferente sea cual sea el dip.· modos de funcionamiento.

- Si es el dip de RA0 el que esta a masa al pulsar el pulsador de RA4 se activara la salida de RB0 durante 1 segundo y despues volvera a nivel bajo a la espera de otra pulsacion.

- Si es el dip de RA1 el que esta a masa al pulsar el pulsador de RA4 se activara la salida de Rb0 durante 30 segundos y despues volvera a nivel bajo a la espera de otra pulsacion.

-si es el dip de RA2 el que esta a masa cuando se pulse el pulsador de RA4 la salida de RB0 pasara a nivel alto hasta que se vuelva a pulsar RA4 que volveria a llevarla a nivel bajo y asi sucesivamente todas las veces.

Digamos q son 3 modos de funcionamiento y estos modos lo marcan las posiciones de los dip.

Os dejo el programa en microbasic y si podeis echarle un vistazo para arreglarlo, agradecido.Si alguno lo apaña en ensamblador porque lo domina mejor pues igual me da, le saco el hex y lo cargo.

Muchas gracias a todos.

Aqui esta:
program tresmodos

main:
TRISA = 1
TRISB = 0
PORTB = %00000000
IF PORTA.0 = 0 THEN
IF PORTA.4 = 0 THEN
PORTB.0 = 1
delay_ms(1000)
PORTB.0 = 0
END IF
end if

IF PORTA.1 = 0 THEN
IF PORTA.4 = 0 THEN
PORTB.0 = 1
delay_ms(30000)
PORTB.0 = 0
END IF
end if

IF PORTA.2 = 0 THEN
IF PORTA.4 = 0 THEN
IF PORTB.0 = 1 THEN
PORTB.0 = 0
ELSE
PORTB.0 = 1
END IF
END IF
end if
goto main
end.