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

⟦bac97c4ff⟧

    Length: 4636 (0x121c)
    Notes: pts_type(SC)
    Names: »DW0701.SC«

Derivation

└─⟦13e5fd45a⟧ Bits:30009699 Philips computer tape "600507"
    └─⟦this⟧ »TOSSWORK/DW0701.SC« 
└─⟦bc20f3abf⟧ Bits:30009670 Philips computer tape "600126"
    └─⟦this⟧ »TOSSWORK/DW0701.SC« 

PTS(SC)

	IDENT	DW0701	REL 11.0 81-01-26 870105041100

* 
*   DEVICE WORK TABLE FOR DATA-COMMUNICATION DEVICE 1 
* 
	ENTRY	DW0701	TABLE ENTRY 
	EXTRN	DC07AD	POINTER TO ADDRESS-BLOCK
* 
**********************************************************************
* 
*	DWT 
* 
**********************************************************************
* 
*	    ................... 
*	  0 .  DWTCHP         . 
*	    ................... 
*	  2 .  DWTST          . 
*	    ................... 
*	  4 .  DWTECB         . 
*	    ................... 
*	  6 . DWTOPT . DWTOR  . 
*	    ................... 
*	  8 .  DWTADR         . 
*	    ................... 
*	 10 .  DWTTAB         . 
*	    ................... 
*	 12 .  DWTWAT         . 
*	    ................... 
*	 14 .  DWTTQ          . 
*	    ................... 
*	(16).  DWTUEC         .   IF   MMUPAG=1 
*	    ................... 
*	(18).  DWTMEC         .   IF   MMUPAG=1 
*	    ................... 
* DWTDRD	 +2 .  DWTSTB         .
*            ...................
*	 +4 .  DWTCHD         . 
*	    ................... 
*	 +6 .  DWTCHN         . 
*	    ................... 
*	 +8 .  DWTLAD         . 
*	    ................... 
*	+10 .  DWTRAD         . 
*	    ................... 
*	+12 .  DWTDR1/SUB     . 
*	    ................... 
*	+14 .  DWTRCL         . 
*	    ................... 
*	+16 .  DWTRTV         . 
*	    ................... 
*	+18 .  DWTRTP         . 
*	    ................... 
*	+20 .  DWTOPE         . 
*	    ................... 
*	+22 .  DWTOPN         . 
*	    ................... 
*	+24 .  DWTIPC         . 
*	    ................... 
*	+26 .  DWTIPT         . 
*	    ................... 
*	+28 .                 . 
*	    /  DRIVER DEPEND  / 
*	    /                 / 
*	    /                 / 
*	    ................... 
*	    .  STATISTIC      .   IF STAT=1 AND DWTSTB /=0
*	    /  BUFFER         / 
*	    ................... 
	EJECT
MMUPAG	EQU	0
* 
DW0701	EQU	*	TABLE ENTRY
	DATA	0	CHANNEL PARAMETER 
	DATA	/8000	STATUS./8000 MEANS DEVICE READY 
	DATA	0	ECB-ADDRESS 
	DATA	DWTEND-DW0701 
			RIGHT BYTE=ORDER 
	DATA	DC07AD	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	DSTATS-DW0701	DWTSTB
	DATA	0	DWTCHD
	DATA	0	DWTCHN
	DATA	0	DWTLAD
	DATA	0	DWTRAD
	DATA	0	DWTDR1 + DWTSUB 
	DATA	0	DWTRCL
	DATA	0	DWTRTV
	DATA	0	DWTRTP
	DATA	0	DWTOPE
	DATA	0	DWTOPN
	DATA	0	DWTIPC
	DATA	0	DWTIPT
	EJECT
* 
*	STATISTICS BUFFER 
* 
DSTATS	RES	0
* 
	IFT	MMUPAG=1 
DC:ECB	EQU	*	MMU ECB
	DATA	0,0,0,0,0,0,0 
	XIF
* 
DWTEND	EQU	*
	END

Full view