Калькулятор на основе микропроцессора

Тип работы:
Курсовая
Предмет:
Программирование


Узнать стоимость

Детальная информация о работе

Выдержка из работы

Кафедра

«Информационно-коммуникационные технологии»

Курсовая работа

на тему:

«Калькулятор на основе микропроцессора»

по дисциплине:

«Микропроцессорные системы»

Москва 2008 г.

Аннотация

В курсовой работе разрабатывается калькулятор на выполнение арифметических функций («+», «-», «*», «/») в 16-ой системе. В работе использовались прерывания от последовательного порта и таймера. Работа выполняется на системе «прототип» на основе микроконтроллера 51 семейства.

Содержание

  • 1. Техническое задание
  • 2. Анализ технического задания
  • 3. Алгоритм основной программы
  • 4. Алгоритмы обработчиков прерываний
    • 4.1 Алгоритм обработчика com порта
    • 4.2 Алгоритм обработчика прерываний от таймера T2
  • 5. Основная программа
  • 6. Программа прерывания от клавиатуры ПК
  • 7. Программа прерывания от матричной клавиатуры
  • 8. Заключение
  • 9. Литература

1. Техническое задание

Написать программу для микропроцессора семейства 51, имеющую следующие функции:

1. Ввод чисел с последовательного порта

2. Ввод с клавиатуры арифметических операций («+», «-», «*», «/») и сброс

3. Вывод результата арифметических операций на монитор компьютера

2. Анализ технического задания

В соответствии с техническим заданием устройство должно выполнять арифметические операции над введенными числами. Поэтому выделим два регистра ОЗУ для хранения введенных чисел:

· N1 — для хранения первого числа

· N2 — для хранения второго числа

Основная программа инициализирует прерывания с последовательного порта и таймера, после чего переходит в режим «холостого хода», ожидая следующие события:

· Ввод символов с порта P1

· Ввод символов с порта SBUF

Предусмотрены прерывания с последовательного порта P1, которые опрашивают матричную клавиатуру. При каждом прерывании соответствующее число записывается в регистры, выделенные для хранения этих чисел. Также предусмотрены прерывания с порта SBUF. При каждом прерывании выполняется соответствующая арифметическая операция над числами, хранящимися в регистрах, или происходит обнуление всех регистров и перевод каретки.

3. Алгоритм основной программы

4. Алгоритмы обработчиков прерываний

4.1 Алгоритм обработчика com порта

4.2 Алгоритм обработчика прерываний от таймера T2

5. Основная программа

org 8000h

ljmp MAIN

org 8023h; handler for COM-port **********

ljmp COM_PORT_HANDLER; установка обработчика

org 8033h; P1. 0

ljmp HNDL_P1

org 803Bh; P1. 1

ljmp HNDL_P1

org 8043h; P1. 2

ljmp HNDL_P1

org 804Bh; P1. 3

ljmp HNDL_P1

MAIN:

clr TI

clr RI

TM2IR equ 0C8h; interrupt flag register

IEN1 equ 0E8h; T2 interrupt enable register;

TM2CON equ 0EAh; T2 config register;

IP1 equ 0F8h; interrupt priority

CTCON equ 0EBh; capture control

mov IEN1, #0Fh

mov CTCON, #1 010 1010b; falling 0−3 bits in P1 if interupt occured

; mov TM2IR, #00Fh; enable T2 capture register (for P1)

mov TM2CON, #11b; Timer T2 mode select; ;;;;?

mov IP1, #00h

mov P1, #0Fh

mov 08H, #00H

setb IE. 7;enable interrupt; checking разрешаем прерывания

setb IE. 4;enable interrupt from COM — port

LOOP:

nop

jmp LOOP

ret

SLEEP:

mov R2, #100d

FOR1:

mov R1, #255d

FOR2:

djnz R1, FOR2

djnz R2, FOR1

ret

WAIT_TI:

WAITTI:

jnb TI, WAITTI

ret

VIVOD_FIRST_NUM:

mov R7, A

anl A, #1 111 0000b

cjne A, #00b, VFN

jmp END_VFN

VFN:

swap A

add A, #30h

mov SBUF, A

call WAIT_TI

call SLEEP

END_VFN:

mov A, R7

ret

VIVOD_SECOND_NUM:

mov R7, A

anl A, #1111b

add A, #30h

mov SBUF, A

call WAIT_TI

call SLEEP

mov A, R7

ret

VIVOD_FIRST_HEX:

mov R7, A

anl A, #1 111 0000b

cjne A, #00b, VFH

jmp END_VFH

VFH:

swap A

add A, #37h

mov SBUF, A

call WAIT_TI

call SLEEP

END_VFH:

mov A, R7

ret

VIVOD_SECOND_HEX:

mov R7, A

anl A, #1111b

add A, #37h

mov SBUF, A

call WAIT_TI

call SLEEP

mov A, R7

ret

end

6. Программа прерывания от клавиатуры ПК

; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;KEYBOARD-PC COMPLITE

COM_PORT_HANDLER:; ****

jnb RI, OUT

GO:

jmp GO_

OUT:

jmp END_LST_KBD_PC

GO_:

mov A, SBUF

; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ++++++++++++; ;;;;;;;;;;;;;;;;;;

cjne A, #2bh, MINUS

mov SBUF, A

call WAIT_TI

call SLEEP

clr RI

mov SBUF, #'='

call WAIT_TI

call SLEEP

mov A, R3

clr C

addc A, R4

jnc NON_VIVOD_C

mov SBUF, #'1'

call WAIT_TI

call SLEEP

NON_VIVOD_C:

; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;PERVAYA_CIFRA

mov R0, A

anl A, #1 111 0000b

swap A

subb A,#0ah

mov A, R0

jc VIVOD_CIFRA1

call VIVOD_FIRST_HEX

call WAIT_TI

call SLEEP

jmp VTORAYA_CIFRA

VIVOD_CIFRA1:

call VIVOD_FIRST_NUM

call WAIT_TI

call SLEEP

clr C

; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;VTORAYA_CIFRA

VTORAYA_CIFRA:

mov R0, A

anl A, #1111b

subb A,#0ah

mov A, R0

jc VIVOD_CIFRA2

call VIVOD_SECOND_HEX

call WAIT_TI

call SLEEP

jmp END_LST_KBD_PC

VIVOD_CIFRA2:

call VIVOD_SECOND_NUM

call WAIT_TI

call SLEEP

clr C

MINUS:

; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; -------------; ;;;;;;;;;;;;;;;;;;

cjne A, #2dh, UMNOJ

mov SBUF, A

call WAIT_TI

call SLEEP

clr RI

mov SBUF, #'='

call WAIT_TI

call SLEEP

mov A, R3

clr C

subb A, R4

jnc MINUS_NON_VIVOD_C

MINUS_NON_VIVOD_C:

; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;PERVAYA_CIFRA

mov R0, A

anl A, #1 111 0000b

swap A

subb A,#0ah

mov A, R0

jc MINUS_VIVOD_CIFRA1

call VIVOD_FIRST_HEX

call WAIT_TI

call SLEEP

jmp MINUS_VTORAYA_CIFRA

MINUS_VIVOD_CIFRA1:

call VIVOD_FIRST_NUM

call WAIT_TI

call SLEEP

clr C

; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;VTORAYA_CIFRA

MINUS_VTORAYA_CIFRA:

mov R0, A

anl A, #1111b

subb A,#0ah

mov A, R0

jc MINUS_VIVOD_CIFRA2

call VIVOD_SECOND_HEX

call WAIT_TI

call SLEEP

jmp END_LST_KBD_PC

MINUS_VIVOD_CIFRA2:

call VIVOD_SECOND_NUM

call WAIT_TI

call SLEEP

clr C

UMNOJ:

; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ******************; ;;;;;;;;;;;;;;;;;;

cjne A, #2ah, GO_DIV

jmp GO_UMNOJ

GO_DIV:

jmp DIVDIV

GO_UMNOJ:

mov SBUF, A

call WAIT_TI

call SLEEP

clr RI

mov SBUF, #'='

call WAIT_TI

call SLEEP

mov A, R3

mov B, R4

mul AB

; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;BBBBBBBBBBBB

; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;PERVAYA_CIFRA

mov R3, A

mov R4, B

mov A, B

mov R0, A

anl A, #1 111 0000b

swap A

subb A,#0ah

mov A, R0

jc UMNOJ_VIVOD_CIFRA1_A

call VIVOD_FIRST_HEX

call WAIT_TI

call SLEEP

jmp UMNOJ_VTORAYA_CIFRA_A

UMNOJ_VIVOD_CIFRA1_A:

call VIVOD_FIRST_NUM

call WAIT_TI

call SLEEP

clr C

; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;VTORAYA_CIFRA

UMNOJ_VTORAYA_CIFRA_A:

mov R0, A

anl A, #1111b

subb A,#0ah

mov A, R0

jc UMNOJ_VIVOD_CIFRA2_A

call VIVOD_SECOND_HEX

call WAIT_TI

call SLEEP

jmp VIVOD_A

UMNOJ_VIVOD_CIFRA2_A:

call VIVOD_SECOND_NUM

call WAIT_TI

call SLEEP

VIVOD_A:

mov A, R3

; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;AAAAAAAAAAAA

; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;PERVAYA_CIFRA

mov R0, A

anl A, #1 111 0000b

swap A

subb A,#0ah

mov A, R0

jc UMNOJ_VIVOD_CIFRA1

call VIVOD_FIRST_HEX

call WAIT_TI

call SLEEP

jmp UMNOJ_VTORAYA_CIFRA

UMNOJ_VIVOD_CIFRA1:

call VIVOD_FIRST_NUM

call WAIT_TI

call SLEEP

clr C

; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;VTORAYA_CIFRA

UMNOJ_VTORAYA_CIFRA:

mov R0, A

anl A, #1111b

subb A,#0ah

mov A, R0

jc UMNOJ_VIVOD_CIFRA2

call VIVOD_SECOND_HEX

call WAIT_TI

call SLEEP

jmp END_LST_KBD_PC

UMNOJ_VIVOD_CIFRA2:

call VIVOD_SECOND_NUM

call WAIT_TI

call SLEEP

DIVDIV:

; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ///////////////////////; ;;;;;;;;;;;;;;;;;;

cjne A, #2fh, NULL

mov SBUF, A

call WAIT_TI

call SLEEP

clr RI

mov SBUF, #'='

call WAIT_TI

call SLEEP

mov A, R3

mov B, R4

div AB

; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;PERVAYA_CIFRA

mov R0, A

anl A, #1 111 0000b

swap A

subb A,#0ah

mov A, R0

jc DIV_VIVOD_CIFRA1

call VIVOD_FIRST_HEX

call WAIT_TI

call SLEEP

jmp DIV_VTORAYA_CIFRA

DIV_VIVOD_CIFRA1:

call VIVOD_FIRST_NUM

call WAIT_TI

call SLEEP

; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;VTORAYA_CIFRA

DIV_VTORAYA_CIFRA:

mov R0, A

anl A, #1111b

subb A,#0ah

mov A, R0

jc DIV_VIVOD_CIFRA2

call VIVOD_SECOND_HEX

call WAIT_TI

call SLEEP

jmp END_LST_KBD_PC

DIV_VIVOD_CIFRA2:

call VIVOD_SECOND_NUM

call WAIT_TI

call SLEEP

NULL:

; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; СБРОС; ;;;;;;;;;;;;;;;;;;

cjne A, #39h, END_LST_KBD_PC

mov SBUF, #0dh

call WAIT_TI

call SLEEP

mov SBUF, #0dh

call WAIT_TI

call SLEEP

mov SBUF, #0ah

call WAIT_TI

call SLEEP

mov SBUF, #'> '

call WAIT_TI

call SLEEP

mov R3, #00b

mov R4, #00b

mov R5, #00b

clr TI

clr RI; ***

END_LST_KBD_PC:

reti; ****

7. Программа прерывания от матричной клавиатуры

; ;;;;;;;;;;;;;;;IDENTIFYCATION SERIES KEYS; ;;;;;;;;;;;;;;;;;;; LITTLE COMPLITE

HNDL_P1:

mov TM2IR, #00h

jnb P1. 0, P10

jnb P1. 1, P11

jb P1. 2, ref1

ljmp P12

ref1:

jb P1. 3, ref2

ljmp P13

ref2:

ljmp END_HNDL

P10:

mov P1, #1 111 1110b

jnb P1. 4, P10_4

jnb P1. 5, P10_5

jnb P1. 6, P10_6

jnb P1. 7, P10_7

jmp END_HNDL

P10_4:

call key5

clr TI

jmp END_HNDL

P10_5:

call key2

clr TI

jmp END_HNDL

P10_6:

call keyF

clr TI

jmp END_HNDL

P10_7:

call key8

clr TI

jmp END_HNDL

P11:

mov P1, #1 111 1101b

jnb P1. 4, P11_4

jnb P1. 5, P11_5

jnb P1. 6, P11_6

jnb P1. 7, P11_7

jmp END_HNDL

P11_4:

call key4

clr TI

jmp END_HNDL

P11_5:

call key1

clr TI

jmp END_HNDL

P11_6:

call key0

clr TI

jmp END_HNDL

P11_7:

call key7

clr TI

jmp END_HNDL

P12:

mov P1, #1 111 1011b

jnb P1. 4, P12_4

jnb P1. 5, P12_5

jnb P1. 6, P12_6

jnb P1. 7, P12_7

jmp END_HNDL

P12_4:

call keyB

clr TI

jmp END_HNDL

P12_5:

call keyA

clr TI

jmp END_HNDL

P12_6:

call keyD

clr TI

jmp END_HNDL

P12_7:

call keyC

clr TI

jmp END_HNDL

P13:

mov P1, #1 111 0111b

jnb P1. 4, P13_4

jnb P1. 5, P13_5

jnb P1. 6, P13_6

jnb P1. 7, P13_7

jmp END_HNDL

P13_4:

call key6

clr TI

jmp END_HNDL

P13_5:

call key3

clr TI

jmp END_HNDL

P13_6:

call keyE

clr TI

jmp END_HNDL

P13_7:

call key9

clr TI

jmp END_HNDL

END_HNDL:

mov P1, #0Fh

mov r7,#0fh

DEL1:

mov r6, #0FFh

DEL2:

nop

djnz r6, DEL2

djnz r7, DEL1

reti

key5:

cjne R5, #00b, NUM25

