Последний раз редактировалось hobot; 19.12.2011 в 02:35. Причина: удалил битую ссылку
Какая свалка. Усугубим ситуацию :-)
http://zalil.ru/32061334
Когда-то мне в Хади подарили. Есть несколько вариантов МикроМира, графический редактор (для КГД), какая-то графическая рисовалка и Квейсик. Проверять, правда, не проверял. Не на чем. На УКНЦ оно не работает. Подборка игрушек.
И отдельно в папке DSSP собственно система ДССП. Должно работать на ДВК-2
с дисководами MX. Образы там тупо переписывались блок в блок с MX на MZ, по-этому длинна у них сильно избыточна. Дискета с документацией глючила, по-этому состоит из двух частей. На самом деле все было на одной дискете. Ничего общего с RT-11 там файловая система не имеет. Но система боевая. Если найти подходящий ДВК должна запуститься.
Хотелось бы найти такую для УКНЦ. Теоретически в природе существовала.
Всего хорошего.
Те образы, которые .IMG - можно открыть, нажав <Ctrl><PageDown> или переименовав в .DSK
Образы в каталоге DSSP имеют файловую структуру не RT-11.
---------- Post added at 20:26 ---------- Previous post was at 20:22 ----------
При загрузке DSSP.DSK - загрузчик ДССП обращается к регистру контроллера MX, который я пока не эмулирую :)
Последний раз редактировалось Patron; 15.11.2011 в 21:31.
Всё, что находится на дисках в каталоге DSSP - имеет отношение только к системе ДССП.
Если узнать, какая структура файловой системы у версии ДССП для ДВК - можно добавить её в плагин и вытащить файлы.
Добрый день!
Это из ранних вариантов ДССП, по-этому, файловой системы, практически, нет. Диск разбит на 45 (или 46?) фиксированных частей по размеру буфера редактора текстов. В первом записан каталог в виде простого текста. Выводиться по команде системы CAT. Для резервирования каталог и в 45 файле. Напоминание об этом можно увидеть в загрузщике. Кодировка системы - КОИ-8. Вот и вся файловая система. Современному программисту на 15 минут работы :-)
Следующие версии уже запускались из под RT-11. У меня такой версии нет. Версия V1 под DOS для ПК, к сожалению, утеряна ((.
Конвертилка из формата ДССП в RT-11 называется TRANS.
Вот так он выглядит :-)))
:: : TRANS DIAL DR BR0 TORAF RAFDSP ;
VAR SDEV [Ист.]
VAR DDEV [Прием.]
VAR DR [Направл.]
VAR NF [файл]
VAR TX? [перек.]
: DIAL [] ON ZAPROS ."
ДССП->RT11 (0) или RT11->ДССП (1) - " CIN ! DR
ON ZAPROS ."
Источник (DX0,DX1,MX0,MX1) - " RP INDEV ! SDEV
DR BR+ INR IND
ON ZAPROS ."
Приемник (DX0,DX1,MX0,MX1) - " RP INDEV ! DDEV
DR BR0 INR IND
."
Текстовый файл? (Y) - " TIB #Y = ! TX? ;
: INDEV [] WORD RL [D/M] BR #D 0 #M 10 ELSE -1
RL [X] #X = BR+ 0 -1 &0 RL [Ц]
#0 - &0 [ND] BR 0 0 1 1 10 10 11 11 ELSE NODEV
C BR- D EX [] ;
: NODEV ."нет устройства" -1 ;
: IND ON ZAPROS ."
Номер файла ДССП - " NINPUT ! NF ;
: INR ."
Имя файла RT11 - " # !!! SQTR 0 ' SQTR 14 TIS DECOD ;
[ВВОД/ВЫВОД БЛОКА]
: IBL DEV 70 & BR+ IBLM IBLD ;
: OBL DEV 70 & BR+ OBLM OBLD ;
[DX]
: OBLD !0 IO BLD ;
: IBLD !1 IO BLD ;
: BLD [NBL,A] E2 B-LS 4 DO IOSEC D [] ;
: MOD32 32 / E2D C BR0 32 C E2D ;
: B-LS 4 * 1+ 32 + ! YKS ;
: LS-FS NDS C2 1- 6 * 1- C2 2 * + E2 15 - IF+ 1+ MOD32 ;
: IOSEC C LS-FS [A,D,S] FS-NEW [A,LS] 0 DSET 200 DIOS 200 + ;
VAR YKS
: NDS [] YKS !1+ YKS 1- 32 / 1+ [D,S] ;
: FS-NEW [D,S] E2 32 * E2 1+ 2 / 15 * + + [LS] ;
[MX]
VAR IO
: OBLM !0 IO BLM ;
: IBLM !1 IO BLM ;
: BLM [B,A] EON DERR DD E2 [A,B]
SHL SHL 1+ [A,SD] 0 DSET 1000 DIOS ;
: DIOS IO BR+ DIS DOS ;
[RAD50->ASCII]
:: : R50-A // //S // //S //S E2 3 DO TOB ;
: // C 1 & E2 SHR 50 SHR / SHL [B,Ч,ОСТ] E2 E3 + [Ч,ОСТ] ;
: //S C BR 0 40 33 44 34 56 ELSE //S1 E2D E2 ;
: //S1 [Ч] C C 33 - BR- 100 22 + [Ч,B] ;
[ASCII->RAD50]
:: : A-R50 [1,2,3] AS E3 [3,2,1] AS E2 [3,1,2] AS
50 * E2 50 * 50 * + + [Ч] ;
: AS 77 & C 32 - IF+ DGP ;
: DGP C 40 - BR0 40 22 - ;
:: : TORAF [] 0 !!! MS SDEV DEVICE
NF DON F-S DSET DIW [N] TX? BR+ PRK VVOD ! QX OUTR DOFF ;
: VVOD [N] NN C2 DIS [N] ;
: PRK [N] 0 E2 DO BBF [N] 1+ ;
: BBF [I] DIB C BR 12 BB1 ELSE BB2 1+ ;
: BB1 [I,12] 15 C3 ! MS C2 1+ ! MS 1+ [I+1] ;
: BB2 [I,B] C2 ! MS ;
0 %IF
: TOBIG [B] C 300 337 SEG BR+ 140 LATLIT? - [B'] ;
: LATLIT? [B] C 140 176 SEG BR+ 40 0 [B] ;
%FI
:: : OUTR [] DDEV DEVICE KAT 4 A ! X
[] 5 RP SK E2D BR0 SEAT FE ;
: KAT 6 0 ' A IBL 7 400 ' A IBL ;
: FE CR ."Файл уже есть" ;
: SK [I] C A SWB BR 10 SK1 4 SK2 ELSE NOP 7 + ;
: SK1 0 EX ;
: SK2 C 1+ A 0 MK = IF+ SK3 ;
: SK3 C 2+ A 1 MK = IF+ SK4 ;
: SK4 C 3 + A 2 MK = IF+ SK5 ;
: SK5 1 EX ;
: SEAT [] QX 1000 / IF+ 1+ 5 RP PL ;
: PL [N,I] C A SWB BR 10 PL1 2 PL2 ELSE NOP C 4 + A !+ X 7 + ;
: PL1 [N,I] CR DD ."Нет места" EX ;
: PL2 [N,I] C 4 + A C3 - [N,I,DL-N] BRS NOP REC5 REC ;
: REC [N,I] C ' A 770 ' A C2 - 1+ C3 7 + ' A !SB
[N,I] C 4 + A C3 - C2 13 + ! A REC5 ;
: REC5 [N,I] 4 SWB C2 ! A
0 MK C2 1+ ! A
1 MK C2 2+ ! A
2 MK C2 3 + ! A C2 E2 4 + ! A [N] !0 Y DO KOH
6 0 ' A OBL 7 400 ' A OBL EX ;
: KOH [] X !1+ X Y 1000 !+ Y ' MS OBL [] ;
: DECOD [] !0 X4 0 2 DO COD1 1+ COD1 D ;
: COD1 [I] 3 DO COD ! X3 A-R50 X4 !1+ X4 ! MK X3 ;
: COD [I] C SQTR C BR #. CODT 12 CODT ELSE CODS ;
: CODS [I,S] E2 1+ ;
: CODT [I,.] D 40 E2 ;
: RAFDSP DON SDEV DEVICE GTF DDEV DEVICE
NF F-S 2+ DSET NN QX 1000 * C ! QX TX? BR+ PDOS DOS
NF F-S DSET QX DOW DOFF ;
VAR S
: PDOS [A,DL] !0 S DO PDOS1 D ;
: PDOS1 [A] C @B C BR 11 TB 15 40 12 ZS 10 ZS 14 ZS ELSE IS E2D DOB 1+ ;
: IS C !1+ S ;
: ZS 12 !0 S ;
: TB 40 7 S 7 & - DO SPD !0 S ;
: SPD # DOB !1+ QX ;
[ВВОД N БЛОКОВ]
: NIBL [B,N,A] E2 DO NIBL1 DD [] ;
: NIBL1 [B,A] C2 C2 IBL E2 1+ E2 1000 + [B+1,A+1000] ;
: GTF KAT 4 A 5 ' A RP KD1
[B,N] C LNG 1000 / D > IF+ GTF1 C
! QX NN NIBL DOFF ;
: GTF1 [B,N] D CR ."Файл урезан до" LNG 1000 / D .B10 ." блоков" ;
: KD1 C@ BR 2000 GOOD 4000 FIN ELSE BAD EX0 16 + ;
: GOOD C 2+ @ 0 MK '+' C2 4 + @ 1 MK '+' &0
C2 6 + @ 2 MK '+' &0 C BR0 YES DL+ ;
: FIN T0 CR ."Файла нет" 0 ;
: BAD C DL+ ;
: DL+ E3 C2 10 + @ + E3 ;
: YES E2 10 + @ E2 ;
:: : DIR S( BASE@ ) B10 DON KAT !0 Y 3 A 2 / IF+ 1+ ! X
0 0 SEGM [R,Q] Y . D ." FILES" DD DOFF ;
: SEGM [R,Q] KAT
4 A E3 D 5 RP PECH D [R,Q] ;
: PECH [R,Q,N,ISS] CR C A -10 SHT
BR 2 FFL 1 TFL 4 CFL ELSE EX X 7 + + [R,Q,N,ISS+7] ;
: CFL [R,Q,N,ISS] C 1+ A R50-A C 2+ A R50-A 56 TOB
C 3 + A R50-A SP C3 . D SP C 4 + A
. C4 + E4 D SP C 6 + A 77777 & IF+ DDATP
!1+ Y [R,Q,N,ISS] ;
: FFL [...,ISS] ."< UNUSED >" SP C3 . C2 4 + A + E4 D SP
C4 C2 4 + A . + [...,ISS,RNEW] 5 ET D ;
: TFL [...,ISS] CFL ." TEMPORARY " ;
: DDATP [...,ISS] C 6 + A C 6 SHT -13 SHT . D 55 TOB
C 2 * -13 SHT [...,ISS,DAT,MM]
BR 1 ."JNV" 2 ."FEB" 3 ."MAR" 4 ."APR" 5 ."MAY"
6 ."JUN" 7 ."JUL" 10 ."AUG" 11 ."SEP" 12 ."OCT"
13 ."NOV" 14 ."DEC" ELSE ." " #- TOB
37 & 110 + 2 TON ;
UNDEF ."
Вызов программы TRANS, вывод каталога RT11 - DIR"
---------- Post added at 09:11 ---------- Previous post was at 08:56 ----------
А контроллер DX эмулируется? Система и на DX может работать, правда как сгенерировать систему не знаю. Но в документации там должно быть. Первоначально вообще с перфоленты и на Консуле работала.
Пока из контроллеров ничего не эмулируется (кроме контроллера последовательного порта DL11), чтобы у пользователей универсального API эмуляции, который я разрабатываю, был стимул самим писать модули эмуляции конкретных устройств :)
На первом месте в очереди на эмуляцию стоит как раз эмуляция перфоратора и перфосчитывателя и эмуляция ПЕРФОЛЕНТЫ :)))Первоначально вообще с перфоленты и на Консуле работала
Казалось бы - что сложного в эмуляции перфоленты.. Но здесь встаёт сразу несколько вопросов:
1. Если при эмуляции дискового устройства можно задействовать несколько приводов ( например HD0: .. HD7: ) и в описании эмулируемой конфигурации подключить к этим приводам разные образы дисков, то при эмуляции перфоратора - нужно иметь возможность менять подключенные образы по ходу работы, а значит хорошо бы иметь что-то типа "коллекции", т.е. специального каталога файлов образов с их описаниями и ссылками на файлы данных.
2. Поскольку помимо эмуляции допускается также 2D и 3D симуляция функционирования эмулируемых устройств, то формат коллекции должен предусматривать и ссылки на файлы текстур симулируемых носителей.
А ведь именно перфоленты - одни из самых визуально-разнообразных сменных носителей:
Добавлена к архиву
пачка дискет от участника Tim
Доступна тут (как есть)
< битая ссылка удалена >
Ещё раз благодарность всем кто делится софтом )))
Последний раз редактировалось hobot; 14.04.2017 в 15:54.
284 диска для БК-0011 обсуждение здесь.
Среди образов есть 19 дисков с файловой системой RT-11.
Эту тему просматривают: 1 (пользователей: 0 , гостей: 1)