Процедура drawmenu

2.3.5. Процедура drawmenu.

Быстрый вызов – F10.

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

Алгоритм процедуры полностью замешен на символьных данных, используемых в качестве кодов «горячих» клавиш и клавиш скролинга. Для визуализации выбора пункта меню испльзуется выделение цветом того или иного пункта меню. Все цвета меню можно зажать путем изменения значений констант light и dark – соотвотственно активного и неактивного пункта меню. Подобный ход можно использовать в подборе цветов, удобных для пользователя.

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

При выборе любого из пунктов меню происходит вызов процедуры drawhelp со значением 1-4 в зависимости от того какой пункт был выбран. Значение 1 предано крайнему левому пункту, 4 – правому. Подробнее о текстах справки можно посмотреть в таблице 3.

Как и во многих программах можно избежать входа в меню – для выбора любога пункта назначена «горячая» клавиша. Информация об этом выдается при запуске программы.

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

Этот раздел предназначен для пояснения как общатся с программой.

Данная программа предназначена для построения гистограммы последовательности чисел полученной по двум законам распределения – нармальному и экспоненциальному. При выводе используется графический режим. Перед выводом последовательность разбивается на 10 интрвалов и демонстрацией результата является мат.ожидание и дисперсия для каждого из интервалов.

В программе предусмотрена строка помощи для пользователя, в которой описаны быстрый клавишы вызова того или иного пункта возможных действий. Все возможные подсказки можно просмотреть в таблице 3 в разделе «Руководство программиста».

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

При выборе пункта «Параметры» пользователю будет предложено окно, в котором можно будет задать параметры для генерации последовательности. В правой колонке для нормального закон, в левой – для экспоненциальной. Чтобы изменить параметр необходимо нажать BckSp (Забой), после чего становится возможным изменение параметра. Переключение между параметрами осуществляется через клавишу Tab или Enter. Также переход происходит автоматически после изменения параметра. В этом же пункте меню происходит генерация последовательности – клавиша F4. Выход из этого режима осуществляется через клавишу Escape.

Пункт «Последовательности» позволяет осуществить просмотр уже сущестующей последовательности. Чтобы просмотреть всю последовательность целиком воспользуйтесь клавишами скролинга (прокрутки) Up/Down. Выход из режима – Escape.

Просмотр гистограммы производится при выборе одноименного пункта. Гистограмма имеет легенду. Выходом из просмотра является нажатие на любую клавишу.

Для выхода можно воспользоватся комбинацией клавиш Alt-x или же через меню.

Таблица 4. Комбинации «горячих» клавиш программы.

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

Научились применять математический аппарат при программировании на Turbo Pascal. Написали программу используя все знания полученые по курсу «Информатика». Вникли в понятие интерфейса и сделали попытку в разработке собственного дизайна программы.

Литература.

Фаронов.: «Турбо паскаль 7.0. Начальный курс. Учебное пособие.»- М.:»Ноллидж», 1997г.

Алексеев В.Е. и др.: «Вычислительная техника и программирование. Практикум по программированиюЖ Практическое пособие.» - М.: Высшая школа, 1991г.

Содержание.

Введение.

Руководство программиста.

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

Заключение.

Литература.

Приложения (блок-схемы и код программы).

2

3

8

9

9

10

program kursovik;

uses crt,graph;

var j,help,i,work,button:byte;

exitmenu,exitprog:boolean;

actionprog,action:char;

grmode,grdriver:integer;

dat:array[1..3]of real;

posle:array[1..100] of real;

xcor,ycor:array[1..3]of byte;

mat,disp:array[1..10]of real;

mat0,disp0,dispmax,matmax,x:real;

{*****DrawHelp*****}

procedure drawhelp(help:byte);

begin

textcolor(black);

textbackground(white);

gotoxy(1,25);

case help of

0: write(' F1-Парам. F2-Посл-ти F3-Гистогр. F10-Меню (Alt-x)-Выход ');

1: write(' Задать/изменить параметры ');

2: write(' Просмотреть последовательности ');

3: write(' Просмотреть гистограмму ');

4: write(' Выход ');

5: write(' Esc-Закончить изменение параметров. BckSp-Изменить параметр. F4-Постр. посл-ть');

6: write(' Нажмите Up или Down для просмотра или Esc для выхода ');

end;

end;

{*****DrawWin*****}

procedure drawwin;

begin

textcolor(white);textbackground(blue);

GotoXY(1,2);

Write('г');

for i:=2 to 79 do

Write('=');

Write('¬');

for i:=3 to 23 do

begin

GotoXY(1,i1);

Write('¦');

for j:=2 to 79 do

Write(' ');

Write('¦');

end;

GotoXY(1,24);

Write('L');

for i:=2 to 79 do

Write('=');

Write('-');

{ gotoxy(39,2);write('T');}

gotoxy(39,24);write('¦');

for i:=5 to 23 do

begin

gotoxy(39,i);

write('¦')

end;

gotoxy(31,3);

writeln('Последовательности');

gotoxy(1,4);

write('¦=====================================T========================================¦');

end;

{*****DoWork*****}

procedure dowork(work:byte);

begin

case work of

1: begin

textcolor(white);

textbackground(blue);

gotoxy(39,2);write('T');

gotoxy(2,3);

writeln(' Нормальный закон: ¦ Экспоненциальный закон:');

gotoxy(1,4);

write('¦=====================================+========================================¦');

drawhelp(5);

textcolor(white);

textbackground(blue);

gotoxy(2,6);write(' Мат. ожидание:');

gotoxy(2,8);write(' Дисперсия:');gotoxy(xcor[2],ycor[2]);write(dat[2]:2:1);

gotoxy(41,6);write('Коэффициент:');gotoxy(xcor[3],ycor[3]);write(dat[3]:2:1);

gotoxy(xcor[1],ycor[1]);write(dat[1]:2:1);i:=1;

repeat

action:=readkey;

case action of

#27: exitpar:=true;

#9: begin

i:=i+1;

if i

Похожие работы

Генератор случайных чисел

Скачать

26408

0

6

... получаются экспериментальная и теоретическая зависимости P (j, l), сходимость которых проверяется по известным критериям, причем проверку целесообразно проводить при разных значениях l и р, 0 < р < 1.   7. Генератор случайных чисел в Borland C++ В языке C, как и во многих других языках высокого уровня, существует встроенная поддержка генератора случайных чисел. Для формирования чисел ...

VB, MS Access, VC++, Delphi, Builder C++ принципы(технология), алгоритмы программирования

Скачать

723413

0

0

... данных будет нести больше смысла, если его отсортировать каким‑либо образом. Часто требуется сортировать данные несколькими различными способами. Во‑вторых, многие алгоритмы сортировки являются интересными примерами программирования. Они демонстрируют важные методы, такие как частичное упорядочение, рекурсия, слияние списков и хранение двоичных деревьев в массиве. Наконец, сортировка ...

Генерирование псевдослучайных чисел на примере создания игры "Сапер"

Скачать

48469

0

0

... нужно выбрать в меню Справка, а для ознакомления с информацией о приложении выбрать О программе Заключение В ходе выполнения курсовой работы были рассмотрены и проанализированы основные методы генерирования псевдослучайных чисел: линейный конгруэнтный метод, метод Фибоначчи с запаздываниями, алгоритм Блюма, Блюма и Шуба, Вихрь Мерсенна. Для реализации в курсовой работе были выбраны: метод, ...

Имитационная модель СТО с использованием программы С++

Скачать

57802

9

13

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