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

UptoLike

ВУЗ: 

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

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

Рубрика: 

174
LJMP La_OSN ;закрыть основной цикл
;Подпрограммы------------------------------------------------------------------
;-----------------------------------------------------------------------------
;Подпрограмма инициализации РСН.
;-----------------------------------------------------------------------------
Pod_INIT_RSN:
MOV PORT_KNOP,#11111111b ;сделать вх все линии порта кн
MOV PORT_IND,#00000000b ;сделать вых все линии порта индик
;Блок настройки АЦП
MOV ADCSTAT,#00000000b ;сбросить все флаги АЦП
MOV ADCMODE,#00000000b ;АЦП0, АЦП1 выкл, реж "снято питание"
MOV ADC0CON,#01001111b ;АЦП0: внешн ИОН, входы AIN1-AIN2,
;униполярный режим, диапазон +/-2,56В
MOV SF,#045h ;частота обновл выхода 20 Гц
MOV ICON,#00000000b ;отключены все источники тока
MOV IE,#01000000b ;разрешены только прерыв от АЦП
RET
;------------------------------------------------------------------------------
;Подпрограмма инициализации РОНов. Обнуляются все РОНы с адресами
;от NACH_ADR до KON_ADR при помощи косвенной адресации.
;------------------------------------------------------------------------------
Pod_INIT_RON:
MOV R0,#NACH_ADR ;установка начального адреса
Lk_0: MOV @R0,#0 ;обнуление очередного РОНа
INC R0 ;переход к следующему адресу
CJNE R0,#KON_ADR,Lk_0 ;не достигли ли последнего адреса ?
MOV @R0,#0 ;обнуление последнего РОНа
RET ;да, выход
;-------------------------------------------------------------------------
;Подпрограмма вывода на ЖКИ содержимого байта в двоичном коде (побитно) в
;виде восьми знакомест. Первым выводится СЗР байта. Байт предварительно
;должен быть помещен в РОН BYTE_R. В R2 предварительно следует поместить
;адрес ОЗУ ЖКИ, с которого начнется вывод на индикацию.
;-------------------------------------------------------------------------
Pod_IND_BYTE:
MOV R1,#0 ;нач уст счетчика битов в байте
Lj_0: MOV ACC,BYTE_R ;копируем байт в акк
JB ACC_7,Lj_1 ;
MOV DATA_IND_R,#0 ;
AJMP Lj_2 ;
Lj_1: MOV DATA_IND_R,#1 ;
Lj_2: MOV ADR_IND_R,R2 ;
RL A ;
MOV BYTE_R,ACC ;сдвиг байта влево циклический
ACALL Pod_PER_DAT_LCD ;
INC R1 ;
INC R2 ;
CJNE R1,#8,Lj_0 ;
RET
;Подключение модулей опроса кнопок и вывода данных на ЖКИ (с опросом ЖКИ)
$INCLUDE (C:\PR_ADUC\ADC0\knop.asm)
$INCLUDE (C:\PR_ADUC\ADC0\lcd_opr.asm)
;Конец исполняемого кода
END

Страницы