y"> BANC3
BCF EECON1, EEPGD ; запис проводитиметься У EEPROM
BSF EECON1, WREN ; ДОЗВІЛ ЗАПИСИ В EEPROM
MOVLW 0x55 EECON2 0xAA EECON2
BSF EECON1, WR ; ІНІЦІАЛІЗАЦІЯ ЗАПИСИ
BCF EECON1, WREN ; ЗАБОРОНУ ЗАПИСИ ВEEPROM
BANC2
INCF EEADR, F ; ЗБІЛЬШИТИ АДРЕСА НА 1
BANC3
BTFSC EECON1, WR ; ПЕРЕВІРКА ЗАКІНЧЕННЯ ЗАПИСИ В EEPROM
GOTO $ +1
BANC0
MOVF STOP_HH, W ; ЧИТАННЯ ДАНИХ ІЗ РЕГІСТРУ STOP_HH
BANC2
MOVWF 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_SP ; ПІДПРОГРАМА ВКЛЮЧЕННЯ РЕЖИМУ УСТАНОВКИ ЧАСУ
; ВІДКЛЮЧЕННЯ
MOVLW B'00000100 ' ; увімкнувши Встановлення часу вимкнення
MOVWF FLAG_R ; РЕШТА ВИМКНУТИ
BSF INTCON, RBIE ; дозволити переривання по входу
GOTO
