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

⟦0a076bd01⟧ 

    Length: 1600 (0x640)
    Notes: pts_type(SC)
    Names: »DWDC06.SC«

Derivation

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

PTS(SC)

	IDENT DWDC06 	REL 8.3 79-06-25  870105040830 
* 
*   DEVICE WORK TABLE FOR DATA-COMMUNICATION DEVICE 1 
* 
	ENTRY	DWDC06	TABLE ENTRY 
	EXTRN	DC15AD	POINTER TO ADDRESS-BLOCK
* 
DWDC06	EQU	*	TABLE ENTRY
	DATA	0	CHANNEL PARAMETER 
	DATA	/8000	STATUS./8000 MEANS DEVICE READY 
	DATA	0	ECB-ADDRESS 
	DATA	DWTEND-DWDC06 
			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 DWDC06  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 DWDC06 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=»DWDC06 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-DWDC06 «, 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, 400) 53 54 41 43 4b 20 42 41 53 45 00 12 01 76 00 12 00 50 5c 4c 44 4b 4c 5c 41 31 2c 4c 4f 4f 50 20 00 13 00 12 00 10 00 50 5c 53 54 52 5c 41 31 2c 41 31 35 20 00 13 00 28 00 12 00 50 5c 4c 44 4b 4c 5c 41 31 2c 2f 46 43 30 30 00 13 00 3c 00 26   ┆STACK BASE   v   P LDKL A1,LOOP        P STR A1,A15    (   P LDKL A1,/FC00   < &┆
0x370…3c0             00 50 5c 53 54 52 5c 41 31 2c 41 31 35 5c 41 44 4a 55 53 54 20 53 54 41 43 4b 20 46 4f 52 20 4c 4f 4f 50 20 00 13 00 52 00 10 00 50 5c 53 55 4b 4c 5c 41 31 35 2c 32 38 00 13 00 7c 00 0e 00 50 5c 4c 44 4b 5c 41 31 2c 30 20 00 13 00 90 00 10   ┆ P STR A1,A15 ADJUST STACK FOR LOOP    R   P SUKL A15,28   |   P LDK A1,0       ┆
0x3c0…410             00 50 5c 53 54 52 5c 41 31 2c 41 31 35 20 00 13 00 a2 00 0a 00 50 5c 45 4a 45 43 54 00 13 00 b6 00 04 00 50 00 13 00 c4 00 06 00 50 2a 20 00 13 00 cc 00 1a 00 50 2a 5c 46 49 4e 44 20 46 49 52 53 54 20 55 53 45 52 20 54 41 53 4b 00 13 00 d6   ┆ P STR A1,A15        P EJECT       P       P*        P* FIND FIRST USER TASK    ┆
0x410…460             00 06 00 50 2a 20 00 13 00 f4 00 04 00 50 00 13 00 fe 00 1e 00 50 5c 4c 44 5c 41 31 2c 54 43 54 41 42 5c 54 43 54 41 42 20 41 44 44 52 45 53 53 00 13 01 06 00 1c 00 50 5c 4c 44 52 2a 5c 41 34 2c 41 31 5c 54 43 54 41 42 20 4c 45 4e 47 54 48   ┆   P*        P       P LD A1,TCTAB TCTAB ADDRESS       P LDR* A4,A1 TCTAB LENGTH┆
0x460…4b0             00 13 01 28 00 14 00 50 49 4e 49 4d 35 30 5c 41 44 4b 5c 41 31 2c 32 20 00 13 01 48 00 0e 00 50 5c 53 55 4b 5c 41 34 2c 32 20 00 13 01 60 00 12 00 50 5c 52 46 28 4e 5a 29 5c 49 4e 49 4d 36 30 00 13 01 72 00 1c 00 50 5c 48 4c 54 5c 5c 4e 4f   ┆   (   PINIM50 ADK A1,2    H   P SUK A4,2    `   P RF(NZ) INIM60   r   P HLT  NO┆
0x4b0…500 (4, 0, 400) 20 55 53 45 52 20 54 41 53 4b 20 46 4f 55 4e 44 00 13 01 88 00 04 00 50 00 14 00 18 00 22 00 50 49 4e 49 4d 36 30 5c 4c 44 52 2a 5c 41 35 2c 41 31 5c 54 54 41 42 20 41 44 44 52 45 53 53 00 14 00 20 00 28 00 50 5c 4c 44 5c 41 32 2c 54 54 42   ┆ USER TASK FOUND       P     " PINIM60 LDR* A5,A1 TTAB ADDRESS     ( P LD A2,TTB┆
0x500…550             3a 49 44 2c 41 35 5c 54 41 53 4b 20 49 44 45 4e 54 49 46 49 43 41 54 49 4f 4e 00 14 00 46 00 1e 00 50 5c 52 42 28 4e 29 5c 49 4e 49 4d 35 30 5c 4d 4f 4e 49 54 4f 52 20 54 41 53 4b 00 14 00 72 00 2c 00 50 5c 53 54 5c 41 35 2c 50 52 55 4e 5c   ┆:ID,A5 TASK IDENTIFICATION   F   P RB(N) INIM50 MONITOR TASK   r , P ST A5,PRUN ┆
0x550…5a0             53 45 54 20 54 54 41 42 20 46 4f 52 20 52 55 4e 4e 49 4e 47 20 50 52 4f 47 52 41 4d 00 14 00 94 00 0c 00 50 5c 43 4d 52 5c 41 35 20 00 14 00 c4 00 24 00 50 5c 4c 44 5c 41 37 2c 54 54 42 3a 53 54 2c 41 35 5c 47 45 54 20 55 53 45 52 20 4c 45   ┆SET TTAB FOR RUNNING PROGRAM       P CMR A5      $ P LD A7,TTB:ST,A5 GET USER LE┆
0x5a0…5f0             56 45 4c 20 00 14 00 d4 00 0e 00 50 5c 53 52 43 5c 41 37 2c 36 20 00 14 00 fc 00 0a 00 50 5c 45 4a 45 43 54 00 14 01 0e 00 04 00 50 00 14 01 1c 00 06 00 50 2a 20 00 14 01 24 00 12 00 50 2a 5c 53 54 41 52 54 20 53 59 53 54 45 4d 00 14 01 2e   ┆VEL        P SRC A7,6        P EJECT       P       P*    $   P* START SYSTEM   .┆
0x5f0…640             00 06 00 50 2a 20 00 14 01 44 00 04 00 50 00 14 01 4e 00 14 00 50 5c 4c 44 4b 4c 5c 41 31 33 2c 57 41 49 54 49 53 00 14 01 56 00 2a 00 50 5c 53 54 52 5c 41 31 33 2c 41 31 35 5c 53 54 4f 52 45 20 55 53 45 52 20 53 54 41 52 54 20 41 44 44 52   ┆   P*    D   P   N   P LDKL A13,WAITIS   V * P STR A13,A15 STORE USER START ADDR┆

Reduced view