; ;;;;;;;;;;;;;;;;;;;;VVOD PERVOGO CHISLA; ;;;;;;;;;;;;;;;;;;;;

; ;;;;;;;;;;;;;;;;;;;;vvod pervogo razryada chisla

cjne R3, #00b, ONFIRSTNUM51

mov A, #5h

swap A

mov R3, A

call VIVOD_FIRST_NUM

call WAIT_TI

call SLEEP

jmp END_KEY5

; ;;;;;;;;;;;;;;;;;;vvod vtorogo razryada chisla

ONFIRSTNUM51:

mov A, R3

add A, #5h

mov R3, A

mov R5, #01b

call VIVOD_SECOND_NUM

call WAIT_TI

call SLEEP

jmp END_KEY5

; ;;;;;;;;;;;;;;;;;;;;VVOD VTOROGO CHISLA; ;;;;;;;;;;;;;;;;;;;;;

NUM25:

; ;;;;;;;;;;;;;;;;;;;;vvod pervogo razryada chisla

cjne R4, #00b, ONFIRSTNUM52

mov A, #5h

swap A

mov R4, A

call VIVOD_FIRST_NUM

call WAIT_TI

call SLEEP

jmp END_KEY5

; ;;;;;;;;;;;;;;;;;;vvod vtorogo razryada chisla

ONFIRSTNUM52:

mov A, R4

add A, #5h

mov R4, A

mov R5, #01b

call VIVOD_SECOND_NUM

call WAIT_TI

call SLEEP

END_KEY5:

ret

key2:

cjne R5, #00b, NUM22

; ;;;;;;;;;;;;;;;;;;;;VVOD PERVOGO CHISLA; ;;;;;;;;;;;;;;;;;;;;

; ;;;;;;;;;;;;;;;;;;;;vvod pervogo razryada chisla

cjne R3, #00b, ONFIRSTNUM21

mov A, #2h

swap A

mov R3, A

call VIVOD_FIRST_NUM

call WAIT_TI

call SLEEP

jmp END_KEY2

; ;;;;;;;;;;;;;;;;;;vvod vtorogo razryada chisla

ONFIRSTNUM21:

mov A, R3

add A, #2h

mov R3, A

mov R5, #01b

call VIVOD_SECOND_NUM

call WAIT_TI

call SLEEP

jmp END_KEY2

; ;;;;;;;;;;;;;;;;;;;;VVOD VTOROGO CHISLA; ;;;;;;;;;;;;;;;;;;;;;

NUM22:

; ;;;;;;;;;;;;;;;;;;;;vvod pervogo razryada chisla

cjne R4, #00b, ONFIRSTNUM22

mov A, #2h

swap A

mov R4, A

call VIVOD_FIRST_NUM

call WAIT_TI

call SLEEP

jmp END_KEY2

; ;;;;;;;;;;;;;;;;;;vvod vtorogo razryada chisla

ONFIRSTNUM22:

mov A, R4

add A, #2h

mov R4, A

mov R5, #01b

call VIVOD_SECOND_NUM

call WAIT_TI

call SLEEP

END_KEY2:

ret

keyF:

cjne R5, #00b, NUM2_F

; ;;;;;;;;;;;;;;;;;;;;VVOD PERVOGO CHISLA; ;;;;;;;;;;;;;;;;;;;;

; ;;;;;;;;;;;;;;;;;;;;vvod pervogo razryada chisla

cjne R3, #00b, ONFIRSTNUMF1

mov A, #0fh

swap A

mov R3, A

call VIVOD_FIRST_HEX

call WAIT_TI

call SLEEP

jmp END_KEY_F

; ;;;;;;;;;;;;;;;;;;vvod vtorogo razryada chisla

ONFIRSTNUMF1:

mov A, R3

add A, #0fh

mov R3, A

mov R5, #01b

call VIVOD_SECOND_HEX

call WAIT_TI

call SLEEP

jmp END_KEY_F

; ;;;;;;;;;;;;;;;;;;;;VVOD VTOROGO CHISLA; ;;;;;;;;;;;;;;;;;;;;;

NUM2_F:

; ;;;;;;;;;;;;;;;;;;;;vvod pervogo razryada chisla

cjne R4, #00b, ONFIRSTNUMF2

mov A, #0fh

swap A

mov R4, A

call VIVOD_FIRST_HEX

call WAIT_TI

call SLEEP

jmp END_KEY_F

; ;;;;;;;;;;;;;;;;;;vvod vtorogo razryada chisla

ONFIRSTNUMF2:

mov A, R4

add A, #0fh

mov R4, A

mov R5, #01b

call VIVOD_SECOND_HEX

call WAIT_TI

call SLEEP

END_KEY_F:

ret

key8:

cjne R5, #00b, NUM28

; ;;;;;;;;;;;;;;;;;;;;VVOD PERVOGO CHISLA; ;;;;;;;;;;;;;;;;;;;;

; ;;;;;;;;;;;;;;;;;;;;vvod pervogo razryada chisla

