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

⟦b4fe3b4cb⟧

    Length: 1506 (0x5e2)
    Notes: pts_type(SC)
    Names: »DW1501.SC«

Derivation

└─⟦025d39960⟧ Bits:30009672 Philips computer tape "600133"
    └─⟦this⟧ »M:DSB/DW1501.SC« 

PTS(SC)

	IDENT DW1501 	REL 9.2 79-11-16  870105040920 

* 
*   DEVICE WORK TABLE FOR DATA-COMMUNICATION DEVICE 1 
* 
	ENTRY	DW1501	TABLE ENTRY 
	EXTRN	DC15AD	POINTER TO ADDRESS-BLOCK
* 
MMUPAG	EQU	1
* 
DW1501	EQU	*	TABLE ENTRY
	DATA	0	CHANNEL PARAMETER 
	DATA	/8000	STATUS./8000 MEANS DEVICE READY 
	DATA	0	ECB-ADDRESS 
	DATA	DWTEND-DW1501 
			RIGHT BYTE=ORDER 
	DATA	DC15AD	POINTER TO ADDRESS-BLOCK 
	DATA	'DC'	TTAB-ADDRESS 
	DATA	0	WAIT/ACTIVATE INDICATOR 
	DATA	0	TERMINAL QUEUE
* 
	IFT	MMUPAG=1 
	DATA	0	USER ECB ADDRESS
	DATA	DC:ECB	MMU ECB ADDRESS
	XIF
* 
	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	REQUEST TIMEOUT VALUE 
* 
	IFT	MMUPAG=1 
DC:ECB	EQU	*	MMU ECB
	DATA	0,0,0,0,0,0 
	XIF
* 
DWTEND	EQU	*
	END

HexDump

