gn="justify"> INT_SOURCE ; ПОВЕРНУТИСЯ ДО ПОШУКУ джерела переривання
; ----------------------------------------- ------------------------
START_UST_T_ST ; ПІДПРОГРАМА ВКЛЮЧЕННЯ РЕЖИМУ установки часу ввімкнення
MOVLW B'00000010 ' ; увімкнувши установки часу ввімкнення
MOVWF FLAG_R ; РЕШТА ВИМКНУТИ
BSF INTCON, RBIE ; дозволити переривання по входу
GOTO INT_SOURCE ; ПОВЕРНУТИСЯ ДО ПОШУКУ джерела переривання
; ----------------------------------------- ------------------------
B_TIME_STOP ; ПЕРЕВІРКА натисканні кнопки "ВСТАНОВЛЕННЯ ЧАСУ
; ВІДКЛЮЧЕННЯ "
BTFSC PORTA, 3 ; натисканні кнопки "ВСТАНОВЛЕННЯ ЧАСУ ВІДКЛЮЧЕННЯ"
GOTO B_TIME_CURR ; НІ - ПЕРЕХІД ДО ПЕРЕВІРКИ натисканням кнопки
; "ВСТАНОВЛЕННЯ ПОТОЧНОГО ЧАСУ"
BTFSS FLAG_R, 2 ; РЕЖИМ Встановлення часу вимкнення ВКЛЮЧЕНИЙ
GOTO START_UST_T_SP ; НІ - ПЕРЕХІД НА підпрограми ВКЛЮЧЕННЯ РЕЖИМУ
; Встановлення часу вимкнення
BCF FLAG_R, 2 ; ВИМКНУТИ РЕЖИМ Встановлення часу вимкнення
BSF FLAG_R, 6 ; увімкнувши відображення поточного часу
BCF INTCON, RBIE ; ЗАБОРОНИТИ ПЕРЕРИВАННЯ ПО ВХОДАМ
; ----------------------------------------- ------------------------
; ЗАПИС У EEPROM
BANC2
MOVLW 0x06
MOVWF EEADR ; ВСТАНОВЛЕННЯ початкові адреси 06h
BANC3
BTFSC EECON1, WR ; ПЕРЕВІРКА ЗАКІНЧЕННЯ ЗАПИСИ В EEPROM
GOTO $ +1
BANC0
MOVF STOP_M...
