6 Разработка программы эмуляции работы микро-эвм на базе гипотетического микропроцессора

6.1 Общая характеристика программы эмуляции

Программа эмуляции предназначена для наглядной демонстрации работы гипотетического микропроцессора. Программа предусматривает пошаговый режим демонстрации работы микропроцессора. При демонстрации работы микро-ЭВМ программа отображает содержимое регистров, показывает связи, а также используемые текущей микрооперацией шины.

6.2 Алгоритм работы программы эмуляции

• при запуске программы вызывается процедура Sub FormLoad();

• при нажатии на кнопку ALT + S включается пошаговый режим работы программы, при нажатии ALT + F все результаты работы эмулятора сбрасываются в «0» (программа принимает свои начальные значения);

• Sub BtnTact_Click() и Sub mnu__start_Click() - выполняют пошаговый режим работы;

• Sub BtnFree_Click () и Sub mnu__stop_Click() - переход в начальное состояние;

6.3 Список процедур и функций

Процесс эмуляции и визуализации в представляемом программном продукте непосредственно взаимосвязаны друг с другом. Не представляется возможным точно разделить и выделить в тексте программы код эмуляции и демонстрации. Список основных процедур приведен в таблице 5.2. Остальные функции являются вспомогательными, так как это функции обработки нажатия кнопок, получения сигналов от таймера и др.

Таблица 6.1 - Функции, используемые в эмуляторе

Название функции	Назначение
Sub FormLoad()	Функция общей инициализации процесса эмуляции
mnu__abprog_Click	Вызывает справку информации о программе
mnu__abraz_Click	Вызывает справку информации о разработчике
mnu__yellow_Click	Заливает форму желтым цветом
mnu__green_Click	Заливает форму зеленым цветом

ВЫВОДЫ

В процессе реализации данного проекта были выполнены следующие дейст­вия:

1. спроектировано АЛУ гипотетического микропроцессора по способу реа­лизации ОМО, АЛУ предназначено для выполнения операций вычитания, умножения и арифметического сдвига влево.

2. разработаны алгоритмы выполнения команд SBB, SAL и IMUL, состав­ляющих подмножество команд микропроцессора i80286;

3. разработана структурная схема гипотетического микропроцессора, сис­тему команд которого составляют команды SBB, SAL и IMUL;

4. разработана структурная схема микро-ЭВМ на базе спроектированного гипотетического микропроцессора;

5. создана программа эмуляции выполнения гипотетическим микропроцес­сором команд, составляющих его систему команд.

Как видно из приведенного выше, цели, которые ставились при создании про­екта, были достигнуты. Однако для того, чтобы спроектированный микропроцессор нашел какое-либо применение необходимо как минимум расширить его систему команд. Это повлечет за собой, во-первых, усложнение структуры АЛУ, а, во-вторых, усложнение структурной схемы гипотетического микропроцессора. При этом структурная схема микро-ЭВМ останется, в общих чертах, неизменной.

СПИСОК ИСПОЛЬЗОВАННЫХ ИСТОЧНИКОВ

1. Микропроцессоры семейства 8086/8088. Г.Гибсон – 1987 М.

2. Каган Б.М. Электронные вычислительные машины и системы: Учебное пособие для вузов. - М.: Энергоатомиздат, 1991. - 592 с.: ил.

3. Нортон П., Соухе Д. Язык ассемблера для IBM PC: Пер. с англ., - М.: Издательство «Компьютер», 1993 г.

4. Юров В. Assembler: специальный справочник - СПб: Издательство «Питер», 2000. - 496 с.: ил.

5. Абель П. Язык Ассемблера для IBM PC и программирования / Пер. с англ. Ю.В.Сальникова. - М.: Высш. шк.,1992. - 447 с.: ил.

6. Толковый словарь по вычислительным системам / Под ред. В. Иллингуорта и др.: Пер. с англ. А.К. Белоцкого и др.; Под ред. Е.К. Масловского. – М.: Машиностроение, 1991. – 560 с.: ил.

7. Использование Turbo Assembler при разработке программ / Сост. А.А. Чекат ков.- Киев: «Диалектика», 1995.-288с.

8. Шауман А.М. Основы машинной арифметики. – Л: Изд-во Ленинг. ун-та, 1979.

