Fernando

List P= 16F877A ; SELECCIÓN DE DISPOSITIVO
INCLUDE<P16F877A.INC ; ASIGNA NOMBERS A LOS PINES, PERIFERICOS, ETC
ORG 0 ; inicio de la Mem del programa
MOVLW b’00001010’ ; CARGA ALREGISTRO W
MOVWF 20H ; CARGA LA REGISTRO 20h
MOVLW d’20’
MOVWF 21H
MOVWL 0X1D
MOVWF 22h
MOVLW .40
MOVWF 23h
Bsf STATUS, RP0 ;BANCO 1
Bcf status, RP1
MOVLW .1;(DECIMAL)
MOVWF 20H
MOVLW .5
MOVWF 30H
MOVLW AA
MOVWF 60H
MOVLW FF
MOVWF 70
BANCO 0
Bcf status, RP1 ; RP0 YA ESTA EN UNO
MOVLW .8
MOVWF 20H
MOVLW .4
MOVWF 30H
MOVLW55
MOVWF 60H
MOVLW FF ; CONVERTIR
MOVWF 70H
Bsf STATUS, RP1 BANCO 2
Bcf status, RP0
MOVLW .2
MOVWF 20H
MOVLW .6
MOVWF 30H
MOVLW 0X0A A
MOVWF 40H
MOVLW 91
MOVWF60H
MOVLW FF
MOVWF 70H
BSF STATUS, RP1 BANCO 3
BSF STATUS, RP0
MOVLW .3
MOVWF 20H
MOVLW .7
MOVWF 30H
MOVLW B
MOVWF 40H
MOVLW 18
MOVWF 60H
MOVLW FF
MOVWF 70H
END; FIN DEL PROGRAMA

LED´S
LIST P=16f877a
INCLUDE<P16f877a.INC>
ORG 0

CONFIGURACION ;ETIQUETA

bsf STATUS,RP0 ;BANCO1
movlw B'11110000' ;RB7-RB4: IN RB3-RB0= OUT
movwf TRISDbcf STATUS, RP0 ; BANCO 0

MAIN
btfss portd,7 ; salta si es UNO
goto valor1
goto valor2

valor1
movlw b'00000011'
movwf PORTD
goto MAIN
valor2
movlw b'00001100'
movwf PORTD
gotoMAIN
END
SUMADOR
__config _CP_OFF & _PWRTE_ON & _WDT_OFF & _LVP_OFF & _XT_OSC
LIST P=16f877a
INCLUDE<P16f877a.inc>
ORG 0

CONFIGURACION ;ETIQUETA

bsf STATUS,RP0;BANCO1
movlw B'0000000' ;PORTB Y C SON ENTRADAS POR EFECTO
movwf TRISD
bcf STATUS, RP0 ; BANCO 0

MAIN
MOVF PORTB,W ; PORTB=> WREG
ADDWF PORTC,W ;WREG + PORTC => WREG
MOVWF PORTD; WREG => PORTD
GOTO MAIN ; CICLICO
END
RESTADOR

__config _CP_OFF & _PWRTE_ON & _WDT_OFF & _LVP_OFF & _XT_OSC
LIST P=16f877a
INCLUDE<p16f877a.inc>
ORG 0...