Разработка исходного текста программы микропроцессорной системы

МИНИСТЕРСТВО ОБРАЗОВАНИЯ РОССИЙСКОЙ ФЕДЕРАЦИИ Рыбинская государственная авиационная технологическая академия им. П.А. Соловьева
Кафедра радиоэлектронных и телекоммуникационных систем
Лабораторная работа №1 Разработка исходного текста программы микропроцессорной системы
Проектирование программных средств микропроцессорных систем
Факультет:	РЭИ
Исполнитель:	Сорокин. А Кириллов М. Бондарь Д.
Группа:	РО-07
Преподаватель:	Беляев Е.И.

Рыбинск-2010.

Цель работы:

Лабораторная работа выполняется с целью приобретения практи­ческих навыков по разработке текстов программ для микропроцессор­ных систем на базе микропроцессоров  КР580ВМ80А к К1821ВМ85А.

Задача:

Ценовое табло. При нажатии клавиши (№ зоны) должна высвечиваться цена зоны.

Текст программы:

PORTA             EQU              80H

PORTB             EQU              81H

PORTC             EQU              82H

PORCRL           EQU              83H

                        ORG             800H

                        MVI               A,89H

                        OUT              PORCRL

                        LXI                SP,900H

                        MVI               B,0

RESET:            MVI               C,0

INPUT:             IN                 PORTC

                        ANA              A

                        JZ                 RESET

                        INR               C

                        MVI               A,250

                        CMP             C

                        JNZ               INPUT

                        IN                 PORTC

                        MOV             B,A

                        MVI               C,0

SCHET:            RRC

                        JC                 VIVOD

                        INR               C

                        JMP              SCHET

                        ANI               0F0H

                        RRC

                        RRC

                        RRC

                        RRC

VIVOD:             MOV             A,C

                        CALL             TABCA

                        OUT              PORTA

                        MOV             A,C

                        CALL             TABCB

                        OUT              PORTB

                        JMP              RESET

TABCA:            LXI                H,BASA

                        MOV             E,A

                        MVI               D,0

                        DAD              D

                        MOV             A,M

                        RET

BASA:              DB                0FCH

                        DB                60H