9. Фролов А. Фролов Г. Защищенный режим процессоров Intel 80286/80386/80486 Том 6 – М: Диалог-МИФИ, 1993 г.

Приложение А

Техническое задание НА ПРОГРАММНОЕ ОБЕСПЕЧЕНИЕ

А.1.1 Общие сведения

Полное наименование разработки: «Разработка структуры гипотетического микропроцессора и центральной части микро-ЭВМ на его базе. Эмуляция выполнения команд».

Программа проектируется студентом третьего курса Государственного университета информатики и искусственного интеллекта, факультета СКИТ, группы ИС-05б Чубатовым Русланом Евгеньевичем.

Плановый срок начала работы: 10 октября 2007 года. Плановый срок окончания работы: 28 декабря 2007 года.

А.1.2 Назначение и цели создания программного продукта

Основной целью создания программного продукта является разработка средств наглядной демонстрации динамики выполнения команд микро-ЭВМ на базе гипотетического микропроцессора, спроектированного на основе принципов устройства и функционирования реальных микропроцессоров.

Результатом разработки будет программа, демонстрирующая выполнение команд SBB, MOV, JMP, IMUL и CLC для разработанной микро-ЭВМ.

А.1.3 Характеристика объекта автоматизации

А.1.3.1 Сведения об условиях эксплуатации КП

Данный программный продукт применим в учебных целях при изучении работы микропроцессора i80386. А.1.4 Требования к проекту

А.1.3.2 Требования к задачам и функциям КП

В проектируемом программном продукте необходимо решить следующие задачи:

1. Разработать структуру гипотетического микропроцессора для реализации заданного подмножества команд на основе микропроцессора прототипа и заданного способа адресации;

1.1. Изучить алгоритм команд микропроцессора i80286, и способа их адресации;

1.2. Разработать структуру АЛУ гипотетического микропроцессора с ОМО;

1.3. Разработать эмулятор выполнения команд АЛУ;

1.4. Разработать объединенную микропрограмму для АЛУ;

1.5. Разработать структуру гипотетического микропроцессора для заданного подмножества команд на основе разработанной АЛУ.

2. Разработать центральную часть МЭВМ;

2.1. Разработать структуру микрооперация - оперативная память;

2.2. Разработать микропрограмму выполнения команд заданного подмножества.

3. Разработать эмулятор;

3.1. Разработать подсистему визуализации состояния ОЭ микропроцессора и узлов МЭВМ;

3.2. Разработать интерпретатор выполнения команд;

3.3. Обеспечить пошаговое выполнение команд.

Заданным подмножеством команд являются:

- арифметическая операция SBB – команда вычитания;

- арифметическая операция IMUL – команда умножения;

- логическая операция CLC – сброс флага переноса в 0;

- команда безусловного перехода - JMP;

- посылочная операция - MOV.

А.4 Требования к видам обеспечения

А.1.4.1 Требования к программному обеспечению

К программному обеспечению (ПО) предъявляется следующее требование:

• операционная система - Microsoft Windows 98, NT и выше;

• интерпретатор Visual Basic 6.0;

• язык программирования Visual Basic.

А.1.4.2 Требования к техническому обеспечению

• IBM – совместимый компьютер;

• объем памяти RAM 32Мб;

• устройство ввода – клавиатуру;

• мышь;

• устройство чтения флоппи дисков, либо USB – порт;

• графический видеоадаптер VGA.

А.1.4.3 Требования к организационному обеспечению

Организационное обеспечение должно включать пояснительную записку со следующими приложениями:

• техническое задание;

• руководство пользователя;

• экранные формы;

• листинг программы.

А.1.5 Стадии и этапы разработки

Стадии и этапы разработки представлены в таблице А.1.

Таблица А.1- Стадии и этапы разработки ПП

№	Этапы работы	Срок выполнения (недели)
1	Анализ структуры и алгоритмов выполнения заданных команд в микропроцессоре прототипе. Выяснение заданий.	1
2	Составление технического задания на ПО и микроЭВМ	2
3	Разработка структуры АЛУ для выполнения операций	3
4	Разработка алгоритма выполнения арифметических операций.	4
5	Разработка структуры микроЭВМ	5
6	Разработка алгоритма выполнения команд	6
7	Разработка эмулятора выполнения заданных команд	7-8
8	Отладка эмулятора	9-10
9	Тестирование эмулятора	11-12
10	Написание пояснительной записки и графических Материалов	13
11	Защита проекта	14

