RT-11 для чайников

[form]

вполне реально.
Но делать её придется с помощью DESS.

И делается штатной сборкой...

- - - Добавлено - - -

улучшить

Улучшить можно многое. Например опросить тип терминала сначала чтобы очищать не только VT52. Как вариант - не опрашивать терминал, но проверить значение редактора по умлчанию и в зависимости от K52/KED считать VT52/ANSI. А для TSX буде таковой обнаружится просто прочитать значение терминала.

- - - Добавлено - - -

Собственно пример - определение типа терминала в TSX, предположение типа в RT-11 по редактору, очистка экрана. Все в 1 блок без всяких DESS

.TY ERA.MAC
        .TITLE  ERASE -- ERASE VT52/ANSI TERMINAL SCREEN
        .IDENT  /V01.00/

$JSW    =:      44                      ;JOB STATUS WORD
CHAIN$  =:      400                     ;CHAIN BIT

$PROGD  =:      452                     ;DEFAULT EDITOR OFFSET
$$KED   =:      22                      ;KED EDITOR
$$K52   =:      23                      ;K52 EDITOR
$$KEX   =:      24                      ;KEX EDITOR

T.VT52  =:      1                       ;VT52 TERTMINAL
T.VT100 =:      2                       ;VT100 TERMINAL
T.VT200 =:      11                      ;VT200 TERMINAL

ESC     =:      33                      ;ECSAPE
EOL     =:      200                     ;END OF LINE (NO CRLF)

        .MCALL  .EXIT,.GVAL,.PRINT,.SERR;SYSTEM MACRO CALLS

        .ASECT
        .=$JSW
        .WORD   CHAIN$                  ;LOAD WORDS 500-777 FROM IMAGE
        .=500

START:: .SERR                           ;CATCH INVALID EMT EXCEPTION
        MOV     #AREA,R0                ;DETERMINE TSX TERMINAL TYPE
        EMT     375                     ;
        BCS     20$                     ;IF CS NOT A TSX SYSTEM
        CMP     #T.VT52,R0              ;VT52?
        BEQ     40$                     ;IF EQ YES
        CMP     #T.VT100,R0             ;VT100?
        BEQ     30$                     ;IF EQ YES
        CMP     #T.VT200,R0             ;VT200?
        BEQ     30$                     ;IF EQ YES
10$:    CLR     R0                      ;ENFORCE HARD RESET
        .EXIT                           ;EXIT
20$:    .GVAL   #AREA,#$PROGD           ;GET DEFAULT EDITOR
        CMPB    #$$K52,R0               ;K52?
        BEQ     40$                     ;IF EQ YES
        CMPB    #$$KED,R0               ;KED?
        BEQ     30$                     ;IF EQ YES
        CMPB    #$$KEX,R0               ;KEX?
        BNE     10$                     ;IF NE NO
30$:    MOV     #ANSI,R0                ;ANSI ESCAPE SEQUENCE
        BR      50$                     ;
40$:    MOV     #VT52,R0                ;VT52 ESCAPE SEQUENCE
50$:    .PRINT                          ;CLEAR THE SCREEN
        BR      10$                     ;EXIT

AREA:   .BYTE   0,137                   ;EMT AREA
        .BLKW                           ;
