Enter your search terms Submit search form
	Web pdp-10.trailing-edge.com

;                    COPYRIGHT (c) 1980, 1981, 1982
;                    DIGITAL EQUIPMENT CORPORATION
;                        Maynard, Massachusetts
;
;     This software is furnished under a license and may  be  used
;     and copied only in accordance with the terms of such license
;     and with the inclusion of the above copyright notice.   This
;     software  or any other copies thereof may not be provided or
;     otherwise made available to any other person.  No  title  to
;     and ownership of the software is hereby transferred.
;
;     The information  in  this  software  is  subject  to  change
;     without  notice  and should not be construed as a commitment
;     by DIGITAL EQUIPMENT CORPORATION.
;
;     DIGITAL assumes no responsibility for the use or reliability
;     of  its  software  on  equipment  which  is  not supplied by
;     DIGITAL.

.enable	lc
	.title	LELLC	- LP11 data base
	.ident	/001020/
;++
; LE Data Base Definition
;--
.mcall	dat$,end$,csr$w,lix$b,lst$d,syn$x
.globl	LE.CSR,LE.VEC,LE.PRI
dat$	dsr

	.byte	0		; (L.TIMC) TWO BYTE TIMER ENTRY, CURRENT VALUE
	.byte	0		; (L.NRD) NRD's PIX
	.word	LE.CSR		; (L.CSR) ONE WORD CSR POINTER
	.word	LE.VEC		; (L.DTXT) CONTEXT BLOCK (DTXTSZ)
	.word	LE.PRI		;   first two words are overwritten
	.BLKW	14.		;   following system initialization
	.byte	0		; (L.DTXL) NO. WORDS ON STACK AT SLEEP TIME
	.even
	.word	0		; (L.DFSP) STACK ORIGIN
	SYN$X			; (L.SYN) SYNCH BLOCK
	.word	LA.CLO		; (L.ASTS) ACTION STATUS BIT MAP
	.word	0,0		; (L.PUBP) BUFFER PTR DOUBLEWORD
	.word	0		; (L.PUBS) BUFFER SIZE DOWN COUNTER
	LST$D			; (L.DDMQ) CCB'S QUEUED FOR OUTPUT
	.word	0		; (L.PGCT) PHYSICAL PAGE COUNT
	.word	0		; (L.PGLM) PAGE LIMIT REGISTER
	.byte	0		; (L.PLNC) PHYSICAL LINE COUNT
	.byte	0		; (L.HUNG) HUNG DEVICE TIMER

; MISCELLANEOUS ITEMS
	.word	0		; (L.IOCN) OUTSTANDING IO COUNT
	.word	0		; (L.IOWT) CLOSE WAIT FLAG = CLOSE CCB

; CONTROL MESSAGE PROCESSING DATA BASE
	LST$D			; (L.CMSQ) CONTROL MESSAGE QUEUE
	.byte	0		; (L.RECO) CONTROL MESSAGE RESOURCE ERROR SWITCH
	.byte	0		; (L.RATT) PENDING ATT. MSG FLAG - REASON CODE
	.byte	0		; (L.CAPP) PENDING CAPABILITIES MESSAGE FLAG

	.byte	0		; (L.LNCT) LINE COUNTER
	.byte	0		; (L.COCT) COLUMN COUNTER
	.even
	LST$D			; (L.DLCQ) CCB'S QUEUED INTO DLC
	.byte	0		; (L.MFLG) CURRENT NURD MESSAGE FLAGS
	.byte	0		; (L.DMSQ) LAST GOOD/CURRENT DATA SEQ NUMBERS
	.byte	0		; (L.DMSG) DATA MESSAGE SEGMENT COUNT BYTE
	.byte	0		; (L.DMSS) DATA MSG CURRENT SEGMENT SIZE
	.byte	0		; (L.CAPN) CURRENT INDEX INTO CAPALITIES LIST
	.byte	0		; (L.NFSP) NO. FEATURE SPECS IN CURRENT MSG
	.even
	.word	0		; (L.DMCR) CHAR RPT COUNT, 2 BYTES USED AS WORD
	.word	0,0		; (L.DMAD) DATA MSG ADDRESS DOUBLEWORD (PTR)	
	.word	0		; (L.DMBS) DATA MSG BUFFER SIZE
	LST$D			; (L.PLBQ) FREE PHYSICAL BUFFER QUEUE
	.word	0,0		; (L.PLBP) CHARACTER POINTER DOUBLEWORD
	.word	0		; (L.PLBS) BUFFER SIZE DOWN COUNTER
	.byte	0		; (L.PBRC) LAST CHARACTER PROCESSED
	.even
	LST$D			; (L.MSGQ) OUTGOING MSG QUEUE
	.word	0,0		; (L.MSGA) CURRENT MSG BUFFER ADDRESS DOUBLEWORD
	.word	0		; (L.MSGS) CURRENT MSG BUFFER SIZE