cjne R3, #00b, ONFIRSTNUM81

mov A, #8h

swap A

mov R3, A

call VIVOD_FIRST_NUM

call WAIT_TI

call SLEEP

jmp END_KEY8

; ;;;;;;;;;;;;;;;;;;vvod vtorogo razryada chisla

ONFIRSTNUM81:

mov A, R3

add A, #8h

mov R3, A

mov R5, #01b

call VIVOD_SECOND_NUM

call WAIT_TI

call SLEEP

jmp END_KEY8

; ;;;;;;;;;;;;;;;;;;;;VVOD VTOROGO CHISLA; ;;;;;;;;;;;;;;;;;;;;;

NUM28:

; ;;;;;;;;;;;;;;;;;;;;vvod pervogo razryada chisla

cjne R4, #00b, ONFIRSTNUM82

mov A, #8h

swap A

mov R4, A

call VIVOD_FIRST_NUM

call WAIT_TI

call SLEEP

jmp END_KEY8

; ;;;;;;;;;;;;;;;;;;vvod vtorogo razryada chisla

ONFIRSTNUM82:

mov A, R4

add A, #8h

mov R4, A

mov R5, #01b

call VIVOD_SECOND_NUM

call WAIT_TI

call SLEEP

END_KEY8:

ret

key4:

cjne R5, #00b, NUM24

; ;;;;;;;;;;;;;;;;;;;;VVOD PERVOGO CHISLA; ;;;;;;;;;;;;;;;;;;;;

; ;;;;;;;;;;;;;;;;;;;;vvod pervogo razryada chisla

cjne R3, #00b, ONFIRSTNUM41

mov A, #4h

swap A

mov R3, A

call VIVOD_FIRST_NUM

call WAIT_TI

call SLEEP

jmp END_KEY4

; ;;;;;;;;;;;;;;;;;;vvod vtorogo razryada chisla

ONFIRSTNUM41:

mov A, R3

add A, #4h

mov R3, A

mov R5, #01b

call VIVOD_SECOND_NUM

call WAIT_TI

call SLEEP

jmp END_KEY4

; ;;;;;;;;;;;;;;;;;;;;VVOD VTOROGO CHISLA; ;;;;;;;;;;;;;;;;;;;;;

NUM24:

; ;;;;;;;;;;;;;;;;;;;;vvod pervogo razryada chisla

cjne R4, #00b, ONFIRSTNUM42

mov A, #4h

swap A

mov R4, A

call VIVOD_FIRST_NUM

call WAIT_TI

call SLEEP

jmp END_KEY4

; ;;;;;;;;;;;;;;;;;;vvod vtorogo razryada chisla

ONFIRSTNUM42:

mov A, R4

add A, #4h

mov R4, A

mov R5, #01b

call VIVOD_SECOND_NUM

call WAIT_TI

call SLEEP

END_KEY4:

ret

key1:

cjne R5, #00b, NUM21

; ;;;;;;;;;;;;;;;;;;;;VVOD PERVOGO CHISLA; ;;;;;;;;;;;;;;;;;;;;

; ;;;;;;;;;;;;;;;;;;;;vvod pervogo razryada chisla

cjne R3, #00b, ONFIRSTNUM11

mov A, #1h

swap A

mov R3, A

call VIVOD_FIRST_NUM

call WAIT_TI

call SLEEP

jmp END_KEY1

; ;;;;;;;;;;;;;;;;;;vvod vtorogo razryada chisla

ONFIRSTNUM11:

mov A, R3

add A, #1h

mov R3, A

mov R5, #01b

call VIVOD_SECOND_NUM

call WAIT_TI

call SLEEP

jmp END_KEY1

; ;;;;;;;;;;;;;;;;;;;;VVOD VTOROGO CHISLA; ;;;;;;;;;;;;;;;;;;;;;

NUM21:

; ;;;;;;;;;;;;;;;;;;;;vvod pervogo razryada chisla

cjne R4, #00b, ONFIRSTNUM12

mov A, #1h

swap A

mov R4, A

call VIVOD_FIRST_NUM

call WAIT_TI

call SLEEP

jmp END_KEY1

; ;;;;;;;;;;;;;;;;;;vvod vtorogo razryada chisla

ONFIRSTNUM12:

mov A, R4

add A, #1h

mov R4, A

mov R5, #01b

call VIVOD_SECOND_NUM

call WAIT_TI

call SLEEP

END_KEY1:

ret

key0:

cjne R5, #00b, SECOND_NUM

mov A, R3

call VIVOD_SECOND_NUM

call WAIT_TI

call SLEEP

mov R5, #01b

jmp END_KEY0

SECOND_NUM:

mov A, R4

call VIVOD_SECOND_NUM

call WAIT_TI

call SLEEP

jmp END_KEY0

END_KEY0:

ret

key7:

cjne R5, #00b, NUM27

; ;;;;;;;;;;;;;;;;;;;;VVOD PERVOGO CHISLA; ;;;;;;;;;;;;;;;;;;;;

