Adc0831 cin pic16f84

;PROGRAMA: ADC0831.ASM
;PROGRAMA PARA USAR UN CONVERTIDOR ADC0831 (SERIAL),CON UNA CUENTA MAXIMA
;DE FFh (255d),USAR CON UN CONVERTIDOR DE BCD A 7 SEGMENTOS (74LS48)
;X-TAL = 8MHz WDT = OFFT CM = 0.5 microseg
;PROGRAMA: BIEN (O.K.) PROGRAMADOR : LUISA LANE 03

LIST P=16F84, R=DEC
INCLUDE P16F84.INC

__CONFIG_CP_OFF&_WDT_OFF&_XT_OSC&_PWRTE_ON

UNI EQU H'0C'
DEC EQU H'0D'
CEN EQU H'0E'
DO EQU H'0F'
AUX EQU H'10'
TIME0 EQU H'11'
TIME1 EQU H'12'
CUENTA EQU H'13'ORG 0
GOTO INI
ORG 5

INI BSF STATUS,5 ;SELEC PAG 1
CLRF TRISB ;PORTB COMO SALIDA (AL DISPLAY)
MOVLW H'01';RA0 = DO (ENT), RA1 = CLK (SAL)
MOVWF TRISA ;RA2 = CS (SAL)
BCF STATUS,5 ;SELEC PAG 0
MOVLW H'04' ;CS=1, CLK=0, 0 0100b
MOVWFPORTA ;
CLRF PORTB ;LIMPIA AL PORTB
CLRF DO
CLRF AUX
MOVLW H'08'
MOVWF CUENTA

CONVER CALL ADC;LLAMA A LA RUTINA DE CONVERSION
BSF PORTA,2 ;RA<2> CS = 1
BCF PORTA,1 ;RA<1> CLK = 0
CALL EXHI ;LLAMA A LA RUTINA DE EXHIBIRCLRF DO ;BORRA DATO DEL ADC "DO"
MOVLW H'08'
MOVWF CUENTA ;CUENTA REGISTRO P/LEER DATO "DO"
CALL PAUSA ;PAUSA ENTRECONVERSIONES
NOP
GOTO CONVER ;REGRESA A OTRA CONVERSION

;------------------------------CONVERSION--------------------------------

ADC BCF STATUS,0 ;CARRY= 0
BCF PORTA,2 ;RA<2> CS = 0
NOP ;RETARDO DE 2.5 microseg
NOP
NOP
NOP
NOP
BSF PORTA,1...