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

⟦8a0227d11⟧

    Length: 1500 (0x5dc)
    Notes: pts_type(SC)
    Names: »DW1501.SC«

Derivation

└─⟦173d42e04⟧ Bits:30009663 Philips computer tape "600105"
    └─⟦this⟧ »TOSSWORK/DW1501.SC« 

PTS(SC)

	IDENT DW1501 	REL 10.0 80-03-14 870105041000 

* 
*   DEVICE WORK TABLE FOR DATA-COMMUNICATION DEVICE 1 
* 
	ENTRY	DW1501	TABLE ENTRY 
	EXTRN	DC15AD	POINTER TO ADDRESS-BLOCK
* 
MMUPAG	EQU	0
* 
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 
* 
	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 10.0 80-03-14 870105041000 «, 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 0«, 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…3b0             Head {h00=0x001c, h01=0x0050, text=» DATA 0 REQUEST TIMEOUT «, t00=0x0002, t01=0x0074}
0x3b0…3ba             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0094}
0x3ba…3d0             Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0002, t01=0x009e}
0x3d0…3ec             Head {h00=0x0018, h01=0x0050, text=»DC:ECB EQU * MMU ECB«, t00=0x0002, t01=0x00b4}
0x3ec…406             Head {h00=0x0016, h01=0x0050, text=» DATA 0,0,0,0,0,0 «, t00=0x0002, t01=0x00d0}
0x406…412             Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0002, t01=0x00ea}
0x412…41c             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00f6}
0x41c…430             Head {h00=0x0010, h01=0x0050, text=»DWTEND EQU *«, t00=0x0002, t01=0x0100}
0x430…43c             Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0002, t01=0x0114}
0x43c…440             Head {h00=0x4004, h01=0x0000}
0x440…444             00 02 01 20                                                                                                                                                                                                                                       ┆    ┆
0x444…44c (3, 1, 8)   20 04 00 00 00 03 00 04                                                                                                                                                                                                                           ┆        ┆
0x44c…49c (4, 0, 400) 45 4e 44 20 4c 2f 4e 43 56 20 00 4b 01 84 00 0e 00 50 5c 4c 44 52 5c 41 32 2c 41 33 00 4c 00 12 00 10 00 50 5c 41 4e 4b 5c 41 32 2c 2f 37 37 20 00 4c 00 24 00 1c 00 50 5c 43 46 5c 41 35 2c 4f 55 54 5c 53 45 4e 44 20 43 50 4a 2f 43 50 44 20   ┆END L/NCV  K     P LDR A2,A3 L     P ANK A2,/77  L $   P CF A5,OUT SEND CPJ/CPD ┆
0x49c…4ec             00 4c 00 38 00 2c 00 50 5c 4c 43 5c 41 32 2c 44 57 54 41 50 4a 2c 41 36 5c 47 45 54 20 41 43 54 55 41 4c 20 50 4f 53 20 4a 4f 55 52 4e 41 4c 20 00 4c 00 58 00 18 00 50 5c 43 46 5c 41 35 2c 4f 55 54 5c 41 4e 44 20 53 45 4e 44 20 00 4c 00 88   ┆ L 8 , P LC A2,DWTAPJ,A6 GET ACTUAL POS JOURNAL  L X   P CF A5,OUT AND SEND  L  ┆
0x4ec…53c             00 2c 00 50 5c 4c 43 5c 41 32 2c 44 57 54 41 50 44 2c 41 36 5c 47 45 54 20 41 43 54 55 41 4c 20 50 4f 53 20 44 4f 43 55 4d 45 4e 54 00 4c 00 a4 00 1c 00 50 5c 4c 44 52 5c 41 33 2c 41 32 5c 53 41 56 45 20 44 4f 43 20 50 4f 53 20 00 4c 00 d4   ┆ , P LC A2,DWTAPD,A6 GET ACTUAL POS DOCUMENT L     P LDR A3,A2 SAVE DOC POS  L  ┆
0x53c…58c             00 1c 00 50 5c 41 4e 4b 5c 41 32 2c 2f 33 46 5c 4d 41 53 4b 20 4f 46 46 20 4d 53 42 00 4c 00 f4 00 18 00 50 5c 43 46 5c 41 35 2c 4f 55 54 5c 53 45 4e 44 20 41 50 44 20 00 4c 01 14 00 20 00 50 5c 4c 44 52 5c 41 32 2c 41 33 5c 47 45 54 20 44   ┆   P ANK A2,/3F MASK OFF MSB L     P CF A5,OUT SEND APD  L     P LDR A2,A3 GET D┆
0x58c…5dc             4f 43 20 50 4f 53 20 42 41 43 4b 20 00 4c 01 30 00 1c 00 50 5c 41 4e 4b 5c 41 32 2c 2f 34 30 5c 4d 41 53 4b 20 4f 55 54 20 4d 53 42 00 4c 01 54 00 18 00 50 5c 43 46 5c 41 35 2c 4f 55 54 5c 53 45 4e 44 20 41 50 36 20 00 4c 01 74 00 28 00 50   ┆OC POS BACK  L 0   P ANK A2,/40 MASK OUT MSB L T   P CF A5,OUT SEND AP6  L t ( P┆

Reduced view