; LP11 COMMON FEATURE LIST
	.byte	LCFETL			; (L.CFET) NUMBER OF COMMON FEATURES
	.byte	LE.DAT			; FEATURE FE.DAT     SUPPORTED
	.byte	0			; FEATURE FE.SER NOT SUPPORTED
	.byte	LE.LCR			; FEATURE FE.LCR     SUPPORTED
	.byte	LE.FWD			; FEATURE FE.FWD     SUPPORTED
	.byte	0			; FEATURE FE.EOF NOT SUPPORTED
	.byte	0			; FEATURE FE.DVT NOT SUPPORTED
	.byte	LE.TRN			; FEATURE FE.TRN     SUPPORTED
	.byte	0			; FEATURE FE.FNM NOT SUPPORTED
	.byte	LE.DWD			; FEATURE FE.DWD     SUPPORTED
; LCFETL = .-L.CFET

	.byte	LDFETL			; (L.DFET) # OF DEVICE SPECIFIC FEATURES
	.byte	0			; FEATURE 129    NOT DEFINED
	.byte	LE.HT			; FEATURE LP.HT      SUPPORTED
	.byte	LE.SFC			; FEATURE LP.SFC     SUPPORTED
	.byte	0			; FEATURE LP.OVP NOT SUPPORTED
	.byte	0			; FEATURE LP.CVF NOT SUPPORTED
	.byte	LE.FCC			; FEATURE LP.FCC     SUPPORTED
	.byte	0			; FEATURE LP.VFR NOT SUPPORTED
	.byte	LE.CHS			; FEATURE LP.CHS     SUPPORTED
	.byte	LE.PLE			; FEATURE LP.PLE     SUPPORTED
	.byte	0			; FEATURE LP.OPV NOT SUPPORTED
; LDFETL = .-L.DFET

; DATA MODE
	.byte	LEDATS
	.byte	1			; (LE.DAT) ASCII
	.byte	1			; ASCII IS STD

; LOWER CASE RAISE
	.byte	LELCRS
	.byte	0			; (LE.LCR) OFF

; FORM WIDTH
	.byte	FB.CL1			; (LE.FWD)
	.byte	132.

; RECORD TRUNCATION
	.byte	LETRNS			; (LE.TRN)
	.byte	0			; OFF
	.byte	0			; OFF IS STD

; DEVICE WIDTH
	.byte	FB.CL1			; (LE.DWD)
	.byte	132.			; STD WIDTH


; DEVICE SPECIFIC FEATURES
; HORIZONTAL TAB
	.byte	LEHTS			; (LE.HT)
	.byte	0			; STD TABS ON
	.byte	0

; STD VFU
	.byte	LESFCS			; (LE.SFC)
	.byte	1			; ON
	.byte	1

; FORTRAN CARRIAGE CONTROL
	.byte	LEFCCS			; ( LE.FCC)
	.byte	0			; OFF
	.byte	0

; CHARACTER SET
	.byte	FB.CL1			; ( LE.CHS)
	.byte	2			; 95 CHAR ASCII

; PAGE LIMIT ENFORCEMENT
	.byte	LEPLES			; ( LE.PLE)
	.byte	L.PGLM			; PAGE COUNTER
	.byte	0,0			; STD = 0 => OFF

END$
	.end