Challenge 4

START

Timer (interrupt), eusart & registers initialization

Letters (ASCII) loaded in registers dedicated for data transmision

ESPERA (LOOP)

INTERRUPT

TMR0ISR

TMR1ISR

BSF ADCON0, GO

BTFSC ADCON0, GO

Check if conversion is done

Start ADC

MOVFF ADRESH, REG3

MOLVW D'187'

SUBWF REG3,1

MOVF REG3,0

CALL TABLA1

TABLA1

CALL SALTO

RETLW D"2"

.

.

RETLW D"100"

TABLA2

CALL SALTO

RETLW D"50"

.

.

RETLW D"48"

TABLA3

CALL SALTO

RETLW D"48"

.

.

RETLW D"49"

MOVWF LATD,0

MOVF REG3,0

CALL TABLA2

MOVWF UNIDADES,0

MOVF REG3,0

CALL TABLA3

MOVWF DECENAS,0

MOVLW D'30'

CPFSLT LATD,0

YES

NO

YES

NO

F Lower than W

CLRF T1CON,0

BCF LATB, 7

BSF LATB, 6

BCF LATB, 5

YES

CLRF COUNTER

MOVFF REG1, TMR0H

MOVFF REG2, TMR0L

RETFIE

RETFIE

BCF LATB,6

MOVLW D'60'

NO

CPFSGT LATD, 0

F greather than W

MOVLW B'00010011'

MOVWF T1CON,0

NO

Turn alarm on

YES

CALL TEMPERATURA

TEMPERATURA

CPFSEQ COUNTER, 0

BTFSC PIR1, TXIF

NO

NO

BCF PIR1, TXIF

MOVLW D'30'

Skip if clear

YES

CPFSLT LATD, 0

F Lower than W

SAFE

("SAFE TEMPERATURE = XX "IS WRITTEN

A COUNTER IS USED TO CHECK THAT EACH SYMBOL HAS BEEN SENT

YES

MOVLW D'60'

NO

CPFSGT LATD, 0

DANGER

("DANGER TEMPERATURE = XX "IS WRITTEN

A COUNTER IS USED TO CHECK THAT EACH SYMBOL HAS BEEN SENT

YES

TEMPERATURA

("TEMPERATURE = XX "IS WRITTEN

NO

MOVFF SALIDAL, TXREG1

INCF COUNTER, 1

CPFSEQ COUNTER. 0

BCF TXSTA1, TXEN

F greather than W

F equal W

CALL BUTTON

BUTTON

NO

YES

MOVF LIM1, 0

RETURN

(FROM BUTTON)

RETURN

(FROM TEMPERATURA)

YES

BCF PIR1, TMR1IF

BSF LATB, 7

BSF LATB, 5

BTG LATA, 1

MOVLW 0FEH

MOVWF TMR1H,0

MOVLW 00CH

MOVWF TMR1L,0

RETFIE

FAN, EMERGENCY LED AND SONIC ALARM ARE TURNED ON