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

⟦1ff06b7d4⟧ 

    Length: 1596 (0x63c)
    Notes: pts_type(SC)
    Names: »DWDC25.SC«

Derivation

└─⟦18bf30ff4⟧ Bits:30009692 Philips computer tape "600409"
    └─⟦this⟧ »BDKMON/DWDC25.SC«

PTS(SC)

	IDENT DWDC25 	REL 8.3 79-06-25  870105040830 
* 
*   DEVICE WORK TABLE FOR DATA-COMMUNICATION DEVICE 1 
* 
	ENTRY	DWDC25	TABLE ENTRY 
	EXTRN	DC15AD	POINTER TO ADDRESS-BLOCK
* 
DWDC25	EQU	*	TABLE ENTRY
	DATA	0	CHANNEL PARAMETER 
	DATA	/8000	STATUS./8000 MEANS DEVICE READY 
	DATA	0	ECB-ADDRESS 
	DATA	DWTEND-DWDC25 
			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
DWTEND	EQU	*
	END

HexDump

0x000…036 (0, 0, 400) Head {h00=0x0032, h01=0x0050, text=» IDENT DWDC25  REL 8.3 79-06-25  870105040830 «, t00=0x0000, t01=0x0004}
0x036…040             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x003a}
0x040…07e             Head {h00=0x003a, h01=0x0050, text=»*   DEVICE WORK TABLE FOR DATA-COMMUNICATION DEVICE 1 «, t00=0x0000, t01=0x0044}
0x07e…088             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0082}
0x088…0aa             Head {h00=0x001e, h01=0x0050, text=» ENTRY DWDC25 TABLE ENTRY «, t00=0x0000, t01=0x008c}
0x0aa…0d8             Head {h00=0x002a, h01=0x0050, text=» EXTRN DC15AD POINTER TO ADDRESS-BLOCK«, t00=0x0000, t01=0x00ae}
0x0d8…0e2             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00dc}
0x0e2…102             Head {h00=0x001c, h01=0x0050, text=»DWDC25 EQU * TABLE ENTRY«, t00=0x0000, t01=0x00e6}
0x102…124             Head {h00=0x001e, h01=0x0050, text=» DATA 0 CHANNEL PARAMETER «, t00=0x0000, t01=0x0106}
0x124…158             Head {h00=0x0030, h01=0x0050, text=» DATA /8000 STATUS./8000 MEANS DEVICE READY «, t00=0x0000, t01=0x0128}
0x158…174             Head {h00=0x0018, h01=0x0050, text=» DATA 0 ECB-ADDRESS «, t00=0x0000, t01=0x015c}
0x174…190             Head {h00=0x0018, h01=0x0050, text=» DATA DWTEND-DWDC25 «, t00=0x0000, t01=0x0178}
0x190…1ac (1, 2, 392) Head {h00=0x0018, h01=0x0050, text=»   RIGHT BYTE=ORDER «, t00=0x0001, t01=0x0004}
0x1ac…1da             Head {h00=0x002a, h01=0x0050, text=» DATA DC15AD POINTER TO ADDRESS-BLOCK «, t00=0x0001, t01=0x0020}
0x1da…1fa             Head {h00=0x001c, h01=0x0050, text=» DATA 'DC' TTAB-ADDRESS «, t00=0x0001, t01=0x004e}
0x1fa…222             Head {h00=0x0024, h01=0x0050, text=» DATA 0 WAIT/ACTIVATE INDICATOR «, t00=0x0001, t01=0x006e}
0x222…240             Head {h00=0x001a, h01=0x0050, text=» DATA 0 TERMINAL QUEUE«, t00=0x0001, t01=0x0096}
0x240…25e             Head {h00=0x001a, h01=0x0050, text=» DATA 0 TIMER POINTER «, t00=0x0001, t01=0x00b4}
0x25e…27a             Head {h00=0x0018, h01=0x0050, text=» DATA 0 WRITE QUEUE «, t00=0x0001, t01=0x00d2}
0x27a…296             Head {h00=0x0018, h01=0x0050, text=» DATA 0 STATUS QUEUE«, t00=0x0001, t01=0x00ee}
0x296…2b4             Head {h00=0x001a, h01=0x0050, text=» DATA 0 RECEIVE QUEUE «, t00=0x0001, t01=0x010a}
0x2b4…2d2             Head {h00=0x001a, h01=0x0050, text=» DATA 0 BUFFER ADDRESS«, t00=0x0001, t01=0x0128}
0x2d2…2f0             Head {h00=0x001a, h01=0x0050, text=» DATA 0 CURSOR ADDRESS«, t00=0x0001, t01=0x0146}
0x2f0…304             Head {h00=0x0010, h01=0x0050, text=»DWTEND EQU *«, t00=0x0001, t01=0x0164}
0x304…310             Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0001, t01=0x0178}
0x310…314             Head {h00=0x4004, h01=0x0000}
0x314…318             00 01 01 84                                                                                                                                                                                                                                       ┆    ┆
0x318…320 (2, 1, 8)   20 04 00 00 00 02 00 04                                                                                                                                                                                                                           ┆        ┆
0x320…370 (3, 0, 398) 44 5c 41 31 2c 46 42 4c 53 54 5c 43 4f 4d 50 55 54 45 20 4e 45 57 20 49 4e 44 45 58 00 62 01 8e 00 0e 00 50 5c 53 55 52 5c 41 31 2c 41 34 00 63 00 24 00 10 00 50 5c 53 54 5c 41 31 2c 46 42 41 58 20 00 63 00 36 00 10 00 50 52 44 4d 30 35 30   ┆D A1,FBLST COMPUTE NEW INDEX b     P SUR A1,A4 c $   P ST A1,FBAX  c 6   PRDM050┆
0x370…3c0             5c 45 51 55 5c 2a 00 63 00 4a 00 20 00 50 5c 41 44 5c 41 34 2c 46 42 41 58 5c 41 44 44 20 42 55 46 46 45 52 20 49 4e 44 45 58 00 63 00 5e 00 28 00 50 5c 53 54 5c 41 34 2c 46 42 4c 53 54 5c 52 45 4d 45 4d 42 45 52 20 53 54 41 52 54 20 4f 46   ┆ EQU * c J   P AD A4,FBAX ADD BUFFER INDEX c ^ ( P ST A4,FBLST REMEMBER START OF┆
0x3c0…410             20 42 4c 4f 43 4b 00 63 00 82 00 10 00 50 52 44 4d 30 37 35 5c 45 51 55 5c 2a 00 63 00 ae 00 0c 00 50 5c 43 4d 5c 58 53 54 41 00 63 00 c2 00 18 00 50 5c 4c 44 4b 5c 41 37 2c 30 5c 52 45 53 45 54 20 4c 52 43 20 00 63 00 d2 00 04 00 50 00 63   ┆ BLOCK c     PRDM075 EQU * c     P CM XSTA c     P LDK A7,0 RESET LRC  c     P c┆
0x410…460             00 ee 00 12 00 50 5c 49 46 54 5c 49 42 4d 43 48 52 3d 31 20 00 63 00 f6 00 10 00 50 5c 4c 44 5c 41 31 2c 46 42 41 58 20 00 63 01 0c 00 22 00 50 5c 52 46 28 4e 5a 29 5c 52 44 4d 31 30 30 5c 4e 4f 54 20 46 49 52 53 54 20 42 4c 4f 43 4b 00 63   ┆     P IFT IBMCHR=1  c     P LD A1,FBAX  c   " P RF(NZ) RDM100 NOT FIRST BLOCK c┆
0x460…4ae             01 20 00 10 00 50 5c 43 46 5c 41 35 2c 52 45 41 44 50 00 63 01 46 00 20 00 50 5c 52 46 28 4e 5a 29 5c 52 44 4d 31 32 30 5c 50 41 52 49 54 59 20 45 52 52 4f 52 20 00 63 01 5a 00 10 00 50 5c 43 57 4b 5c 41 32 2c 45 53 43 20 00 63 01 7e         ┆     P CF A5,READP c F   P RF(NZ) RDM120 PARITY ERROR  c Z   P CWK A2,ESC  c ~┆
0x4ae…4fe (4, 0, 398) 00 12 00 50 5c 52 46 28 4e 45 29 5c 52 44 4d 31 31 30 00 64 00 04 00 2a 00 50 5c 43 46 5c 41 35 2c 52 45 41 44 50 5c 53 4b 49 50 20 4e 45 58 54 20 54 57 4f 20 43 48 41 52 41 43 54 45 52 53 20 00 64 00 1a 00 10 00 50 5c 43 46 5c 41 35 2c 52   ┆   P RF(NE) RDM110 d   * P CF A5,READP SKIP NEXT TWO CHARACTERS  d     P CF A5,R┆
0x4fe…54e             45 41 44 50 00 64 00 48 00 08 00 50 5c 58 49 46 00 64 00 5c 00 10 00 50 52 44 4d 31 30 30 5c 45 51 55 5c 2a 00 64 00 68 00 24 00 50 5c 43 46 5c 41 35 2c 52 45 41 44 50 5c 52 45 41 44 20 4f 4e 45 20 43 48 41 52 41 43 54 45 52 20 00 64 00 7c   ┆EADP d H   P XIF d     PRDM100 EQU * d h $ P CF A5,READP READ ONE CHARACTER  d |┆
0x54e…59e             00 20 00 50 5c 52 46 28 4e 5a 29 5c 52 44 4d 31 32 30 5c 50 41 52 49 54 59 20 45 52 52 4f 52 20 00 64 00 a4 00 10 00 50 52 44 4d 31 31 30 5c 45 51 55 5c 2a 00 64 00 c8 00 10 00 50 5c 43 57 4b 5c 41 32 2c 45 54 58 20 00 64 00 dc 00 1e 00 50   ┆   P RF(NZ) RDM120 PARITY ERROR  d     PRDM110 EQU * d     P CWK A2,ETX  d     P┆
0x59e…5ee             5c 52 46 28 45 29 5c 52 44 4d 31 33 30 5c 45 54 58 20 52 45 43 45 49 56 45 44 00 64 00 f0 00 10 00 50 5c 43 57 4b 5c 41 32 2c 45 54 42 20 00 64 01 12 00 1e 00 50 5c 52 46 28 45 29 5c 52 44 4d 31 36 30 5c 45 54 42 20 52 45 43 45 49 56 45 44   ┆ RF(E) RDM130 ETX RECEIVED d     P CWK A2,ETB  d     P RF(E) RDM160 ETB RECEIVED┆
0x5ee…63c             00 64 01 26 00 10 00 50 5c 43 57 4b 5c 41 32 2c 49 54 42 20 00 64 01 48 00 1e 00 50 5c 52 46 28 45 29 5c 52 44 4d 31 37 30 5c 49 54 42 20 52 45 43 45 49 56 45 44 00 64 01 5c 00 10 00 50 5c 43 57 4b 5c 41 32 2c 45 4e 51 20 00 64 01 7e         ┆ d &   P CWK A2,ITB  d H   P RF(E) RDM170 ITB RECEIVED d     P CWK A2,ENQ  d ~┆

Reduced view