А.1.6 Порядок защиты курсового проекта

Защита курсового проекта включает такие этапы:

• пункты технического задания могут корректироваться по согласованию сторон в течении выполнения КП;

• для приема предоставляется документация, указанная в пункте А.1.4.3 и работающая программа со всеми необходимыми файлами (тексты программ, исполняемые файлы, вспомогательные файлы).

Приложение Б

Техническое задание НА МИКРО-ЭВМ

Б.1 Общие сведения

Полное наименование разработки: «Разработка структуры гипотетического микропроцессора и центральной части микро-ЭВМ на его базе. Эмуляция выполнения команд».

Проект разрабатывается студентом третьего курса Государственного университета информатики и искусственного интеллекта, факультета СКИТ, группы ИС-05б Чубатовым Русланом Евгеньевичем.

Плановый срок начала работы: 10 октября 2007 года. Плановый срок окончания работы: 28 декабря 2007 года.

Б.2 Назначение и цели создания проекта

Основной целью создания проекта является разработка структуры МЭВМ. В процессе синтеза структуры МикроЭВМ необходимо разработать структуру микропроцессора и арифметико-логического устройства микропроцессора с обобществленными микрооперациями.

Результатом разработки будет структурная схема Микро-ЭВМ и структурная схема микропроцессора.

Б.3 Требования к функциональным характеристикам

Б.3.1 Требования к МЭВМ

Разрабатываемая микро-ЭВМ должна иметь шинный интерфейс и содержать следующие элементы:

• микропроцессор;

• оперативное запоминающее устройство;

• генератор синхросигналов и начальных установок

• шину адреса;

• шину данных;

• шину управления;

• шину синхронизации;

Б.3.2 Требования к МП

Б.3.2.1 Требования к составу МП

В состав разрабатываемого МП должны входить следующие элементы:

• буфер адреса данных;

• блок вычисления эффективного адреса;

• буфер команд;

• регистры общего назначения;

• регистр команд;

• регистр флагов, содержащий три бита условий:

• cf – флаг переноса (cf=1 – есть перенос);

• pf – флаг нечетности (если в результате число единичных бит нечетно, то pf=1);

• of – флаг переполнения (произошло переполнение – of=1);

• sf – флаг знака (результат отрицателен – sf=1)

• арифметико-логическое устройство;

• местное устройство управления;

• сегментные регистры;

• оперативно-запоминающее устройство.

Б.3.2.2 Требования к командам МП SBB, MOV, JMP, IMUL и CLC

Разрабатываемый МП должен выполнять команду знакового умножения IMUL, команду ввычитания SBB, команду базовой пересылки данных MOV, команду сброса флага переноса в ноль CLC, и команду безусловного перехода JMP при определенных режимах адресации операндов.

Б.3.3 Требования к АЛУ

АЛУ должно реализовать работу ОА с ОМО. В состав АЛУ должны входить следующие элементы:

• комбинационная часть;

• запоминающая часть;

• выходная шина комбинационной части;

• входная шина комбинационной части;

• входная шина запоминающей части;

• шина для записи внешних данных;

• регистры запоминающей части.

Б.4 Стадии и этапы разработки

Стадии и этапы разработки представлены в таблице Б.1.

Таблица Б.1- Стадии и этапы разработки ПП

№	Этапы работы	Срок выполнения (недели)
1	Анализ структуры и алгоритмов выполнения заданных команд в микропроцессоре прототипе. Выяснение заданий.	1
2	Составление технического задания на ПО и Микро-ЭВМ	2
3	Разработка структуры АЛУ для выполнения операций.	3
4	Разработка алгоритма выполнения арифметических операций.	4
5	Разработка структуры микроЭВМ	5
6	Разработка алгоритма выполнения команд	6
7	Разработка эмулятора выполнения заданных команд	7-8
8	Отладка эмулятора	9-10
9	Тестирование эмулятора	11-12
10	Написание пояснительной записки и графических Материалов	13
11	Защита проекта	14

Приложение В

Руководство пользователя

Для запуска программы нужно запустить файл KyPcoBou_1.exe.

Программа работает в пошаговом режиме.

При работе программы движение данных по структурным блокам МП сопровождается подсветкой.

Меню программы содержит следующие команды:

