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

⟦a03ae9654⟧

    Length: 1552 (0x610)
    Notes: pts_type(SC)
    Names: »DVDY00.SC«

Derivation

└─⟦35fda6e03⟧ Bits:30009701 Philips computer tape "BARCLAY"
    └─⟦this⟧ »M:DEMO/DVDY00.SC« 

PTS(SC)

	IDENT DVDY00 	REL 10.0 80-03-14 870105041000 

*  DEVICE WORK TABLE FOR VIDEO DISPLAY
* 
	ENTRY	DVDY00	TABLE ENTRY 
* 
* 
	EXTRN	DYAD	POINTER TO ADDRESS BLOCK
MMUPAG	EQU	1
* 
DVDY00	EQU	*	TABLE ENTRY
	DATA	/C020	CHANNEL PARAMETER 
	DATA	/8000	STATUS./8000 MEANS DEVICE READY 
	DATA	0	ECB ADDRESS 
	DATA	DWTEND-DVDY00	ORDER 
	DATA	DYAD	POINTER TO ADDRESS-BLOCK 
	DATA	/C459	TTAB-ADDRESS
	DATA	0	WAIT/ACTIVATE INDICATOR 
	DATA	0	TERMINAL QUEUE
	IFT	MMUPAG=1 
	DATA	0	SAVE AREA USER ECB ADDRESS
	DATA	DEVECB	MMU ECB ADDRESS
	XIF
	DATA	0	OUTPUT QUEUE LINK 
	DATA	0	SAVE AREA FOR A3
	DATA	0	SAVE AREA FOR A4
	DATA	0	SAVE AREA FOR A5
	RES	4	DWT-STACK
	DATA	0	TIMER POINTER 
	DATA	/101	CURSOR POINTER 
	DATA	/1850	LEFT BYTE=NUMBER OF LINES 
			RIGHT BYTE=CHARACTERS/LINE 
	DATA	0	BUFFER INDEX
	IFT	MMUPAG=1 
DEVECB	DATA	0,0,0,0,0,0 
	XIF
DWTEND	EQU	*
* 
* 
	END

HexDump

