DataMuseum.dk

Presents historical artifacts from the history of:

Philips Data Systems

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Philips Data Systems

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics - download

⟦c1448b70e⟧

    Length: 1514 (0x5ea)
    Notes: pts_type(UF)
    Names: »DRFDDE.UF«

Derivation

└─⟦5c22ed822⟧ Bits:30009675 Philips computer tape "600209"
    └─⟦this⟧ »M:DENJ/DRFDDE.UF« 
└─⟦bf903a231⟧ Bits:30009665 Philips computer tape "600109"
    └─⟦this⟧ »M:DENJ/DRFDDE.UF« 

PTS(SC)

LED DRFD01,/S,##
##IL 0
			CONV, 81-04-18,DK1 
			ONLY VALID FOR DATA ENTRY,DK1
##DL 906
	CF	A5,ASC:01	TRANSFORM TO ASCII	DK1
##DL 967
	CF	A5,EBC:01	TRANSFORM AND MOVE TO BUF	DK1 
##DL 1576 
	CF	A5,ASC:01	TRANSFER IBM VOL NAME TO ASCII	DK1
##IL 1613 
	LD	A1,DWT:LA,A6	GET LOGICAL BUFFER ADDRESS	DK1 
	RF(NZ)	ASC:01	BUFFER NOT IN SYSTEM AREA	DK1
	LD	A4,DWTBA,A6	GET BUFFER ADDRESS	DK1
	RF	ASC:02		DK1 
ASC:01	EQU	*		DK1 
##IL 1617 
ASC:02	EQU	*		DK1 
##DL 1648 
	LD	A1,DWT:LA,A6	GET LOGICAL BUFFER ADDRESS	DK1 
	RF(NZ)	EBC:01	BUFFER NOT IN SYSTEM AREA	DK1
	LD	A4,DWTBA,A6	GET BUFFER ADDRESS	DK1
	RF	EBC:02		DK1 
EBC:01	EQU	*		DK1 
##IL 1652 
EBC:02	EQU	*		DK1 
##IL 1653 
	ENB			DK1
##RE 1660,$$	SC$$*	SC$$ 
	SCR	A1,A4	PUT EBCDIC IN OUTPUT BUFFER	DK1
##RE 1663,$$	LDKL$$*	LDKL$$ 
##EN
KPF /S,DRFDDE 
SCR 
ASM DRFDDE
KPF /O
ASG /E0,TY10
SCR 

HexDump

