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

⟦23b146aaa⟧ 

    Length: 1230 (0x4ce)
    Notes: pts_type(SC)
    Names: »DWDC09.SC«

Derivation

└─⟦71472ef1e⟧ Bits:30009661 Philips computer tape "600103"
    └─⟦this⟧ »BDKMON/DWDC09.SC«

PTS(SC)

	IDENT DWDC09 	REL 8.3 81-09-14 DK 870105040830 
* 
*   DEVICE WORK TABLE FOR DATA-COMMUNICATION DEVICE 1 
* 
	ENTRY	DWDC09	TABLE ENTRY 
	EXTRN	DC15AD	POINTER TO ADDRESS-BLOCK
* 
DWDC09	EQU	*	TABLE ENTRY
	DATA	0	CHANNEL PARAMETER 
	DATA	/8000	STATUS./8000 MEANS DEVICE READY 
	DATA	0	ECB-ADDRESS 
	DATA	DWTEND-DWDC09 
			RIGHT BYTE=ORDER 
	DATA	DC15AD	POINTER TO ADDRESS-BLOCK 
	DATA	'DC'	TTAB-ADDRESS 
	DATA	0	WAIT/ACTIVATE INDICATOR 
	DATA	0	TERMINAL QUEUE
	DATA	0	TIMER POINTER 
	DATA	0	WRITE QUEUE 
	DATA	0	STATUS QUEUE
	DATA	0	RECEIVE QUEUE 
	DATA	0	BUFFER ADDRESS
	DATA	0	CURSOR ADDRESS
	DATA	0	DWT INFO	DK 
DWTEND	EQU	*
	END

HexDump

0x000…038 (0, 0, 398) Head {h00=0x0034, h01=0x0050, text=» IDENT DWDC09  REL 8.3 81-09-14 DK 870105040830 «, t00=0x0000, t01=0x0004}
0x038…042             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x003c}
0x042…080             Head {h00=0x003a, h01=0x0050, text=»*   DEVICE WORK TABLE FOR DATA-COMMUNICATION DEVICE 1 «, t00=0x0000, t01=0x0046}
0x080…08a             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0084}
0x08a…0ac             Head {h00=0x001e, h01=0x0050, text=» ENTRY DWDC09 TABLE ENTRY «, t00=0x0000, t01=0x008e}
0x0ac…0da             Head {h00=0x002a, h01=0x0050, text=» EXTRN DC15AD POINTER TO ADDRESS-BLOCK«, t00=0x0000, t01=0x00b0}
0x0da…0e4             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00de}
0x0e4…104             Head {h00=0x001c, h01=0x0050, text=»DWDC09 EQU * TABLE ENTRY«, t00=0x0000, t01=0x00e8}
0x104…126             Head {h00=0x001e, h01=0x0050, text=» DATA 0 CHANNEL PARAMETER «, t00=0x0000, t01=0x0108}
0x126…15a             Head {h00=0x0030, h01=0x0050, text=» DATA /8000 STATUS./8000 MEANS DEVICE READY «, t00=0x0000, t01=0x012a}
0x15a…176             Head {h00=0x0018, h01=0x0050, text=» DATA 0 ECB-ADDRESS «, t00=0x0000, t01=0x015e}
0x176…192             Head {h00=0x0018, h01=0x0050, text=» DATA DWTEND-DWDC09 «, t00=0x0000, t01=0x017a}
0x192…1ae             Head {h00=0x0018, h01=0x0050, text=»   RIGHT BYTE=ORDER «, t00=0x0001, t01=0x0008}
0x1ae…1dc             Head {h00=0x002a, h01=0x0050, text=» DATA DC15AD POINTER TO ADDRESS-BLOCK «, t00=0x0001, t01=0x0024}
0x1dc…1fc             Head {h00=0x001c, h01=0x0050, text=» DATA 'DC' TTAB-ADDRESS «, t00=0x0001, t01=0x0052}
0x1fc…224             Head {h00=0x0024, h01=0x0050, text=» DATA 0 WAIT/ACTIVATE INDICATOR «, t00=0x0001, t01=0x0072}
0x224…242             Head {h00=0x001a, h01=0x0050, text=» DATA 0 TERMINAL QUEUE«, t00=0x0001, t01=0x009a}
0x242…260             Head {h00=0x001a, h01=0x0050, text=» DATA 0 TIMER POINTER «, t00=0x0001, t01=0x00b8}
0x260…27c             Head {h00=0x0018, h01=0x0050, text=» DATA 0 WRITE QUEUE «, t00=0x0001, t01=0x00d6}
0x27c…298             Head {h00=0x0018, h01=0x0050, text=» DATA 0 STATUS QUEUE«, t00=0x0001, t01=0x00f2}
0x298…2b6             Head {h00=0x001a, h01=0x0050, text=» DATA 0 RECEIVE QUEUE «, t00=0x0001, t01=0x010e}
0x2b6…2d4             Head {h00=0x001a, h01=0x0050, text=» DATA 0 BUFFER ADDRESS«, t00=0x0001, t01=0x012c}
0x2d4…2f2             Head {h00=0x001a, h01=0x0050, text=» DATA 0 CURSOR ADDRESS«, t00=0x0001, t01=0x014a}
0x2f2…30e             Head {h00=0x0018, h01=0x0050, text=» DATA 0 DWT INFO DK «, t00=0x0001, t01=0x0168}
0x30e…322             Head {h00=0x0010, h01=0x0050, text=»DWTEND EQU *«, t00=0x0001, t01=0x0184}
0x322…32e             Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0002, t01=0x0008}
0x32e…332             Head {h00=0x4004, h01=0x0000}
0x332…336             00 02 00 14                                                                                                                                                                                                                                       ┆    ┆
0x336…33e (3, 1, 8)   20 04 00 00 00 03 00 04                                                                                                                                                                                                                           ┆        ┆
0x33e…38e (4, 0, 400) 31 2c 44 43 3a 45 4e 44 5c 54 41 42 4c 45 20 41 4c 52 45 41 44 59 20 46 55 4c 4c 20 3f 3f 3f 3f 00 13 01 8a 00 26 00 50 5c 41 42 4c 28 45 29 5c 44 49 53 49 4f 45 5c 59 45 53 21 21 20 52 45 51 55 45 53 54 20 45 52 52 4f 52 00 14 00 28 00 0a   ┆1,DC:END TABLE ALREADY FULL ????     & P ABL(E) DISIOE YES!! REQUEST ERROR   (  ┆
0x38e…3de             00 50 5c 45 4a 45 43 54 00 14 00 52 00 04 00 50 00 14 00 60 00 04 00 50 00 14 00 68 00 10 00 50 44 43 54 50 32 30 5c 45 51 55 5c 2a 00 14 00 70 00 12 00 50 5c 49 46 54 5c 45 4d 33 32 37 30 3d 30 20 00 14 00 84 00 22 00 50 5c 4c 44 4b 4c 5c   ┆ P EJECT   R   P   `   P   h   PDCTP20 EQU *   p   P IFT EM3270=0      " P LDKL ┆
0x3de…42e             41 35 2c 53 54 42 32 5c 4c 4f 41 44 20 53 54 41 43 4b 20 42 41 53 45 20 00 14 00 9a 00 2c 00 50 5c 43 46 5c 41 35 2c 46 49 4e 54 45 52 5c 44 57 54 20 41 4c 52 45 41 44 59 20 49 4e 20 44 43 3a 54 41 42 20 3f 3f 3f 20 00 14 00 c0 00 0e 00 50   ┆A5,STB2 LOAD STACK BASE      , P CF A5,FINTER DWT ALREADY IN DC:TAB ???        P┆
0x42e…47e             5c 4c 44 52 5c 41 33 2c 41 33 00 14 00 f0 00 1a 00 50 5c 52 46 28 4e 5a 29 5c 44 43 54 50 33 30 5c 59 45 53 21 21 21 20 00 14 01 02 00 08 00 50 5c 58 49 46 00 14 01 20 00 24 00 50 5c 53 54 52 5c 41 36 2c 41 31 5c 49 4e 53 45 52 54 20 44 57   ┆ LDR A3,A3       P RF(NZ) DCTP30 YES!!!        P XIF     $ P STR A6,A1 INSERT DW┆
0x47e…4ce             54 20 49 4e 20 44 43 3a 54 41 42 20 00 14 01 2c 00 0e 00 50 5c 4c 44 4b 5c 41 31 2c 32 20 00 14 01 54 00 2a 00 50 5c 41 44 53 5c 41 31 2c 44 43 3a 49 4e 5c 55 50 44 41 54 45 20 44 43 3a 54 41 42 20 49 4e 20 50 4f 49 4e 54 45 52 00 14 01 66   ┆T IN DC:TAB    ,   P LDK A1,2    T * P ADS A1,DC:IN UPDATE DC:TAB IN POINTER   f┆

Reduced view