• "Файл" – в данном разделе меню доступны операции пошагового выполнения программы (Эмулятор -> Старт), ее сброс в начальное состояние (Эмулятор -> Стоп) и выход из программы (Выход);

• "Редактировать" – этот раздел позволяет пользователю выбрать, из имеющихся цветов, заливку формы по своему усмотрению (Цвет -> Желтый, Цвет -> Зеленый);

• "Помощь" – в данном разделе меню доступны вкладки «О программе» и «О пользователе», которые предоставят пользователю все необходимую для него информацию.

В целом, в большинстве ситуаций, для начала/сброса действия используется нажатие левой кнопки мыши на соответствующих кнопка, размещенных на главной форме.

Приложение Г

Экранные формы

Рисунок Г.1 – Главное окно программы

Приложение Д

ЛИСТИНГ ПРОГРАММЫ

VERSION 5.00

Private Sub Form_Load()

peremennim:

Tact = 0

One = 1

Nill = 0

Lbl_uuis.BackColor = vbBlack

Txt_num.Text = Str(Tact) Vyvodim v pole nomer

If Tact = 1 Then

Line18.BorderColor = vbRed

End If

If Tact = 2 Then

Lbl_uuis.BackColor = vbBlakc

End If

If Tact = 3 Then

Lbl_RO.BackColor = vbBlakc

Txt_CS.Text = "0014h"

Txt_DS.Text = "0023h" Txt_ES.Text = "0032h" Txt_SS.Text = "0041h" Txt_IP.Text = "0002h"

End If

If Tact = 4 Then

Txt_CS.ForeColor = vbBlakc

End If

If Tact = 5 Then

Txt_BP.Text = "0050h" Txt_DI.Text = "005Fh"

Txt_BP.ForeColor = vbRed

End If

If Tact = 6 Then

Txt_BP.ForeColor = vbBlakc

End If

If Tact = 7 Then

Txt_EADR.Text = "0001F1h"

Txt_EADR.ForeColor = vbRed

End If

If Tact = 8 Then

Line24.BorderColor = vbRed

End If

If Tact = 9 Then

Line56.BorderColor = vbBlack

End If

If Tact = 10 Then

Lbl_uuis.BackColor = vbBlakc

End If

If Tact = 11 Then

Lbl_RO.BackColor = vbBlakc

Line11.BorderColor = vbBlakc

End If

If Tact = 12 Then

Line51.BorderColor = vbRed

End If

If Tact = 13 Then

Txt_BP.Text = "0050h" Txt_DI.Text = "005Fh"

Line54.BorderColor = vbRed

End If

If Tact = 14 Then

Txt_BP.ForeColor = vbBlakc

End If

If Tact = 15 Then

Shape1.BorderColor = vbRed

Txt_EADR.Text = "0001F3h"

Txt_EADR.ForeColor = vbRed

End If

If Tact = 16 Then

Txt_MNM_2.Text = "IMUL AX, CX"

End If

If Tact = 17 Then

Line56.BorderColor = vbBlack

End If

If Tact = 18 Then

Lbl_uuis.BackColor = vbBlakc

End If

If Tact = 19 Then

End If

If Tact = 20 Then

Txt_DI.ForeColor = vbRed

End If

If Tact = 21 Then

Txt_BP.Text = "0050h"

Txt_DI.Text = "005Fh"

End If

If Tact = 22 Then

Txt_BP.ForeColor = vbBlakc

Shape1.BorderColor = vbRed

End If

If Tact = 23 Then

Txt_EADR.Text = "0001F6h"

Txt_EADR.ForeColor = vbRed

End If

If Tact = 24 Then

Line65.BorderColor = vbBlack

Txt_MNM_3.Text = "MOV AX, BX"

End If

If Tact = 25 Then

Line58.BorderColor = vbBlack

End If

If Tact = 26 Then

Lbl_uuis.BackColor = vbBlakc

End If

If Tact = 27 Then

Lbl_RO.BackColor = vbBlakc

End If

If Tact = 28 Then

Txt_CS.ForeColor = vbBlakc

End If

If Tact = 29 Then

Txt_BP.Text = "0050h"

Txt_DI.Text = "005Fh"

End If

If Tact = 30 Then

Txt_BP.ForeColor = vbBlakc

End If

If Tact = 31 Then

