Софт для ДВК/PDP11

[form]

Заброшу сюда пока нет отдельной темы. В очередной раз обновил наборчик RTEM. Из общего образа убран файл STARTM.COM, в RT-11 поправлен косяк. В аттачах сам RTEM, общий образ с RT-11 V5.7 и джентльменский набор в котором все подряд.

Содержимое образа диска из архива rtemall.rar:

RTEMFB.SYS  108. 21-FEB-13	RT-11FB V05.07 для RTEM-11
RTEMFB.MAP   39. 21-FEB-13	карта памяти
BAM   .SYS    7. 21-FEB-13	\
LDM   .SYS   11. 21-FEB-13 	 |
NLM   .SYS    2. 21-FEB-13 	 | драйверы
VSM   .SYS    6. 01-FEB-12 	 |
SLM   .SYS   17. 30-JAN-12 	 |
SDM   .SYS   23. 30-JAN-12	/
FIP   .SAV   61. 29-DEC-12	программа для работы с файлами
JOAT  .SAV   52. 29-JAN-12	программа для управления
RTEM  .OLD   75. 21-FEB-13	оригинал RTEM V1.0
RTEM  .TSK   75. 21-FEB-13	пропатченый RTEM V1.0
RTEM  .ZAP    1. 21-FEB-13	патч для приведения RTEM в порядок
RTEM  .CND    3. 21-FEB-13	файл параметров для сборки системы
RTEM  .TBL    5. 21-FEB-13	таблица устройств для сборки системы
RTEM  .ANS    9. 21-FEB-13	файл ответов для SYSGEN
RTEM  .BLD    2. 21-FEB-13	командный файл для сборки системы
RTEDEF.MAC    2. 21-FEB-13	файл определений RTEM для сборки системы
BSTRAP.SLP    1. 21-FEB-13	патч для BSTRAP.MAC
RMON  .SLP    1. 21-FEB-13	патч для RMON.MAC
USR   .SLP    1. 21-FEB-13	патч для USR.MAC

.SH ALL

RT-11FB  V05.07  
Booted from VS0:RTEMFB

USR     is set SWAP
EXIT    is set SWAP
KMON    is set NOIND
MODE    is set NOSJ
TT      is set NOQUIET
ERROR   is set ERROR
SL      is set ON
EDIT    is set KED
FORTRAN is set FORTRA
KMON nesting depth is 3
Global .SCCA flag is disabled

CLI is set DCL, CCL, UCL, NO UCF

Emulated RT-11 environment, processor type unknown
60KB of memory
FP11 Hardware Floating Point Unit
Extended Instruction Set (EIS)
50 Hertz System Clock                  

Multi-terminal support
Global .SCCA support
FPU support
Extended unit support

Device    Status                   CSR     Vector(s)
------    ------                   ---     ---------
  LD      Installed               000000   000
  BA      Installed               000000   000
  NL      Installed               000000   000
  SL      122546                  000000   000
  SD      Installed               000000   000
  VS      Resident                000000   000

TT  (Resident) 
VS  (Resident) 
    VS0 = DK , SY 
MQ  (Resident) 
BA   
NL   
LD   
SL  (Loaded) 
SD   
3 free slots

Job  Name  Console Level State    Low    High  Impure
---  ----  ------- ----- -----    ---    ----  ------
 0   RESORC   0      0   Run     000000 122472 137600

Unit Owner     Type      WIDTH TAB CRLF FORM SCOPE SPEED
--------------------------------------------------------
  0         S-Console DL   80  Yes No   No    Yes   N/A

Address   Module    Words
-------   ------    -----
165324    VS          854.
135744    RMON       6008.
122540    SL         2882.
001000    ..BG..    20912.

No LD units mounted



.

[form]

В процессе разборки с RTEM были обнаружены некоторые косяки в системе. Патчи в посте выше.

BSTRAP.MAC

120$:   BIS     #<RTEM$>,SYSGEN(R4)
        BIT     #<1>,@#CNFMOD
        BEQ     130$
        BIS     #<UCF.ON>,CLIFLG-$RMON(R4)

R4 уже содержит смещение с учетом "-$RMON", соответственно флаг улетает в мусорку.

RMON.MAC

CLIFLG::.BYTE   < UCL.ON ! CCL.ON ! DCL.ON ! <UCF.ON*RTE$M> >

На самом деле как видно из этого фрагмента, код все-равно нерабочий так как UCF жестко прописан в RMON. Косяк был изначально во всех RT-11 V5.


BSTRAP.MAC

        .WORD   ERRHOK
        BR      .+14