0x000…018 (0, 0, 400) Head {h00=0x0014, h01=0x0050, text=»LED DRFD01,/S,##«, t00=0x0000, t01=0x0004}
0x018…026             Head {h00=0x000a, h01=0x0050, text=»##IL 0«, t00=0x0000, t01=0x001c}
0x026…044             Head {h00=0x001a, h01=0x0050, text=»   CONV, 81-04-18,DK1 «, t00=0x0000, t01=0x002a}
0x044…06c             Head {h00=0x0024, h01=0x0050, text=»   ONLY VALID FOR DATA ENTRY,DK1«, t00=0x0000, t01=0x0048}
0x06c…07c             Head {h00=0x000c, h01=0x0050, text=»##DL 906«, t00=0x0000, t01=0x0070}
0x07c…0a8             Head {h00=0x0028, h01=0x0050, text=» CF A5,ASC:01 TRANSFORM TO ASCII DK1«, t00=0x0000, t01=0x0080}
0x0a8…0b8             Head {h00=0x000c, h01=0x0050, text=»##DL 967«, t00=0x0000, t01=0x00ac}
0x0b8…0ec             Head {h00=0x0030, h01=0x0050, text=» CF A5,EBC:01 TRANSFORM AND MOVE TO BUF DK1 «, t00=0x0000, t01=0x00bc}
0x0ec…0fe             Head {h00=0x000e, h01=0x0050, text=»##DL 1576 «, t00=0x0000, t01=0x00f0}
0x0fe…136             Head {h00=0x0034, h01=0x0050, text=» CF A5,ASC:01 TRANSFER IBM VOL NAME TO ASCII DK1«, t00=0x0000, t01=0x0102}
0x136…148             Head {h00=0x000e, h01=0x0050, text=»##IL 1613 «, t00=0x0000, t01=0x013a}
0x148…180             Head {h00=0x0034, h01=0x0050, text=» LD A1,DWT:LA,A6 GET LOGICAL BUFFER ADDRESS DK1 «, t00=0x0000, t01=0x014c}
0x180…1b4             Head {h00=0x0030, h01=0x0050, text=» RF(NZ) ASC:01 BUFFER NOT IN SYSTEM AREA DK1«, t00=0x0000, t01=0x0184}
0x1b4…1e2             Head {h00=0x002a, h01=0x0050, text=» LD A4,DWTBA,A6 GET BUFFER ADDRESS DK1«, t00=0x0001, t01=0x0028}
0x1e2…1fa             Head {h00=0x0014, h01=0x0050, text=» RF ASC:02  DK1 «, t00=0x0001, t01=0x0056}
0x1fa…214             Head {h00=0x0016, h01=0x0050, text=»ASC:01 EQU *  DK1 «, t00=0x0001, t01=0x006e}
0x214…226             Head {h00=0x000e, h01=0x0050, text=»##IL 1617 «, t00=0x0001, t01=0x0088}
0x226…240             Head {h00=0x0016, h01=0x0050, text=»ASC:02 EQU *  DK1 «, t00=0x0001, t01=0x009a}
0x240…252             Head {h00=0x000e, h01=0x0050, text=»##DL 1648 «, t00=0x0001, t01=0x00b4}
0x252…28a             Head {h00=0x0034, h01=0x0050, text=» LD A1,DWT:LA,A6 GET LOGICAL BUFFER ADDRESS DK1 «, t00=0x0001, t01=0x00c6}
0x28a…2be             Head {h00=0x0030, h01=0x0050, text=» RF(NZ) EBC:01 BUFFER NOT IN SYSTEM AREA DK1«, t00=0x0001, t01=0x00fe}
0x2be…2ec             Head {h00=0x002a, h01=0x0050, text=» LD A4,DWTBA,A6 GET BUFFER ADDRESS DK1«, t00=0x0001, t01=0x0132}
0x2ec…304             Head {h00=0x0014, h01=0x0050, text=» RF EBC:02  DK1 «, t00=0x0001, t01=0x0160}
0x304…31e             Head {h00=0x0016, h01=0x0050, text=»EBC:01 EQU *  DK1 «, t00=0x0001, t01=0x0178}
0x31e…330 (2, 0, 308) Head {h00=0x000e, h01=0x0050, text=»##IL 1652 «, t00=0x0002, t01=0x0004}
0x330…34a             Head {h00=0x0016, h01=0x0050, text=»EBC:02 EQU *  DK1 «, t00=0x0002, t01=0x0016}
0x34a…35c             Head {h00=0x000e, h01=0x0050, text=»##IL 1653 «, t00=0x0002, t01=0x0030}
0x35c…36e             Head {h00=0x000e, h01=0x0050, text=» ENB   DK1«, t00=0x0002, t01=0x0042}
0x36e…38e             Head {h00=0x001c, h01=0x0050, text=»##RE 1660,$$ SC$$* SC$$ «, t00=0x0002, t01=0x0054}
0x38e…3c0             Head {h00=0x002e, h01=0x0050, text=» SCR A1,A4 PUT EBCDIC IN OUTPUT BUFFER DK1«, t00=0x0002, t01=0x0074}
0x3c0…3e4             Head {h00=0x0020, h01=0x0050, text=»##RE 1663,$$ LDKL$$* LDKL$$ «, t00=0x0002, t01=0x00a6}
0x3e4…3f0             Head {h00=0x0008, h01=0x0050, text=»##EN«, t00=0x0002, t01=0x00ca}
0x3f0…406             Head {h00=0x0012, h01=0x0050, text=»KPF /S,DRFDDE «, t00=0x0002, t01=0x00d6}
0x406…412             Head {h00=0x0008, h01=0x0050, text=»SCR «, t00=0x0002, t01=0x00ec}
0x412…424             Head {h00=0x000e, h01=0x0050, text=»ASM DRFDDE«, t00=0x0002, t01=0x00f8}
0x424…432             Head {h00=0x000a, h01=0x0050, text=»KPF /O«, t00=0x0002, t01=0x010a}
0x432…446             Head {h00=0x0010, h01=0x0050, text=»ASG /E0,TY10«, t00=0x0002, t01=0x0118}
0x446…452             Head {h00=0x0008, h01=0x0003, text=»SCR «, t00=0x0002, t01=0x012c}
0x452…456 (3, 1, 8)   Head {h00=0x2004, h01=0x0000}
0x456…45a             00 03 00 04                                                                                                                                                                                                                                       ┆    ┆
0x45a…4aa (4, 0, 400) 00 03 01 84 00 10 00 0c 05 05 dc 53 43 54 4e 4f 50 ff 00 ba 00 04 00 08 00 10 00 0c 05 05 dc 53 43 54 50 53 5a a0 00 bc 00 04 00 1c 00 10 00 0c 05 05 dc 53 43 54 4d 4d 43 ff 00 be 00 04 00 30 00 10 00 0c 05 05 dc 53 43 54 4c 41 43 c4 00 c0   ┆           SCTNOP              SCTPSZ              SCTMMC      0       SCTLAC   ┆
0x4aa…4fa             00 04 00 44 00 10 00 0c 05 05 dc 53 43 54 4d 4d 50 4c 00 c2 00 04 00 58 00 10 00 0c 05 05 dc 53 43 54 4c 41 50 30 00 c4 00 04 00 6c 00 10 00 0c 05 05 dc 53 43 54 4e 50 45 00 00 c6 00 04 00 80 00 10 00 0c 05 05 dc 53 43 54 53 54 42 00 00 c8   ┆   D       SCTMMPL     X       SCTLAP0     l       SCTNPE              SCTSTB   ┆
0x4fa…54a             00 04 00 94 00 10 00 0c 05 05 dc 53 43 54 4f 50 54 d3 00 ca 00 04 00 a8 00 0a 00 06 02 02 62 42 55 47 00 04 00 bc 00 10 00 0c 05 05 dc 53 43 54 42 55 47 d3 00 cc 00 04 00 ca 00 2c 00 28 03 13 00 00 00 b1 00 02 00 00 00 00 00 00 00 00 00 00   ┆           SCTOPT             bBUG           SCTBUG        , (                  ┆
0x54a…59a             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 05 00 00 00 16 00 04 00 de 00 10 00 0c 05 05 dc 53 43 54 44 4d 54 7e 00 ce 00 04 01 0e 00 10 00 0c 05 05 dc 53 43 54 44 4d 49 20 00 d0 00 04 01 22 00 10 00 0c 05 05 dc 53 43 54 46 57 54 12   ┆                                 SCTDMT~             SCTDMI      "       SCTFWT ┆
0x59a…5ea             00 d2 00 04 01 36 00 10 00 0c 05 05 dc 53 43 54 4e 4f 46 20 00 d4 00 04 01 4a 00 10 00 0c 05 05 dc 53 43 54 4e 46 54 02 00 d6 00 04 01 5e 00 10 00 0c 05 05 dc 53 43 54 46 57 4c 02 00 d8 00 04 01 72 00 10 00 0c 05 05 dc 53 43 54 42 4c 4b 16   ┆     6       SCTNOF      J       SCTNFT      ^       SCTFWL      r       SCTBLK ┆

Reduced view