0x000…036 (0, 0, 400) Head {h00=0x0032, h01=0x0050, text=» IDENT DVDY00  REL 10.0 80-03-14 870105041000 «, t00=0x0000, t01=0x0004}
0x036…03e             Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x03e…06c             Head {h00=0x002a, h01=0x0050, text=»*  DEVICE WORK TABLE FOR VIDEO DISPLAY«, t00=0x0000, t01=0x0042}
0x06c…076             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0070}
0x076…098             Head {h00=0x001e, h01=0x0050, text=» ENTRY DVDY00 TABLE ENTRY «, t00=0x0000, t01=0x007a}
0x098…0a2             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x009c}
0x0a2…0ac             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00a6}
0x0ac…0d8             Head {h00=0x0028, h01=0x0050, text=» EXTRN DYAD POINTER TO ADDRESS BLOCK«, t00=0x0000, t01=0x00b0}
0x0d8…0ec             Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 1«, t00=0x0000, t01=0x00dc}
0x0ec…0f6             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00f0}
0x0f6…116             Head {h00=0x001c, h01=0x0050, text=»DVDY00 EQU * TABLE ENTRY«, t00=0x0000, t01=0x00fa}
0x116…13c             Head {h00=0x0022, h01=0x0050, text=» DATA /C020 CHANNEL PARAMETER «, t00=0x0000, t01=0x011a}
0x13c…170             Head {h00=0x0030, h01=0x0050, text=» DATA /8000 STATUS./8000 MEANS DEVICE READY «, t00=0x0000, t01=0x0140}
0x170…18c             Head {h00=0x0018, h01=0x0050, text=» DATA 0 ECB ADDRESS «, t00=0x0000, t01=0x0174}
0x18c…1ae             Head {h00=0x001e, h01=0x0050, text=» DATA DWTEND-DVDY00 ORDER «, t00=0x0000, t01=0x0190}
0x1ae…1da             Head {h00=0x0028, h01=0x0050, text=» DATA DYAD POINTER TO ADDRESS-BLOCK «, t00=0x0001, t01=0x0022}
0x1da…1fa             Head {h00=0x001c, h01=0x0050, text=» DATA /C459 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…256             Head {h00=0x0012, h01=0x000d, text=» IFT MMUPAG=1 «, t00=0x0001, t01=0x00b4}
0x256…280             Head {h00=0x0026, h01=0x0022, text=» DATA 0 SAVE AREA USER ECB ADDRESS«, t00=0x0001, t01=0x00ca}
0x280…2a4             Head {h00=0x0020, h01=0x001c, text=» DATA DEVECB MMU ECB ADDRESS«, t00=0x0001, t01=0x00f4}
0x2a4…2b0             Head {h00=0x0008, h01=0x0004, text=» XIF«, t00=0x0001, t01=0x0118}
0x2b0…2d2             Head {h00=0x001e, h01=0x0050, text=» DATA 0 OUTPUT QUEUE LINK «, t00=0x0001, t01=0x0124}
0x2d2…2f2             Head {h00=0x001c, h01=0x0050, text=» DATA 0 SAVE AREA FOR A3«, t00=0x0001, t01=0x0146}
0x2f2…312             Head {h00=0x001c, h01=0x0050, text=» DATA 0 SAVE AREA FOR A4«, t00=0x0001, t01=0x0166}
0x312…332             Head {h00=0x001c, h01=0x0050, text=» DATA 0 SAVE AREA FOR A5«, t00=0x0001, t01=0x0186}
0x332…34a             Head {h00=0x0014, h01=0x0050, text=» RES 4 DWT-STACK«, t00=0x0002, t01=0x0016}
0x34a…368             Head {h00=0x001a, h01=0x0050, text=» DATA 0 TIMER POINTER «, t00=0x0002, t01=0x002e}
0x368…38a             Head {h00=0x001e, h01=0x0050, text=» DATA /101 CURSOR POINTER «, t00=0x0002, t01=0x004c}
0x38a…3b8             Head {h00=0x002a, h01=0x0050, text=» DATA /1850 LEFT BYTE=NUMBER OF LINES «, t00=0x0002, t01=0x006e}
0x3b8…3de             Head {h00=0x0022, h01=0x0050, text=»   RIGHT BYTE=CHARACTERS/LINE «, t00=0x0002, t01=0x009c}
0x3de…3fa             Head {h00=0x0018, h01=0x0050, text=» DATA 0 BUFFER INDEX«, t00=0x0002, t01=0x00c2}
0x3fa…410             Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0002, t01=0x00de}
0x410…430             Head {h00=0x001c, h01=0x0050, text=»DEVECB DATA 0,0,0,0,0,0 «, t00=0x0002, t01=0x00f4}
0x430…43c             Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0002, t01=0x0114}
0x43c…450             Head {h00=0x0010, h01=0x0050, text=»DWTEND EQU *«, t00=0x0002, t01=0x0120}
0x450…45a             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0134}
0x45a…464             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x013e}
0x464…470             Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0002, t01=0x0148}
0x470…474             Head {h00=0x4004, h01=0x0000}
0x474…478             00 02 01 54                                                                                                                                                                                                                                       ┆   T┆
0x478…480 (3, 1, 8)   20 04 00 00 00 03 00 04                                                                                                                                                                                                                           ┆        ┆
0x480…4d0 (4, 0, 400) 00 06 00 50 2a 20 00 24 00 04 00 06 00 50 2a 20 00 24 00 0e 00 28 00 50 53 54 4f 52 45 5c 4c 44 5c 41 34 2c 32 2c 41 38 5c 47 45 54 20 42 55 46 46 45 52 20 41 44 44 52 45 53 53 20 00 24 00 18 00 24 00 50 5c 41 44 52 5c 41 34 2c 41 33 5c 47   ┆   P*  $     P*  $   ( PSTORE LD A4,2,A8 GET BUFFER ADDRESS  $   $ P ADR A4,A3 G┆
0x4d0…520             45 54 20 43 48 41 52 41 43 54 45 52 20 41 44 44 52 45 53 53 00 24 00 44 00 1e 00 50 5c 53 43 52 5c 41 32 2c 41 34 5c 53 54 4f 52 45 20 43 48 41 52 41 43 54 45 52 00 24 00 6c 00 24 00 50 5c 41 44 4b 5c 41 33 2c 31 5c 49 4e 43 52 45 4d 45 4e   ┆ET CHARACTER ADDRESS $ D   P SCR A2,A4 STORE CHARACTER $ l $ P ADK A3,1 INCREMEN┆
0x520…570             54 20 42 55 46 46 45 52 20 49 4e 44 45 58 00 24 00 8e 00 0c 00 50 5c 52 54 4e 5c 41 35 20 00 24 00 b6 00 06 00 50 2a 20 00 24 00 c6 00 06 00 50 2a 20 00 24 00 d0 00 06 00 50 2a 20 00 24 00 da 00 12 00 50 5c 49 46 54 5c 54 49 4d 4f 55 54 3d   ┆T BUFFER INDEX $     P RTN A5  $     P*  $     P*  $     P*  $     P IFT TIMOUT=┆
0x570…5c0             31 20 00 24 00 e4 00 06 00 50 2a 20 00 24 00 fa 00 06 00 50 2a 20 00 24 01 04 00 16 00 50 2a 20 20 20 54 49 4d 4f 55 54 20 52 4f 55 54 49 4e 45 00 24 01 0e 00 06 00 50 2a 20 00 24 01 28 00 06 00 50 2a 20 00 24 01 32 00 10 00 50 54 57 54 55   ┆1  $     P*  $     P*  $     P*   TIMOUT ROUTINE $     P*  $ (   P*  $ 2   PTWTU┆
0x5c0…610             54 5c 45 51 55 5c 2a 20 00 24 01 3c 00 1e 00 50 5c 4c 44 52 5c 41 36 2c 41 31 5c 47 45 54 20 44 57 54 2d 41 44 44 52 45 53 53 00 24 01 50 00 24 00 50 5c 4c 44 4b 5c 41 31 2c 2f 34 30 5c 54 49 4d 45 20 4f 55 54 20 52 45 54 55 52 4e 20 43 4f   ┆T EQU *  $ <   P LDR A6,A1 GET DWT-ADDRESS $ P $ P LDK A1,/40 TIME OUT RETURN CO┆

Reduced view