Profile
Сообщество любителей БЭСМ-6
Page Summary
spamsink - (no subject)
vak - (no subject)
azizz8618 - (no subject)
spamsink - (no subject)
azizz8618 - (no subject)
spamsink - (no subject)
azizz8618 - (no subject)
vak - (no subject)
azizz8618 - (no subject)
azizz8618 - (no subject)
azizz8618 - (no subject)
spamsink - (no subject)
azizz8618 - (no subject)
spamsink - (no subject)
azizz8618 - (no subject)
azizz8618 - (no subject)
spamsink - (no subject)
azizz8618 - (no subject)
spamsink - (no subject)
azizz8618 - (no subject)
spamsink - (no subject)
spamsink - (no subject)
spamsink - (no subject)
azizz8618 - (no subject)
spamsink - (no subject)
spamsink - (no subject)
azizz8618 - (no subject)
Style Credit
- Style: Neutral Good for Practicality by
Expand Cut Tags
No cut tags
no subject
Date: 2020-10-28 11:13 pm (UTC)Более продвинутых функций типа контекстного поиска и замены я особо не помню. Вот и в Пульте, чтобы что-то найти, нужно зайти в СЕРВИС и дать команду поиска там.
А если речь идет о системах форматирования текста, то наиболее массовой из-за своей простоты была система ТИРАЖ, реализующая формат, описанный в https://github.com/besm6/besm6.github.io/blob/master/wiki/pascal-autocode.txt#L1871
Она широко использовалась для печати как инструкций, так и разнообразного самиздата.
Более профессиональными системами были АСПИД (текст препринта отсутствует; примеров файлов и уверенности в наличии в составе эмулятора нет), с оригинальным языком описания страниц с русскоязычными/кириллическими командами, который позволял не только печатать сформатированные страницы на АЦПУ, но и генерировать команды для какого-то фотонаборного автомата (об этом переводчики книги "Этюды для программистов" похвастались в комментариях к главе о написании программы форматирования);
и СИПРОД (или SIPROD), аналогичной сложности, с командами из латинских букв (возможно, калька с какой-то западной системы); использовался для создания документации согласно ЕСПД. Гугл не помог, поэтому о значении большинства команд птичьего языка можно только догадываться, но система на эмуляторе работает. Например, из https://github.com/besm6/besm6.github.io/blob/master/wiki/sys-instr.txt получается http://www.mailcom.com/besm6/docs/sys-instr.txt
no subject
Date: 2020-10-28 11:54 pm (UTC)Но сам АСПИД отсутствует. Чтобы привести этот документ к читабельному виду, мне пришлось повторить АСПИД на питоне: https://github.com/sergev/vak-opensource/blob/master/languages/python/aspid.py
no subject
Date: 2020-10-29 05:18 am (UTC)no subject
Date: 2020-10-29 07:39 am (UTC)СИПРОД - это программа, запускаемая в пакетном режиме из мониторной системы "Дубна".
Официально, пакетные задачи в SIMH запускаются путем "ввода с перфоленты" (которая, в свою очередь, в Диспаке имитирует ввод с перфокарт). См. пример - input.txt и expect.ini в https://github.com/besm6/simh/tree/master/BESM6 - там как раз запуск "Дубны".
Попробуйте сделать source expect.ini и сразу после окончания задачи посмотреть в файл выдачи на АЦПУ.
Из-за того, что входной файл перекодируется в кодировку ГОСТ, в которой не было различия в регистре букв, везде можно пользоваться и большими, и маленькими буквами.
Для запуска СИПРОДА нужно в паспорт задачи в input.txt добавить (можно хоть с разбиением на строки после ^, хоть без)
ОЗУ 32^ТРА 100^АЦП 64^ДИС 67(4023)^
Перед запуском не забудьте смонтировать диск 4023.
Между строками *name и *execute должны быть строки
*no load list
*perso:670702
*call yesmemory
*main schema
А между строками *execute и *end file - текст в формате СИПРОДа (т.е. один из файлов, начинающихся на *RED и кончающихся на *END).
Обратите внимание на символы ctrl-L которые должны быть перед *NAME и после *END FILE - они переключают режим эмулятора ввода с перфоленты с "посимвольного" на "ввод образов перфокарт", требуемого системой "Дубна", и обратно.
Если с помощью НВМЗ удастся создать файл для системы "Дубна" в КРАБе и сформировать задачу из него, то сложностей со вводом с перфокарт удастся избежать.
no subject
Date: 2020-10-31 10:01 am (UTC)ШИФР 419999 ЗС5^
EEВ1А3
^L*NAME PRIME NUMBERS
* The ^L char before *NAME is important
* NO LIST Disable source listing by removing spaces between * and NO
*NO LOAD LIST Enable loader listing by adding 5 spaces between * and NO
* Disabling fanfold page alignment
*CALL NOTLIS
*ASSEM
ETIME: ,NAME,
c Get time of day in jiffies
,*53 , 010B
c OR the integer exponent
,AOX , =6400000000000000
c F.p. divide by 50
,A/X , =R50.0
c Return
13 ,UJ ,
,END ,
FTN
PROGRAM MAIN
PRINT 1000
1000 FORMAT(' Computing prime numbers the dumb way')
TIME0 = ETIME(0)
CALL PRIMES
TIME1 = ETIME(0)
NTIME = TIME1 - TIME0
PRINT 2000, NTIME
STOP
2000 FORMAT (' Time, seconds =', i6)
end
SUBROUTINE PRIMES
T=0
DO 10 N=1001, 100000, 2
MAXK=SQRT(N+0.0)+1
DO 20 K=3, MAXK, 2
M = (N / K) * K
IF (N .EQ. M) GOTO 10
20 CONTINUE
c------ Printing every 1000th prime number
T=T+1
IF (T .LT. 1000) GOTO 10
PRINT 1000, N
T=0
10 CONTINUE
RETURN
1000 FORMAT (1X, I9)
END
*EXECUTE
* The ^L char after *END FILE is important
*END FILE^L
ЕКОНЕЦ
Я то думал, что всё добавленное в файл, должно считываться, а потом удаляться?
no subject
Date: 2020-10-31 05:01 pm (UTC)Все файлы должны быть в текущем каталоге.
При этом эмулируется установка перфоленты, на которой пробит текст файла input.txt, на устройство ввода и выдается команда ввода с перфоленты, после чего скрипт дожидается успешного окончания выполнения и печати. Ввод с перфоленты неразрушающий, поэтому входной файл не изменяется.
Если из скрипта убрать строки
expect -r "ДATA.*\n"
do dispak.ini
то им можно будет пользоваться "на ходу" на уже запущенном эмуляторе (ctrl-E, source expect.ini)
no subject
Date: 2020-11-02 02:23 pm (UTC)БЭСМ-6 simulator V4.0-0 Current git commit id: 5e46b298
Requesting input from the punch tape reader (FS8), it takes a few seconds
/home/ilin_alexander/simh/BESM6/dubna.expect.ini-9> expect -r "Л0.*\n"
RegEx support not available
Контроль команды, "СчАС": 00000 (-> зп, зп)
/home/ilin_alexander/simh/BESM6/dubna.expect.ini-14> expect -p -r "4199.*\n" send after=10000000 "WCPP\r"; go
RegEx support not available
Контроль команды, "СчАС": 00000 (-> зп, зп)
Enabling the printer (ONL A0)
/home/ilin_alexander/simh/BESM6/dubna.expect.ini-22> expect -r "ECT.*\n"
RegEx support not available
Контроль команды, "СчАС": 00000 (-> зп, зп)
Checking for the printing to finish
/home/ilin_alexander/simh/BESM6/dubna.expect.ini-26> expect -p -r "A0.*\n" send "HOMB\r"; go
RegEx support not available
no subject
Date: 2020-11-04 06:51 am (UTC)Установите libpcre и пересоберите simh.
no subject
Date: 2020-11-04 10:21 am (UTC)Чтобы переслать эмулятор, обязательно удалять его и клонировать с гитхаба?
no subject
Date: 2020-11-04 07:02 pm (UTC)ЬЬЛ
ЬЬЗ НОВОСТИ ОТ 4 НОЯБРЯ 2020.
ЬЬМ 2
ЬЬMN
ЬЬML 58
ЬЬН УЖЕ ДАВНО НА МУЗЕЙНОЙ МАШИНЕ ВОЗНИКАЛИ ПРОБЛЕМЫ, СВЯЗАННЫЕ С ПОДВИСАНИЕМ ПРОГРАММЫ "П У Л Ь Т" СНАЧАЛА У ТЕРМИНАЛЬНОГО
ЬЬН ПОЛЬЗОВАТЕЛЯ, А ЗАТЕМ И У ОПЕРАТОРА. ПОСЛЕ ПОПЫТКИ СНЯТИЕ ЗАДАЧИ ДИРЕКТИВОЙ "В К Н" ИНФОРМАЦИЯ НА
ЬЬН ОПЕРАТОРСКОМ ДИСПЛЕЕ ВЫГЛЯДИТ СЛЕДУЮЩИМ ОБРАЗОМ:
ЬЬМ 1
ЬЬН ВКН 41
ЬЬН ECTЬ
ЬЬН ВЦПП
ЬЬН T3 555500000000 41 00.00.00 00.01.59 7 176 Э71
ЬЬМ 1
ЬЬН ЗАДАЧА ПЕРЕМЕЩАЕТСЯ ИЗ 5-ГО КЛАССА В 7-Й. ЗНАЧЕНИЕ КВАНТА МЕНЯЕТСЯ С 000 НА 176. ДОБАВЛЯЕТСЯ ЗНАЧЕНИЕ ЭКСТРАКОДА 71
ЬЬН ДАННАЯ МАКРОКОМАНДА ОТВЕЧАЕТ ЗА РАБОТУ ПРОГРАММЫ В ТЕРМИНАЛЬНОМ РЕЖИМЕ.
ЬЬН ЕСЛИ НЕ ПЫТАТЬСЯ ЗАПУСТИТЬ "П У Л Ь Т" СНОВА, ТО ПРОГРАММА СНИМЕТСЯ "ПО БУДИЛЬНИКУ".
ЬЬН ОДНАКО МОЖНО СДЕЛАТЬ СЛЕДУЮЩЕЕ:
ЬЬН 1. НА ОПЕРАТОРСКОМ ПУЛЬТЕ ВВЕСТИ:
ЬЬМ 1
ЬЬН ОСТ 41
ЬЬН ECTЬ
ЬЬН ВКН 41
ЬЬН ECTЬ
ЬЬМ 1
ЬЬН НА ТЕРМИНАЛЕ ЗАПУСТИТЬ "П У Л Ь Т" И НАЖАТЬ КЛАВИШУ "ВВОД".
ЬЬН ПОЛУЧИМ:
ЬЬМ 1
ЬЬН ЭBM-3,T003
ЬЬН PULT2 5555
ЬЬН Ф001
ЬЬН CИCTEMA ПУЛЬT 27.10.80
ЬЬН -
ЬЬМ 1
ЬЬН ПОЛУЧИМ ОШИБКУ :
ЬЬМ 1
ЬЬН ABОCT 000023
ЬЬМ 1
ЬЬН ЕСЛИ НАЖАТЬ "ВВОД" НА ТЕРМИНАЛЕ ЕЩЁ НЕСКОЛЬКО РАЗ, ПРОГРАММА ЗАВЕРШИТ РАБОТУ.
ЬЬН НА ОПЕРАТОРСКОМ ПУЛЬТЕ ПОЯВИТЬСЯ СООБЩЕНИЕ О ОСТАНОВКЕ "П У Л Ь Т А":
ЬЬМ 1
ЬЬН ОЗ(001) 555500000000 20.11 M=007
ЬЬМ 1
ЬЬН ТАКИМ ОБРАЗОМ ПРИНУДИТЕЛЬНО ОСТАНОВИТЬ РАБОТУ "П У Л Ь Т А" МОЖНО, НО ДЛЯ ЭТОГО ВСЁ РАВНО ПОТРЕБУЕТСЯ ПОДКЛЮЧЕНИЕ
ЬЬН КАК К ОПЕРАТОРСКОМУ ПУЛЬТУ, ТАК И К ТЕРМИНАЛУ, ПРИЧЁМ ИМЕННО К ТОМУ, НА КОТОРОМ ИЗНАЧАЛЬНО ПРОИЗОШЛА ОШИБКА, ДАННОМ
ЬЬН СЛУЧАЕ N3 (Т3).
ЬЬМ 1
ЬЬН ПОДГОТОВЛЕНО ОПЕРАТОРАМИ ИЛЬИНЫМ А.П. (4103) И А. ТОКУНОВЫМ (4104) ПРИ ПОМОЩИ РЕДАКТОРА СИСТЕМЫ "П У Л Ь Т" И ПРОГРАММЫ "Т И Р А Ж".
ЬЬЕ
При печати череж ТИРАЖ ничего не вышло, кроме заголовка:
ПАСКАЛЬ-ПРОГРАММА ЛИСТИНГ В ДВЕ КОЛОНКИ.ВЕРС ОТ 14.02.80
―――――――――――――――――――――――――――――――――――――――――――――――――――――――――――――――――――――――――――――――――――――――――――――――――――――――――――――――――――――――――――――――
- 1 - - 2 -
НОВОСТИ ОТ 4 НОЯБРЯ 2020.
2
0002 58
ЧИС.В ЧУЖ.ЛИСТЕ +000000000000e+00 0000000000022524
АП Э РК И1 И2 И3 И4 И5 И6 И7 И10 И11 И12 И13 И14 И15 И16 И17 КРА ЗПСЧ
02645 74277 00023 04636 05246 25005 25011 25015 00061 00745 00000 77774 00000 25005 02645 00176 02651 25010 00000 00000
ДАТА РЕШ. ВЕРСИЯ 117 СМЕ НАЧ.ВВОДА НАЧ. РЕШ. КОН. РЕШ. КОМ.ВРЕМ. Э.РЕШ. Э.ВВ. ОСТ.ЭКС. ОСТ.ЛИМ. ОСТ.ДЕЖ. ОСТ.Б
04.11.09 06.12.88 1 21.43.33 21.43.33 21.46.41 00.00.33 03 3-0
ОС ДИСПАК ОЗУ ТРАКТЫ ВРЕМ.РЕШ. КАТЕГ. АЦПУ ВУ ТРВ ПИ ПЛ ТЕРМ МБ МД МЛ ПРМЗОН
ЗАКАЗАНО: 0018 020 00.01.09 015.00
ЭМУЛЯТОР ИСПОЛЬ-НО: 0018 001 00.00.00 000.30 0000 00030 0000 0000 0002 000004 00010 00000 00000
БОБ:2061*:50(43)
419900000000 З57
0 *ОС ДИСПАК * S= 0000 009.43.43 0368
ИТМ И ВТ ИМ.С.А.ЛЕБЕДЕВА АН СССР И ВЦ АН СССР
*АЦПУ-0 ЭВМ-3 21.46.41*
********************************************************************************************************************************
5555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555
Видимо, неправильно понял руководящие и направляющие указания старших товарищей.
no subject
Date: 2020-11-10 09:20 pm (UTC)*NАМЕ НОВОСТИ
*NО LОАD LISТ
*РЕRSО:670702
02.10.81 М1
*САLL УЕSМЕМОRУ
*МАIN SСНЕМА
*RЕD
ILLЕGАL SУSТЕМ САRD
*0SТА*RG*254N*1RL*0МСS5 63
ILLЕGАL SУSТЕМ САRD
*0SТРИЫ.00110-01 33 01
ILLЕGАL SУSТЕМ САRD
*2/*МD 6. СЕРВИСНЫЕ ПРОГРАММЫ
ILLЕGАL SУSТЕМ САRD
*2S6.1. "СЕРП".
ILLЕGАL SУSТЕМ САRD
*2S6.1.1 ОБЩИЕ СВЕДЕНИЯ.
ILLЕGАL SУSТЕМ САRD
*2S ДИАЛОГОВАЯ СИСТЕМА "СЕРП" (СЕРВИСНАЯ ПРОГРАММА) ЯВЛЯЕТСЯ
ILLЕGАL SУSТЕМ САRD
Обращение к ресурсам вроде бы верное
ДАТА РЕШ. ВЕРСИЯ 117 СМЕ НАЧ.ВВОДА НАЧ. РЕШ. КОН. РЕШ. КОМ.ВРЕМ. Э.РЕШ. Э.ВВ. ОСТ.ЭКС. ОСТ.ЛИМ. ОСТ.ДЕЖ. ОСТ.Б
10.11.09 06.12.88 1 23.58.02 23.58.22 23.58.35 00.01.17 03 3-0
ОС ДИСПАК ОЗУ ТРАКТЫ ВРЕМ.РЕШ. КАТЕГ. АЦПУ ВУ ТРВ ПИ ПЛ ТЕРМ МБ МД МЛ ПРМЗОН
ЗАКАЗАНО: 0032 100 00.10.06 064.00
ЭМУЛЯТОР ИСПОЛЬ-НО: 0025 047 00.00.02 002.70 3161 00000 0000 0000 0000 000084 00385 00000 00000
БОБ:2048 :30(00)-0200,4023 :67(42)
419999000000 ЗС5
0 *ОС ДИСПАК * S= 0000 001.34.37 0451
no subject
Date: 2020-11-27 04:51 am (UTC)no subject
Date: 2020-11-27 09:38 pm (UTC)27.11.20 М3
М О Н И Т О Р-8 0 (3.7) 25.09.84* ( МС " Д У Б Н А " ИАЭ ) ШИФР 419999000000
Ж Ж ЖЖЖ ЖЖЖЖ ЖЖЖ ЖЖЖЖ ЖЖЖЖЖ Ж Ж
Ж Ж Ж Ж Ж Ж Ж Ж Ж Ж Ж Ж
ЖЖЖЖЖ Ж Ж ЖЖЖ Ж Ж Ж Ж Ж Ж
Ж Ж Ж Ж Ж Ж Ж Ж Ж Ж Ж ЖЖ
Ж Ж Ж Ж Ж Ж Ж Ж Ж Ж Ж Ж Ж
Ж Ж Ж Ж Ж Ж Ж Ж Ж Ж ЖЖ Ж
Ж Ж ЖЖЖ ЖЖЖЖ ЖЖЖ ЖЖЖЖ Ж Ж Ж
*NАМЕ НОВОСТИ
*NО LОАD LISТ
*РЕRSО:670702
02.10.81 М1
*САLL УЕSМЕМОRУ
*МАIN SСНЕМА
*ЕХЕСUТЕ
.----------------------------------------------------------------------------------.
I -254 - I
I I
I ИЫ.00110-01 33 01 I
I I
I I
I I
I I
I 6. СЕРВИСНЫЕ ПРОГРАММЫ I
I I
I I
I I
I 6.1. "СЕРП". I
I I
I I
I I
I 6.1.1 ОБЩИЕ СВЕДЕНИЯ. I
I I
I I
I I
I ДИАЛОГОВАЯ СИСТЕМА "СЕРП" (СЕРВИСНАЯ ПРОГРАММА) ЯВЛЯЕТСЯ I
I I
I БАЗОВЫМ СРЕДСТВОМ ДЛЯ СОПРОВОЖДЕНИЯ ОС. ОНА ПОЗВОЛЯЕТ ВЫПОЛНЯТЬ I
I I
I РАЗЛИЧНЫЕ ВСПОМОГАТЕЛЬНЫЕ РАБОТЫ, ПОТРЕБНОСТЬ В КОТОРЫХ ЧАСТО I
I I
I ВОЗНИКАЕТ У ПОЛЬЗОВАТЕЛЕЙ ВЫЧИСЛИТЕЛЬНОЙ СИСТЕМЫ. СИСТЕМА I
I I
I "СЕРП" ОБЕСПЕЧИВАЕТ ТАКЖЕ РАБОТУ ПО ВЕДЕНИЮ РАЗЛИЧНЫХ СИСТЕМНЫХ I
I I
I КАТАЛОГОВ, ПОЗВОЛЯЕТ УСТАНАВЛИВАТЬ РАЗЛИЧНЫЕ РЕЖИМЫ ПРОХОЖДЕНИЯ I
I I
I ЗАДАЧ, ПРЕДОСТАВЛЯЕТ СРЕДСТВА ДЛЯ ВНЕСЕНИЯ ИСПРАВЛЕНИЙ В ОС. I
I I
I ПРОГРАММА "СЕРП" РАЗМЕЩАЕТСЯ НА СИСТЕМНОМ ДИСКЕ И I
I I
I ВЫЗЫВАЕТСЯ ПО КЛЮЧУ "СП". I
I I
I ЦЕЛАЯ ГРУППА ДИРЕКТИВ СИСТЕМЫ ПРЕДНАЗНАЧЕНА ДЛЯ ШИРОКОГО I
I I
I ПОЛЬЗОВАТЕЛЯ. К ЭТОЙ ГРУППЕ ОТНОСЯТСЯ СЛЕДУЮЩИЕ ДИРЕКТИВЫ: I
I I
I ПЕРЕ(ПЕРП,ПЕРТ) - ПРОГРАММА ПЕРЕПИСИ ИНФОРМАЦИИ С ОДНОГО I
I I
I МАГНИТНОГО I
I I
I НОСИТЕЛЯ (АРХИВНОЙ ОБЛАСТИ) НА ДРУГОЙ I
I I
I МАГНИТНЫЙ I
I I
I НОСИТЕЛЬ (АРХИВНУЮ ОБЛАСТЬ); I
I I
I ВЫСЛ(ВЫСО) - ДИРЕКТИВА ВЫДАЧИ НА ЭКРАН СОДЕРЖИМОГО I
I I
I СЛУЖЕБНЫХ I
I I
I СЛОВ МЛ (МД), АРХИВНОЙ ОБЛАСТИ; I
I I
I РАМЛ(РАМД) - ПРОГРАММА РАСПЕЧАТКИ СОДЕРЖИМОГО ЗОНЫ I
I I
I МЛ (МД); I
I I
I ПРОЗ - ДИРЕКТИВА ПРОСМОТРА СОДЕРЖИМОГО ЗОНЫ МЛ(МД,АРХИВНОЙ I
I I
I ОБЛАСТИ); I
I I
I I
I I
I I
.----------------------------------------------------------------------------------.
А дальше вообще угар:
СDС 6 Т+!!О!! Т !F!О6 S!!О!F! !А!Е!!! S2!!!Е! 0 !!!!! 22!!!!! К2!!!!! ! !ЕЕЕ! КJV!VV
М20
УПДК !!!e!!!!!!!!!!!!!!!!!!!!!!(!!!!!!!!2!!!!!!0!!!!!!!!!!!!!!!!!!!!!!!В!!!!!!!!!!!!!
0095 ОШИБКА
УПП */*D
СDС ! +!!!!! !!!!! +!!!!! ++!!!!! !!!!! !!!!! !!!!! !!!!! !!!!! !!!!
М20
УПДК !!!e!!!!!!!!!!!!!!!e!!!!!!ee!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
0096 ОШИБКА
УПП */*D 4.3.4. ДИРЕКТИВА С М Е[Н А] 32
СDС 6 /+!!О!! 0 !F!О6 /!!О!F! !А!!ЕЕ! / !!!Е! 0 !!!!! 1 !!!!! -1!!!!! Б0!ЕЕ!! --V!VV
М20
УПДК !!!e!!!!!!0!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!0!!!!!!!1!!!!!!!А1!!!!!!!0!!!!!!АА!!!!
0097 ОШИБКА
УПП */*D
СDС ! +!!!!! !!!!! +!!!!! ++!!!!! !!!!! !!!!! !!!!! !!!!! !!!!! !!!!
М20
УПДК !!!e!!!!!!!!!!!!!!!e!!!!!!ee!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
0098 ОШИБКА
УПП */*D 4.3.5. ДИРЕКТИВА У С Т [
27.11.20 М3
М О Н И Т О Р-8 0 (3.7) 25.09.84* ( МС " Д У Б Н А " ИАЭ ) ШИФР 419999000000
Ж Ж ЖЖЖ ЖЖЖЖ ЖЖЖ ЖЖЖЖ ЖЖЖЖЖ Ж Ж
Ж Ж Ж Ж Ж Ж Ж Ж Ж Ж Ж Ж
ЖЖЖЖЖ Ж Ж ЖЖЖ Ж Ж Ж Ж Ж Ж
Ж Ж Ж Ж Ж Ж Ж Ж Ж Ж Ж ЖЖ
Ж Ж Ж Ж Ж Ж Ж Ж Ж Ж Ж Ж Ж
Ж Ж Ж Ж Ж Ж Ж Ж Ж Ж ЖЖ Ж
Ж Ж ЖЖЖ ЖЖЖЖ ЖЖЖ ЖЖЖЖ Ж Ж Ж
*NАМЕ НОВОСТИ
*NО LОАD LISТ
*РЕRSО:670702
02.10.81 М1
*САLL УЕSМЕМОRУ
*МАIN SСНЕМА
*ЕХЕСUТЕ
.----------------------------------------------------------------------------------.
I -254 - I
I I
I ИЫ.00110-01 33 01 I
I I
I I
I I
I I
I 6. СЕРВИСНЫЕ ПРОГРАММЫ I
I I
I I
I I
I 6.1. "СЕРП". I
I I
I I
I I
I 6.1.1 ОБЩИЕ СВЕДЕНИЯ. I
I I
I I
I I
I ДИАЛОГОВАЯ СИСТЕМА "СЕРП" (СЕРВИСНАЯ ПРОГРАММА) ЯВЛЯЕТСЯ I
I I
I БАЗОВЫМ СРЕДСТВОМ ДЛЯ СОПРОВОЖДЕНИЯ ОС. ОНА ПОЗВОЛЯЕТ ВЫПОЛНЯТЬ I
I I
I РАЗЛИЧНЫЕ ВСПОМОГАТЕЛЬНЫЕ РАБОТЫ, ПОТРЕБНОСТЬ В КОТОРЫХ ЧАСТО I
I I
I ВОЗНИКАЕТ У ПОЛЬЗОВАТЕЛЕЙ ВЫЧИСЛИТЕЛЬНОЙ СИСТЕМЫ. СИСТЕМА I
I I
I "СЕРП" ОБЕСПЕЧИВАЕТ ТАКЖЕ РАБОТУ ПО ВЕДЕНИЮ РАЗЛИЧНЫХ СИСТЕМНЫХ I
I I
I КАТАЛОГОВ, ПОЗВОЛЯЕТ УСТАНАВЛИВАТЬ РАЗЛИЧНЫЕ РЕЖИМЫ ПРОХОЖДЕНИЯ I
I I
I ЗАДАЧ, ПРЕДОСТАВЛЯЕТ СРЕДСТВА ДЛЯ ВНЕСЕНИЯ ИСПРАВЛЕНИЙ В ОС. I
I I
I ПРОГРАММА "СЕРП" РАЗМЕЩАЕТСЯ НА СИСТЕМНОМ ДИСКЕ И I
I I
I ВЫЗЫВАЕТСЯ ПО КЛЮЧУ "СП". I
I I
I ЦЕЛАЯ ГРУППА ДИРЕКТИВ СИСТЕМЫ ПРЕДНАЗНАЧЕНА ДЛЯ ШИРОКОГО I
I I
I ПОЛЬЗОВАТЕЛЯ. К ЭТОЙ ГРУППЕ ОТНОСЯТСЯ СЛЕДУЮЩИЕ ДИРЕКТИВЫ: I
I I
I ПЕРЕ(ПЕРП,ПЕРТ) - ПРОГРАММА ПЕРЕПИСИ ИНФОРМАЦИИ С ОДНОГО I
I I
I МАГНИТНОГО I
I I
I НОСИТЕЛЯ (АРХИВНОЙ ОБЛАСТИ) НА ДРУГОЙ I
I I
I МАГНИТНЫЙ I
I I
I НОСИТЕЛЬ (АРХИВНУЮ ОБЛАСТЬ); I
I I
I ВЫСЛ(ВЫСО) - ДИРЕКТИВА ВЫДАЧИ НА ЭКРАН СОДЕРЖИМОГО I
I I
I СЛУЖЕБНЫХ I
I I
I СЛОВ МЛ (МД), АРХИВНОЙ ОБЛАСТИ; I
I I
I РАМЛ(РАМД) - ПРОГРАММА РАСПЕЧАТКИ СОДЕРЖИМОГО ЗОНЫ I
I I
I МЛ (МД); I
I I
I ПРОЗ - ДИРЕКТИВА ПРОСМОТРА СОДЕРЖИМОГО ЗОНЫ МЛ(МД,АРХИВНОЙ I
I I
I ОБЛАСТИ); I
I I
I I
I I
I I
.----------------------------------------------------------------------------------.
А дальше вообще угар:
СDС 6 Т+!!О!! Т !F!О6 S!!О!F! !А!Е!!! S2!!!Е! 0 !!!!! 22!!!!! К2!!!!! ! !ЕЕЕ! КJV!VV
М20
УПДК !!!e!!!!!!!!!!!!!!!!!!!!!!(!!!!!!!!2!!!!!!0!!!!!!!!!!!!!!!!!!!!!!!В!!!!!!!!!!!!!
0095 ОШИБКА
УПП */*D
СDС ! +!!!!! !!!!! +!!!!! ++!!!!! !!!!! !!!!! !!!!! !!!!! !!!!! !!!!
М20
УПДК !!!e!!!!!!!!!!!!!!!e!!!!!!ee!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
0096 ОШИБКА
УПП */*D 4.3.4. ДИРЕКТИВА С М Е[Н А] 32
СDС 6 /+!!О!! 0 !F!О6 /!!О!F! !А!!ЕЕ! / !!!Е! 0 !!!!! 1 !!!!! -1!!!!! Б0!ЕЕ!! --V!VV
М20
УПДК !!!e!!!!!!0!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!0!!!!!!!1!!!!!!!А1!!!!!!!0!!!!!!АА!!!!
0097 ОШИБКА
УПП */*D
СDС ! +!!!!! !!!!! +!!!!! ++!!!!! !!!!! !!!!! !!!!! !!!!! !!!!! !!!!
М20
УПДК !!!e!!!!!!!!!!!!!!!e!!!!!!ee!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
0098 ОШИБКА
УПП */*D 4.3.5. ДИРЕКТИВА У С Т [<N КЛАССА>] 33
СDС 6 SА!!О!! S2!F!О6 S!!О!F! !+!!Е!! 02!!!Е! 02!!!!!1 !!!!! - !!!!! !0!Е!!! J-V!VV
М20
УПДК !!!!!!!!!!!2!!!!!!!!!!!!!!(e!!!!!!0!!!!!!!0!!!!!!1!!!!!!!!А!!!!!!!Б0!!!!!!!А!!!!
0099 ОШИБКА
УПП */*D
СDС ! +!!!!! !!!!! +!!!!! ++!!!!! !!!!! !!!!! !!!!! !!!!! !!!!! !!!!
М20
УПДК !!!e!!!!!!!!!!!!!!!e!!!!!!ee!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
0100 ОШИБКА
УПП */*D 4.3.6. ДИРЕКТИВА С В М 35
СDС 6 /+!!О!! 0 !F!О6 /!!О!F! !+!!!Е! 0 !!!Е! 0 !!!!! !!!!! - !!!!! Б0!ЕЕ!! --V!VV
М20
УПДК !!!e!!!!!!0!!!!!!!!!!!!!!!!e!!!!!!0!!!!!!!0!!!!!!!!!!!!!!!А!!!!!!!!0!!!!!!АА!!!!
0101 ОШИБКА
УПП */*D
СDС ! +!!!!! !!!!! +!!!!! ++!!!!! !!!!! !!!!! !!!!! !!!!! !!!!! !!!!
М20
УПДК !!!e!!!!!!!!!!!!!!!e!!!!!!ee!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
0102 ОШИБКА
УПП */*D 4.3.7. ДИРЕКТИВА С В Д 36
СDС 6 /+!!О!! 0 !F!О6 /!!О!F! !+!!!!! 0 !!!Е! 0 !!!!! !!!!! - !!!!! Б0!ЕЕ!! --V!VV
М20
УПДК !!!e!!!!!!0!!!!!!!!!!!!!!!!e!!!!!!0!!!!!!!0!!!!!!!!!!!!!!!А!!!!!!!!0!!!!!!АА!!!!
0103 ОШИБКА
УПП */*D
СDС ! +!!!!! !!!!! +!!!!! ++!!!!! !!!!! !!!!! !!!!! !!!!! !!!!! !!!!
М20
УПДК !!!e!!!!!!!!!!!!!!!e!!!!!!ee!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
0104 ОШИБКА
УПП */*D 4.3.8. ДИРЕКТИВА Н О М[Е Р <ШИФР>]
СDС 6 S+!!О!! S2!F!О6 S!!О!F! !В!ЕЕЕ! /2!!!Е! 0 !!!!! 11!!!!! - !!!!! Б1!!Е!! JJV!VV
М20
УПДК !!!e!!!!!!!2!!!!!!!(!!!!!!!!!!!!!!!2!!!!!!0!!!!!!!11!!!!!!А!!!!!!!!1!!!!!!!!!!!!
0105 ОШИБКА
УПП */*D
СDС ! +!!!!! !!!!! +!!!!! ++!!!!! !!!!! !!!!! !!!!! !!!!! !!!!! !!!!
М20
УПДК !!!e!!!!!!!!!!!!!!!e!!!!!!ee!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
0106 ОШИБКА
УПП */*D ИЛИ [<ЧИСЛО>] 36
СDС ! +!!!!! 0!!!!! !!!О!! !!!!!!! 0 !!!!! 00!!!!! 0 !!!!! Б !!!Е! -0!!!!! -0!ЕЕЕ
М20
УПДК !!!e!!!!!!!0!!!!!!!!!!!!!!!!!!!!!!0!!!!!!!00!!!!!!0!!!!!!!!!!!!!!!А0!!!!!!А0!!!!
0107 ОШИБКА
УПП */*D
СDС ! +!!!!! !!!!! +!!!!! ++!!!!! !!!!! !!!!! !!!!! !!!!! !!!!! !!!!
no subject
Date: 2020-11-28 07:56 am (UTC)1) пожалуйста, отвечайте не на собственный пост, а на мой комментарий, иначе мне не приходят уведомления, а пересматривать старые посты в поисках новых комментариев нерационально по времени.
2) примеры распечаток нужно оборачивать тегами <pre> / </pre> чтобы получить текст с моноширинным шрифтом (в тексте внутри тегов нужно заменять символы < на сочетания <)
Убедитесь, что ни в одной строке во входном потоке для МС Дубна (т.е. начиная с *name и кончая *end file) не содержится более 80 символов.
no subject
Date: 2020-11-28 12:05 pm (UTC)no subject
Date: 2020-11-28 03:43 pm (UTC)no subject
Date: 2020-11-29 07:20 am (UTC)Сушествовал режим "листования", при котором прогон делался автоматически каждые 66 строк, чтобы обеспечить достаточные поля сверху и снизу на случай неточной установки бумаги.
Обычно его нужно было включать вручную (*CALL YESLIS), но, видимо, в С. Бору он как-то был включён по умолчанию, и его нужно явно выключать (*CALL NOTLIS) - эта строка была в input.txt, и она, оказывается, реально нужна. Попробуйте добавить ее в любое место перед *EXECUTE.
no subject
Date: 2020-11-29 11:03 am (UTC)no subject
Date: 2020-11-29 04:28 pm (UTC)Если АСПИД был написан на Фортране, то гарантированно будут отличия в работе со строками.
Насколько доступен этот текст в РГБ для оцифровки?
no subject
Date: 2020-11-29 05:26 pm (UTC)В РГБ планирую заказать человека, возможно, на следующих выходных.
no subject
Date: 2020-11-29 08:05 pm (UTC)Попробуйте сначала какой-нибудь текст вообще без управляющих комбинаций символов.
no subject
Date: 2020-11-30 08:10 am (UTC)А вот чтобы их запускать, нужны инструкции:
https://library.keldysh.ru/preprint.asp?id=1977-137
no subject
Date: 2020-11-30 08:17 am (UTC)no subject
Date: 2020-11-30 09:14 pm (UTC)no subject
Date: 2020-12-01 01:56 am (UTC)Как делать неразрывные пробелы в словах вразрядку, чтобы они не растягивались, я в имеющихся у нас файлах не нашёл.
Кстати, АСПИД кое-как работает: если запустить
то он печатает кирпич в две колонки, т.е. работает, но использованного формата команд не понимает.
no subject
Date: 2020-12-03 08:38 am (UTC)Один вопрос: умеет ли ваша программа-рендерер делать печать с наложением?
Например, запустите в онлайн-эмуляторе
*name programma print 1 print 2 1 format(/'+0 2 4 6 8 ---ЖЖЖXXX') 2 format( '+ 1 3 5 7 9|||ШШШ---') end *no lo *execute *end fileno subject
Date: 2020-12-05 10:34 am (UTC)