Practica 7 reporte (1)

Vista previa del material en texto

Escuela: Tecnológico de la laguna
Materia: Microcontroladores
Alumno: Eduardo Antonio Rodríguez Guerra
Número de control: 19131252
Catedrático: JESUS AGUILAR GONZALEZ
Práctica 7
Considerando la práctica 6, introduzca los retardos necesarios (deben ser calculados considerando
un oscilador de cristal de 4 MHz), para que el programa sea ejecutado y nos permita visualizar
adecuadamente la información solicitada.
Código en ensamblador:
LIST P=16F877A
	INCLUDE <p16F877a.inc>
	DE1 EQU 0X20
	DE2 EQU 0X21
	DE3 EQU 0X22
	
ORG 0
	BSF STATUS,5
	CLRF TRISB
	MOVLW B'11'
	MOVWF TRISD
	BCF STATUS,5
	CLRF PORTB
	CLRF PORTD
INICIORET
BSF STATUS, RP0
BCF STATUS, RP1
CLRF TRISA
CLRF TRISB
CLRF TRISC
CLRF TRISD
CLRF TRISE
MOVLW B'11000110'
MOVWF OPTION_REG
BCF STATUS, RP0
BCF STATUS, RP1
CLRF PORTC
CICLO 
	MOVLW B'00'
 SUBWF PORTD,W
	BTFSC STATUS,Z
	GOTO ESTADO1
	
	MOVLW B'01'
 SUBWF PORTD,W
	BTFSC STATUS,Z
	GOTO ESTADO2
	
	MOVLW B'10'
 SUBWF PORTD,W
	BTFSC STATUS,Z
	GOTO ESTADO3
	
	MOVLW B'11'
 SUBWF PORTD,W
	BTFSC STATUS,Z
	GOTO ESTADO4
	
	GOTO CICLO
ESTADO1
MOVLW B'00000110' ;1
MOVWF PORTB
CALL RET
MOVLW B'01101111' ;9
MOVWF PORTB
CALL RET
MOVLW B'00000110' ;1
MOVWF PORTB
CALL RET
MOVLW B'01001111' ;3
MOVWF PORTB
CALL RET
MOVLW B'00000110' ;1
MOVWF PORTB
CALL RET
MOVLW B'01011011' ;2
MOVWF PORTB
CALL RET
MOVLW B'01101101' ;5
MOVWF PORTB
CALL RET
MOVLW B'01011011' ;2
MOVWF PORTB
CALL RET
GOTO CICLO
ESTADO2
MOVLW B'00111111' ;0
MOVWF PORTB
CALL RET
MOVLW B'00000110' ;1
MOVWF PORTB
CALL RET
MOVLW B'01000000' ;-
MOVWF PORTB
CALL RET
MOVLW B'00111111' ;0
MOVWF PORTB
CALL RET
MOVLW B'01001111' ;3
MOVWF PORTB
CALL RET
MOVLW B'01000000' ;-
MOVWF PORTB
CALL RET
MOVLW B'01011011' ;2
MOVWF PORTB
CALL RET
MOVLW B'00111111' ;0
MOVWF PORTB
CALL RET
MOVLW B'01011011' ;2
MOVWF PORTB
CALL RET
MOVLW B'01011011' ;2
MOVWF PORTB
CALL RET
GOTO CICLO
ESTADO3
MOVLW B'01111101' ;6
MOVWF PORTB
GOTO CICLO
ESTADO4
MOVLW B'11111111';PARA TODOS LOS INDICADORES
MOVWF PORTB
GOTO CICLO
RET
MOVLW d'5'
MOVWF DE3
DELAY3
MOVLW d'255'
MOVWF DE2
DELAY2 
 MOVLW d'255'
MOVWF DE1
DELAY1
DECFSZ DE1,1
GOTO DELAY1
DECFSZ DE2,1
GOTO DELAY2
DECFSZ DE3,1
GOTO DELAY3
RETURN
	END
 
OFFON
1
2
4
3
DSW1
DIPSW_2
VCC
RA0/AN0
2
RA1/AN1
3
RA2/AN2/VREF-/CVREF
4
RA4/T0CKI/C1OUT
6
RA5/AN4/SS/C2OUT
7
RE0/AN5/RD
8
RE1/AN6/WR
9
RE2/AN7/CS
10
OSC1/CLKIN
13
OSC2/CLKOUT
14
RC1/T1OSI/CCP2
16
RC2/CCP1
17
RC3/SCK/SCL
18
RD0/PSP0
19
RD1/PSP1
20
RB7/PGD
40
RB6/PGC
39
RB5
38
RB4
37
RB3/PGM
36
RB2
35
RB1
34
RB0/INT
33
RD7/PSP7
30
RD6/PSP6
29
RD5/PSP5
28
RD4/PSP4
27
RD3/PSP3
22
RD2/PSP2
21
RC7/RX/DT
26
RC6/TX/CK
25
RC5/SDO
24
RC4/SDI/SDA
23
RA3/AN3/VREF+
5
RC0/T1OSO/T1CKI
15
MCLR/Vpp/THV
1
U1
PIC16F877A
VCC