книги из ГПНТБ / Коваль Л.А. Автоматизированная система обработки данных магниторазведки с применением ЭВМ (АСОМ-АМ)
.pdfI |
2 |
3 |
4 |
5 |
б) * * |
I , 2, 3, 4 |
+ |
+ |
+ |
в) H I |
, 2, 3, 4, 4-бис. |
+ - |
+ |
|
Б. По второй части исправляется ДОПИНФ-4 бис* |
+ |
+ |
||
8. ПЕРО-9 (забивание ошибок) |
+ |
|
||
9. ПЁРО-16 (исключение профилей) |
+ |
|
|
|
а) в Д0ПИПФЕ-2 |
+ |
+ |
|
|
б) в ДОПИНФЕ-3 |
* |
|
||
в) в ДОПИНФЕ-4 |
* |
+ |
|
|
г) в ДОПИНФЕ-4 бис. |
* |
|
+ |
|
|
|
|
|
|
* означает, что нулевой ЛПМ может использоваться вне основ ной программы для вызова ^ ленты системы ПЕРО. В самой программе он не нужен.
А. Константы, стандартные подпрограммы |
|
|||||
I . К о н т р о л ь н ы е |
с у м м ы |
с и с т е м ы |
и |
|||
о т д е л ь н ы х |
е е |
ч а с т е й |
(ячейки 0II4 - 0I23) . Систе |
|||
ма потребовала четыре контрольные суммы:первая-на ячейки 0100-7776 вторая-на ячейки 0100-3776, третья-на ячейки 6777-7776, четвер тая-на ячейки 3777-7776. Циклические суммы и их дополнения до -7777 7777 7777 располагаются в этих ячейках так:
0123 |
-КЕ, |
0122 |
- Дополнение КЕ, |
0121 |
- К Е 4 |
0120 |
- Дополнение К Е 2 |
0117 |
- К Е Э |
0116 |
- Дополнение К Е 3 |
0115 |
- К Е 4 |
0114 |
- Дополнение К Е 4 |
2 . С П - В И Д - 2 |
(ячейки 0124-0207) предназначена для |
проверки единичного измерения и перевода его в 2 с.с. с плаваю щей запятой.
Перед обращением к СП аргумент засылается в 0040 ячейку (и сохраняется там после проработки), в ячейке 0042 - на выходе - получается то же число для распечатки, в ячейке 0043 - двоичное число с плававшей запятой с маркерами в 26-28 разрядах или код
ДО
ошибки (-7777 7777 7777). Всего в качестве рабочих СП использует ячейки 0040-0045,индексные 0016, 0017.Обращение -31 00 0124 0017.
3 . С П 2 — 1 0 ц е л о г о |
ч и с л а (ячейки 0210-0237) |
с печатью результата без нулей, предшествующих первой значащей |
|
цифре. Программа заимствована из БСП. Аргумент в 0040, результат печатается, обращение -31 00 0210 0017.
4. П е ч а т ь д е с я т и ч н о г о н о м е р а , ч и о - л а (ячейки 0240-0253) без первых нулей и интервал в печати. Аргумент в 0040, печать из 0041, дополнительная рабочая 0042. Об
ращение -31 00 0240 0017. |
д е с я т и ч н а я |
ч и с л о в о |
|||||||
г о |
5. Р а с п е ч а т к а |
||||||||
п р о ф и л я |
(ячейки 0254-0266), находящегося в ячейках |
||||||||
I блока, начиная с 4000, по декадам с десятично.! нумерацией че |
|||||||||
рез 10 точек |
( I I , |
21, 31 и т.д.). Обращение -31 00 0254 0014. Ис |
|||||||
пользуются индексные ячейки 0014-0017. Перед обращением в ячейку |
|||||||||
0016 |
заносится код |
n - |
I 0000 0000, где |
п - число точек на про |
|||||
филе. В программе используется СП-3 (2—10 |
целого числа). |
||||||||
|
6. С П |
г р у п п о в о г о |
|
п е р е в о д а |
1 0 — 2 |
||||
( я ч е й к и |
0267-0320) массива чисел с "запятой". Заимствована |
||||||||
из БСП. Обращение: |
|
- 31 00 0267 0017 |
|
|
|||||
|
|
|
|
|
|
||||
|
|
|
|
+ n - I |
А |
В |
|
|
|
А - начало массива десятичных чисел, В - начало массива двоичных |
|||||||||
чисел |
(массивы только в I МОЗУ), |
п - длина массива. Рабочие |
|||||||
-0040-0045, илдексные-0015-0017. |
(ячейки 0321-0440): а) "На ленту? |
||||||||
7. О б м е н |
с |
Н М Л |
|
||||||
б) "С ленты". Индексные -0014-0017. Рабочая -0040. |
|
||||||||
a)N". 0321 - запись из I ЮЗУ с поиском зоны в прямом на правлении, 0324 - то ие самое в обратном направлении, 0331 - запись из 2 МОЗУ с поиском зоны в прямом, 0334 - в обратном на правлении.
Перед обращением в СП -31 00 N 0017 в ячейку 0040 помеща ется К£ п?реписываемого массива, (0016) +0000pqt , (0015) = +0000 Кэ._, где pqt - стандартное обозначение номера ячейки на ленте, К - длина массива, ог-двенадцатиразрядный (двоичный) номер первой переписываемой ячейки в соответствующем блоке МОЗУ.
Блок обеспечивает запись на ленту и контрольное считыванледвухкратноэ при первом несовпадении сумм. Команды обмена форми руются в ячейках 0341, 0342 (дублирующие ячейки 0365, 0366).
6 1ЫЧ
41
Останов СчАК 0360 свидетельствует о том, что машина дважды безуспешно пыталась переписать на ленту. После этого останова цикл из двух переписываний можно повторить пуском.
б) N •" 0370 - с лепты в I МОЗУ с поиском зоны в прямом на правлении, 0373 - с ленты в I МОЗУ с поиском зоны в обратном на правлении, 0402 - с ленты во 2 МСЗУ с поиском зоны в прямом и 0405 - обратном напраг-винях.
Перед обращением к СП-31 00 N 0017 (0016) = +0000 pot , (0015) = + 0000 Ко,, (0014) = +0000 А 0000, где А - двенадцати разрядный (двоичный) номер ячейки в I или 2 блоках МОЗУ, куда за писана КЕ массива; RE должна находиться в том же блоке, куда идет переписывание. При необходимости блок обеспечивает двойное считывание с ленты массива, контрольная сумма которого известна (может храниться в самом переписываемом массиве).
Команды обмена формируются в ячейках 0414, 0415,.0417; дубли рующие ячейкя-0436-0440.
Останов при СчАК 0430 свидетельствует о том, что машина дваж ды безуспешно пыталась переписать с ленты массив. Нажатием кношш "пуск" эти попытки можно продолжить.
8. С П " К о р е н ь к в а д р а т н ы й " (ячейки 0441-0464). Заимствована из БСП. Обращение -31 00 0441 0017. Ин дексная - 0017, рабочие ячейки 0040-0043. Аргумент - в 0040, ре
зультат в 0041. Останов СчАК 0463 происходит прйХй,-0. |
м а с |
|||
Э. С П |
2—10 с п л а в а ю щ е й |
з а п я т о й |
||
с и в а |
ч и с е л (ячейка 0465-O53I), заимствована из БСП. |
|||
Обращение -31 00 0465 0017 |
|
|
||
+n - I А В |
|
|
||
Индексные ячейки 0OI4-O0I7. Рабочие - 0040-0043. |
|
|||
1 0 . |
С П |
2*10 с- к о д о в о й |
з а п я т о й |
|
(ячейки 0532-0570). Заимствована из БСП. Перед обращением -31 00 0532 0017 двоичное число с плавающей запятой засылается в
ячейку 0040, результат - в ячейке 0042. Рабочие ячейки 0040-0044, «шдексная - 0017. Останов по переполнению СчАК 0544, если|х|^10",
1 1 . |
и |
П е р е в о д |
2—10 |
с к о д о в о й |
з а п я |
|
т о й |
с |
з а д а н н о й |
т о ч н о с т ь ю |
(ячейки 0571- |
||
0636) от I |
до 10 |
(последняя значащая цифра в записи десятичного |
||||
числа). .гяшние целые десятичные разряды забиваются нулями. Про грамма рассчитана на использование при подготовке чисел к вкчертавйнкю пя ATIACR. Применяется с предндущрй СП. Перод обращением
Л?
(0040) = х, результат получается в ячейке 0042, исходное число в 0040 не сохраняется. Обращение
|
|
|
|
-31 00 0571 0016 |
|
|
|
Число |
п |
|
|
+п |
0000 0000 |
п =0002, то число выда |
|
задает точность: например, если |
|||||||
ется с точностью до ДО-**. Рабочие ячейки 0040-0047, индексные - |
|||||||
0015-0017. |
С П |
- л и н е й н а я |
и н т е р п о л я ц и я |
||||
1 2 . |
|||||||
п о |
т а б л и ц е |
(ячейки 0637-0647). Перед обращением к |
|||||
СП -31 00 0637 0017: (0042) = 1 |
,(0044) = |
Гп р е д., ^ 0 0 4 5 ^ = *посл/ |
|||||
(0046) = |
I п |
р е д , (0047) = fц о |
с л (см. обозначения в § 5 ) . |
||||
Результат в ячейке 0043. Содержимое ячеек 0042, 0044-0047 по |
|||||||
выходе из СП сохраняется. Рабочие ячейки 0041-0047, индексная - |
|||||||
0017. |
|
|
К о н с т а н т ы |
с и с т е м ы |
(ячейки 0650- |
||
1 3 . |
|||||||
1144). В этот массив "вкраплены" ячейки для дополнений ( до -7777 7777 7777), формируемых в ПЕРО-2 команд (0663, 0672, 0676).
г о |
1 4 . |
С П |
п е р е в о д а |
ц е л о г о |
д в о и ч н о |
|
ч и с л а |
в д в о и ч н у ю |
с и с т е м у |
с ч и с |
|||
л е н и я |
с |
п л а в а ю щ е й |
з а п я т о й |
(ячейки 1200- |
||
1216). Аргумент в 0040, результат в 0042 и сумматоре. Рабочие |
||||||
ячейки 0040-0042, индексная - |
0017. Обращение -31 00 1200 0017. |
||||
г о м |
1 5 . |
С П - г р а ф и к |
с п о с т о я н н ы м |
ш а |
|
(ячейки |
I2I7-I347, I 4 0 2 - I 4 I I ) . Перед обращением график |
||||
располагается в |
ячейках с 1500 до (предельно в системе) 3475, |
||||
Кроме ячеек в интервале 1500*1500+ n -I, где п - количество то чек на кривой, используются ячейки 1476 к 1477 и ячейки
1500 +п |
и 1500 + n |
+1. Дополнительная информация задается в |
|||
следующих ячейках: |
в см, единиц в см |
||||
(0062) = m-гамм |
|||||
(0063) |
= х,- координаты начала |
|
|||
(О064Ь v, |
|
|
|
||
(0065)= |
х.-к конца профиля в мм |
||||
(ОО'ЬЬ у," |
|
|
|
||
(0067) |
-- ЙХ - составляющие шага |
|
|||
(0070) |
= ау -но щюфилю в мм |
{? - угол наклона профиля |
|||
(0071) |
- 3lgp(tg£) |slnPI |
; |
|||
(0072) =|ссз'.М |
I 0000 |
0000 |
|
||
(0073) |
= |
+ п - |
|
||
43
В качестве рабочих используются ячейки 0054-0061 (без учета рабочих ячеек СП "Линия"). Индексные - 0013-0017 (включительно СП
"Линия"). Обращение к СП |
-31 00 |
N 0015. |
N =1217, если надо про |
|||
чертить ось абсцисс. |
N =1225, если не надо чертить оси абсцисс, |
|||||
в этом случае задавать |
х5 |
и V, |
не обязательно. |
|
||
После завершения работы СП дополнительная информация и зна |
||||||
чения графика сохраняются. |
|
у р о в н я |
н а |
|||
1 6 . |
С П и с п р а в л е н и я |
|||||
г р а ф и к е |
(ячейки 1350-1357). График располагается |
как и |
||||
прежде, в ячейках МОЗУ, начиная с 1500. Перед обращением к |
||||||
СП -31 00 1350 0017,(0040)= дТ0 , (0073)= + п - I 0000 0000. СП осуществляет вычитание из всех точек графика, кроме ошибочных,
значения |
дТ0 |
. Используются индексные ячейки 0016, 0017. |
||
1'7. |
С П |
" Т о ч к а |
и |
п р я м о у г о л ь н и к " |
(ячейки 1366-1401). Определяется принадлежность точки площади пря моугольника. Перед обращением к СП -31 00 1366 0017: (0041) - Хт„, (0042)= Vm L n ; (0043)= Х т „ ; ,(0044)=ym o t ,(0045)= К Д004б) = (Обозначения см. в § 5 ) . Если точка в прямоугольнике, то на выхо де (0040)= +0001 0000 0000, в противном случае (точка вне прямо угольника) (0040)= +0000 0000 0000. Рабочие 0040-0046, индексная -
0017, заданные значения на выходе сохраняются. |
" Н а д п и с ь " |
|||
1 8 , 1 9 . |
С П |
" Л и н и я " |
и |
|
(ячейки 6777-7613, а также 7614, 7615). Заимствованы из [ 3 ] . По явление дополнительных ячеек 7614 и 7615 связано с тем, что со держимое двух ячеек в СП "Линия" переменное. В ячейках 7073 и 7074 находятся, соответственно, константы I/Б» .и 1/8у , прибли зительно равные 10. Ь\*ву* 0,1 ««-элементарные шаги графопострои теля в двух взаимно перпендикулярных направлениях. Точные значе ния указанных выше констант определяются специально.
Для того, чтобы сохранить единый стиль при проверках и цик лическом сложении, эти две ячейки как бы изъяты из контрольного суммирования тем, что в ячейку 7614 заносится дополнение до -7777 7777 7777 содержимого ячейки 7073, а в ячейку 7615 дополне ние содержимого ячейки 7074.
Например, для одного из экземпляров АТЛАСА (и в тексте про грамма) содержимое этих ячеек таково:
41
7073) +4? 43 6743 7004
7614) -30 |
34 1034 0773 |
7074) +47 |
36 2415 4004 |
7615) -30 |
41 5362 3773 |
СП "Линия" размещается в ячейках 6777-7101. В качестве рабо чих программа использует ячейки 0016-0022 и 0040-0045. Перед оче редным обращением к СП для перемещения перописца в точку с коор динатами ха , уг (координаты местонахождения перописца - х,, у, ) в ячейку 0041 заносится х7 , в ячейку 0042 - у2 . При задании значений х,, уг в мм обращение к СП имеет вид -31 00 7000 0017, перемещение с опущенным пером; -31 00 7004 0017 - перемещение с поднятым пером.
Обычно перед началом работы с графопостроителем перописец отводится в левый "ближний" к оператору угол и его начальное по ложение фиксируется координатами (в элементарных шагах), равными нулю. Поэтому перед первым обращением к СП следует почистить ячейки 0020 (для специальной константы), 0021 (для X, ) и 0022 (для У, ) . По мере передвижения пера содержимое ячеек 0020, 0021 и 0022 автоматически изменяется, всегда соответствуя фактическое' положению пера. При выходе из СП содержимое ячеек ООН и 0042 п" сохраняется.
СП "Надпись" находится в ячейках 6777-7613 (включает в се я СП "Линия"). С помощью этой СИ осуществляется вычерчигвжше русски* и латинских букв, знаков математических отношений и произведет но некоторых других действий по двузначным восьмеричным кодам, в ос новном, соответствующим кодом АЦПУ, а также при задании инфорчя ции в четырехразрядном двоично-десятичном коде.
В качестве рабочих СП исполь >ует ячейки 0014-0023 и 00360061, которые (кроме ячеек 0020-00^2, см. описание СИ "Линия"), могут работать в других местах программы. Перед обращением к СП в ячейку 0050 заносится тангенс угла наклона надписи (в лпоичнпв системе с плавающей запятой), в ячейке 0023 задается h -номер шрифта в единицах 12 разряда, определяющий, высоту букв в яядитч*, которая равна 0,6h мм.
Вычерчиваемые знаки объединяются в код, заносимый в ячейку 0051. По выходе из СП содержимое ячеек 0023, 005О, 0051 сохра няется.
Обращения к СП "Надпись" имеют вид:
-31 00 7II5 п 036 - мри задании ипх"л.ч'.fl шф-рмицт» в v>*v-
4 5
рехразрядном коде с вычерчиванием знака "+" или "-" но содержи мому знакового разряда ячейки 0051.
-31 |
00 7122 0036 |
- |
при задании исходной информации в шести |
разрядном коде, знак |
- |
не вычерчивается, |
|
-31 |
00 7117 0036 |
то же, что при обращении к ячейке 7115, |
|
но знак "+" не вычерчивается.
Знак "-" в знаковом разряде ячейки 0051 вычерчивается всегда. Циклическая сумма ячеек 6777-7513: -61 56 7330 3445. При суммиро вании содержимое ячеек 7073 и 7074 указано выше.
2 |
0. С П |
sinx |
и |
cosх |
(ячейки 7616-7670). Перед |
|
обращением -31 00 7616 0017 |
х=ф040); на выходе (См) =(0042)=slnx |
|||||
f)043)=cosx, |
х в 0040 сохраняется. Рабочие ячейки 0040-0046, ин- |
|||||
декаше-0016, 0017. Заимствовано из ЕСП. |
||||||
2 |
1 . |
С П |
arctg х |
|
(ячейки 7671-7737). Перед обращением |
|
-31 00 |
7671 0017 |
Х=ф040), на выходе |
(См) =(0042)= arctg х , х |
|||
в 0040 сохраняется. Рабочие ячейки 0040-0044, индексные 0016-0017. Заимствовано из БСП.
22. 7740-7776. СП АЗИМУТ (ячейки 7740-7776). Перед обраще
нием -31 00 7740 0015 (0045) = дх |
и(004б)=ду заданного направ |
ления. Подпрограмма (включает СП |
arctg х ) производит вычисление |
азимута по формулам из § 5. СП использует рабочие ячейки 00400046. Индексные-0015-0017. На выходе из СП Аз =(0042), дх и ду сохраняются.
Б. IIEF0-2 (ячейки I500-22.T3)
Программа обеспечивает ввод числового материала, отбраковку (поиск ошибок), распечатку исходного материала, размещение про филей наблюденного иоля на магнитной ленте. В программе использу ются ключи 0001 и 0002 и магнитная лента на ЛПМ 0. Программа огшсывается поблочно,
1. I500-I5I4. Контрольное суммирование системы программ |
в |
.•лейках 0100-7776 и переписывание ее в 0 и I зоны ЛПМ 0. В блоке |
|
используется СП обмена с НМЛ, помеченное в настоящем описании |
|
номером 7. Предусмотрено два останова: СчАК 1510 (с замком) - |
в |
при несовпадении контрольной суммы, в PI-K Е из ячейки 0123, |
|
сумматоре - новая К С ; СчАК 1512,• КГ, совпала - обязательный останов.
2. 1515-1576, 2170-2207. Ввод, перевод и распечатка ДОПИИфА.
45
Переписывание его во вторую и третью зоны нулевого МЫ. Проверка КАТАЛОГА: нет ли профилей с одинаковыми номерами.
Как следует из описания ДОПИНФА,ввод его осуществляется по разделам (ШАПКА, ДЕВАЦИЯ, КАТАЛОГ). Распечатка ДОПИНФА вдет в том не порядке. Вначале распечатывается ШАПКА, начиная с года проведения съемки; в конце ШАПКИ печатаются два произвольных чис ла и разделяющий ряд плюсов. Затем идет печать ДЕВАЦНИ и через ряд плюсов КАТАЛОГ. 'После нового ряда плюсов печатается два восьмеричных кода названия участка и ряд минусов. После названия участка распечатываются через интервал номера профилей, которые встретились в КАТАЛОГЕ больше, чем один раз. Если в КАТАЛОГЕ та ких ошибок не допущено, то выдача на печать отсутствует.
Используются СП: 6 - групповой перевод 10—2,7 - обмен с НМЛ, 4 - печать десятичного номера с интервалом.
Останов СчАК 1530: не совпали суммы основного и контрольно го ввода одного из разделов ДОПИНФА, При пуске этот раздел будет введен снова.
3.1577-1647. Подготовка ДОПИНФА к вводу числового материа ла. Частое обращение к магнитной ленте при переработке ДОПИНФА во время ввода числового материала оказалось невозможным (лента выдерживает сотню, редко двести "одновременных"обращений ).Поэ тому пришлось использовать следующий прием, два идентичных мас сива преобразованного ДОПИНФА хранятся во втором блоке МОЗУ не расстоянии, превышающем максимальную длину профиля магнитной съемки,что гарантирует возобновление ДОПИНФА при пропуске в про филе одного запрещенного кода - передачи адреса. Используются СП' 8 - корень квадратный, 9 - 2—10 с плавающей запятой. Обязатель ный останов при СчАК 1650-после завершения работы блока.
4.1650-1737, 2210-2213. Ввод профиля с проверкой качества ввода по контрольным суммам основного и повторного ввода. Про верка: не испорчены ли вводом программа и дубликаты преобразован ного ДОПИНФА и не длинней ли профиль допустимых I02I . j ( 1 точек. В случае, если профиль ничего не портит, он допускается к дальней шим проверкам.
При вводе профиля используется рабочее поле n I о'токе МОЯУ, начиная с ячейки 3777, то же рабочее поле использовалось при вводе ДОПИНФА. С этого момента в МОЗУ сохраняется (я нроч'тлптсн на сохранность) программа в ячейках 0I00-377R.
Останови: СчАК_1063. Не совпали КГ, первого и втс[Ю-'о вло-
да профиля, тгунипм в род профиля повторяртоп. СчАК 17РГ?, Портится
47
программа в ячейках 0100-3776. В Р1-К.Е , хранящаяся в ячейке 0121, в сумматоре - новая К Е . При пуске происходит восстанов ление программы и продолжение ее работы. Cj4Aji_I705. Программа с ленты не считьгаается, пуском можно продолжить попытки восстанов ления программы, СчЛК 1737 (с замком). Grand-grand авария: испор чены оба дубликата Д0ОИНФА.
5. I740-2.I27. Основной в программе блок проверки и распечат ки профиля Т, переписывания его на магнитную ленту.
С помощью СП ВИД-2 производится проверка всех кодов и пере вод их в 2 с.с. с плавающей запятой. В теле блока производится проверка на принадлежность Т интервалу [Т^1п , Т,ло>] . Если измерение шкодит за границы интервала, на место кода в профиль распечатки записывается его действительный вид, а в двоичный мас сив - код ошибки -7777 7777 7777, Кроме того, в блоке при включен ном ключе 0001 работает участок программы "Выскок" (ячейки 17652023). Далее в блоке производится распечатка профиля,оглавляемого номером, по десяткам точек с нумерацией. Кроме значений поля выда ются еще некоторые числа пассивного контроля за состоянием про филя.
Пример нормальной распечатки профиля приводится ниже.
+13 Номер профиля
+53982
+539800
+539750
+I I
+539840
-000539740 Наблюдение , забракованное до блока "Выскок"
+539790
+53980+
+21
+ 539760 Двадцать первая точка на профиле
+161
+53927-
++++537270 Наблюдение, забракованное блоком "Выскок"
+539190
+171
+539180
+53918+
+172 Общее число точек на профяле
+4 Число ошибок
+14 Число реперов
+12 Число минутных меток
+000000013 Номер профиля
+060908702 Сложный код даты
+1716999+03 Число десятков метров на профиле
При желании (включением ключа 0002) распечатку значений поля на профиле можно снять (например, при повторен.л ввода). Выдача будет выглядеть так: номер профиля, интервал, общее число точек на профиле, число ошибок и т.д. После распечатки профиля и запол нения соответствующих строк в преобразованном Д0ПИНФЕ профиль пе реписывается на ленту. Для хранения введенного числового материа ла используются последовательно зоны нулевого ЛПМ, начиная с восьмой.
Если введенный в МОЗУ профиль не найдет себя в Д0ПИНФЕ, то он на ленту не переписывается, но распечатывается, причем в кон це распечатки вместо последних трех чисел печатается шесть радов минусов, т.е. если бы профиль * 13 отсутствовал в КАТАЛОГЕ, то конец его выдачи выглядел бы так:
+172
+4
+14
+12
Профиль, целиком забракованный блоком 4 и не допущенный к проверке и распечатке в настоящем блоке, отмечается на табулограмме колонкой из 7 рядов минусов.
В блоке 5 используотся CU: 2 - ВйД-2, 4 - печать десятичного
7 гыд