Лекция: Описание массива пунктов меню

DIM a$(5), k$(5)

DIM a1$(5), a2$(5), a3$(5), a4$(5), a5$(5)

Присвоение значений элементов пунктов меню

a$(0) = " menu: "

a$(1) = «1111»

a$(2) = «2222»

a$(3) = «3333»

a$(4) = «4444»

a$(5) = «5555»

k$(0) = " Контекстная помощь "

k$(1) = «1111 ооооооооооооооооооооооооооооооооооооооооооооо»

k$(2) = «2222 ьоооооооооооооооол»

k$(3) = «33пррррррррррр орррррррррр33»

k$(4) = «4ннннннннннннннн пррррло енллллллллллллллллллл444»

k$(5) = «55неллллллл енл ле55»

a1$(0) = " menu1: "

a1$(1) = «gggggg1111»

a1$(2) = «ggggggggg2222»

a1$(3) = «ggggggggggg3333»

a1$(4) = «ggggggggggg4444»

a1$(5) = «ggggg5555»

a2$(0) = " menu2: "

a2$(1) = «ghnnffgnbfgg1111»

a2$(2) = «gggggnfgngggg2222»

a2$(3) = «ggggggggfdnfdngggg3333»

a2$(4) = «ggggggdnbdfggggg4444»

a2$(5) = «ggggg5555»

a3$(0) = " menu3: "

a3$(1) = «dhfdnbfgnf»

a3$(2) = «ggggggggg2222»

a3$(3) = «gggrthrtgggggggg3333»

a3$(4) = «ggggggggggg4444»

a3$(5) = «ggggg5555»

a4$(0) = " menu5: "

a4$(1) = «gggggg1111»

a4$(2) = «ggggggggg2222»

a4$(3) = «ggggerherherggggggg3333»

a4$(4) = «ggggggggggg4444»

a4$(5) = «ggggg5555»

a5$(0) = " menu5: "

a5$(1) = «gggggg1111»

a5$(2) = «ggggggggg2222»

a5$(3) = «ggggggggggg3333»

a5$(4) = «ggggggggggg4444»

a5$(5) = «ggggg5555»

Пример вызова процедуры:

CALL menuG(a$(), 1, k$(), 25, 1, cod%)

COLOR 0, 3

LOCATE 3, 10

PRINT " Номер выбранного пункта меню cod%="; cod%

LOCATE 4, 10

PRINT " Для завершения программы нажмите ESC !!!"

SELECT CASE cod%

CASE 1

COLOR 0, 3

CLS

LOCATE 12, 10

PRINT " Пример вызова процедуры вертикального меню"

CALL menuSV0(1, 1, a1$(), 5, 10, 1, 0, 0, «1», 1, 14, 1, 14, 1, 15, 4, cod%)

CASE 2

CALL menuSV0(1, 1, a2$(), 10, 20, 1, 0, 0, «1», 2, 14, 2, 14, 1, 15, 4, cod%)

CASE 3

CALL menuSV0(0, 0, a3$(), 15, 30, 1, 0, 0, «1», 3, 14, 4, 14, 1, 15, 4, cod%)

CASE 4

CALL menuSV0(1, 1, a4$(), 5, 50, 1, 0, 0, «1», 4, 14, 5, 14, 1, 15, 4, cod%)

CASE 5

CALL menuSV0(0, 0, a5$(), 15, 10, 1, 0, 0, «1», 0, 14, 6, 14, 1, 15, 4, cod%)

CASE ELSE

END SELECT

LOOP UNTIL cod% = 0

LOCATE 25, 1

PRINT " Нажми любую клавишу!!! ";

c$ = INPUT$(1)

2.Описание практической части работы:

2.1. Цели лабораторной работы Изучить возможность организации выбора необходимых для работы действий в программе с использованием системы основного горизонтального меню и вспомогательных вертикальных.

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

2.3. Порядок выполнения работы:

2.3.1. Ознакомиться с теоретической частью.

2.3.2. Получить задание у преподавателя.

2.3.3. Выполнить работу.

2.3.4. Оформить отчет:

2.3.4.1. Содержание отчета:

1. Цель работы — краткая формулировка поставленной цели.

2. Порядок выполнения — определяются действия, необходимые для выполнения данной работы.

3. Постановка задачи — формулирование задачи в соответствии с индивидуальным заданием.

4. Решение поставленной задачи:

4.1. Математическое описание решения поставленной задачи содержит описание связей между параметрами с использованием принятых в математике обозначений.

4.2. Описание логической структуры программы (алгоритм решения) содержит:

— краткое описание схемы программы,

— алгоритм решения (по ГОСТ ) — рисунок,

— краткое описание используемых операторов языка программирования (при необходимости).

4.3. Описание программы содержит:

— название файла, его размер,

— текст программы (или фрагмент для решения конкретной, наиболее важной части задания).

4.4. Результат работы программы:

— значения, полученные в результате выполнения программы

— анализ полученных результатов.

Выводы — отвечают на поставленную цель.

2.4. Контрольные вопросы: