ПРИЛОЖЕНИЕ А
Листинг программы и объектный файл
; ЧАСЫ-ТЕРМОМЕТР-ВОЛЬТМЕТР ДЛЯ АВТОМОБИЛЯ.
РАЗРАБОТАЛ ДЕРКАЧ
; ПРОГРАММА = ABTO.ASM
; ВЕРСИЯ: 20-01-07.
; АССЕМБЛЕР И ОТЛАДЧИК: MPLAB IDE, ВЕРСИЯ: 5.70.40.
LIST P=16F676
#INCLUDE P16F676.INC
CONFIG 31D0H
;==============================================
; ИСПОЛЬЗУЕТСЯ КВАРЦ ЧАСТОТОЙ 32768 ГЦ.
; КОЭФФИЦИЕНТ ДЕЛЕНИЯ ПРЕДДЕЛИТЕЛЯ РАВЕН 32, ЧТО ВМЕСТЕ
; С TMR0 (256) И ЦИКЛОМ, РАВНЫМ 4 ТАКТАМ
; ДАЕТ НА ВЫХОДЕ 1 СЕКУНДУ (4х32х256=32768).
;==============================================
; RA1 - РЕЖИМ - УСТАНОВКА, RA2 - РАЗРЯД - ПУСК,
; RA3 - ВЫХОД ИЗЛУЧАТЕЛЯ,
; RC5 - LOAD, RC3 - DIN,
; RC4 - DCLK
;===========================================
CBLOCK H'20'
;===========================================
; ОПРЕДЕЛЕНИЕ РЕГИСТРОВ ВРЕМЕНИ.
;===========================================
HOU ;ЧАСЫ ДВОИЧНЫЕ.
CL ;ЕДИНИЦЫ СЕКУНД ЧАСОВ.
CH ;ДЕСЯТКИ СЕКУНД.
ML ;ЕДИНИЦЫ МИНУТ.
MH ;ДЕСЯТКИ МИНУТ.
HL ;ЕДИНИЦЫ ЧАСОВ.
HH ;ДЕСЯТКИ ЧАСОВ.
TCL ;ДЛЯ ТАЙМЕРА.
TCH ;
TML ;
TMH ;
THL ;
THH ;
;===============================================
; РЕГИСТРЫ ДЛЯ ОРГАНИЗАЦИИ ИНДИКАЦИИ.
;===============================================
ZPT ;РЕГИСТР ЗАПЯТОЙ.
TZPT ;ЗАПЯТАЯ ДЛЯ ВЫВОДА НА ИНДИКАЦИЮ.
COUZ ;СЧЕТЧИК ВЫВОДА ЗАПЯТЫХ.
COU ;СЧЕТЧИК ВЫВОДА БИТ.
KYPC ;ВЫБОР РАЗРЯДА УСТАНОВКИ.
KYPCI ;ИНДИКАЦИИ.
PEID ;РЕЖИМА ИНДИКАЦИИ.
TEMP ;ВРЕМЕННЫЙ.
EDI ;ДЕСЯТЫЕ НАПРЯЖЕНИЯ.
DEI ;ЕДИНИЦЫ ВОЛЬТ.
COI ;ДЕСЯТКИ ВОЛЬТ.
;================================================
; ВРЕМЕННЫЕ.
;================================================
WTEMP ;БАЙТ СОХРАНЕНИЯ РЕГИСТРА W ПРИ ПРЕРЫВАНИИ.
STEMP ;БАЙТ СОХРАНЕНИЯ РЕГИСТРА STATUS ПРИ ПРЕРЫВАНИИ.
FTEMP ;ВРЕМЕННЫЙ ДЛЯ FSR.
TEKH ;
EDA ;
DEA ;
YCTL ;
YCTLI ;
;===========================================
; ОПРЕДЕЛЕНИЕ БИТОВ СОСТОЯНИЯ ФЛАГОВ.
;===========================================
FLAG
;
; 0-> ВКЛЮЧЕНИЕ СИГНАЛА.
; 1-> ТЕКУЩЕЕ ВРЕМЯ.
; 2-> ВКЛЮЧЕН РЕЖИМ ТАЙМЕРА.
; 3-> ИНДИКАЦИЯ НАПРЯЖЕНИЯ.
; 4-> НЕТ КУРСОРА.
; 5-> ПУСК-СТОП.
; 6-> ПРОЧЕРК В ЧАСАХ.
; 7-> УСТАНОВКИ.
;=============================================
FLAG1
;
; 1-> 1 СЕК ЦИКЛА.
; 2-> ПЕРЕДАНА ЗАПЯТАЯ.
; 4-> ЗУММЕР ВКЛЮЧЕН.
; 5-> СТОРОЖОК НАПОМИНИНИЯ АВАРИИ ЧЕРЕЗ 1 ЧАС.
;===========================================
ENDC
;===========================================
; ОПРЕДЕЛЕНИЕ РЕГИСТРОВ ИНДИКАЦИИ.
;===========================================
R1 EQU 50H ;МЛАДШИЙ РАЗРЯД.
R2 EQU 51H ;
R3 EQU 52H ;
R4 EQU 53H ;
R5 EQU 54H ;
R6 EQU 55H ;
R7 EQU 56H ;
R8 EQU 57H ;СТАРШИЙ РАЗРЯД.
TEKL EQU 58H ;
;===========================================
; ОПРЕДЕЛЕНИЕ БИТ ПОРТОВ ВВОДА/ВЫВОДА.
;===========================================
YC EQU 1 ;РЕЖИМ/УСТАНОВКА.
KY EQU 2 ;ПУСК/КУРСОР.
LOAD EQU 5 ;ЗАГРУЗКА.
DIN EQU 3 ;ДАННЫЕ.
DCLK EQU 4 ;СИНХРОИМПУЛЬСЫ.
;===========================================
; 1. ПУСК.
;===========================================
ORG 0
GOTO INIT
ORG 4
GOTO PRER
;===========================================
; 2. ИНИЦИАЛИЗАЦИЯ.
;===========================================
INIT
BSF STATUS,5 ;ПЕРЕХОДИМ В БАНК 1.
MOVLW 0FFH ;
MOVWF ADCON1^80H ;ТАКТ АЦП ОТ ВНУТРЕННЕГО ГЕНЕРАТОРА 500 кГц.
MOVLW B'00000100' ;К=32.
MOVWF OPTION_REG^80H ;РЕЗИСТОРЫ ВКЛЮЧЕНЫ.
MOVLW B'10100000' ;РАЗРЕШЕНИЕ ПРЕРЫВАНИЙ ОТ TMR0.
MOVWF INTCON ;
CLRF PIE1^80H ;ЗАПРЕЩЕНЫ ВСЕ ПЕРИФЕРИЙНЫЕ ПРЕРЫВАНИЯ.
MOVLW B'00001111' ;ВСЕ ВЫХОДЫ. 0 - ВХОД АЦП. Перейти на страницу: 1 2 3 4 5 6 7 8 9 10
Советуем почитать:
Дистанционный комплекс контроля функционального состояния В настоящее время непрерывно расширяется область применения методов регистрации параметров биосигналов в практических и исследовательских задачах. Современный уровень научных достижений ...
Микропроцессорная система управления скоростью вращения двигателя постоянного тока Одной из характерных особенностей нынешнего этапа научно-технического прогресса является все большее применение микроэлектроники. Особое внимание в настоящее время уделяется внедрению ми ...
Разработка конструкции и технологии изготовления модуля управления временными параметрами Современная микроэлектроника привела к революционным преобразованиям практически во всех отраслях техники, не говоря уже о радиоэлектронной и электронно-вычислительной аппаратуре. Повыше ...