DataMuseum.dk

top - metrics - download

    Length: 1466 (0x5ba)
    Notes: pts_type(SC)
    Names: »DVKB01.SC«

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

PTS(SC)

	IDENT DVKB01 	REL 10.0 80-03-14 870105041000 

*  KEYBOARD DEVICE WORK TABLE 
* 
	ENTRY	DVKB01	TABLE ENTRY 
	EXTRN	CTAB02 
	EXTRN	KBAD3	POINTER TO ADDRESSBLOCK
	EXTRN	DVDY01 
MMUPAG	EQU	1
* 
DVKB01	EQU	*	TABLE ENTRY
	DATA	/1100	CHANNEL PARAMETER 
	DATA	/8000	STATUS./8000 MEANS DEVICE READY 
	DATA	0	ECB ADDRESS 
	DATA	DWTEND-DVKB01	ORDER 
	DATA	KBAD3	POINTER TO ADDRESS BLOCK
	DATA	'KB'	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	CTAB02	CODE CONVERSION TABLE POINTER
	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	DVDY01	DVDY01O DEVICE 
	DATA	/FFFF	BACKSPACE AND CANCEL
	DATA	/BBBA	EOR AND DOUBLE ZERO 
	DATA	DWTSQ+DVKB01	POINTER TO FIRST PLACE IN QUEUE
	DATA	DWTSQ+DVKB01	POINTER TO LAST PLACE IN QUEUE 
DWTSQ	EQU	*-DVKB01
	DATA	0,0,0,0,0,0,0,0 
	DATA	0,0,0,0,0,0,0,0 
	IFT	MMUPAG=1 
DEVECB	EQU	*
	DATA	0,0,0,0,0,0 
	DATA	0,0,0,0,0,0,0,0 
	DATA	0,0,0,0,0,0,0,0 
	DATA	0,0,0,0,0,0,0,0 
	DATA	0 
	XIF
DWTEND	EQU	*
* 
	END