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

	.SBTTL	D6LQ3 - front end version condtional switches

; THIS FILE CONDITIONS THE DN60 FRONT-END SOURCE CODE
;  TO ASSEMBLE FOR THE DL10/DQ11/HASP FE

.REPT 0


                          COPYRIGHT (c) 1982,1981, 1980, 1979
            DIGITAL EQUIPMENT CORPORATION, maynard, mass.

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.

.ENDR

.IF EQ,DEBUG
.TITLE	D6LQ3 IBM HASP/3780/2780 DECSYSTEM-10 FRONT END WITH DL10/DQ11

	.MACRO	PGMNAM
MYNAME:	.ASCII	\D6LQ3 IBM HASP/3780/2780 DECSYSTEM-10 FRONT END,\
	.BYTE	15,12
	.ASCII	\         WITH DL10 INTERFACE ON A DEC-10, DQ11 LINE DRIVERS\
	.ENDM
.IFF
.TITLE	D6LQ3D DEBUGGING IBM HASP/3780/2780 DECSYSTEM-10 FRONT END WITH DL10/DQ11

	.MACRO	PGMNAM
MYNAME:	.ASCII	\D6LQ3D DEBUGGING IBM HASP/3780/2780 DECSYSTEM-10 FRONT END,\
	.BYTE	15,12
	.ASCII	\         WITH DL10 INTERFACE ON A DEC-10, DQ11 LINE DRIVERS\
	.ENDM
.ENDC	;.IF EQ,DEBUG

; SPECIFY MAJOR AND MINOR VERSION NUMBERS

;VMAJOR=1
;VMINOR=0
VEDIT=0		;THIS GETS INCREMENTED BY EACH MODULE

; CONDITION CHK11 TO USE DN87S DEVICE ADDRESSING

FT.D87=1
FT.87S=0
FT.D20=0
FTDL10=1	;USING A DL10
FTGLOM=0	;CHK11 HARDWARE CONFIGURATION SWITCH
FT.CPU=1
CK..VR=1	;CHK11 WILL PRINT THE VERSION NUMBER

; DEFINE THE AMOUNT OF SPACE TO LEAVE FOR DISPATCHER PUSH-DOWN
;  LIST AND VECTORS

LVPDVC=400		;LEAVE 1200 BYTES (DTE20 USES TO 1000)

; DEFINE MODEL OF PDP-11, SO THE MACROS WHICH DO INSTRUCTION
;  SIMULATION CAN EXPAND EFFICIENTLY

PDP11=40

FT.DQ=1				;   DQ11  driver
FT.DMC=0			;no DMC11 driver
FT.DUP=0			;no DUP11 driver
FT.KDP=0			;no KMC11/DUP11 driver

.IIF NE,FT.DQ,SPCVFY=1	;CHK11 WILL TEST DQ11 SPECIAL CHARACTERS


; SPECIFY THAT THE DN87S CONFIGURATION HAS A KG11-A

FTKG11=0

; SPECIFY THAT WE ARE NOT USING A DTE20

FTDTE20=0

; specify use(1)/no use(0) of TOPS-20 version 5 protocol

FTP5=0

; SPECIFY THAT WE ARE(1)/ARE NOT(0) ARE USING A FRONT END DEVICE

FTFEDV=0

; SPECIFY SMALL CHUNKS

CHSIZE=320

; SPECIFY THE MAXIMUM NUMBER OF LINES SUPPORTED ON THIS FRONT-END.

NLINES=6

; SPECIFY THE TRANSLATION OPTIONS (IBM 2780/3780 OR HASP-MULTILEAVING)
; XLOPTN IS CHANGED BY XLATE AND XLHASP TO INDICATE RESPECTIVE 
; TRANSLATION OPTIONS AVAILABLE.

XLOPTN=0


;THE FOLLOWING FLAG INDICATES THE PRESENCE OF THE HASP
;OPTION.

FT.HSP=0			;0 => no hasp, not 0 => hasp

DLADDR=164000			;provide the address of the DL10 window