; ;;;;;;;;;;;;;;;;;;;;vvod pervogo razryada chisla

cjne R3, #00b, ONFIRSTNUM71

mov A, #7h

swap A

mov R3, A

call VIVOD_FIRST_NUM

call WAIT_TI

call SLEEP

jmp END_KEY7

; ;;;;;;;;;;;;;;;;;;vvod vtorogo razryada chisla

ONFIRSTNUM71:

mov A, R3

add A, #7h

mov R3, A

mov R5, #01b

call VIVOD_SECOND_NUM

call WAIT_TI

call SLEEP

jmp END_KEY7

; ;;;;;;;;;;;;;;;;;;;;VVOD VTOROGO CHISLA; ;;;;;;;;;;;;;;;;;;;;;

NUM27:

; ;;;;;;;;;;;;;;;;;;;;vvod pervogo razryada chisla

cjne R4, #00b, ONFIRSTNUM72

mov A, #7h

swap A

mov R4, A

call VIVOD_FIRST_NUM

call WAIT_TI

call SLEEP

jmp END_KEY7

; ;;;;;;;;;;;;;;;;;;vvod vtorogo razryada chisla

ONFIRSTNUM72:

mov A, R4

add A, #7h

mov R4, A

mov R5, #01b

call VIVOD_SECOND_NUM

call WAIT_TI

call SLEEP

END_KEY7:

ret

keyB:

cjne R5, #00b, NUM2_B

; ;;;;;;;;;;;;;;;;;;;;VVOD PERVOGO CHISLA; ;;;;;;;;;;;;;;;;;;;;

; ;;;;;;;;;;;;;;;;;;;;vvod pervogo razryada chisla

cjne R3, #00b, ONFIRSTNUMB1

mov A, #0bh

swap A

mov R3, A

call VIVOD_FIRST_HEX

call WAIT_TI

call SLEEP

jmp END_KEY_B

; ;;;;;;;;;;;;;;;;;;vvod vtorogo razryada chisla

ONFIRSTNUMB1:

mov A, R3

add A, #0bh

mov R3, A

mov R5, #01b

call VIVOD_SECOND_HEX

call WAIT_TI

call SLEEP

jmp END_KEY_B

; ;;;;;;;;;;;;;;;;;;;;VVOD VTOROGO CHISLA; ;;;;;;;;;;;;;;;;;;;;;

NUM2_B:

; ;;;;;;;;;;;;;;;;;;;;vvod pervogo razryada chisla

cjne R4, #00b, ONFIRSTNUMB2

mov A, #0bh

swap A

mov R4, A

call VIVOD_FIRST_HEX

call WAIT_TI

call SLEEP

jmp END_KEY_B

; ;;;;;;;;;;;;;;;;;;vvod vtorogo razryada chisla

ONFIRSTNUMB2:

mov A, R4

add A, #0bh

mov R4, A

mov R5, #01b

call VIVOD_SECOND_HEX

call WAIT_TI

call SLEEP

END_KEY_B:

ret

keyA:

cjne R5, #00b, NUM2_A

; ;;;;;;;;;;;;;;;;;;;;VVOD PERVOGO CHISLA; ;;;;;;;;;;;;;;;;;;;;

; ;;;;;;;;;;;;;;;;;;;;vvod pervogo razryada chisla

cjne R3, #00b, ONFIRSTNUMA1

mov A, #0ah

swap A

mov R3, A

call VIVOD_FIRST_HEX

call WAIT_TI

call SLEEP

jmp END_KEY_A

; ;;;;;;;;;;;;;;;;;;vvod vtorogo razryada chisla

ONFIRSTNUMA1:

mov A, R3

add A, #0ah

mov R3, A

mov R5, #01b

call VIVOD_SECOND_HEX

call WAIT_TI

call SLEEP

jmp END_KEY_A

; ;;;;;;;;;;;;;;;;;;;;VVOD VTOROGO CHISLA; ;;;;;;;;;;;;;;;;;;;;;

NUM2_A:

; ;;;;;;;;;;;;;;;;;;;;vvod pervogo razryada chisla

cjne R4, #00b, ONFIRSTNUMA2

mov A, #0ah

swap A

mov R4, A

call VIVOD_FIRST_HEX

call WAIT_TI

call SLEEP

jmp END_KEY_A

; ;;;;;;;;;;;;;;;;;;vvod vtorogo razryada chisla

ONFIRSTNUMA2:

mov A, R4

add A, #0ah

mov R4, A

mov R5, #01b

call VIVOD_SECOND_HEX

call WAIT_TI

call SLEEP

END_KEY_A:

ret

keyD:

cjne R5, #00b, NUM2_D

; ;;;;;;;;;;;;;;;;;;;;VVOD PERVOGO CHISLA; ;;;;;;;;;;;;;;;;;;;;

; ;;;;;;;;;;;;;;;;;;;;vvod pervogo razryada chisla

