Составить и отладить прикладные программы на алгоритмическом языке Бейсик, размещающиеся в файлах с именами . bas. Выполнить трансляцию этих программ с созданием программных файлов .

Вид материала

Содержание

Назначение программы
Разработка алгоритма решения задачи
Постановка задачи
Метод решения

Подобный материал:

Тема: «Разработка прикладных программ с выполнением их в среде операционной системы MS DOS».

Задание на курсовую работу: ВАРИАНТ 8

1. Составить и отладить прикладные программы на алгоритмическом языке Бейсик, размещающиеся в файлах с именами *.bas. Выполнить трансляцию этих программ с созданием программных файлов *.exe.

Программы интегрированной среды программирования Бейсик размещаются в каталоге Z:\QBASIC. Файлы прикладных программ *.bas, *.exe в исходном состоянии (до исполнения) размещаются в каталоге Z:\MYPROG8. Исходные данные и результаты работы программ размещаются в файлах DX*.dat, DM*.dat каталога Z:\DATA8.

Перечень имён подлежащих разработке программ приведен в табл.1.

Таблица 1

№ п.п	Назначение программы	Имена файлов исходных данных	Имя файла программы	Имена результатов
	Формирование числа Х		GX6	DX0.dat или DX2.dat
	Преобразование числа Х0 в число Х	DX2.dat	XX3	DX2.dat
	Преобразование числа Х в массив М	DX0.dat	XM1	DM0.dat, M (2,6)
	Преобразование массива М в массив М	DM0.dat, M (2,6)	МM9	DM1.dat, M (2,6)
	Преобразование массива М в число Х	DM1.dat, M (2,6)	МХ8	DX1.dat или DX2.dat

Каждая программа при выполнении должна выводить на экран дисплея: сообщения о начале и завершении её работы; значения исходных данных и результатов вычислений.

2.Составить, отладить и сохранить в каталоге Z:\MYBAT8 командный файл с именем BAT8.BAT, в котором выполняется последовательность действий, указанных в табл. 2.

Таблица 2

№	Последовательность действий, выполняемых в командном файле
	Создать каталоги Z:\ MYBAS8, Z:\MYEXE8 и Z:\DATA8.
	Копировать в каталог Z:\ MYBAS8 файлы программы: GX6.bas, XX3.bas, XM1.bas, МM9.bas, МХ8.bas с переименованием в файлы BGX6.bas, BXX3.bas, BXM1.bas, BМM9.bas, BМХ8.bas
	Копировать в каталог Z:\MYEXE8 файлы программ GX6.exe, XX3.exe, XM1.exe, МM9.exe, МХ8.exe с переименованием в файлы EGX6.exe, EXX3.exe, EXM1.exe, EМM9.exe, EМХ8.exe
	Файлы с исходными данными и результатами сохранять в каталоге Z:\DATA8.
	Выполнить прикладные программы в следующем порядке: программу BGX6.bas, программу EXM1.exe, программу BМM9.bas, программу EМХ8.exe, причем, если -10<Х<10 результат занести в файл DX1.dat, иначе - в файле DX2.dat; с использованием команды IF по условию существования файла DX2.dat в цикле с использованием команды FOR 3 раза программу EXX3.exe; иначе - завершение
	Выводить на экран содержимое файлов с результатами выполнения прикладных программ.
	Удалить созданные и скопированные файлы и каталоги.

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

1. Общая постановка задачи.

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

создание временных рабочих каталогов MYBAS8, MYEXE8 и DATA8;
копирование с переименованием файлов всех прикладных программ с расширением *.bas из каталога MYPROG8 в каталог MYBAS8;
копирование с переименованием в каталог Z:\MYEXE8 файлы всех прикладных программ с расширением *.exe из каталога MYPROG8;
выполнение прикладных программы BGX6.bas, EXM1.exe, BМM9.bas, BМM9.bas;
проверка условия существования файла DX2.dat. Если условие истинно, то далее выполняются следующие действия:

