отправил образ дискеты для эмулятора в скайп
отправил образ дискеты для эмулятора в скайп
Спасибо, ближе к вечеру заберу
Не сильно информативный образ. Думал, что файл каталога как то выделяется по аттрибутам, но увы, в ПРОС2 похоже никак.
Нашёл образ P/OS 3.2, поковыряюсь с ним - ImageUtil слетает.
Помоему удобнее ПО так выкладывать:
Распаковать WinRAR'ом v5
Записать Кошкой образ .dsk на дискету
И использовать на Электронике-85
ОС: ПРОС
ПО: ИНТЕГРАФ В01.1
- - - Добавлено - - -
ОС: ПРОС
ПО: РЕДГРАФ В1.0
Код:Directory [0,0]
INDEXF.SYS;1 (1,1) 68./68. 29-JAN-1991 02:11 [1,1] [RWED,RWED,RWED,RWED]
BITMAP.SYS;1 (2,2) 2./2. 29-JAN-1991 02:11 [1,1] [RWED,RWED,RWED,RWED]
BADBLK.SYS;1 (3,3) 1./1. 29-JAN-1991 02:11 [1,1] [RWED,RWED,RWED,RWED]
000000.DIR;1 (4,4) 1./1. C 29-JAN-1991 02:11 [1,1] [RWED,RWED,RWED,RWED]
CORIMG.SYS;1 (5,5) 1./1. C 29-JAN-1991 02:11 [1,1] [RWED,RWED,RWED,RWED]
USERFILES.DIR;1 (6,1) 0./1. C 29-JAN-1991 02:11 [200,200][RWED,RWED,RWED,RWED]
001002.DIR;1 (7,1) 1./1. C 29-JAN-1991 02:11 [200,200][RWED,RWED,RWED,RWED]
ZZFONT.DIR;1 (11,1) 1./1. C 29-JAN-1991 02:11 [200,200][RWED,RWED,RWED,RWED]
INTEGRAPH.DIR;1 (15,1) 2./2. C 29-JAN-1991 02:12 [200,200][RWED,RWED,RWED,RWED]
SLIDE.DIR;1 (66,1) 1./1. C 29-JAN-1991 02:16 [200,200][RWED,RWED,RWED,RWED]
DOCUMENTS.DIR;1 (74,1) 1./1. C 29-JAN-1991 02:17 [200,200][RWED,RWED,RWED,RWED]
Total of 79./80. blocks in 11. files
Directory [1,2]
SIMAIN.MSG;1 (10,1) 3./3. 29-JAN-1991 02:11 [200,200][RWED,RWED,RWED,RWED]
Total of 3./3. blocks in 1. files
Directory [ZZFONT]
FONT08.TSK;1 (12,1) 7./7. C 29-JAN-1991 02:11 [200,200][RWED,RWED,RWED,RWED]
FONT09.TSK;1 (13,1) 15./15. C 29-JAN-1991 02:11 [200,200][RWED,RWED,RWED,RWED]
FONT10.TSK;1 (14,1) 15./15. C 29-JAN-1991 02:11 [200,200][RWED,RWED,RWED,RWED]
Total of 37./37. blocks in 3. files
Directory [INTEGRAPH]
SIGHT.TSK;1 (16,1) 101./101. C 29-JAN-1991 02:12 [200,200][RWED,RWED,RWED,RWED]
DLMFIL.TSK;1 (17,1) 50./50. C 29-JAN-1991 02:12 [200,200][RWED,RWED,RWED,RWED]
SIMAIN.TSK;1 (20,1) 62./62. C 29-JAN-1991 02:12 [200,200][RWED,RWED,RWED,RWED]
SIMAIN.MNU;1 (21,1) 3./3. C 29-JAN-1991 02:13 [200,200][RWED,RWED,RWED,RWED]
SIGHTHELP.MNU;1 (22,1) 8./8. C 29-JAN-1991 02:13 [200,200][RWED,RWED,RWED,RWED]
SIMAIN.HLP;1 (23,1) 14./14. C 29-JAN-1991 02:13 [200,200][RWED,RWED,RWED,RWED]
VIEW.GID;1 (24,1) 5./5. C 29-JAN-1991 02:13 [200,200][RWED,RWED,RWED,RWED]
ARC.GID;1 (25,1) 7./7. C 29-JAN-1991 02:13 [200,200][RWED,RWED,RWED,RWED]
CIRCLE.GID;1 (26,1) 5./5. C 29-JAN-1991 02:13 [200,200][RWED,RWED,RWED,RWED]
STROKE.GID;1 (27,1) 7./7. C 29-JAN-1991 02:13 [200,200][RWED,RWED,RWED,RWED]
COLORMIX.GID;1 (30,1) 6./6. C 29-JAN-1991 02:13 [200,200][RWED,RWED,RWED,RWED]
CHANGE.GID;1 (31,1) 5./5. C 29-JAN-1991 02:13 [200,200][RWED,RWED,RWED,RWED]
MOVING.GID;1 (32,1) 7./7. C 29-JAN-1991 02:14 [200,200][RWED,RWED,RWED,RWED]
COPYING.GID;1 (33,1) 8./8. C 29-JAN-1991 02:14 [200,200][RWED,RWED,RWED,RWED]
STRETCH.GID;1 (34,1) 8./8. C 29-JAN-1991 02:14 [200,200][RWED,RWED,RWED,RWED]
INCLUDE.GID;1 (35,1) 4./4. C 29-JAN-1991 02:14 [200,200][RWED,RWED,RWED,RWED]
CLEAR.GID;1 (36,1) 3./3. C 29-JAN-1991 02:14 [200,200][RWED,RWED,RWED,RWED]
PRESS.GID;1 (37,1) 5./5. C 29-JAN-1991 02:14 [200,200][RWED,RWED,RWED,RWED]
KEYPAD.GID;1 (40,1) 12./12. C 29-JAN-1991 02:14 [200,200][RWED,RWED,RWED,RWED]
SIZE.GID;1 (41,1) 6./6. C 29-JAN-1991 02:14 [200,200][RWED,RWED,RWED,RWED]
VIDEO.GID;1 (42,1) 3./3. C 29-JAN-1991 02:14 [200,200][RWED,RWED,RWED,RWED]
OUTFILL.GID;1 (43,1) 5./5. C 29-JAN-1991 02:14 [200,200][RWED,RWED,RWED,RWED]
OVERVIEW.GID;1 (44,1) 5./5. C 29-JAN-1991 02:14 [200,200][RWED,RWED,RWED,RWED]
BOX.GID;1 (45,1) 6./6. C 29-JAN-1991 02:15 [200,200][RWED,RWED,RWED,RWED]
LINE.GID;1 (46,1) 5./5. C 29-JAN-1991 02:15 [200,200][RWED,RWED,RWED,RWED]
POLYGON.GID;1 (47,1) 7./7. C 29-JAN-1991 02:15 [200,200][RWED,RWED,RWED,RWED]
TEXT.GID;1 (50,1) 8./8. C 29-JAN-1991 02:15 [200,200][RWED,RWED,RWED,RWED]
COLOR.GID;1 (51,1) 4./4. C 29-JAN-1991 02:15 [200,200][RWED,RWED,RWED,RWED]
PEN.GID;1 (52,1) 6./6. C 29-JAN-1991 02:15 [200,200][RWED,RWED,RWED,RWED]
PATT.GID;1 (53,1) 6./6. C 29-JAN-1991 02:15 [200,200][RWED,RWED,RWED,RWED]
RULE.GID;1 (54,1) 6./6. C 29-JAN-1991 02:15 [200,200][RWED,RWED,RWED,RWED]
FONT.GID;1 (55,1) 5./5. C 29-JAN-1991 02:15 [200,200][RWED,RWED,RWED,RWED]
SELECT.GID;1 (56,1) 7./7. C 29-JAN-1991 02:15 [200,200][RWED,RWED,RWED,RWED]
PREVOBJ.GID;1 (57,1) 4./4. C 29-JAN-1991 02:15 [200,200][RWED,RWED,RWED,RWED]
ZOOM.GID;1 (60,1) 8./8. C 29-JAN-1991 02:16 [200,200][RWED,RWED,RWED,RWED]
PUT.GID;1 (61,1) 6./6. C 29-JAN-1991 02:16 [200,200][RWED,RWED,RWED,RWED]
DELETE.GID;1 (62,1) 3./3. C 29-JAN-1991 02:16 [200,200][RWED,RWED,RWED,RWED]
FIND.GID;1 (63,1) 7./7. C 29-JAN-1991 02:16 [200,200][RWED,RWED,RWED,RWED]
REVERSE.GID;1 (64,1) 3./3. C 29-JAN-1991 02:16 [200,200][RWED,RWED,RWED,RWED]
INTEGRAPH.INS;1 (65,1) 3./3. C 29-JAN-1991 02:16 [200,200][RWED,RWED,RWED,RWED] 22-JUN-1993 17:23(5.)
Total of 433./433. blocks in 40. files
Directory [SLIDE]
SLIDE.INS;1 (67,1) 4./4. C 29-JAN-1991 02:16 [200,200][RWED,RWED,RWED,RWED] 22-JUN-1993 17:26(5.)
GIDISSHOW.HLP;1 (70,1) 8./8. C 29-JAN-1991 02:16 [200,200][RWED,RWED,RWED,RWED]
GIDISSHOW.MSG;1 (71,1) 2./2. C 29-JAN-1991 02:16 [200,200][RWED,RWED,RWED,RWED]
GIDISSHOW.MNU;1 (72,1) 2./2. C 29-JAN-1991 02:16 [200,200][RWED,RWED,RWED,RWED]
GIDISSHOW.TSK;1 (73,1) 52./52. C 29-JAN-1991 02:17 [200,200][RWED,RWED,RWED,RWED]
Total of 68./68. blocks in 5. files
Directory [DOCUMENTS]
GR1.DOC;1 (75,1) 126./126. C 29-JAN-1991 02:17 [200,200][RWED,RWED,RWED,RWED]
GR2.DOC;1 (76,1) 43./43. C 29-JAN-1991 02:18 [200,200][RWED,RWED,RWED,RWED]
Total of 169./169. blocks in 2. files
Grand Total of 789./790. blocks in 62. files in 5. directories
[2022-июл-28 13:17:25 info ] Files extracted from "INTEGRAF.dsk" and written to "@INTEGRAF.dsk".
00:00:00.2440057
Код:
Directory [0,0]
INDEXF.SYS;1 (1,1) 68./68. 16-OCT-1989 15:34 [1,1] [RWED,RWED,RWED,RWED]
BITMAP.SYS;1 (2,2) 2./2. 16-OCT-1989 15:34 [1,1] [RWED,RWED,RWED,RWED]
BADBLK.SYS;1 (3,3) 1./1. 16-OCT-1989 15:34 [1,1] [RWED,RWED,RWED,RWED]
000000.DIR;1 (4,4) 1./1. C 16-OCT-1989 15:34 [1,1] [RWED,RWED,RWED,RWED]
CORIMG.SYS;1 (5,5) 1./1. C 16-OCT-1989 15:34 [1,1] [RWED,RWED,RWED,RWED]
USERFILES.DIR;1 (6,1) 1./1. C 16-OCT-1989 15:34 [200,200][RWED,RWED,RWED,RWED]
REDGRAF.DIR;1 (13,1) 2./2. C 16-OCT-1989 15:35 [200,200][RWED,RWED,RWED,RWED]
ZZFONT.DIR;1 (67,1) 1./1. C 16-OCT-1989 15:38 [200,200][RWED,RWED,RWED,RWED]
DAT.DIR;1 (73,1) 1./1. C 16-OCT-1989 15:39 [200,200][RWED,RWED,RWED,RWED]
001002.DIR;1 (77,1) 1./1. C 16-OCT-1989 15:39 [200,200][RWED,RWED,RWED,RWED]
Total of 79./79. blocks in 10. files
Directory [USERFILES]
SAMPLE.SCP;1 (7,1) 3./3. 16-OCT-1989 15:34 [200,200][RWED,RWED,RWED,RWED]
SAMPLE1.GID;1 (10,1) 2./2. 16-OCT-1989 15:34 [200,200][RWED,RWED,RWED,RWED]
SAMPLE2.GID;1 (11,1) 2./2. 16-OCT-1989 15:34 [200,200][RWED,RWED,RWED,RWED]
SAMPLE3.GID;1 (12,1) 6./6. 16-OCT-1989 15:34 [200,200][RWED,RWED,RWED,RWED]
Total of 13./13. blocks in 4. files
Directory [REDGRAF]
REDGRAF.CMD;1 (14,1) 1./1. 16-OCT-1989 15:35 [200,200][RWED,RWED,RWED,RWED]
INCLUDE.GID;1 (15,1) 4./4. 16-OCT-1989 15:35 [200,200][RWED,RWED,RWED,RWED]
SIMAIN.TSK;2 (16,1) 63./63. C 16-OCT-1989 15:35 [200,200][RWED,RWED,RWED,RWED]
SIMAIN.TSK;1 (17,1) 62./62. C 16-OCT-1989 15:35 [200,200][RWED,RWED,RWED,RWED]
SIMAIN.HLP;1 (20,1) 14./14. C 16-OCT-1989 15:35 [200,200][RWED,RWED,RWED,RWED]
SIGHTHELP.MNU;1 (21,1) 8./8. C 16-OCT-1989 15:35 [200,200][RWED,RWED,RWED,RWED]
SIGHT.TSK;1 (22,1) 101./101. C 16-OCT-1989 15:35 [200,200][RWED,RWED,RWED,RWED]
CLEAR.GID;1 (23,1) 3./3. C 16-OCT-1989 15:36 [200,200][RWED,RWED,RWED,RWED]
REVERSE.GID;1 (24,1) 4./4. C 16-OCT-1989 15:36 [200,200][RWED,RWED,RWED,RWED]
PRESS.GID;1 (25,1) 5./5. C 16-OCT-1989 15:36 [200,200][RWED,RWED,RWED,RWED]
VIDEO.GID;1 (26,1) 4./4. C 16-OCT-1989 15:36 [200,200][RWED,RWED,RWED,RWED]
KEYPAD.GID;1 (27,1) 12./12. C 16-OCT-1989 15:36 [200,200][RWED,RWED,RWED,RWED]
BOX.GID;1 (30,1) 5./5. C 16-OCT-1989 15:36 [200,200][RWED,RWED,RWED,RWED]
ARC.GID;1 (31,1) 7./7. C 16-OCT-1989 15:36 [200,200][RWED,RWED,RWED,RWED]
SIZE.GID;1 (32,1) 6./6. C 16-OCT-1989 15:36 [200,200][RWED,RWED,RWED,RWED]
OUTFILL.GID;1 (33,1) 6./6. C 16-OCT-1989 15:36 [200,200][RWED,RWED,RWED,RWED]
LINE.GID;1 (34,1) 5./5. C 16-OCT-1989 15:36 [200,200][RWED,RWED,RWED,RWED]
POLYGON.GID;1 (35,1) 8./8. C 16-OCT-1989 15:36 [200,200][RWED,RWED,RWED,RWED]
CIRCLE.GID;1 (36,1) 5./5. C 16-OCT-1989 15:36 [200,200][RWED,RWED,RWED,RWED]
STROKE.GID;1 (37,1) 7./7. C 16-OCT-1989 15:36 [200,200][RWED,RWED,RWED,RWED]
TEXT.GID;1 (40,1) 6./6. C 16-OCT-1989 15:36 [200,200][RWED,RWED,RWED,RWED]
COLOR.GID;1 (41,1) 4./4. C 16-OCT-1989 15:37 [200,200][RWED,RWED,RWED,RWED]
COLORMIX.GID;1 (42,1) 6./6. C 16-OCT-1989 15:37 [200,200][RWED,RWED,RWED,RWED]
PEN.GID;1 (43,1) 6./6. C 16-OCT-1989 15:37 [200,200][RWED,RWED,RWED,RWED]
PATT.GID;1 (44,1) 6./6. C 16-OCT-1989 15:37 [200,200][RWED,RWED,RWED,RWED]
RULE.GID;1 (45,1) 6./6. C 16-OCT-1989 15:37 [200,200][RWED,RWED,RWED,RWED]
FONT.GID;1 (46,1) 4./4. C 16-OCT-1989 15:37 [200,200][RWED,RWED,RWED,RWED]
SELECT.GID;1 (47,1) 6./6. C 16-OCT-1989 15:37 [200,200][RWED,RWED,RWED,RWED]
FIND.GID;1 (50,1) 6./6. C 16-OCT-1989 15:37 [200,200][RWED,RWED,RWED,RWED]
PREVOBJ.GID;1 (51,1) 4./4. C 16-OCT-1989 15:37 [200,200][RWED,RWED,RWED,RWED]
CHANGE.GID;1 (52,1) 5./5. C 16-OCT-1989 15:37 [200,200][RWED,RWED,RWED,RWED]
ZOOM.GID;1 (53,1) 7./7. C 16-OCT-1989 15:37 [200,200][RWED,RWED,RWED,RWED]
PUT.GID;1 (54,1) 5./5. C 16-OCT-1989 15:37 [200,200][RWED,RWED,RWED,RWED]
DELETE.GID;1 (55,1) 3./3. C 16-OCT-1989 15:37 [200,200][RWED,RWED,RWED,RWED]
MOVING.GID;1 (56,1) 7./7. C 16-OCT-1989 15:38 [200,200][RWED,RWED,RWED,RWED]
SIMAIN.MNU;1 (57,1) 3./3. C 16-OCT-1989 15:38 [200,200][RWED,RWED,RWED,RWED]
VIEW.GID;1 (60,1) 5./5. C 16-OCT-1989 15:38 [200,200][RWED,RWED,RWED,RWED]
STRETCH.GID;1 (61,1) 8./8. C 16-OCT-1989 15:38 [200,200][RWED,RWED,RWED,RWED]
OVERVIEW.GID;1 (62,1) 5./5. C 16-OCT-1989 15:38 [200,200][RWED,RWED,RWED,RWED]
COPYING.GID;1 (63,1) 8./8. C 16-OCT-1989 15:38 [200,200][RWED,RWED,RWED,RWED]
FONTINS.CMD;1 (64,1) 1./1. C 16-OCT-1989 15:38 [200,200][RWED,RWED,RWED,RWED]
REDGRAF.INS;1 (65,1) 4./4. C 16-OCT-1989 15:38 [200,200][RWED,RWED,RWED,RWED] 21-JUN-1995 13:02(13.)
DLMFIL.TSK;2 (66,1) 50./50. C 16-OCT-1989 15:38 [200,200][RWED,RWED,RWED,RWED]
Total of 495./495. blocks in 43. files
Directory [ZZFONT]
FONT08.TSK;1 (70,1) 7./7. C 16-OCT-1989 15:38 [200,200][RWED,RWED,RWED,RWED]
FONT09.TSK;1 (71,1) 15./15. C 16-OCT-1989 15:38 [200,200][RWED,RWED,RWED,RWED]
FONT10.TSK;1 (72,1) 15./15. C 16-OCT-1989 15:39 [200,200][RWED,RWED,RWED,RWED]
Total of 37./37. blocks in 3. files
Directory [DAT]
SIMAINHLP.DAT;1 (74,1) 16./16. C 16-OCT-1989 15:39 [200,200][RWED,RWED,RWED,RWED]
SIMAIN.DAT;1 (75,1) 4./4. C 16-OCT-1989 15:39 [200,200][RWED,RWED,RWED,RWED]
SIGHTHELP.DAT;1 (76,1) 9./9. C 16-OCT-1989 15:39 [200,200][RWED,RWED,RWED,RWED]
Total of 29./29. blocks in 3. files
Directory [1,2]
SIMAIN.MSG;1 (100,1) 3./3. C 16-OCT-1989 15:39 [200,200][RWED,RWED,RWED,RWED]
Total of 3./3. blocks in 1. files
Grand Total of 656./656. blocks in 64. files in 5. directories
[2022-июл-28 13:18:24 info ] Files extracted from "REDGRAF.dsk" and written to "@REDGRAF.dsk".
00:00:00.1809449
Оказалась - ещё одна ошибка copy/paste, плюс немного переделал код для устрройств с переменной длиной (DW описал именно так, учитывая их разный размер) ну и...
И безусловно, надо переделать [ZZPA00025]\[ZZPUBAP] на [ZZPA00025.ZZPUBAP] в листинге - но тут надо подумать - как :)Код:Directory [0,0]
INDEXF.SYS;1 (1,1) 4377./4377. 19-JUL-1997 21:15 [377,0] [RWE,RWE,R,R]
BITMAP.SYS;1 (2,2) 33./33. 19-JUL-1997 21:15 [377,0] [RWE,RWE,R,R]
BADBLK.SYS;1 (3,3) 1./1. 19-JUL-1997 21:15 [377,0] [RWE,RWE,R,R]
000000.DIR;1 (4,4) 3./3. C 19-JUL-1997 21:15 [377,0] [RWE,RWE,R,R]
CORIMG.SYS;1 (5,5) 1000./1000. C 19-JUL-1997 21:15 [377,0] [RWE,RWE,R,R]
DECNET.DIR;1 (6,1) 1./1. C 19-JUL-1997 21:15 [376,377][RWE,RWE,R,R]
SYSTEM.DIR;1 (12,1) 2./2. C 19-JUL-1997 21:15 [1,1] [RWE,RWE,R,R]
ZZDECNET.DIR;1 (20,1) 1./1. C 19-JUL-1997 21:16 [377,0] [R,R,R,]
ZZFONT.DIR;1 (21,1) 1./1. C 19-JUL-1997 21:16 [377,0] [R,R,R,]
ZZSYS.DIR;1 (22,1) 4./5. C 19-JUL-1997 21:16 [377,0] [R,R,R,]
......
ZZCL00015.DIR;1 (1465,1) 1./1. C 19-JAN-1998 22:43 [377,0] [R,R,R,]
SGE.DIR;1 (1504,1) 1./1. C 19-JAN-1998 23:10 [1,1] [RWE,RWE,R,R]
Total of 5491./5494. blocks in 73. files
Directory [DECNET]
USERFILES.DIR;1 (7,1) 0./1. C 19-JUL-1997 21:15 [376,377][RWE,RWE,R,R]
ZZDECNET.DIR;1 (10,1) 0./1. C 19-JUL-1997 21:15 [376,377][RWE,RWE,R,R]
ZZSYS.DIR;1 (11,1) 1./1. C 19-JUL-1997 21:15 [376,377][RWE,RWE,R,R]
Total of 1./3. blocks in 3. files
Directory [DECNET]\[ZZSYS]
LOGIN.INI;1 (307,1) 1./1. 19-JUL-1997 21:28 [376,377][RWE,RWED,R,]
LOGOUT.INI;1 (310,1) 1./1. 19-JUL-1997 21:28 [376,377][RWE,RWED,R,]
Total of 2./2. blocks in 2. files
Directory [SYSTEM]
EXAMPLE.DIR;1 (13,1) 0./1. C 19-JUL-1997 21:15 [1,1] [RWE,RWE,R,R]
USERFILES.DIR;1 (14,1) 1./1. C 19-JUL-1997 21:15 [1,1] [RWE,RWE,R,R]
Total of 1./2. blocks in 2. files
Directory [SYSTEM]\[USERFILES]
SAMPLE.SCP;1 (664,1) 3./3. 01-JAN-1997 00:15 [1,1] [RWED,RWED,R,R]
SAMPLE1.GID;1 (665,1) 2./2. 01-JAN-1997 00:15 [1,1] [RWED,RWED,R,R]
SAMPLE2.GID;1 (666,1) 3./3. 01-JAN-1997 00:15 [1,1] [RWED,RWED,R,R]
SAMPLE3.GID;1 (667,1) 2./2. 01-JAN-1997 00:15 [1,1] [RWED,RWED,R,R]
CC.TXT;1 (754,1) 2./6. C 26-NOV-1984 14:27 [1,1] [RWE,RWED,R,] 01-JAN-1997 00:47(5.)
PRINT.C;1 (756,1) 1./1. 01-JAN-1997 00:53 [1,1] [RWE,RWED,R,]
PRINT.OBJ;1 (755,3) 1./1. 01-JAN-1997 00:58 [1,1] [RWE,RWED,R,]
K11HLP.HLP;1 (1003,1) 140./140. 05-DEC-1985 12:57 [1,1] [RWE,RWED,R,] 01-JAN-1997 00:37(6.)
PRINT.TSK;1 (761,1) 39./39. C 01-JAN-1997 00:59 [1,1] [RWE,RWED,R,]
SYNERGY.DOC;1 (1107,1) 6./6. 19-JAN-1998 22:11 [1,1] [RWED,RWED,RWED,RWED]
EXAMPLE.WRK;1 (1201,1) 3./3. 19-JAN-1998 22:22 [1,1] [RWED,RWED,RWED,RWED]
EXAMPLE.TAB;1 (1257,1) 3./3. 19-JAN-1998 22:25 [1,1] [RWED,RWED,RWED,RWED]
CHESSGAME.CHE;1 (1271,1) 7./7. 19-JAN-1998 22:30 [1,1] [RWE,RWED,R,]
USER.DIC;1 (1350,1) 1./1. 19-JAN-1998 22:34 [1,1] [RWED,RWED,RWED,RWED]
EXAMPLE.DOC;1 (1351,1) 9./9. 19-JAN-1998 22:34 [1,1] [RWED,RWED,RWED,RWED]
EXAMPLE.GID;1 (1352,1) 8./8. 19-JAN-1998 22:34 [1,1] [RWED,RWED,RWED,RWED]
EXAMPLECV.GID;1 (1353,1) 18./18. 19-JAN-1998 22:34 [1,1] [RWED,RWED,RWED,RWED]
EXAMPLEHD.GID;1 (1354,1) 4./4. 19-JAN-1998 22:34 [1,1] [RWED,RWED,RWED,RWED]
PROCOM.DOC;1 (1435,1) 14./14. 19-JAN-1998 22:38 [1,1] [RWED,RWED,RWED,RWED]
PROSESK2.UDK;1 (1436,1) 10./10. 19-JAN-1998 22:40 [1,1] [RWE,RWED,R,] 19-JAN-1998 22:40(2.)
CHESS.TXT;1 (1473,1) 7./7. 19-JAN-1998 22:44 [1,1] [RWED,RWED,R,]
Total of 283./287. blocks in 21. files
....
Directory [ZZPA00025]
ZZPUBAP.DIR;1 (1463,1) 1./1. C 19-JAN-1998 22:43 [1,1] [RWE,RWE,R,R]
Total of 1./1. blocks in 1. files
Directory [ZZPA00025]\[ZZPUBAP]
ZZPUBAP.INB;1 (1464,1) 1./1. 19-JAN-1998 22:43 [1,1] [RWED,RWED,R,]
Total of 1./1. blocks in 1. files
Directory [ZZCL00015]
ZZCL00015.INB;1 (1466,1) 1./1. 19-JAN-1998 22:43 [377,0] [RWED,RWED,R,]
Total of 1./1. blocks in 1. files
Directory [SGE]
SGE.TSK;1 (771,2) 75./75. C 19-JAN-1998 23:16 [1,1] [RWE,RWED,R,] 06-DEC-1903 10:19(3.)
Total of 75./75. blocks in 1. files
Grand Total of 25990./26193. blocks in 839. files in 211. directories
[2022-июл-28 16:11:16 info ] Files extracted from "pos32.rd" and written to "@pos32.rd".
00:00:02.2529242
К сожалению, в P/Os каталоги тоже не отличаются какими-то специфическими аттрибутами...
- - - Добавлено - - -
Для особо зорких - USERFILES.DIR;1 и ZZDECNET.DIR;1 в [DECNET] не содержат правильной информации о файлах, поэтому их и нет в листинге
- там точно так же, но там dcl умеет сам (cre/dir).
Вообще, смысл в pro v3 использования вложенных каталогов, в том, что система - многопользовательская наподобии windows - пользователи садятся поочередно за один и тот же персональный компьютер, и у каждого свой комплект программ (часть которых или их библиотек можно сделать общими для экономии дискового пространства) и у каждого - своя система каталогов на уровне файловой системы, со своими логическими именами.
Из занимательного с этого диска
Код:C
C Professional 300 CORE Graphics Library V2.0
C definitions for Tool Kit FORTRAN-77
C
C 01-Mar-1984
C
C This include file is provided for instructional
C purposes only. It is not supported software.
C
IMPLICIT INTEGER G
PARAMETER (GMA2 = 01) ! Move Absolute 2
PARAMETER (GMR2 = 02) ! Move Relative 2
PARAMETER (GICP2 = 03) ! Inquire Current Position 2
PARAMETER (GLA2 = 04) ! Line Absolute 2
PARAMETER (GLR2 = 05) ! Line Relative 2
PARAMETER (GPLA2 = 06) ! PolyLine Absolute 2
PARAMETER (GPLR2 = 07) ! PolyLine Relative 2
PARAMETER (GPGA2 = 08) ! PolyGon Absolute 2
PARAMETER (GPGR2 = 09) ! PolyGon Relative 2
PARAMETER (GRA2 = 10) ! Rectangle Absolute 2
PARAMETER (GRR2 = 11) ! Rectangle Relative 2
PARAMETER (GSLS = 12) ! Set Line Style
PARAMETER (GILS = 13) ! Inquire Line Style
PARAMETER (GSLW = 14) ! Set Line Width
PARAMETER (GILW = 15) ! Inquire Line Width
PARAMETER (GT = 16) ! Text
PARAMETER (GITE2 = 17) ! Inquire Text Extent 2
PARAMETER (GSF = 18) ! Set Font
PARAMETER (GIF = 19) ! Inquire Font
PARAMETER (GSCS = 20) ! Set Character Size
PARAMETER (GICS = 21) ! Inquire Character Size
PARAMETER (GSCP = 22) ! Set Character Path
PARAMETER (GICP = 23) ! Inquire Character Path
PARAMETER (GSCSP = 24) ! Set Character SPace
PARAMETER (GICSP = 25) ! Inquire Character SPace
PARAMETER (GSCJ = 26) ! Set Character Justification
PARAMETER (GICJ = 27) ! Inquire Character Justification
PARAMETER (GSCI = 28) ! Set Character Italics
PARAMETER (GICI = 29) ! Inquire Character Italics
PARAMETER (GSFS = 30) ! Set Font Size
PARAMETER (GIFS = 31) ! Inquire Font Size
PARAMETER (GLC = 32) ! Load Character
PARAMETER (GMKA2 = 33) ! MarKer Absolute 2
PARAMETER (GMKR2 = 34) ! MarKer Relative 2
PARAMETER (GPMA2 = 35) ! PolyMarker Absolute 2
PARAMETER (GPMR2 = 36) ! PolyMarker Relative 2
PARAMETER (GSMKS = 37) ! Set MarKer Symbol
PARAMETER (GIMKS = 38) ! Inquire MarKer Symbol
PARAMETER (GAA2 = 39) ! Arc Absolute 2
PARAMETER (GAR2 = 40) ! Arc Relative 2
PARAMETER (GCA2 = 41) ! Curve Absolute 2
PARAMETER (GCR2 = 42) ! Curve Relative 2
PARAMETER (GSWI = 60) ! Set Writing Index
PARAMETER (GIWI = 61) ! Inquire Writing Index
PARAMETER (GSBI = 62) ! Set Background Index
PARAMETER (GIBI = 63) ! Inquire Background Index
PARAMETER (GSCM = 64) ! Set Color Map
PARAMETER (GICM = 65) ! Inquire Color Map
PARAMETER (GSCME = 66) ! Set Color Map Entry
PARAMETER (GICME = 67) ! Inquire Color Map Entry
PARAMETER (GSWP = 68) ! Set Writing Planes
PARAMETER (GIWP = 69) ! Inquire Writing Planes
PARAMETER (GSWM = 70) ! Set Writing Mode
PARAMETER (GIWM = 71) ! Inquire Writing Mode
PARAMETER (GSGA = 72) ! Set Global Attributes
PARAMETER (GIGA = 73) ! Inquire Global Attributes
PARAMETER (GSFM = 74) ! Set Fill Mode
PARAMETER (GIFM = 75) ! Inquire Fill Mode
PARAMETER (GSFE = 76) ! Set Fill Entity
PARAMETER (GIFE = 77) ! Inquire Fill Entity
PARAMETER (GSFC = 78) ! Set Fill Character
PARAMETER (GIFC = 79) ! Inquire Fill Character
PARAMETER (GSW = 80) ! Set Window
PARAMETER (GIW = 81) ! Inquire Window
PARAMETER (GSV2 = 82) ! Set Viewport 2
PARAMETER (GIV2 = 83) ! Inquire Viewport 2
PARAMETER (GSWC = 84) ! Set Window Clipping
PARAMETER (GIWC = 85) ! Inquire Window Clipping
PARAMETER (GSO = 86) ! Set Origin
PARAMETER (GIO = 87) ! Inquire Origin
PARAMETER (GEV = 88) ! Erase Viewport
PARAMETER (GS = 89) ! Scroll
PARAMETER (GIC = 90) ! Initialize Cgl
PARAMETER (GTC = 91) ! Terminate Cgl
PARAMETER (GNF = 92) ! New Frame
PARAMETER (GRMRE = 93) ! Report Most Recent Error
PARAMETER (GPS = 94) ! Print Screen
PARAMETER (GCW = 95) ! Cgl Wait
PARAMETER (GBB = 96) ! Begin Batch
PARAMETER (GEB = 97) ! End Batch
PARAMETER (GSLO = 98) ! Set Linewidth Orientation
PARAMETER (GILO = 99) ! Inquire Linewith Orientation
PARAMETER (GSCU = 100) ! Set CUrsor
PARAMETER (GICU = 101) ! Inquire CUrsor
PARAMETER (GSV = 102) ! Scroll Viewport
PARAMETER (GIVS = 103) ! Initialize View Surface
PARAMETER (GTVS = 104) ! Terminate View Surface
PARAMETER (GSVS = 105) ! Select View Surface
PARAMETER (GDVS = 106) ! Deselect View Surface
PARAMETER (GSNS2 = 107) ! Set NDC Space 2
PARAMETER (GINS2 = 108) ! Inquire NDC Space 2
PARAMETER (GBDC = 109) ! Begin Define Character
PARAMETER (GEDC = 110) ! End Define Character
PARAMETER (GPF = 111) ! Playback File
PARAMETER (GLF = 112) ! Load Font
Нет, к сожалению