n align="justify"> EEDATA
BANC3
BCF EECON1, EEPGD ; запис проводитиметься У EEPROM
BSF EECON1, WREN ; ДОЗВІЛ ЗАПИСИ В EEPROM
MOVLW 0x55 EECON2 0xAA EECON2
BSF EECON1, WR ; ІНІЦІАЛІЗАЦІЯ ЗАПИСИ
BCF EECON1, WREN ; ЗАБОРОНУ ЗАПИСИ ВEEPROM
BANC0
GOTO INT_SOURCE ; ПОВЕРНУТИСЯ ДО ПОШУКУ джерела переривання
; ----------------------------------------- ------------------------
START_UST_T ; ПІДПРОГРАМА ВКЛЮЧЕННЯ РЕЖИМУ УСТАНОВКИ ТЕМПЕРАТУРИ
MOVLW B'00000001 ' ; увімкнувши УСТАНОВКИ ТЕМПЕРАТУРИ
MOVWF FLAG_R ; РЕШТА ВИМКНУТИ
BSF INTCON, RBIE ; дозволити переривання по входу
GOTO INT_SOURCE ; ПОВЕРНУТИСЯ ДО ПОШУКУ джерела переривання
; ----------------------------------------- ------------------------
B_TIME_START ; ПЕРЕВІРКА натисканні кнопки "ВСТАНОВЛЕННЯ ЧАСУ
; ВКЛЮЧЕННЯ "
BTFSC PORTA, 2 ; натисканні кнопки "ВСТАНОВЛЕННЯ ЧАСУ ВКЛЮЧЕННЯ"
GOTO B_TIME_STOP ; НІ - ПЕРЕХІД ДО ПЕРЕВІРКИ натисканням кнопки
; "ВСТАНОВЛЕННЯ ЧАСУ ВІДКЛЮЧЕННЯ"
BTFSS FLAG_R, 1 ; РЕЖИМ установки часу ввімкнення ВКЛЮЧЕНИЙ
GOTO START_UST_T_ST ; НІ - ПЕРЕХІД НА підпрограми ВКЛЮЧЕННЯ РЕЖИМУ
; УСТАНОВКИ ЧАСУ ВКЛЮЧЕННЯ
BCF FLAG_R, 1 ; ВИМКНУТИ РЕЖИМ Встановлення часу вимкнення
BSF FLAG_R, 6 ; увімкнувши відображення поточного часу
BCF