вывести на экран монитора содержимое файла DX2.dat с результатом выполнения программ BGX6.bas, EXM1.exe, BMM9.bas, EMX8.exe;
выполнить в цикле программу BXX3;
вывести на экран монитора содержимое файлов DX2.dat;
перейти к действиям по удалению файлов.

если условие ложно, то выполнить завершение;
удалить все файлы из созданных каталогов;
удалить все созданные каталоги;
завершение выполнения заданной последовательности действий.

2. Разработка прикладных программ.

Прикладные программы, решающие частные подзадачи, разрабатываются в интегрированной среде программирования Бейсик.

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

постановка (формулировка) задачи;
выбор метода решения задачи (если это необходимо);
разработка алгоритма решения задачи;
составление программы на выбранном языке;
отладка программы.

До начала разработки необходимо иметь на рабочем диске Z (флешке) интегрированную среду программирования Бейсик в каталоге Qbasic и дополнительно создать на этом диске постоянный каталог Z:\MYPROG8 временные рабочие каталоги Z:\ MYBAS8, Z:\MYEXE8 и Z:\DATA8.

Очерёдность разработки программ проводим в порядке заданной последовательности их исполнения в командном файле.

2.1. Разработка программы формирования значения переменной Х8

Постановка задачи. Сформировать целочисленное значение переменной Х8 согласно следующему выражению:

,

где ₁= 1,…,8 – случайное число, изменяющееся в пределах от 1 до 8.

где ₂= -15,…,+13 – случайное число, изменяющееся в пределах от -15 до +13.

Если полученное значение переменной Х8 находится в интервале -10<Х8<10, то его требуется записать в файл DX0.dat, в противном случае – записать в файл DX2.dat.

Программу сохранить в файле GX6.bas каталога MYBAS8, а откомпилированную программу – в файле GX6.bas каталога MYEXE8.

Метод решения. При решении задачи используется стандартная функция RND - генерации случайного числа в интервале от 0 до 1 и стандартные операторы для работы с файлами. Формирование случайного числа 1 вычисляется по выражению 1= RND8 + RND1, и случайного числа 2 вычисляется по выражению 2= RND13 - RND15 Применение оператора RANDOMIZE TIMER инициирует генератор случайных чисел (ГСЧ) с целью исключить повторение значений чисел при каждом запуске программы.

Разработка алгоритма решения задачи.

Схема программы изображена на рис 1.

Посимвольное описание алгоритма.

Символ 1. Вывод на экран заголовка программы.

Символ 2. Инициализация генератора случайных чисел с помощью оператора

RANDOMIZE.

Символ 3. Формирование случайного числа 1 по выражению

1= RND8 + RND1.

Символ 4. Вывод полученного числа 1 на экран.

Символ 5. Формирование случайного числа 2 по выражению

2= RND13 - RND15.

Символ 6. Вывод полученного числа 2 на экран.

Символ 7. Вычисление значения результата – значение переменной Х8

П

роверка условия по значению введенного

числа Х.

Символ 8. Вывод полученного числа Х8

на экран.

Символ 9. Проверка условия по значению

полученного числа Х8. Если условие

истинно, выполняется символ 10, если

ложно – символ 11.

Символ 10. Открытие файла DX0.dat для

записи с присвоением ему

идентификатора #1.

Символ 11. Открытие файла DX2.dat

для записи с присвоением ему

идентификатора #1.

Символ 12. Запись значения переменной

Х8 в файл с идентификатором #1.

Символ 13. Закрытие файла с

идентификатором #1.

Символ 14. Вывод на экран сообщения

о завершении программы.

рис.1

Разработка программы на языке Бейсик.

Листинг программы GX6.bas представлен ниже.

P

RINT "Выполнение программы

GX6"

RANDOMIZE TIMER

ksi1 = RND * 8 + RND * 1

PRINT "ksi1="; ksi1

