ELEVADOR DE 3 NIVELES

Esta aplicacion mas seria un elevador de 3 pisos que empieza en un sotano y subira de piso en piso en forma ascendente del 1 al 2 y del 2 al 3 y en la misma forma en descender(3-2-1), los botones de llamada son: Rb0=piso1
Rb1=piso2
Rb2=piso3
y los stop finales de carrera  ubicados en su piso correspondiente:
Rb5=piso1
Rb6=piso2
Rb7=piso3
todos los botones pulsadores de llamada y finales de carrera (o sensor magnetico) normalmente conectados a tierra, el motor usado es de corriente continua y  se usa el  Ra2 y Ra1 como salidas para el motor DC, sin mas que decir vamos al programa principal.

;ELEVADOR DE 3 NIVELES

INCLUDE "P16F84A.INC"
ORG 0X00
BSF STATUS,5
CLRF PORTA                ;puerto A es de salida
MOVLW B'11111111'
MOVWF TRISB            ;puerto B es  entrada de sensores
BCF STATUS,5
CLRF PORTB

;programa principal

INICIO
SUBEPISO1  BTFSS PORTB,0
                      GOTO SUBEPISO1
                      CALL SUBE
STOP1           BTFSS PORTB,5
                      GOTO STOP1
                      CALL STOP
SUBEPISO2  BTFSS PORTB,1
                      GOTO SUBEPISO2
                      CALL SUBE
STOP2          BTFSS PORTB,6
                      GOTO STOP2
                      CALL STOP
SUBEPISO3  BTFSS PORTB,2
                      GOTO SUBEPISO3
                     CALL SUBE
STOP3         BTFSS PORTB,7
                    GOTO STOP3
                    CALL STOP

BAJAPISO2   BTFSS PORTB,1
                      GOTO BAJAPISO2
                      CALL BAJA
PARADA2    BTFSS PORTB,6
                     GOTO PARADA2
                     CALL STOP
BAJAPISO1  BTFSS PORTB,0
                      GOTO BAJAPISO1
                      CALL BAJA
PARADA1    BTFSS PORTB,5
                     GOTO PARADA1
                     CALL STOP
                     GOTO INICIO

;Subrutinas de stop, bajada y subida de motor

STOP            MOVLW B'00000000'
                      MOVWF PORTA
                      RETURN
SUBE            MOVLW B'00000010'
                      MOVWF PORTA
                      RETURN
BAJA             MOVLW B'00000100'
                       MOVWF PORTA
                       RETURN
                       END

A pedido de muchos lectores aqui les dejo el link para descargar el archivo HEX, probado y comprobado
http://www.4shared.com/file/yZXHAim-/elevador3.html
Aqui una maqueta sugerida de un elevador de 3 niveles, con pulsadores de llamada tanto de la cabina como del panel frontal para poder llamarlo desde las 2 posiciones, para esto solo colocamos en paralelo otro pulsador en paralelo para cada piso desde Rb0 a Rb2.

ETAPA DE POTENCIA PARA MOTOR dC
Para el motor DC hacemos un puente H con  transistores 2n3904 para motores pequeños  y los cambian por tip41 si usan  motores DC mas grandes. Conectar la salida  Ra1 y Ra2 del PIC a la entrada del puente H (izquierda y derecha), los diodos d1-d4 son de proteccion contra chispazos que produce el motor DC.
Si es posible prueben el puente H solo para ver si sus entradas son excitadas con 0 y 5 voltios, generalmente los TIP41 necesitan mas corriente que la que genera un pic, lo mejor es usar darlingtongs y solucionamos el problema.

Para un ascensor de 4 pisos (que sube y baja a cualquier piso) el programa  en asembler seria muy extenso y engorroso, por eso hice el programa en  PICBASICPRO y lo pueden ver en mi pagina
http://www.proyectoselectronicoos.blogspot.com/  ascensor de 4 pisos con picbasic.