Txt_EADR.Text = "0001F9h"

End If

If Tact = 32 Then

Line65.BorderColor = vbBlack

End If

If Tact = 33 Then

Line56.BorderColor = vbBlack

End If

If Tact = 34 Then

Lbl_uuis.BackColor = vbBlakc

End If

If Tact = 35 Then

Lbl_RO.BackColor = vbBlakc

End If

If Tact = 36 Then

Txt_CS.ForeColor = vbBlakc

End If

If Tact = 37 Then

Txt_BP.Text = "0050h" Txt_DI.Text = "005Fh" Txt_BP.ForeColor = vbRed

Line54.BorderColor = vbRed

End If

If Tact = 38 Then

Txt_BP.ForeColor = vbBlakc

End If

If Tact = 39 Then

Txt_EADR.Text = "0001FAh" Txt_EADR.ForeColor = vbRed

End If

If Tact = 40 Then

Txt_MNM_5.Text = "CLC (CF:=0)"

End If

If Tact = 41 Then

Txt_ADR_5.ForeColor = vbBlack

End If

If Tact = 42 Then

Txt_OK_2.Text = Txt_MNM_1.Text

End If

If Tact = 43 Then

Txt_MNM_2.ForeColor = vbRed

End If

f Tact = 44 Then

Txt_OK_1.ForeColor = vbRed

Txt_OK_1.Text = Txt_MNM_2.Text

End If

If Tact = 45 Then

Line60.BorderColor = vbBlack

End If

If Tact = 46 Then

Line34.BorderColor = vbRed

End If

If Tact = 47 Then

Line34.BorderColor = vbBlack

Txt_OK_1.Text = "????????????"

End If

If Tact = 48 Then

Txt_OK_1.ForeColor = vbRed

End If

'--BEGIN OF DOING SBB FUNCTION----

If Tact = 49 Then

Txt_AX.Text = "000Ah"

Txt_BX.Text = "0005h"

Txt_CX.Text = "0003h"

Txt_DX.Text = "0001h"

End If

If Tact = 50 Then

Line37.BorderColor = vbBlakc

Txt_OP2.Text = Txt_BX.Text

End If

If Tact = 51 Then

Line4.BorderColor = vbBlakc

End If

If Tact = 52 Then

Line30.BorderColor = vbBlakc

End If

If Tact = 53 Then

Line30.BorderColor = vbRed

End If

If Tact = 54 Then

Line44.BorderColor = vbBlakc

Txt_RES.Text = "0005h"

End If

If Tact = 55 Then

Txt_OP1.Text = Txt_RES.Text

End If

If Tact = 56 Then

Txt_RES.ForeColor = vbBlack

End If

If Tact = 57 Then

Txt_OP2.Text = "0001h"

End If

If Tact = 58 Then

Txt_OP2.ForeColor = vbBlack

End If

If Tact = 59 Then

Txt_OF.ForeColor = vbBlakc

End If

If Tact = 60 Then

Line30.BorderColor = vbRed

End If

If Tact = 61 Then

Line30.BorderColor = vbBlakc

Txt_RES.Text = "0004h"

End If

If Tact = 62 Then

Txt_RES.ForeColor = vbRed

End If

If Tact = 63 Then

Txt_RES.ForeColor = vbBlack

'-END OF DOING SBB FUNCTION-----

If Tact = 64 Then

Line34.BorderColor = vbRed

End If

If Tact = 65 Then

Line34.BorderColor = vbBlack

Txt_OK_1.Text = "????????????"

End If

If Tact = 66 Then

Txt_RK.ForeColor = vbBlakc

Txt_OK_1.Text = Txt_MNM_4.Text

End If

'---BEGIN OF DOING IMUL FUNCTION--

If Tact = 67 Then

Txt_AX.Text = "0004h"

Txt_BX.Text = "0005h"

Txt_CX.Text = "0003h"

Txt_DX.Text = "0001h"

End If

If Tact = 68 Then

Line37.BorderColor = vbBlakc

End If

If Tact = 69 Then

Line4.BorderColor = vbBlakc

Txt_OF.Text = "0"

Txt_IF.Text = "0"

Txt_TF.Text = "0"

Txt_SF.Text = "0"

Txt_ZF.Text = "0"

Txt_CF.Text = "1"

Txt_PF.Text = "0"

Txt_AF.Text = "0"

