Управление стержнями АЭС, страница 5

JNZ   ZADER5      ; дребезг закончен нет то ZFDR5

      POP   H           ; извлечение пары регистров из стека

      LXI   H,KLAV      ; запомнить код клавиши

      MOV   A,M         ; код клавиши записать в А

      JMP   REJ         ; перейти к метке REJ

                        ; продолжение задержки

ZADER2:DCX  H           ;** 5 декремент пары регистров Н=Н-1     

      MOV   A,H         ;** 5 записать в А значение Н

      ORA   L           ;** 4 лог.”ИЛИ” А с L

      JNZ   ZADER1      ;** 10 задержка не закончилась ZADER1

      RET               ;* 10 задержка закончилась выйти из подпрограммы

BASE: DB    00H         ;

      DB    00H         ;

      DB    00H         ;

      DB    0CH         ;

      DB    00H         ;

      DB    6CH         ;

      DB    0CH         ;

      DB    6CH         ;

KLAV: DB    O           ; ячейка памяти в которой временно хранится код нажатой

; клавиши клавиатуры

      END               ; директива ассемблера, означающая конец текста

; программы.

Расчёт временной задержки

Составим уравнение Од+Мн+Ров=2200000

      Где Од – суммарное количество тактов команд, выполняющихся однократно при формировании временной задержки (помечены знаком *).

      Мн – суммарное количество тактов команд, выполняющихся в цикле (помечены знаком **)

      Ров – количество повторений цикла

      2200000 – количество тактов в 1 секунде (для тактовой частоты 2,2 МГц)

      Од=17+4+10=31 такт

      Мн=10+7+10+5+5+4+10=51 такт

      Ров=(2200000-Од)/Мн

      Ров=(2200000-31)/51=43136,647

      В качестве Ров требуется целое число проходов 43136 для задержки в 1 сек.

      Тогда для задержки в 2 сек. Необходимо Ров*2=43136 тактов, а для задержки в 5 сек. Ров*5=215383 тактов

    3 Заключение

В ходе изучения предмета ''Микропроцессоры и микроЭВМ в радиоэлектронных средствах'' я по ТЗ разработал программу управления стержнями ядерного реактора которая в дальнейшем была опробована на лабораторном стенде и показала свою работоспособность.

    4 Литература

    Гладштейн М.А. ''Микропроцессоры и микроЭВМ в радиоэлектронных средствах: Конспект лекций / РАТИ, Рыбинск 1992г.  -     132 стр.

5 Приложение

Кросс-ассемблер 80/85 ### Файл листинга kurs.lst

Входной файл   > kurs.asm

Объектный файл > kurs.obj

1 проход

2 проход

  1                     ;kursovaya rabota

  2                     PORTA   EQU     80H

  3                     PORTB   EQU     81H

  4                     PORTC   EQU     82H

  5                     POVDK   EQU     14

  6                     KODKL   EQU     9H

  7                     PORCRL  EQU     83H

  8                             ORG     800H

  9  0800   31 00 09            LXI     SP,900H

 10  0803   3E 89               MVI     A,89H