RMON.MAC

        CALL    @$XTTPS
        BIS     #<XCS.IE>,@TTPS
.ASSUME .-ERRHOK EQ 20
 .ENDC
.ENDC
        CALL    @$XTTPS
        JSR     R0,20$
         .ASCII <CR><LF>"?MON-F-"<200>

BR должен передать управление на JSR, но после добавления хуков XTTxx никто не пересчитал разницу, а ведь этот .ASSUME там специально для того и написан чтобы не забыть. Результат - при прерывании в 4/10 система зацикливается в вечном трапе. Попутно здесь виден косяк не относящийся к RTEM - вызов @$XTTPS должен быть внутри последнего .ENDC (иначе в однотерминальной системе хук будет вызываться лишний раз [не страшно, но не красиво]).


USR.MAC

.IF NE TIME$R
.$UPDA ==: < . + 2>
        CALL    @#UPDDAT-$RMON
.ENDC

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

[form]

Интересную вещь обнаружил тут случайно. Оказывается параметр поддержки 64 устройств (0-77) одним драйвером в .DRDEF появился уже в RT-11 V5.4, хотя система начала поддерживать эту фичу только в 5.6.

[hobot]

RT-11 V5.4

Я только её сейчас гоняю потому что там SJ )

---------- Post added at 01:02 ---------- Previous post was at 01:00 ----------

http://zx.pk.ru/showpost.php?p=578247&postcount=222 - вот как думаешь
по теме подшить вот сюда http://archive.pdp-11.org.ru/ukdwk_a...mplekt/RSXDVK/ ??? Или просто пусть на форуме повисит?

[form]

Я только её сейчас гоняю потому что там SJ )

---------- Post added at 01:02 ---------- Previous post was at 01:00 ----------

http://zx.pk.ru/showpost.php?p=578247&postcount=222 - вот как думаешь
по теме подшить вот сюда http://archive.pdp-11.org.ru/ukdwk_a...mplekt/RSXDVK/ ??? Или просто пусть на форуме повисит?

Не люблю SJ - там мало памяти для программы остается
Подшить можно - оно в нем работает. Только вот драйвер винта еще нужен чтобы использовать

[hobot]

Только вот драйвер винта еще нужен чтобы использовать

Его надо писать или что ты имеешь в виду, как добавить? Есть готовый?
Я попозже в ту папке прилеплю с архивами + описание.

Не люблю SJ - там мало памяти для программы остается

form, ты словно всё время забываешь, что я на УК-НЦ и под SJ все все что мне нужно работает, а теперь ещё и (Y) . Вот если новое что-то писать разрабатывать для RT-11, я согласен, что нужно под последнюю версию ориентировать.

[Advertiser]

[form]

Его надо писать или что ты имеешь в виду, как добавить? Есть готовый?

Готового нет и видимо не будет так как ни у кого интереса нет
Мне же было просто интересно убедиться, что слухи о нерабочести RSX без переделок на ВМ3 ни что иное как мифы, что и было сделано.

form, ты словно всё время забываешь, что я на УК-НЦ и под SJ все все что мне нужно работает, а теперь ещё и (Y) . Вот если новое что-то писать разрабатывать для RT-11, я согласен, что нужно под последнюю версию ориентировать.

Ориентировать не нужно под последнюю. Нужно просто писать так, чтобы оно всегда работало, а этим никто и по сей день не желает заниматься даже когда правильный путь известен и не требует больших затрат

[hobot]

Нужно просто писать так, чтобы оно всегда работало

offtop

Скрытый текст

Помнишь RUN TIME ERROR ? Я вчера две игры так и не смог завести - гадство!
Стандартные лечилки не помогли не фига, буду воевать - поиграть охота под Досом.

[свернуть]

[form]

Помнишь RUN TIME ERROR ? Я вчера две игры так и не смог завести - гадство!
Стандартные лечилки не помогли не фига, буду воевать - поиграть охота под Досом.

Ты про досовский турбо паскаль с его rt error 200 в модуле CRT на процах выше 200MHz чтоли? Так это легко лечится.

[hobot]

Так это легко лечится.

Тут это явный оффтоп! В разделе отеч. PDP МС-ДОС игры и модуль CRT от ТP )))

Скрытый текст

Я знаю, другие игры и программы лечил же всё работало, а эти две игры вообще никак!!! У тебя есть ДОСБОКС - игрушки вроде LODE RUNNERA - забавные )
Мне уже накидали хэлпов ни один не помог. Слушай чем внутрь бинарничка залезть под ДОСОМ (Турбо ПАС полный пакет 7.0 и Борландский если что у меня стоит на 166 пентиуме !!! "смайл")

[свернуть]