Elevator

    MOV AL, 01 ; COMANDA ELEVADOR PARA CIMA
    OUT 6

AGUARDA_ATINGIR_TOPO:
    IN 6 ; LE O STATUS DO ELEVADOR (RETORNA EM AL)

    AND AL, 04

    CMP AL, 4
    JZ ATINGIU_TOPO
    JMP AGUARDA_ATINGIR_TOPO

AGUARDA_ATINGIR_BASE:
    IN 6 ; LE STATUS DO ELEVADOR (RETORNA EM AL)

    AND AL, 08
    CMP AL, 8
    JZ ATINGIU_BASE

    JMP AGUARDA_ATINGIR_BASE


ATINGIU_TOPO:
    MOV AL, 2 ; FAZ MOTOR DESCER
    OUT 6
    JMP AGUARDA_ATINGIR_BASE

ATINGIU_BASE:
    MOV AL, 0 ; DESLIGA O MOTOR QUANDO ATINGE A BASE
    OUT 6

FIM:
    JMP FIM

END