End If

If Tact = 70 Then

Line30.BorderColor = vbBlakc

End If

If Tact = 71 Then

Line30.BorderColor = vbRed

End If

If Tact = 72 Then

Txt_RES.Text = "000Ch" 'AX:=AX*CX____1100/12

End If

If Tact = 73 Then

Txt_RES.ForeColor = vbRed

End If

If Tact = 74 Then

Txt_RES.ForeColor = vbBlack

End If

'-END OF DOING IMUL FUNCTION----

If Tact = 75 Then

Txt_OK_2.ForeColor = vbRed

End If

If Tact = 76 Then

Line34.BorderColor = vbBlack

Txt_OK_1.Text = "???????????"

End If

If Tact = 77 Then

Line2.BorderColor = vbRed

End If

'-BEGIN OF DOING MOV FUNCTION---

If Tact = 78 Then

Txt_AX.Text = "000Ch"

Txt_BX.Text = "0005h"

Txt_CX.Text = "0003h"

Txt_DX.Text = "0001h"

End If

If Tact = 79 Then

Txt_DX.ForeColor = vbBlakc

End If

If Tact = 80 Then

Txt_AX.ForeColor = vbRed

End If

If Tact = 81 Then

Txt_AX.ForeColor = vbRed

End If

If Tact = 82 Then

Txt_AX.ForeColor = vbBlakc

End If

'--END OF DOING IMUL FUNCTION-----

If Tact = 82 Then

Txt_OK_2.ForeColor = vbRed

End If

If Tact = 83 Then

Txt_OK_1.Text = "?????????"

End If

If Tact = 84 Then

Txt_RK.ForeColor = vbRed

End If

If Tact = 85 Then

Txt_RK.ForeColor = vbBlakc

Txt_OK_2.ForeColor = vbRed

End If

If Tact = 86 Then

Txt_OK_2.ForeColor = vbBlakc

Txt_OK_2.Text = "????????"

End If

If Tact = 87 Then

Txt_OP1.Text = "0001h"

Txt_OP2.Text = "0000h"

End If

If Tact = 88 Then

Line35.BorderColor = vbBlakc

End If

If Tact = 89 Then

Line30.BorderColor = vbRed

End If

If Tact = 90 Then

Line44.BorderColor = vbBlakc

End If

If Tact = 91 Then

Line44.BorderColor = vbRed

End If

If Tact = 92 Then

Txt_OP1.Text = "0000h"

Txt_RES.Text = "0000h"

End If

If Tact = 93 Then

Txt_OP1.ForeColor = vbBlakc

Txt_CF.Text = "0"

End If

If Tact = 94 Then

Txt_CF.Text = "0"

Txt_RK.Text = "????????????"

End If

If Tact = 95 Then

Txt_RK.ForeColor = vbBlack

MsgBox "THE END"

Btn_Takt.Enabled = False

End If

End Sub

Private Sub mnu___green_Click()

mnu___green.Checked = True

mnu___green.Enabled = False

Form1.BackColor = vbGreen

mnu___yellow.Checked = False

mnu___yellow.Enabled = True

End Sub

Private Sub mnu___yellow_Click()

mnu___yellow.Checked = True

mnu___yellow.Enabled = False

Form1.BackColor = vbYellow

mnu___green.Checked = False

mnu___green.Enabled = True

End Sub

Private Sub mnu__abprog_Click()

Dim mess As String

Dim butico As Integer

Dim title As String

Dim res As String

mess = "..."

butico = vbOKOnly + vbInformation

title = "Help about the program..."

res = MsgBox(mess, butico, title)

End Sub

Private Sub mnu__abrazr_Click()

Dim mess As String

Dim butico As Integer

Dim title As String

Dim res As String

mess = "…”

butico = vbOKOnly + vbInformation

title = "Help about the developer..."

res = MsgBox(mess, butico, title)

End Sub

Private Sub mnu__exit_Click()

Dim mess As String

Dim butico As Integer

Dim title As String

Dim res As String

mess = "You really want to leave from the program?!"

butico = vbYesNo + vbQuestion

title = "The message of the program..."

res = MsgBox(mess, butico, title)

End If

End Sub

Private Sub mnu__start_Click()

Btn_Takt_Click

End Sub

Private Sub mnu__stop_Click()

Cmd_FREE_Click

End Sub