VT52:   .ASCIZ  <ESC>/H/<ESC>/J/<EOL>   ;VT52 SEQUENCE
ANSI:   .ASCIZ  <ESC>/[H/<ESC>/[J/<EOL> ;ANSI SEQUENCE

        .END    START


.BU ERA

.DIR ERA.SAV
 05-Mar-2016
ERA   .SAV     1  05-Mar-2016    
 1 Files, 1 Blocks
 29990 Free blocks

.

[Advertiser]

[litwr]

Ну и морока. Хотя в концепции RT-11 очистка экрана вроде бы не есть что-то правильное, как мне показалось. Система запоминает значительную часть вывода на консоль и позволяет его пролистывать и очистка экрана может как-то это ломать, так? И на RT-11 для БК0011 нет программы setup.
Уважаемый form, как там ваши кошки? Хотелось попользоваться вашей PDP и на них опять взглянуть. Если это возможно, то жду указания времени для сеанса.
Ещё вопрос. Можно ли программы для RT-11 в формате sav запускать на разных PDP-11? Попробовал запустить sav, сделанный под ОС БК-11, на эмуляторе уважаемого Patron'a - пошло. Но всегда ли так?

[form]

позволяет его пролистывать

Система этого не позволяет
Это может позволять конкретный терминал или его эмулятор. Типов терминалов которые можно подключить - одних видео около десятка с разными способами очистки экрана (причем несовместимыми - что очистит один терминал другой введет в ступор). Есть и бумажные терминалы где само понятие очистки не существует. Как быть?

[litwr]

3aпустил вашу программку под эмулятором уважаемого Patron'a - работает. А с ОС БК-11 вышел конфуз - там оказывается встроена команда CLS.
Хорошо бы иметь echo как в Linux, чтобы просто использовать типа echo -e \\x1b

[hobot]

встроена команда CLS.

Ха! Вот вы позволяете себе критиковать систему которую вообще не знаете (в соседней теме), как так можно?
Не изучив, не попользовавшись?
1. RT-11 была и остаётся для БК единственным шансом быть хоть как-то (сбоку припёку) в едином стандарте.
2. Все программы под RT-11 использующие системные вызовы стандартные будут работать (конечно будут нюансы) под RT-11
и на другой машине (ДВК, УК-НЦ) и даже на старших процессорах.
3. Цепочку надо вести не от БК с её "перепилиной" RT-11 к старшим (на которых без проблем работает всё штатное), а наоборот.
4. CLS не встроен в систему на ОС БК !!! Команда прописана в местном UCL - вы вот критикуете, что то там фантазируете не зная
систему абсолютно.
5. На ваш "тролл" по поводу "вынужден работать с этой системой (про RT-11 и ссылка на какую-то статью)" - в соседней теме,
это очень не умно критиковать систему знания о которой у вас >>0 .

Хорошо бы

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

- - - Добавлено - - -

form,
AFZ, спасибо за подсказки и примеры по очистке экрана.

- - - Добавлено - - -

просто вызываешь функцию печати на экран

грубо говоря проматываешь рулон! )

Можно конечно не писать программу, можно на терминал командой копирования последовательность отправить,
я помню Alex_K с примером на игре LAND показывал как это делается в теме про игры.

[litwr]

Ха! Вот вы позволяете себе критиковать систему которую вообще не знаете (в соседней теме), как так можно?

Благодарю Вас за информацию, но не совсем понял заявленной проблемы. Статью писал неизвестный мне человек и старался наверное, хотел людям помочь и в самом лучшем журнале для БК... И речь там только про ОС БК-11... И ссылка возникла не на пустом месте, а на месте критики систем, которые отлично сделаны и с котороми многие работали... А моё узколичное мнение в том, что у системы есть свои сильные и слабые стороны. У меня позиция пользователя. Неужели вы хотите запретить быть пользователем? Вот ругают Виндуз 25 лет, а пользуются. И задача очистки экрана мне не кажется тривиальной, об этом и писал, но юзер жаждет фич и удобств.

[form]

Хорошо бы иметь echo как в Linux, чтобы просто использовать типа echo -e \\x1b

Это не в Linux, это конкретные реализации echo в разных shell, например в bash который в линухе основной. В классической команде echo такого не было. У меня есть такая прога для RT-11 - в аттаче... Синтакс простой ECHO строка. Строка может содержать специальные символы:

\A	- BEL (007)
\B	- ESC (033)
\F	- FF (014)
\N	- LF (012)
\R	- CR (015)
\T	- HT (011)
\V	- VT (013)
\XXX	- символ с восьмеричным кодом XXX

Если строка заканчивается символом \ то после ее печати не будет выводиться <CR><LF>.

.ECHO This is a test
This is a test

.ECHO TEST STRING
TEST STRING

.ECHO TEST STRING\
TEST STRING
.ECHO 1\T2\T3
1       2       3

.

[MM]

Единственный серьезный недостаток RT-11 - это размер тома - 32 метра. Остальные недостатки - несерьезные или косметические ( по типу даты файлов или проблемы 2000 г. )
Предполагаю, что указанный недостаток ( 32 метра ) был пристроен умышленно для разделения рынков майнфреймов и мини-ЭВМ в самом начале 1970-х.

Работаю плотно с RT-11 чуть более 30 лет - других недостатков почему-то не обнаружил, или они напрямую не относятся к 16-бит процессорам DEC.
Ну а флудерасты могут привести еще один недостаток - ограниченность прямого хода программы - он он скорее относится именно к архитектуре процессоров, для которых и предназначена подвергаемая здесь троллигу ОС.

[form]

это размер тома - 32 метра

Что впрочем не означает, что нельзя читать-писать устройства много больше этих самых 32м

несерьезные или косметические

Ну я не сказал бы, что невозможность свободно расширять существующие файлы как тебе хочется - несерьезный недостаток Просто RT-11 делался простым до безобразия и в его рамках сойдет и так, но и то... К примеру в курсе, что команда COP DD1: DD2: может закончиться нехваткой места даже если второй диск больше?

по типу даты файлов или проблемы 2000 г.

В RT-11 даты поддерживаются до 2099 года. В RSX-11 до 67435 года

ограниченность прямого хода программы

А это еще что за зверь?

[MM]

...
В RT-11 даты поддерживаются до 2099 года. В RSX-11 до 67435 года

А это еще что за зверь?

1. Самоделками не пользуюсь - если сказано 32 года с момента основания, значит так и есть.
2. Прямой ход программы - это когда тролли, чуть знакомые с Униксом, пытаются предъявить RT-11 необходимость жонглировать кодом при превышении длины исполняющего блока программы ~40 кбайт.