Микроконверторы фирмы Analog Devices в микропроцессорных приборных комплексах. Виноградов А.Б - 202 стр.

UptoLike

ВУЗ: 

УлГТУ | Ульяновск

Составители: 

Рубрика: 

202
La_1: MOV DDD_R,A ;------------------------------------
MOV DATA_IND_R,DDD_R ;------------------------------------
MOV ADR_IND_R,#64 ; индикация выбранного байта
ACALL Pod_PER_DAT_LCD ;------------------------------------
;Блок, предшествующий вызову подпрограммы опроса кнопки 2.
La_2: MOV R0,#KNOP2_R ;
MOV R1,#NAKOPL2_R ;
ACALL Pod_OPR_KNOP2 ;
;Блок, следующий за вызовом подпрограммы опроса кнопки (уст факта ее наж)
MOV ACC,@R0 ;
JNB ACC_1,La_3 ;
CLR ACC_1 ;кн была нажата, сброс флага нажат кн
MOV @R0,ACC ;
MOV EEDATA_R,DDD_R ;
ACALL Pod_WR_EEPROM ;запись байта в EEPROM
MOV DATA_IND_R,EEDATA_R ;------------------------------------
MOV ADR_IND_R,#68 ; индикация записанного байта
ACALL Pod_PER_DAT_LCD ;------------------------------------
;Блок, предшествующий вызову подпрограммы опроса кнопки 3.
La_3: MOV R0,#KNOP3_R ;
MOV R1,#NAKOPL3_R ;
ACALL Pod_OPR_KNOP3 ;
;Блок, следующий за вызовом подпрограммы опроса кнопки (уст факта ее наж)
MOV ACC,@R0 ;
JNB ACC_1,La_4 ;
CLR ACC_1 ;кн была нажата, сброс флага нажат кн
MOV @R0,ACC ;
MOV EEDATA_R,#0FFh ;контрольная порча регистра EEDATA_R
ACALL Pod_RD_EEPROM ;чтение байта из EEPROM
MOV DATA_IND_R,EEDATA_R ;------------------------------------
MOV ADR_IND_R,#72 ; индикация считанного байта
ACALL Pod_PER_DAT_LCD ;------------------------------------
La_4: AJMP La_OSN ;идти на начало осн цикла
;Подпрограммы-------------------------------------------------------------------
;-------------------------------------------------------------------------------
;Подпрограмма записи одного байта в EEPROM данных по адресу, предварительно
;помещенному в РОН EEADR_R. Байт данных следует предварительно поместить
;в РОН EEDATA_R. В случае ошибки записи (ошибки верификации) установится флаг
;_ERR_WR_EE - "ошибка записи в EEPROM". Адресуется полько 256 байт EEPROM.
;-------------------------------------------------------------------------------
Pod_WR_EEPROM:
ACALL Pod_EEADR ;подпр определения адр стр EEPROM
MOV ECON,#01h ;читать страницу
ACALL Pod_EEDATA_WR ;подпр определения адр байта для зап
MOV ECON,#05h ;стереть страницу
MOV ECON,#02h ;записать страницу в EEPROM
MOV ECON,#04h ;верифицировать страницу
MOV ACC,ECON ;не было ли ошибки записи ?
JZ Lg_0 ;нет, выход
SETB _ERR_WR_EE ;да, уст флаг "ошибка записи в EEPROM"
Lg_0: RET
;-------------------------------------------------------------------------------
;Подпрограмма определения адреса страницы EEPROM из абсолютного адреса
;-------------------------------------------------------------------------------

Страницы