Раздел З
(знак денежной единицы) и номера параметра (от 1 до 9), подстав-
ляемого вместо переменной. Таким образом, вместо переменной
1 в
текст пакетного файла будет подставлен первый параметр. В дейст-
вительности текст пакетного файла остается неизменным, а парамет-
ры подставляются непосредственно в файл с именем $$$.SUB.
Если в тексте пакетного файла необходимо использовать символ “
$”, то его необходимо продублировать (указать два раза).
Параметры указываются после имени пакетного файла в команд-
ной строке, вызывающей на выполнение программу SUBMIT.COM.
Если число указанных параметров больше, чем нужно, они игнори-
руются, если меньше — то вместо неуказанных параметров ничего
не подставляется (точнее сказать, подставляется пустая строка или,
что то же самое, строка, имеющая нулевую длину).
Пример подстановки параметров:
A>SUBMITBATCH А: LORD.COM В:
В этом примере при обработке прошаммой SUBMIT.COM пакетно-
го файла BATCH.SUB будет создан файл $$$.SUB, в котором вместо
переменной 1 будет подставлен текст “ А: , вместо переменной $2 —
текст “LORD.COM”, вместо переменной $3 — текст “В:”.
Пример написания пакетного файла с использованием переменных:
ASM $1.AAZ
LOAD $1
ERA $1.HEX
Указанные строки можно поместить в файл ASM.SUB и использо-
вать его для получения СрМ -файла из текстового файла, содержа-
щего программу г------------------' ------------------
TI----------- —
получения COM-і
следующую строку:
A>SUBMIT ASM EXAMPLE
КОМАНДА XSUB.
Команда XSUB не является в прямом смысле транзитной командой
ОС СР/М. Скорее ее можно назвать расширением программы
SUBMIT.COM. Программа XSUB.COM предназначена для передачи
команд из пакетного ф айла, подготавливаемого программой
SUbMit .COM,
в
запущенные при его выполнении программы.
Программа XSUB.COM не запускается в обычном виде, а вставля-
ется в пакетный файл в виде команды XSUB. Ее использование
позволяет любой программе, требующей ввода команде клавиатуры,
получить их из пакетного файла. Программа XSUB.COM после запу-
ска размещается в определенной области памяти и становится рези-
дентной. Удалить ее можно только полной перезагрузкой операци-
онной системы ("холодный" старт ОС).
После завершення выполнения пакетного файла, содержащего ко-
манду XSUB. на экран выдается сообщение команды:
(XSUB ACTIVE) — “XSUB активен”.
Пример использования команды XSUB в пакетном файле:
PIP
B:-*.COMfVl
B:-*.OVR [У]
Необходимо иметь в виду, что при выполнении пакетного файла
завершить работу с программами, не имеющими специальной ко-
манды выхода, невозможно. В указанном выше примере после отра-
ботки пакетного файла выход из программы PIP.COM осуществлен
^
на ассемблере (расширение .ASM). Например, для
-файла из файлаEXAMPLE.ASM необходимо ввести
пользовать коды, соответствующие этим клавишам в пакетном фай-
ле, невозможно, так как строки пакетного файла, содержащие уп-
равляющие коды, воспринимаются как ошибочные.
Рассмотренный выше пример приведен только для того, чтобы по-
казать возможное применение команды XSUB с использованием из-
вестной программы. В данном случае копирование можно было бы
произвести, создав пакетный файл следующего вида:
PIP В:-*.СО м1у]
PIPB:-*.OVRfV]
Напоминаем, что дискету с ОС СР/М для “Ориона”, а также
печатные платы контроллера дисковода можно приобрести в ПМП
“Орион-Сервис” по адресу: 140061, Московская область, г.Лытка-
рино, а/я 18. Телефон: (095) 356-73-56.
ЛИТЕРАТУРА:
1. В.Сугоняко, В.Сафронов. Основной монитор для ПРК “Орион-
128".— Радио, 1991, NîTc.35.
2. В.Сугоняко, В.Сафронов. “Орион-128" — сообщаем подробно-
сти. Новая клавиатура. — Радио, 1991 ,N2, с.44.
3. В.Сугоняко, В.Сафронов. Наладка ПРК “Орион-128". — Радио,
1990, N5, с.33.
4. Г.Рогов, М.Бриджиди. Операционная система СР/М-80 для ПРК
“Орион-128". — Радиолюбитель, 1992, N11, с.6-8.
5. М.Бриджиди, Г.Рогов. Операционная система СР/М-80 для ПРК
“Орион-128". Первый запуск системы. Резидентные команды. —
Радиолюбитель, Г992, Ш 2,с.12-14.
6. М.Уэйт, Дж.Ангермейер. Операционная система СР/М. — Мос-
ква: Радио и связь, 1986.
7. Справочник системы SCP 3.0. Руководство для оператора.
f
Когда начало описания конт роллера М. Бриджиди и Г. Рогова уж ё\
было начата, разработ чики ПК"Орион" В. С угонякоиВ . Сафронов
предложили “P Jf ’ еще один вариант конт роллера для “Ориона-
128". М ы сочли нужным опубликоват ь оба варианта ( начало вт о-
рого планируется в "PJT',N4 ). О т читателей зависит, какому
варианту конт роллера будет от дано предпочтение. В. С угоняко и
В.
Сафронов предполагаю т также поделиться с читателями "PJT
разработ ками по расш ирению О ЗУ до 256К, новой оболочкой опе-
рационной системы O R D O S для 256К, рассказат ь о подключении
различных типов принт еров и других периферийных устройств.
Отдел компьютерной техники.
И.ОНИЩЕНКО,
254216, г.Киев,
ул.Приречная 19-Г-59.
“ПОЗНАЙ СЕБЯ”
5 REM * ГОРОД КИЕВ, ДЕКАБРЬ 1991 ГОДА *
10 CLS:COLOR 15,0,1: CLEAR (450): GOSUB 150
15 DIM CW(15), XK(32), YK(32)
20 SCREEN2,15:SCREEN0,1,0:CLS:GOSUB 25:GOSUB 55:GOTO 40
25 DATA &80,&20,&D0,&6,&86,&16,&36,&0,&C5,&22,&C0,&2,
&98,&52,&A0
30 RESTORE 25:F0RI-1T015:READX:CW(I)-X:NEXTI
35 GOSUB 50.RETURN
40 SCREEN0,0,64,128,16,208,6,134,22,54,0,197,34,192,2,152,82,
173:COLORl 5,0,1
45 GOSUB 280:CUR2,2:COLOR15:PRINT"(C).
..КИЕВ.
.ОНИЩЕН-
КО И.В. — 1991 ГОД": PAUSE5:CLEAR(450):GOSUB 155:GOTO 295
50 FORI-1 TO 15:SCREEN0,I,CW(I) :NEXTI:RETURN
55 CLS:SCREENO,0,0,0,0,0,0,0,0,0,0,0
60 SCREEN2,8:SCREEN0,8,63:COLOR8:CUR2,2:PRINT’(О .-
КИЕВ.
. ОНИЩЕНКО И.В. — 1991 ГОД"
65 DIMM (60) ,С (60) ,Е (60)
70 S~5:N-2*3.1415/360
75FORD4)TO36:I_N*D*10:F-I*5:M(D)-(l+COS(F)+SIN(F)''''2)
80C(D)-COS(I):E(D) -SIN (I): NEXTD: COLOR 10
85 SCREEN2,7:F0RB-50TOl OSTEP-10
90FORD-0TO36
95 R-B*M (D) :X-R*C (D)+l 25:Y-R*E(D)+125
100 COLOR S:PL0T125,125,1 :LINEX,Y
105 NEXTD:S-S-1 :NEXTB
1lOKC-LKF-O
115 FOIUM)TO30:S(0)-KF:S(l )-KC
120 FORJ-1TO7
125 SCREENO, 1 ,S (1) ,S (2) ,S (3) ,S (4) ,S (5)
130 FORKK-0TO4-.NEXTKK
135 S (J+l )-S(J) :S(J)-S (J-1) :NEXTJ
140 KC-RND (1) *255:NEXTJI
145 GOSUB 25:SCREEN 2,15.RETURN
150 RESTORE 230:GOTO 160
155 RESTORE 185
160 FORI-0TO2:READN$:Ml $-Ml $+N$:NEXTI
165 FORI-0TO2:READN$:M2$-M2$+N$:NEXTI
170 FORI-0TO2:READN$:M3$-M3$+N$:NEXTI
175 PLAYM1$,M2$,M3$:RETURN
180 REM МУ3.0.2
185 DATAL804P4.E05C04BAEC1 C4PE05C04BAEG4.FF2.
PDEFGA05C4.04BB4.AA4.GG4.FF4.EE2
190DATAP4.EO5CO4BAEC1C4PEO5CO4BAEG4.FF2.PDEFGA
195DATAP
200 DATAL1 PPPPPPPPPPPPPL805C4.04BB4.AA4.GG4.FF4.
EE2
205 DATAP4.EG4.FE4.DD2P4.EF4.EC1P4.AB05C04BAA4.GB4.
AA4.G+B4.A16B16
210DATAP
215DATAL104PPPPPPPPPPPPPPPPPPPPPPP
220 DATAL1605C4.04B05CC+4.CC+D4.C+DEH-4.DD+
225 DATAE4.DEF4.EDE4.DEF4.EDE4.04B05CD4.04AB05C4C
04BA05C04B2A26+2A1A4
230 REM МУ3.0.3.
235 DATAL804B05CDEC04PG+A05CEA06C05BP06DD2PC05
BAGFEDFEP06CC2P05BAGFEDCEDPBB2
240 DATAPAG+FEDC04B05FEP4.04B05CDEC04P G+A05CEA
06C05BP06DD2
245 DATAP
250 D ATAL1PPPPPPPPPPP 4.
255 DATAL8P06C05BAGFEDFEP06CC2P05BAGFEDCEDPBB
2PAG+FEDCO4BA2P05CO4BAG+BO5DFPEH-PE
260DATAPC04AEP05C04BAG+B05DFEG+B06DCP05EDC
265 DATAL1PPPPPPPPPPPPPPPPPPPP
270 DATAL8B05DFAPF+PGPEC04GP05GF+EEH-F+A06C05B
12
Радиолюбитель 3/93
предыдущая страница 13 Радиолюбитель 1993-03 читать онлайн следующая страница 15 Радиолюбитель 1993-03 читать онлайн Домой Выключить/включить текст