ksi2 = RND * 13 - RND * 15

PRINT "ksi2="; ksi2

X8 = INT(LOG(ksi1) - TAN(ksi2))

PRINT "X8="; X8

IF X8 >= -10 AND X8 < 10 THEN

OPEN "z:\data8\dx0.dat" FOR OUTPUT AS #1

ELSE

OPEN "z:\data8\dx2.dat" FOR OUTPUT AS #1

END IF

WRITE #1, X8

CLOSE #1

PRINT "Завершение программы GX6"

END

Программа сохранена в текстовом формате в файле GX6.bas каталога MYBAS8 и имеет объем 394 байт. Время выполнения программы незначительно и определяется в основном временем записи данных на магнитный носитель (флешку).

Произведена компиляция программы в среде программирования в режиме создания автономного EXE-файла (Stand-Alone EXE File), получен исполняемый файл GX6.exe объемом 30,4 Кб, который перемещен в каталог MYEXE8.

Время выполнения программы незначительно и определяется в основном временем записи данных на магнитный носитель (флешку).

2.2. Разработка программы преобразования переменной Х8 в Х1

Постановка задачи. Преобразовать целочисленное значение переменной Х8 в значение переменной Х1 по следующему выражению:

где X8 - значение переменной, хранящееся в файле DX2.dat

Если значение переменной X8, созданное предыдущей программой находится в файле DX0.dat, то необходимо либо скопировать содержимое этого значение переменной Х1 записать в тот же файл DX2.dat, заменив им значение переменной X8.

Программу сохранить в файле XX3.bas каталога MYBAS8, а откомпилированную программу – в файле XX3.exe каталога MYEXE8.

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

Разработка алгоритма решения задачи.

Схема программы изображена на рис 2.

Посимвольное описание алгоритма.

Символ 1. Вывод на экран заголовка программы.

Символ 2. Открытие файла DX2.dat для чтения исходных данных – значения

переменной X8.

Символ 3. Чтение значения переменной X8 из файла DX2.dat.

Символ 4. Закрытие файла DX2.dat.

Символ 5. Вывод прочитанного числа X8 на экран для контроля.

Символ 6. Проверка условия по значению прочитанного числа Х8. Если условие

истинно, выполняется символ 8, если ложно – символ 7.

Символ 7. Вычисление значения переменной X1 по выражению

Х