0x000…036 (0, 0, 400) Head {h00=0x0032, h01=0x0050, text=» IDENT DW1501  REL 9.2 79-11-16  870105040920 «, t00=0x0000, t01=0x0004}
0x036…03e             Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x03e…048             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0042}
0x048…086             Head {h00=0x003a, h01=0x0050, text=»*   DEVICE WORK TABLE FOR DATA-COMMUNICATION DEVICE 1 «, t00=0x0000, t01=0x004c}
0x086…090             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x008a}
0x090…0b2             Head {h00=0x001e, h01=0x0050, text=» ENTRY DW1501 TABLE ENTRY «, t00=0x0000, t01=0x0094}
0x0b2…0e0             Head {h00=0x002a, h01=0x0050, text=» EXTRN DC15AD POINTER TO ADDRESS-BLOCK«, t00=0x0000, t01=0x00b6}
0x0e0…0ea             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00e4}
0x0ea…0fe             Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 1«, t00=0x0000, t01=0x00ee}
0x0fe…108             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0102}
0x108…128             Head {h00=0x001c, h01=0x0050, text=»DW1501 EQU * TABLE ENTRY«, t00=0x0000, t01=0x010c}
0x128…14a             Head {h00=0x001e, h01=0x0050, text=» DATA 0 CHANNEL PARAMETER «, t00=0x0000, t01=0x012c}
0x14a…17e             Head {h00=0x0030, h01=0x0050, text=» DATA /8000 STATUS./8000 MEANS DEVICE READY «, t00=0x0000, t01=0x014e}
0x17e…19a             Head {h00=0x0018, h01=0x0050, text=» DATA 0 ECB-ADDRESS «, t00=0x0000, t01=0x0182}
0x19a…1b6             Head {h00=0x0018, h01=0x0050, text=» DATA DWTEND-DW1501 «, t00=0x0001, t01=0x000e}
0x1b6…1d2             Head {h00=0x0018, h01=0x0050, text=»   RIGHT BYTE=ORDER «, t00=0x0001, t01=0x002a}
0x1d2…200             Head {h00=0x002a, h01=0x0050, text=» DATA DC15AD POINTER TO ADDRESS-BLOCK «, t00=0x0001, t01=0x0046}
0x200…220             Head {h00=0x001c, h01=0x0050, text=» DATA 'DC' TTAB-ADDRESS «, t00=0x0001, t01=0x0074}
0x220…248             Head {h00=0x0024, h01=0x0050, text=» DATA 0 WAIT/ACTIVATE INDICATOR «, t00=0x0001, t01=0x0094}
0x248…266             Head {h00=0x001a, h01=0x0050, text=» DATA 0 TERMINAL QUEUE«, t00=0x0001, t01=0x00bc}
0x266…270             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00da}
0x270…286             Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0001, t01=0x00e4}
0x286…2a6             Head {h00=0x001c, h01=0x0050, text=» DATA 0 USER ECB ADDRESS«, t00=0x0001, t01=0x00fa}
0x2a6…2ca             Head {h00=0x0020, h01=0x0050, text=» DATA DC:ECB MMU ECB ADDRESS«, t00=0x0001, t01=0x011a}
0x2ca…2d6             Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0001, t01=0x013e}
0x2d6…2e0             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x014a}
0x2e0…2fe             Head {h00=0x001a, h01=0x0050, text=» DATA 0 TIMER POINTER «, t00=0x0001, t01=0x0154}
0x2fe…31a             Head {h00=0x0018, h01=0x0050, text=» DATA 0 WRITE QUEUE «, t00=0x0001, t01=0x0172}
0x31a…336             Head {h00=0x0018, h01=0x0050, text=» DATA 0 STATUS QUEUE«, t00=0x0001, t01=0x018e}
0x336…354             Head {h00=0x001a, h01=0x0050, text=» DATA 0 RECEIVE QUEUE «, t00=0x0002, t01=0x001a}
0x354…372             Head {h00=0x001a, h01=0x0050, text=» DATA 0 BUFFER ADDRESS«, t00=0x0002, t01=0x0038}
0x372…390             Head {h00=0x001a, h01=0x0050, text=» DATA 0 CURSOR ADDRESS«, t00=0x0002, t01=0x0056}
0x390…3b6             Head {h00=0x0022, h01=0x0050, text=» DATA 0 REQUEST TIMEOUT VALUE «, t00=0x0002, t01=0x0074}
0x3b6…3c0             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x009a}
0x3c0…3d6             Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0002, t01=0x00a4}
0x3d6…3f2             Head {h00=0x0018, h01=0x0050, text=»DC:ECB EQU * MMU ECB«, t00=0x0002, t01=0x00ba}
0x3f2…40c             Head {h00=0x0016, h01=0x0050, text=» DATA 0,0,0,0,0,0 «, t00=0x0002, t01=0x00d6}
0x40c…418             Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0002, t01=0x00f0}
0x418…422             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00fc}
0x422…436             Head {h00=0x0010, h01=0x0050, text=»DWTEND EQU *«, t00=0x0002, t01=0x0106}
0x436…442             Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0002, t01=0x011a}
0x442…446             Head {h00=0x4004, h01=0x0000}
0x446…44a             00 02 01 26                                                                                                                                                                                                                                       ┆   &┆
0x44a…452 (3, 1, 8)   20 04 00 00 00 03 00 04                                                                                                                                                                                                                           ┆        ┆
0x452…4a2 (4, 0, 400) 00 3a 00 50 5c 53 55 52 5c 41 34 2c 41 31 5c 41 44 4a 55 53 54 20 46 4f 52 20 4f 4c 44 20 52 45 4c 4f 43 41 54 49 4f 4e 20 28 4f 4c 44 20 54 3a 41 2d 41 44 44 52 45 53 53 29 00 74 00 04 00 10 00 50 4d 4f 56 54 30 35 5c 45 51 55 5c 2a 00 74   ┆ : P SUR A4,A1 ADJUST FOR OLD RELOCATION (OLD T:A-ADDRESS) t     PMOVT05 EQU * t┆
0x4a2…4f2             00 42 00 16 00 50 5c 41 44 53 5c 41 34 2c 46 43 42 44 44 31 2c 41 33 20 00 74 00 56 00 16 00 50 5c 41 44 53 5c 41 34 2c 46 43 42 44 44 32 2c 41 33 20 00 74 00 70 00 12 00 50 4d 4f 56 54 31 30 5c 52 54 4e 5c 41 31 34 00 74 00 8a 00 08 00 50   ┆ B   P ADS A4,FCBDD1,A3  t V   P ADS A4,FCBDD2,A3  t p   PMOVT10 RTN A14 t     P┆
0x4f2…542             5c 58 49 46 00 74 00 a0 00 18 00 50 5c 49 46 54 20 43 52 45 44 49 54 2b 4d 4d 55 50 41 47 3d 32 00 74 00 ac 00 04 00 50 00 74 00 c8 00 1e 00 50 5c 45 4c 52 5c 41 31 2c 41 38 5c 47 45 54 20 54 3a 41 2d 41 44 44 52 45 53 53 00 74 00 d0 00 28   ┆ XIF t     P IFT CREDIT+MMUPAG=2 t     P t     P ELR A1,A8 GET T:A-ADDRESS t   (┆
0x542…592             00 50 5c 45 4c 5c 41 33 2c 57 41 54 4c 45 4e 2c 41 31 32 5c 47 45 54 20 4c 45 4e 47 54 48 20 4f 46 20 57 41 54 20 00 74 00 f2 00 14 00 50 5c 53 4c 4c 5c 41 33 2c 32 5c 42 59 54 45 53 20 00 74 01 1e 00 12 00 50 5c 45 4c 5c 41 31 30 2c 43 49   ┆ P EL A3,WATLEN,A12 GET LENGTH OF WAT  t     P SLL A3,2 BYTES  t     P EL A10,CI┆
0x592…5e2             41 2c 41 31 00 74 01 36 00 24 00 50 5c 53 55 52 5c 41 33 2c 41 31 30 5c 41 44 44 20 44 49 53 50 4c 2e 20 54 4f 20 53 54 41 52 54 20 00 74 01 4c 00 1c 00 50 5c 41 44 4b 5c 41 33 2c 57 41 54 46 53 54 5c 41 33 3d 4c 45 4e 47 54 48 00 74 01 74   ┆A,A1 t 6 $ P SUR A3,A10 ADD DISPL. TO START  t L   P ADK A3,WATFST A3=LENGTH t t┆

Reduced view