cjne R3, #00b, ONFIRSTNUMD1

mov A, #0dh

swap A

mov R3, A

call VIVOD_FIRST_HEX

call WAIT_TI

call SLEEP

jmp END_KEY_D

; ;;;;;;;;;;;;;;;;;;vvod vtorogo razryada chisla

ONFIRSTNUMD1:

mov A, R3

add A, #0dh

mov R3, A

mov R5, #01b

call VIVOD_SECOND_HEX

call WAIT_TI

call SLEEP

jmp END_KEY_D

; ;;;;;;;;;;;;;;;;;;;;VVOD VTOROGO CHISLA; ;;;;;;;;;;;;;;;;;;;;;

NUM2_D:

; ;;;;;;;;;;;;;;;;;;;;vvod pervogo razryada chisla

cjne R4, #00b, ONFIRSTNUMD2

mov A, #0dh

swap A

mov R4, A

call VIVOD_FIRST_HEX

call WAIT_TI

call SLEEP

jmp END_KEY_D

; ;;;;;;;;;;;;;;;;;;vvod vtorogo razryada chisla

ONFIRSTNUMD2:

mov A, R4

add A, #0dh

mov R4, A

mov R5, #01b

call VIVOD_SECOND_HEX

call WAIT_TI

call SLEEP

END_KEY_D:

ret

keyC:

cjne R5, #00b, NUM2_C

; ;;;;;;;;;;;;;;;;;;;;VVOD PERVOGO CHISLA; ;;;;;;;;;;;;;;;;;;;;

; ;;;;;;;;;;;;;;;;;;;;vvod pervogo razryada chisla

cjne R3, #00b, ONFIRSTNUMC1

mov A, #0ch

swap A

mov R3, A

call VIVOD_FIRST_HEX

call WAIT_TI

call SLEEP

jmp END_KEY_C

; ;;;;;;;;;;;;;;;;;;vvod vtorogo razryada chisla

ONFIRSTNUMC1:

mov A, R3

add A, #0ch

mov R3, A

mov R5, #01b

call VIVOD_SECOND_HEX

call WAIT_TI

call SLEEP

jmp END_KEY_C

; ;;;;;;;;;;;;;;;;;;;;VVOD VTOROGO CHISLA; ;;;;;;;;;;;;;;;;;;;;;

NUM2_C:

; ;;;;;;;;;;;;;;;;;;;;vvod pervogo razryada chisla

cjne R4, #00b, ONFIRSTNUMC2

mov A, #0ch

swap A

mov R4, A

call VIVOD_FIRST_HEX

call WAIT_TI

call SLEEP

jmp END_KEY_C

; ;;;;;;;;;;;;;;;;;;vvod vtorogo razryada chisla

ONFIRSTNUMC2:

mov A, R4

add A, #0ch

mov R4, A

mov R5, #01b

call VIVOD_SECOND_HEX

call WAIT_TI

call SLEEP

END_KEY_C:

ret

key6:

cjne R5, #00b, NUM26

; ;;;;;;;;;;;;;;;;;;;;VVOD PERVOGO CHISLA; ;;;;;;;;;;;;;;;;;;;;

; ;;;;;;;;;;;;;;;;;;;;vvod pervogo razryada chisla

cjne R3, #00b, ONFIRSTNUM61

mov A, #6h

swap A

mov R3, A

call VIVOD_FIRST_NUM

call WAIT_TI

call SLEEP

jmp END_KEY6

; ;;;;;;;;;;;;;;;;;;vvod vtorogo razryada chisla

ONFIRSTNUM61:

mov A, R3

add A, #6h

mov R3, A

mov R5, #01b

call VIVOD_SECOND_NUM

call WAIT_TI

call SLEEP

jmp END_KEY6

; ;;;;;;;;;;;;;;;;;;;;VVOD VTOROGO CHISLA; ;;;;;;;;;;;;;;;;;;;;;

NUM26:

; ;;;;;;;;;;;;;;;;;;;;vvod pervogo razryada chisla

cjne R4, #00b, ONFIRSTNUM62

mov A, #6h

swap A

mov R4, A

call VIVOD_FIRST_NUM

call WAIT_TI

call SLEEP

jmp END_KEY6

; ;;;;;;;;;;;;;;;;;;vvod vtorogo razryada chisla

ONFIRSTNUM62:

mov A, R4

add A, #6h

mov R4, A

mov R5, #01b

call VIVOD_SECOND_NUM

call WAIT_TI

call SLEEP

END_KEY6:

ret

key3:

cjne R5, #00b, NUM23

; ;;;;;;;;;;;;;;;;;;;;VVOD PERVOGO CHISLA; ;;;;;;;;;;;;;;;;;;;;

; ;;;;;;;;;;;;;;;;;;;;vvod pervogo razryada chisla

cjne R3, #00b, ONFIRSTNUM31

mov A, #3h

swap A

mov R3, A