1=](X-3)*(X-5)/sin(X-4)[.

Символ 8. Вычисление значения переменной X1 по выражению Х1=2*X.

Символ 9. Вывод полученного числа X1 на экран для контроля.

Символ 10. Открытие файла DX2.dat для записи.

С

имвол 11. Запись значения переменной

Х1 в файл DX2.dat вместо Х8.

Символ 12. Закрытие файла DX2.dat.

Символ 13. Вывод на экран сообщения

о завершении программы.

рис.2

Разработка программы на языке Бейсик.

Листинг программы ХХ3.bas представлен ниже.

P

RINT "Выполнение программы XX3"

OPEN "z:\data8\DX2.DAT" FOR INPUT AS #1

INPUT #1, X

CLOSE #1

PRINT "X="; X

IF X >= 5 THEN

X8 = INT(SQR((X - 3) * (X - 5)) / SIN(X - 4))

ELSE

X8 = (2 * X)

END IF

PRINT "X8="; X8

OPEN "z:\data8\DX2.DAT" FOR OUTPUT AS #1

WRITE #1, X8

CLOSE #1

PRINT "Завершение программы XX3"

SYSTEM

Программа сохранена в текстовом формате в файле XX3.bas каталога MYBAS8 и имеет объем 331 байт. Время выполнения программы незначительно и определяется в основном временем записи данных на магнитный носитель (флешку).

Произведена компиляция программы в среде программирования в режиме создания автономного EXE-файла (Stand-Alone EXE File), получен исполняемый файл XX3.exe объемом 32,7 Кб, который перемещен в каталог MYEXE8.

Время выполнения программы незначительно и определяется в основном временем записи данных на магнитный носитель (флешку).

2.3. Разработка программы преобразования переменной Х1 в массив M1

Постановка задачи. Преобразовать целочисленное значение переменной Х1 в значения переменных элементов массива M8 размерностью (2,6) по следующему выражению:

где Х1 - значение переменной, хранящееся в файле DX2.dat

Вычисленные значения переменных элементов массива M8 сохранить в фале DM0.dat.

Программу сохранить в файле XM1.bas каталога MYBAS8, а откомпилированную программу – в файле XM1.exe каталога MYEXE8.

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

рис.3

Разработка алгоритма решения задачи.

Схема программы изображена на рис. 3

Посимвольное описание алгоритма.

Символ 1. Вывод на экран заголовка

программы.

Символ 2. Описание двумерного массива

чисел М8(2,6).

Символ 3. Открытие файла DX2.dat для

чтения исходных данных – значения

переменной X1.

Символ 4. Чтение значения переменной

X1 из файла DX2.dat.

Символ 5. Вывод прочитанного числа

X1 на экран для контроля.

Символ 6. Открытие файла DM0.dat для

записи значений массива переменных

М8(j,k).

Символ 7. Организация внешнего цикла с

параметром j для вычисления значений

элементов массива переменных М8(j,k).

Символ 8. Организация внутреннего цикла

с параметром k для вычисления значений

элементов массива переменных М8(j,k).

Символ 9. Тело цикла. Вычисление значений элементов массива переменных

М8(j,k).

Символ 10. Тело цикла. Запись значений элементов массива переменных М8(j,k)

в файл DM0.dat.

Символ 11. Тело цикла. Вывод значений элементов массива переменных М8(j,k)

на экран для контроля. Конец тела цикла.

Символ 12. Закрытие всех открытых файлов.

Символ 13. Вывод на экран сообщения о завершении программы.

Разработка программы на языке Бейсик.

Л

истинг программы ХМ1.bas представлен ниже.

PRINT "Начало выполнения программы XM1"

DIM M8(2, 6)

OPEN "z:\data8\DX0.DAT" FOR INPUT AS #1

INPUT #1, X

PRINT "X="; X

OPEN "z:\data8\DM0.DAT" FOR OUTPUT AS #2

FOR j = 1 TO 2

FOR k = 1 TO 6

M8(j, k) = (X - 10) * (j - k)

WRITE #2, M8(j, k)

PRINT "M8("; j; ","; k; ")="; M8(j, k)

NEXT k

NEXT j

CLOSE #1

CLOSE #2

PRINT "Завершение программы XM1"

SYSTEM

Программа сохранена в текстовом формате в файле XM1.bas каталога MYBAS8 и имеет объем 369 байт. Время выполнения программы незначительно и определяется в основном временем записи данных на магнитный носитель (флешку).

Произведена компиляция программы в среде программирования в режиме создания автономного EXE-файла (Stand-Alone EXE File), получен исполняемый файл XM1.exe объемом 31,6 Кб, который перемещен в каталог MYEXE8.

Время выполнения программы незначительно и определяется в основном временем записи данных на магнитный носитель (флешку).

2.4 Разработка программы преобразования массива М1 в массив М8.

Постановка задачи. Преобразование значения переменных элементов массива М1 размерностью (2,6) в значения переменных элементов массива М8 размерностью (2,6) по следующему выражению:

где М1 – значения переменных элементов массива, хранящееся в файле DM0.dat

Вычисленные значения переменных элементов массива М8 сохранить в файле DM1.dat

Программу сохранить в файле MM9.bas каталога MYBAS8, а откомпилированную программу – в файле MM9.exe каталога MYEXE8.

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

рис.4

Разработка алгоритма решения задачи.

Схема программы изображена на рис. 4

П

осимвольное описание алгоритма.

Символ 1. Вывод на экран заголовка

программы.

Символ 2. Описание двумерного массива

чисел М8 (2,6)

Символ 3. Открытие файла DM0.dat для

чтения исходных данных – значения

переменных элементов массива М1

Символ 4. Открытия файла DM1.dat для

записи значений переменных элементов

массива М8 (j,k)

Символ 5. Организация внешнего цикла

с параметром j для вычисления значений

элементов массива переменных М8(j,k).

Символ 6. Организация внутреннего цикла

с параметром k для вычисления значений

элементов массива переменных М8(j,k).

Символ 7. Чтение значения переменных

элементов массива М1 из файла DM0.dat

Символ 8. Тело цикла. Вычисление значений

элементов массива переменных М8(j,k).

Символ 9. Тело цикла. Запись значений

элементов массива переменных М8(j,k) в файл DM1.dat.

Символ 10. Тело цикла. Вывод значений элементов

массива переменных М8(j,k) на экран для контроля.

Конец тела цикла.

Символ 11. Закрытие всех открытых файлов.

Символ 12. Вывод на экран сообщения о завершении программы.

Разработка программы на языке Бейсик.

Л

истинг программы ММ9.bas представлен ниже.

PRINT "Начало выполнения программы MM9"

DIM M8(2, 6)

OPEN "z:\data8\DM0.DAT" FOR INPUT AS #1

OPEN " z:\data8\DM1.DAT" FOR OUTPUT AS #2

FOR j = 1 TO 2

FOR k = 1 TO 6

INPUT #1, M1

M8(j, k) = INT((M1 * j) / (M1 + k))

WRITE #2, M8(j, k)

PRINT "M8("; j; ","; k; ")="; M8(j, k)

NEXT k

NEXT j

CLOSE #1

CLOSE #2

PRINT "Завершение программы MM9"

SYSTEM

Программа сохранена в текстовом формате в файле MM9.bas каталога MYBAS8 и имеет объем 361 байт. Время выполнения программы незначительно и определяется в основном временем записи данных на магнитный носитель (флешку).

Произведена компиляция программы в среде программирования в режиме создания автономного EXE-файла (Stand-Alone EXE File), получен исполняемый файл MM9.exe объемом 31,7 Кб, который перемещен в каталог MYEXE8.

Время выполнения программы незначительно и определяется в основном временем записи данных на магнитный носитель (флешку).

2.5 Разработка программы преобразования массива М8 в переменную Х

Постановка задачи. Преобразование значения переменных элементов массива М8 в целочисленное значение переменной Х по следующему выражению:

В массиве М найти отрицательное число Х с наибольшим модулем

Программу сохранить в файле MX8.bas каталога MYBAS8, а откомпилированную программу – в файле MX8.exe каталога MYEXE8.

Метод решения. При решении задачи используются стандартные операторы для работы с файлами и операторы цикла.

Разработка алгоритма решения задачи.

Схема программы изображена рис. 5

Посимвольное описание алгоритма.

Символ 1. Вывод на экран заголовка программы

Символ 2. Открытие файла DM1.dat для

чтения исходных данных – значений переменных

элементов массива М8 (j,k)

Символ 3. Открытие файла DX1.dat для записи

значения переменной Х.

Символ 4. Описание переменной X

Символ 5. Организация внешнего цикла с

параметром j для вычисления значений

элементов массива переменных М8(j,k).

Символ 6. Организация внутреннего цикла

с параметром k для вычисления значений

элементов массива переменных М8(j,k).

Символ 7. Чтение значения переменных

элементов массива М8 (j,k) из файла DM1.dat

Символ 8. Проверка условия по значению

элементов массива переменных М8 (j,k).

Если условие истинно, выполняется символ 10,

если ложно – символ 7.

Символ 9. Операция присвоения переменной Х

значение текущего элемента массива М8 (j,k).

Символ 10. Запись значения переменной Х в

файл DX1.dat

Символ 11. Проверка условия по значению

переменной Х. Если условие истинно,

выполняется символ 13, если ложно – символ 14.

Символ 12. Вывод на экран сообщения,

что Х – не отрицательное.

Символ 13. Вывод значения переменной

Х на экран для контроля.

Символ 14. Открытие файла DX2.dat для записи значения переменной Х.

Символ 15. Запись значений элементов

переменных Х в файл DX2.dat

Символ 16. Закрытие файла DX2.dat

Символ 17. Закрытие файла DХ1.dat.

Символ 18. Закрытие файла DМ1.dat.

Символ 19. Вывод на экран сообщения о

завершении программы.

рис.5

Разработка программы на языке Бейсик.

Л

истинг программы МХ8.bas представлен ниже.

PRINT "Начало выполнения программы MX8"

OPEN "Z:\DATA8\DM1.DAT" FOR INPUT AS #1

OPEN "Z:\DATA8\DX1.DAT" FOR OUTPUT AS #2

DIM Х

Х = 10

FOR j = 1 TO 2

FOR k = 1 TO 6

INPUT #1, M8(j, k)

IF M8(j, k) <= Х THEN

Х = M8(j, k)

WRITE #2, Х

END IF

NEXT k

NEXT j

IF Х >= 0 THEN

PRINT "Самое маленькое X="; Х; " - не отрицательное!!!"

ELSE

PRINT "X="; Х

OPEN "Z:\DATA8\DX2.DAT" FOR OUTPUT AS #3

WRITE #3, Х

CLOSE #3

END IF

CLOSE #2

CLOSE #1

PRINT "Завершение программы MX8"

SYSTEM

Программа сохранена в текстовом формате в файле MX8.bas каталога MYBAS8 и имеет объем 496 байт. Время выполнения программы незначительно и определяется в основном временем записи данных на магнитный носитель (флешку).

Произведена компиляция программы в среде программирования в режиме создания автономного EXE-файла (Stand-Alone EXE File), получен исполняемый файл MX8.exe объемом 31,7 Кб, который перемещен в каталог MYEXE8.

Время выполнения программы незначительно и определяется в основном временем записи данных на магнитный носитель (флешку).

3. Разработка программы на командном языке ОС MS DOS

Постановка задачи. Требуется реализовать автоматическое выполнение последовательности действий, определяемые основной задачей и перечисленные в разделе 1. Эта последовательность реализуется на командном языке операционной системы.

Метод решения. При решении задачи используются команды операционной системы MS DOS: команды работы с каталогами и файлами и специальные команды, применяемые в командных файлах. Вся последовательность команд оформляется в виде командного файла с именем BAT8.bat и сохраняется в каталоге COMBAT8.

В

состав командного файла включены комментарии и команды приостановки его выполнения. Такие включения позволяют отслеживать ход выполнения программы при её тестировании и отладке.

рис.6

Разработка алгоритма решения задачи.

Схема алгоритма решения основной задачи

представлена на рис.6.

Посимвольное описание алгоритма.

Символ 1.Очистка экрана монитора.

Символ 2. Вывод на экран сообщения о

начале выполнения программы командного

файла.

Символ 3. Создание на диске Z рабочих

каталогов MYBAS8, MYEXE8 и DATA8 .

Символ 4. Копирование файлов с

расширением *.bas из каталога MYPROG8

в каталог MYBAS8 с переименованием.

Символ 5. Копирование файлов с

расширением *.exe из каталога MYPROG8

в каталог MYEXE8.

Символ 6. Переименование файлов *.exe

в каталоге MYEXE8.

Символ 7. Организация выполнения

четырех прикладных исполняемых

программ: BGX6.bas, EXM1.exe, BMM9.bas,

EMX8.exe.

Символ 9. Проверяется условие: существует

ли файл DX2.dat в каталоге DATA8. Если

существует, то выполняется символ 10.

Если не существует, то выполняется переход

к символу 14.

Символ 10. Вывод содержимого файла DX2.dat,

в который записаны результаты работы

программ: BGX6.bas, EXM1.exe, BMM9.bas, EMX8.exe

Символ 11. Организуется циклическое троекратное выполнение исполняемой программы BXX3.bas. Для этого формальному параметру С последовательно будут присваиваться фактические параметры: сначала d, потом f, а затем g. В данном случае значения этих параметров могут быть любыми.

Символ 12. Тело цикла. Выполнение прикладной программы BXX3.bas последовательно три раза: для C=d, C=f, и для С=g.

Символ 13. Вывод содержимого файла DX2.dat, в котором записан результат работы прикладной программы на экран.

Символ 14. Удаление всех созданных файлов из соответствующих каталогов.

Символ 15. Удаление созданных каталогов.

Символ 16. Вывод на экран сообщения о завершении выполнения командного файла.

Разработка программы на командном языке ОС.

Программа разработана по алгоритму, представленному на рис.6.

Листинг программы BAT8:

C

LS

REM Начало работы основной программы

PAUSE

REM Создание рабочих каталогов

MD Z:\MYBAS8

MD Z:\MYEXE8

MD Z:\DATA8

PAUSE

REM Копирование файлов *.bas с переименованием

PAUSE

COPY Z:\MYPROG8\GX6.bas Z:\MYBAS8\BGH6.bas

COPY Z:\MYPROG8\XX3.bas Z:\MYBAS8\BXX3.bas

COPY Z:\MYPROG8\XM1.bas Z:\MYBAS8\BXM1.bas

COPY Z:\MYPROG8\MM9.bas Z:\MYBAS8\BMM9.bas

COPY Z:\MYPROG8\MX8.bas Z:\MYBAS8\BMX8.bas

REM Копирование файлов *.exe с переименованием

PAUSE

COPY Z:\MYPROG8\*.exe Z:\MYEXE8

PAUSE

REN Z:\MYEXE8\GX6.exe EGH6.exe

REN Z:\MYEXE8\XX3.exe EXX3.exe

REN Z:\MYEXE8\XM1.exe EXM1.exe

REN Z:\MYEXE8\MM9.exe EMM9.exe

REN Z:\MYEXE8\MX8.exe EMX8.exe

PAUSE

REM Выполнение прикладных программ

PAUSE

Z:\MYPROG8\QB.exe /RUN Z:\MYBAS8\BGH6.bas

P

AUSE

Z:\MYEXE8\EXM1.exe

PAUSE

Z:\MYPROG8\QB.exe /RUN Z:\MYBAS8\BMM9.bas

PAUSE

Z:\MYEXE8\EMX8.exe

PAUSE

IF not exist Z:\DATA8\DX2.dat GOTO M1

PAUSE

REM Существует файл DX2.dat, выводим его на экран

PAUSE

TYPE Z:\DATA8\DX2.dat

PAUSE

FOR %%C IN (d,f,g) DO Z:\MYPROG8\QB.exe /RUN Z:\MYBAS8\BXX3.bas

PAUSE

TYPE Z:\DATA8\DX2.dat

PAUSE

GOTO M2

:M1

REM "Файл DX2.dat не существует"

:M2

REM Завершение основной программы

PAUSE

REM Удаление всех файлов из рабочих каталогов

PAUSE

DEL Z:\MYBAS8\*.* /Q

PAUSE

DEL Z:\DATA8\*.* /Q

PAUSE

DEL Z:\MYEXE8\*.* /Q

PAUSE

REM Удаление рабочих каталогов

RD Z:\MYBAS8

RD Z:\MYEXE8

RD Z:\DATA8

REM Завершение работы основной программы

PAUSE

Объем командного файла BAT8.bat составляет 1,5 Кб.

Время выполнения программы не фиксировалось,т. к. её выполнение осуществляется в старт-стопном режиме.

Blog

Содержание

Назначение программы