call VIVOD_FIRST_NUM

call WAIT_TI

call SLEEP

jmp END_KEY3

; ;;;;;;;;;;;;;;;;;;vvod vtorogo razryada chisla

ONFIRSTNUM31:

mov A, R3

add A, #3h

mov R3, A

mov R5, #01b

call VIVOD_SECOND_NUM

call WAIT_TI

call SLEEP

jmp END_KEY3

; ;;;;;;;;;;;;;;;;;;;;VVOD VTOROGO CHISLA; ;;;;;;;;;;;;;;;;;;;;;

NUM23:

; ;;;;;;;;;;;;;;;;;;;;vvod pervogo razryada chisla

cjne R4, #00b, ONFIRSTNUM32

mov A, #3h

swap A

mov R4, A

call VIVOD_FIRST_NUM

call WAIT_TI

call SLEEP

jmp END_KEY3

; ;;;;;;;;;;;;;;;;;;vvod vtorogo razryada chisla

ONFIRSTNUM32:

mov A, R4

add A, #3h

mov R4, A

mov R5, #01b

call VIVOD_SECOND_NUM

call WAIT_TI

call SLEEP

END_KEY3:

ret

keyE:

cjne R5, #00b, NUM2_E

; ;;;;;;;;;;;;;;;;;;;;VVOD PERVOGO CHISLA; ;;;;;;;;;;;;;;;;;;;;

; ;;;;;;;;;;;;;;;;;;;;vvod pervogo razryada chisla

cjne R3, #00b, ONFIRSTNUME1

mov A, #0eh

swap A

mov R3, A

call VIVOD_FIRST_HEX

call WAIT_TI

call SLEEP

jmp END_KEY_E

; ;;;;;;;;;;;;;;;;;;vvod vtorogo razryada chisla

ONFIRSTNUME1:

mov A, R3

add A, #0eh

mov R3, A

mov R5, #01b

call VIVOD_SECOND_HEX

call WAIT_TI

call SLEEP

jmp END_KEY_E

; ;;;;;;;;;;;;;;;;;;;;VVOD VTOROGO CHISLA; ;;;;;;;;;;;;;;;;;;;;;

NUM2_E:

; ;;;;;;;;;;;;;;;;;;;;vvod pervogo razryada chisla

cjne R4, #00b, ONFIRSTNUME2

mov A, #0eh

swap A

mov R4, A

call VIVOD_FIRST_HEX

call WAIT_TI

call SLEEP

jmp END_KEY_E

; ;;;;;;;;;;;;;;;;;;vvod vtorogo razryada chisla

ONFIRSTNUME2:

mov A, R4

add A, #0eh

mov R4, A

mov R5, #01b

call VIVOD_SECOND_HEX

call WAIT_TI

call SLEEP

END_KEY_E:

ret

key9:

cjne R5, #00b, NUM29

; ;;;;;;;;;;;;;;;;;;;;VVOD PERVOGO CHISLA; ;;;;;;;;;;;;;;;;;;;;

; ;;;;;;;;;;;;;;;;;;;;vvod pervogo razryada chisla

cjne R3, #00b, ONFIRSTNUM91

mov A, #9h

swap A

mov R3, A

call VIVOD_FIRST_NUM

call WAIT_TI

call SLEEP

jmp END_KEY9

; ;;;;;;;;;;;;;;;;;;vvod vtorogo razryada chisla

ONFIRSTNUM91:

mov A, R3

add A, #9h

mov R3, A

mov R5, #01b

call VIVOD_SECOND_NUM

call WAIT_TI

call SLEEP

jmp END_KEY9

; ;;;;;;;;;;;;;;;;;;;;VVOD VTOROGO CHISLA; ;;;;;;;;;;;;;;;;;;;;;

NUM29:

; ;;;;;;;;;;;;;;;;;;;;vvod pervogo razryada chisla

cjne R4, #00b, ONFIRSTNUM92

mov A, #9h

swap A

mov R4, A

call VIVOD_FIRST_NUM

call WAIT_TI

call SLEEP

jmp END_KEY9

; ;;;;;;;;;;;;;;;;;;vvod vtorogo razryada chisla

ONFIRSTNUM92:

mov A, R4

add A, #9h

mov R4, A

mov R5, #01b

call VIVOD_SECOND_NUM

call WAIT_TI

call SLEEP

END_KEY9:

ret

8. Заключение

В курсовой работе запрограммирован микропроцессор 51 серии на выполнение арифметических операций. Использованы прерывания от последовательного порта и таймера.

9. Литература

1. Справочник. Микроконтроллеры: архитектура, программирование, интерфейс. Бородин В. Б., Шагурин М.И.М. :ЭКОМ, 1999.

2. Однокристальные микроЭВМ. Справочник. Бином: 1994.

3. Лекции «Микропроцессорные системы», Гудков Ю. И., 2007−2008 гг.

ПоказатьСвернуть
Заполнить форму текущей работой